Do LineIn >String_{8bit}< Input_file,
   Transform >String< String_{8bit},
   LineOut Output_file String
While Lines( Input_file )
