home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disk User Volume 1 #2 / Commodore_Disk_User_Vol.1_2_1988_-.d64 / quad (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  369b  |  13 lines
  1. 1 a=a+1:ifa>1 then print" quad.";:goto50
  2. 5 dev=8:poke53281,8:poke53280,2
  3. 10 print"[147][158]****************************************"
  4. 15 printtab(16);"[145]q+u+a+d"
  5. 20 print"[158]****************************************"
  6. 25 print"[151]       programmed by nick sumner"
  7. 35 print"[151]           loading in :"
  8. 40 goto 1
  9. 50 if a=2 then print"mc1":load"quad.mc1",8,1
  10. 55 if a=3 then print"mc2":load"quad.mc2",8,1
  11. 80 if a=4 then sys16384
  12. 85 goto 1
  13.