summaryrefslogtreecommitdiff
path: root/apps/examples/bastest/tests/test37.bas
blob: 528e6f308c20f42915abc68f3e499471c45b5663 (plain) (blame)
1
2
3
4
5
6
10 open "i",1,"/mnt/romfs/test37.dat"
20 while not eof(1)
30 line input #1,a$
40 if a$="abc" then print a$; else print "def"
50 wend