home *** CD-ROM | disk | FTP | other *** search
/ Magic Disk 64 / Magic_Disk_64_88-10_1988_-_de_Side_A.d64 / m1 (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  292b  |  11 lines
  1. 10 rem ladeprogramm
  2. 20 on(a+1)goto25,30,40,50,60,70
  3. 25 a=1:load"m7",8,1
  4. 30 a=2:sys8*4096:load"m2",8,1
  5. 40 a=3:sys8*4096+3:print"[147]":poke53272,21:ifpeek(828)>0thenpoke816,215:poke817,200
  6. 45 load"m3",8,1
  7. 50 a=4:poke249,0:poke250,7*16:poke251,0:poke252,8*16:poke253,0:poke254,13*16
  8. 55 sys23808+3:load"m4",8,1
  9. 60 a=5:load"m5",8,1
  10. 70 a=6:load"m6",8,1
  11.