2 D=PEEK(186):POKE2366,D:POKE3657,D:POKE3824,D:POKE3907,D 10 REM 20 REM COPYRIGHT 1986 BY COMPUTE! PUBLICATIONS, INC. 30 SYS 2165