home *** CD-ROM | disk | FTP | other *** search
/ A.N.A.L.O.G. Magazine 1989 March / 89_mar.atr / gdw8.lst < prev    next >
File List  |  2023-02-26  |  287b  |  1 lines
  1. 180 X=USR(ADR(MISCLR$),PA+768,255,252):POKE 1720,0:RETURN ¢1090 IF PEEK(1720)<>0 THEN GOSUB 180¢1110 POKE 53278,0¢1120 IF STRIG(0)=1 OR PEEK(1700)<>0 OR PEEK(1720)<>0 THEN 1270¢1150 POKE PA+968,1:POKE 53278,0:POKE 1712,15:POKE 1716,6:POKE 1720,0:POKE 1700,1¢5340 POKE 1700,0:POKE 1720,0¢