RosettaCodeData/Task/Input-loop/BASIC256/input-loop.basic

10 lines
130 B
Plaintext

f = freefile
open f, "test.txt"
while not eof(f)
linea$ = readline(f)
print linea$ # echo to the console
end while
close f
end