Do LineIn Input_file 'String_8bit',
   Transform String_8bit 'String',
   LineOut Output_file String
While Chars( Input_file )
