home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er Special 6
/
64er_Magazin_Sonderheft_06_86-06_1986_Markt__Technik_de_Disk_1_of_3_Side_B.d64
/
s.c.s.boot
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
253b
|
11 lines
150 a=a+1:if a=1 then load "s.c.s.obj.",8,1
160 poke 44,9:poke 9*256,0
180 poke 53280,0:poke 53281,0:poke 646,0
200 print chr$(147):for i=0 to 6:print:next
210 print "load ";chr$(34);"s.c.s.";chr$(34);",8"
220 for i=0 to 3:print:next:print "run"
230 for i=0 to 7:print chr$(145);:next
240 poke 631,13:poke 632,13
250 poke 198,2
260 new