home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 138 / 138.d81 / solitaire.bas (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  284b  |  13 lines
  1. 100 dv=peek(186):ifdv<8thendv=8
  2. 110 f=f+1:onfgoto120,135,140,145,150,160,170,200
  3. 120 load"solitaire.bin",dv,1
  4. 135 load"solitaire.sid",dv,1
  5. 140 load"solitaire.bmp",dv,1
  6. 145 load"solitaire.mnu",dv,1
  7. 150 load"solitaire.spr",dv,1
  8. 160 load"solitaire.dvc",dv,1
  9. 170 load"solitaire.rec",dv,1
  10. 200 sys16384
  11. 210 sys50176
  12. 220 end
  13.