CLS
SCREEN 7
Z = 1
x = 160
y = 110
1 CIRCLE (x, y), 2, Z
A$ = INKEY$
IF A$ = "8" THEN y = y - 2
IF A$ = "2" THEN y = y + 2
IF A$ = "4" THEN x = x - 2
IF A$ = "6" THEN x = x + 2
IF A$ = "7" THEN x = x - 1: y = y - 1
IF A$ = "9" THEN x = x + 1: y = y - 1
IF A$ = "1" THEN x = x - 1: y = y + 1
IF A$ = "3" THEN x = x + 1: y = y + 1
IF A$ = "c" OR A$ = "C" THEN Z = Z + 1
IF Z = 16 THEN Z = 1
IF A$ = "d" OR A$ = "D" THEN Z = 0
IF A$ = "5" THEN END
GOTO 1