home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 13 / 64er_Magazin_Sonderheft_13_19xx_Markt__Technik_de_Side_A.d64 / seq-dat.-monitor (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  276b  |  17 lines
  1. 90 dim a(100),b(100)
  2. 100 input"[147]name der seq-datei:";ic$
  3. 130 open1,8,2,ic$+",s,r"
  4. 135 input#1,ff
  5. 140 input#1,da
  6. 145 input#1,db
  7. 150 i=1
  8. 160 input#1,a(i)
  9. 165 input#1,b(i)
  10. 170 ifst<>64theni=i+1:goto160
  11. 180 close1:an=i
  12. 200 print"ff=";ff
  13. 210 print"da=";da;tab(20);"db=";db
  14. 220 fori=1toan
  15. 230 print"a";i;"=";a(i);tab(20);"b";i;"=";b(i)
  16. 240 nexti
  17.