home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1989 March / 64er_Magazin_89-03_1989_Markt__Technik_de_Side_A.d64 / hilfsrout.lst (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  455b  |  24 lines
  1. 1000 data printz,setregs,z,z
  2. 1010 data     ,word,60056,
  3. 1020 data     ,gosub,48589,
  4. 1030 data     ,return,,
  5. 1040 rem
  6. 1100 data printchrz,setregs,z,z
  7. 1110 data     ,gosub,65490,
  8. 1120 data     ,return,,
  9. 1130 rem
  10. 1200 data getz,move#,0,z
  11. 1210 data     ,cmove,198,z
  12. 1220 data     ,if,z,getz1
  13. 1230 data     ,return,,
  14. 1240 data getz1,cmove,631,z
  15. 1250 data     ,cmove#,0,198
  16. 1260 data     ,return,,
  17. 1270 rem
  18. 1300 data inputz,gosub,65487,
  19. 1310 data     ,word,645,
  20. 1320 data     ,move#,0,z
  21. 1330 data     ,cmove,2,z
  22. 1340 data     ,return,,
  23. 1350 rem
  24.