home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er Special 85
/
64er_Magazin_Sonderheft_85_19xx_Markt__Technik_de_Side_B.d64
/
02
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
337b
|
7 lines
10 ifa=0thena=3:poke53281,0:poke56576,151:poke53272,21:poke648,4:poke53269,0:load"04",8,1
20 ifa=3thena=4:print"[144][147]":load"05",8,1
23 ifa=4thena=5:load"03",8,1
30 fort=0to15:poke53248+t,0:nextt:fort=0to20:poke1024+t,160:poke1064+t,160:next:poke53280,0
40 poke56322,255:poke633,139:sys49152:wait789,234:print"[144][147]l[207]"chr$(34)"06";:poke53281,0
50 printchr$(34)",8,1":print"r[213]":poke198,10:poke631,19:poke632,13:poke633,13:poke139,10:poke56322,2