CLS
PRINT "Use keys 4, 8, 6, 2 for control, make sure the NumLock is on"
PRINT "ESC to exit"
PRINT " "
PRINT "Press any key to continue..."
a$ = INPUT$(1)

COLOR 14
x = 40
y = 10
1
CLS
LOCATE y, x
PRINT CHR$(2)
a$ = INPUT$(1)
IF a$ = "4" THEN x = x - 1
IF a$ = "6" THEN x = x + 1
IF a$ = "8" THEN y = y - 1
IF a$ = "2" THEN y = y + 1
IF a$ = CHR$(27) THEN SYSTEM
GOTO 1