home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Golden Disk
/
Golden_Disk_91-08_1991_-_de_Side_A.d64
/
merkur.boot
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
1KB
|
25 lines
0 poke53280,0:poke53281,0:x=x+1
2 ifx=1thengosub30:load"merkur.base",8,1
3 ifx=2thengosub40:load"merkur.musc",8,1
4 ifx=3thengosub50:load"merkur.text",8,1
6 ifx=4thenload"merkur.pict",8,1
8 ifx=5thenload"merkur.chrs",8,1
10 sys49152:poke4121,6:sys4096:sys4096+6:sys49155:sys4096+3
12 poke53276,0:poke56325,64:poke53277,0:poke53276,0:sys65409
14 poke53280,0:poke53281,0:print"[147][144]l[207]"chr$(34)"merkur.qbot"chr$(34)",8:":print"r[213]:"
16 poke631,19:poke632,13:poke633,13:poke198,3:end
20 open1,8,15,"s:merkur.boot":close1:save"merkur.boot",8:end
30 print"[151]presents":return
40 print"[151]>>[152]>>[155]>> operation merkur [155]<<[152]<<[151]<<":return
50 print"lieber strategiespieler,"
62 print"da sie den namen unserer firma in diesem";
64 print"verlag (und natuerlich auch anderswo)"
66 print"noch oefter hoeren bzw. lesen werden,"
68 print"moechten wir sie bitten, sich auf"
70 print"unseren neuen namen einzustellen und den";
72 print"alten, den sie auch noch teilweise in"
74 print"diesem spiel finden werden, zu verges-"
76 print"sen. vielen dank."
78 print"und hier unser neuer name:"
80 print"[158] r.o.m. software developements":return