readline
readline()
readline(bestandsnr)
Deze functie leest het bestand lijn per lijn uit.
Specifieer je geen bestandnummer dan gebruikt de functie bestandnr 0
((prorgamma gevonden in /home/.../basic/Examples/testing)) # testlineio.kbs - test readline, writeline, and eof # 2008-08-29 jmr open "foo.txt" reset for l = 1 to 8 writeline "Data file line " + l + "." next l l = 0 donext: if eof then goto done l = l + 1 a$ = read print "line " + l + "=" + a$ goto donext done: print "total of " + l + " lines." close end
Dir programma opent eerst Foo.txt, maakt het leeg en schrijft er dan 8 regels in. VErvolgens wordt elke lijn uitgelezen als token in variable a$ en uitgeschreven op het scherm. Dit ziet er dan zo uit: ++++Resultaat|
line 1=Data file line 1. line 2=Data file line 2. line 3=Data file line 3. line 4=Data file line 4. line 5=Data file line 5. line 6=Data file line 6. line 7=Data file line 7. line 8=Data file line 8. total of 8 lines.
++++