home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Arcade / RAGS2RICHES.SDA / BUMS (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  1004 b   |  33 lines
  1. 1 IFA=1THEN GOTO 170
  2. 10 POKE53281,0:POKE 53280,0:PRINT"[159]"
  3. 20 PRINT"[147]   RAGS TO RICHES   BY BOB KEENER"
  4. 30 PRINT"COPYRIGHT 1985 ALL RIGHTS RESERVED"
  5. 40 PRINT" LOADING TIME APPROXIMATELY 4 MIN."
  6. 50 IFB=0 THEN B=1:LOAD"SETUP",8,1
  7. 120 FORA=49154TO49317:READI:POKEA,I:NEXT
  8. 150 A=1
  9. 160 LOAD "[129]PIC A TITLE   ",8,1
  10. 170 POKE53280,0:SYS 49154
  11. 190 SYS 24272
  12. 200 DATA173,17,208,41,239,141,17,208
  13. 210 DATA162,127,160,64,32,156,192,162
  14. 220 DATA4,160,0,32,161,192,162,131
  15. 230 DATA160,39,32,114,192,162,131,160
  16. 240 DATA40,32,156,192,162,216,160,0
  17. 250 DATA32,161,192,162,135,160,15,32
  18. 260 DATA114,192,173,16,135,141,33,208
  19. 270 DATA173,17,208,9,34,141,17,208
  20. 280 DATA173,22,208,41,223,9,16,141
  21. 290 DATA22,208,173,24,208,9,8,141
  22. 300 DATA24,208,162,96,160,0,32,156
  23. 310 DATA192,162,32,160,0,32,161,192
  24. 320 DATA162,127,160,63,32,114,192,173
  25. 330 DATA17,208,9,16,141,17,208,96
  26. 340 DATA142,1,192,140,0,192,160,0
  27. 350 DATA177,251,145,253,165,252,205,1
  28. 360 DATA192,208,8,165,251,205,0,192
  29. 370 DATA208,1,96,230,251,208,2,230
  30. 380 DATA252,230,253,208,227,230,254,76
  31. 390 DATA122,192,134,252,132,251,96,134
  32. 400 DATA254,132,253,96
  33.