10 OUT &HAA,6:X=INP(&HA9)
20 IF (X AND 4)=0 THEN PRINT "GRAPH":END
30 GOTO 10