xiuos/Ubiquitous/Nuttx/apps/examples/bastest/tests/test11.bas

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