open "input.txt" for reading as #1
open "output.txt" for writing as #2
while not eof(1)
line input #1 linea$
print #2 linea$
wend
close #1
close #2