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