10 REM EXIT = EXIT 
20 
30 DIM GG(9)
40 FOR X=0 TO 9;GG(X)=#FFF;NEXT X
50 
60 FOR X=0 TO 1
70 
80 P=#FC30
90[
100:GG0 LDA @#0B;JSR #FFC2;BCC GG0
110:GG2 LDA @#00;JSR #FFC8;LDA @#5B;JSR #FFC8;JSR #FFC8
120 JSR #FFC5;CMP @3;BNE GG3
130 LDA @#00;JSR #FFC8;LDA @#15;JMP #FFC8 
140:GG3 LDA @#0A;JSR #FFC2;JMP #CD9B
150]
160 NEXT
170 END