home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er Special 62
/
64er_Magazin_Sonderheft_62_19xx_Markt__Technik_de_Side_B.d64
/
sounddemo.4
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
279b
|
6 lines
0 rem alexander weiss, landrat pfeiffer str.8, 6113 babenhausen4
1 s=54272:pokes+24,15:pokes+4,65:forx=1to250step12:pokes+1,x:pokes+3,x:pokes+24,x:next
2 fori=50to0step-1:pokes+1,i:pokes+24,i:pokes+2,i:pokes+3,i:next:pokes+4,66:fori=0to15:pokes+24,i
3 pokes+24,0:next:fori=255to0step-5:pokes+4,65:pokes+24,15:pokes+1,i:pokes+11,i:pokes+6,240
4 next:run