1 POKE53265,PEEK(53265)AND239
2 RESTORE
3 READX:X$=STR$(X):SAYX$
4 GETA$:IFA$=""THEN3
5 GETB$:IFB$=""THEN5
6 GOTO3