forked from xuos/xiuos
6 lines
85 B
QBasic
6 lines
85 B
QBasic
10 open "i",1,"test.bas"
|
|
20 while not eof(1)
|
|
30 line input #1,a$
|
|
40 print a$
|
|
50 wend
|