home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disk User Volume 4 #3 / Commodore_Disk_User_Vol.4_3_1991_-.d64 / menu (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1991-01-01  |  993 b   |  26 lines
  1. 0 rem ********************************
  2. 1 rem *intro credits copyright 1989  *
  3. 2 rem ********************************
  4. 3 rem ********************************
  5. 4 rem *intro credits copyright 1989  *
  6. 5 rem ********************************
  7. 6 rem ********************************
  8. 7 rem *intro credits copyright 1989  *
  9. 8 rem ********************************
  10. 9 rem ********************************
  11. 10 rem *intro credits copyright 1989  *
  12. 11 rem ********************************
  13. 12 print"[147]"
  14. 100 l=l+1:poke53281,l:ifl=3thenload"m.mc",8,1
  15. 105 ifl=1thenload"inter stop",8,1
  16. 106 ifl=2thensys16384+256+256+256:goto100
  17. 110 ifl=4thenload"m.music",8,1
  18. 120 poke54296,15:fort=0to300:next:sys16384+256+256+256
  19. 130 ifa=56thens$="intro":load"rtu",8,1
  20. 135 print" press 1 for introduction"
  21. 136 print"       2 for save code"
  22. 137 print"       3 for small demo"
  23. 138 if a=59thens$="save code":load"rtu",8,1
  24. 140 ifa=8thens$="demo ba":load"rtu",8,1
  25. 150 a=peek(197):goto130
  26.