Like this: ACLS SPSET 0,0,144 SPSCALE 0,0.75,0.75 @LOOP B=BUTTON() SPOFS 0,X,Y IF B AND #UP THEN DEC Y,1'Increase the speed by increasing 1 IF B AND #DOWN THEN INC Y,1 IF B AND #LEFT THEN DEC X,1 IF B AND #RIGHT THEN INC X,1 WAIT 5'Increase speed by lowering 5 GOTO @LOOP