ACLS:SNDSTOP SPSET 0,0 WHILE TRUE STICK OUT SX,SY X=X+SX*8 Y=Y-SY*8 SPOFS 0,X,Y IF BUTTON(2)==#A THEN BEEP ENDIF VSYNC WEND