home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Games / WARLORDS.SDA / LOADER1 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  533 b   |  16 lines
  1. 0 IFA=0THENA=1:POKE53281,.:POKE53280,.:POKE646,.:PRINT"[147]":LOAD"FASTDISK",8,1
  2. 1 IFA=1THENA=2:SYS4096:LOAD"WARTHEME",8,1
  3. 2 IFA=2THENA=3:LOAD"FAST DRAW",8,1
  4. 3 IFA=3THENA=4:LOAD"SENTIENT",8,1
  5. 4 PRINT"[147]":C=33577
  6. 5 SYS39000
  7. 6 POKE53281,PEEK(C):POKE53280,PEEK(C+1)
  8. 7 POKE56578,63:POKE56576,150:POKE53270,216:POKE53265,59:POKE53272,120
  9. 8 SYS49152:POKE49417,0:TI$="000000"
  10. 9 IFTI$<"000011"THEN9
  11. 10 POKE56576,199:POKE53265,27:POKE53270,200:POKE53269,0:POKE53272,20
  12. 11 Q$=CHR$(34):PRINT"[147]POKE788,49:POKE789,234:SYS4099:NEW:
  13. 12 [153]:[153]:[153]"LOAD"Q$"LOADER2"Q$",8:":[153]:[153]:[153]:[153]
  14. 13 [153]"R(null):
  15. 14 PRINTCHR$(19):POKE198,3:POKE631,13:POKE632,13:POKE633,13:END
  16.