home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
A.N.A.L.O.G. Magazine 1989 March
/
89_mar.atr
/
gdw9.lst
< prev
next >
Wrap
File List
|
2023-02-26
|
318b
|
1 lines
180 X=USR(ADR(MISCLR$),PA+768,255,252):POKE 1720,0:IF PEEK(1716)<>255 THEN RETURN ¢190 POKE 675,15¢200 FOR X=4 TO 0 STEP -1:POKE 705,112+X*3:POKE 706,112+X*3:FOR L=1 TO 10:NEXT L:NEXT X¢210 POKE 1685,0:POKE 1686,5¢220 POKE 53249,0:POKE 53250,0:RETURN ¢1300 POKE 1685,235:POKE 1686,240:POKE 705,40:POKE 706,40:SAUCER=1¢