home *** CD-ROM | disk | FTP | other *** search
/ A.N.A.L.O.G. Magazine 1989 April / 89_apr.atr / gdw1.lst < prev    next >
File List  |  2023-02-26  |  271b  |  1 lines

  1. 1270 IF PEEK(53251)=0 THEN 1330¢1280 CHANGE=-CHANGE:POKE 1791,129-PEEK(1791):POKE 53255,127+77*CHANGE¢3310 FOR BYTE=39 TO 205:POKE PA+768+BYTE,192:NEXT BYTE¢5440 POKE 704,15:POKE 705,40:POKE 706,40:POKE 707,15¢5450 POKE 53248,128:POKE 53249,0:POKE 53250,5:POKE 53255,204¢