ACLS
SPSET 0,940:'ロボット
X=200:Y=200
@MAIN
SPOFS 0,X,Y
B=BUTTON()
IF B==1 THEN Y=Y-1:'ウエ
IF B==2 THEN Y=Y+1:'シタ
IF B==4 THEN X=X-1:'ヒダリ
IF B==8 THEN X=X+1:'ミギ
VSYNC 1
GOTO @MAIN
こんな感じでどうでしょうか。
十字キーの上・下・左・右がどれか一つだけ押された場合、BUTTONの値は1・2・4・8を返します。
BUTTONのヘルプを見ると、下のほうに「単独で押された場合の戻り値」が書いてあるので、参考にしてください。