home *** CD-ROM | disk | FTP | other *** search
/ Pulp 3 / Pulp_03_2000_POL_de.d64 / boot.bas (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  875b  |  35 lines
  1. 0 rem open1,8,15,"s:boot.bas":close1:save"boot.bas",8
  2. 1 poke 53370,0:poke53280,0:poke53281,0
  3. 2 rem by skernsoft 3/2000
  4. 3 u=peek(186)
  5. 99 if peek(2)=192 thensys336:goto300
  6. 100 print"[147]           [208]ul[208] [194]oot
  7. 110 [153]"(NULL)chnelllader / (NULL)ormal";
  8. 120 [161]a$:[139]a$[178]""[167]120
  9. 121 [139] a$[178]"n"[167]300
  10. 150 [153]"loadstopload"[199](34)"fast"[199](34)","u
  11. 152 [153]"sys 2080,00288,192,214,n,3
  12. 153 print"load"chr$(34)"boot.bas"chr$(34)","u"
  13. 200 [137]1050
  14. 300 b$[178]"pulp2.zds":a[178]48:[141]1000
  15. 301 b$[178]"stax.tur" :a[178]16:[141]1000
  16. 302 b$[178]"megatron.nbs":a[178]32:[141]1000
  17. 303 b$[178]"irq1/2.exe":a[178]47:[141]1000
  18. 320 :
  19. 350 b$[178]"intro.bas":[137]1010
  20. 380 [128]
  21. 400 b$[178]"pulp6.zds":a[178]48:[141]1000
  22. 401 b$[178]"muxold" :a[178]16:[141]1000
  23. 402 b$[178]"musirq.exe":a[178]47:[141]1000
  24. 420 :
  25. 450 b$[178]"main.bas":[137]1010
  26. 480 [128]
  27. 1000 u[178][194](186):[158](57812)b$,u:[151]780,0:[151]781,0:[151]782,a
  28. 1005 [158]65493:[151]648,4:[142]
  29. 1010 [153]"loadstop    "[199](34)b$[199](34)","u":";
  30. 1020 [151]44,64:[151]4096[172]4,0
  31. 1030 [151]631,131:[151]198,1:[162]
  32. 1040 [128]
  33. 1050 [151]631,131:[151]632,13:[151]634,13
  34. 1060 [151]635,131:[151]198,4
  35.