IF SPHITSP(0.1) THEN GOSUB @BOUNCE GOTO @A @BOUNCE A=500 IF B==#UP THEN INC Y,1 IF B==#DOWN THEN DEC Y,1 IF B==#LEFT THEN INC X,1 IF B==#RIGHT THEN DEC X,1 RETURN