Here you go :) SPSET 0,2 X=100:Y=100 @LOOP STICK OUT TX,TY X=X+TX*2:Y=Y-TY*2 SPOFS 0,X,Y VSYNC 1 GOTO @LOOP