SPSET 0,0:SPSET 1,1 WHILE TRUE STICK OUT SX,SY X=X+SX*8 Y=Y-SY*8 SPOFS 0,X,Y SPANIM 1,"XY",-180,X,Y,1 VSYNC WEND