Thread:Randomouscrap98/@comment-5106053-20140805195949

I was wondering if this movement code for a sprite could be made any better, like shorter, or performing better, etc. ACLS CLEAR PNLTYPE"OFF" X=127 Y=95 SPSET 0,68,2,0,0,2 SPHOME 0,7,7 SPOFS 0,X,Y @MAIN IF BUTTONTHEN GOSUB@BTN IF!(BUTTONAND 15)AND(SPCHK(0)AND 8)!=0THEN SPANIM 0,1,0,1 VSYNC 1 GOTO@MAIN @BTN IF BUTTONAND 15THEN GOSUB@MOV RETURN @MOV IF BUTTONAND 1THEN ANG=270:SPCHR 0,76 IF BUTTONAND 2THEN ANG=90:SPCHR 0,68 IF BUTTONAND 4THEN ANG=180:SPCHR 0,72 IF(BUTTONAND 5)==5THEN ANG=225 IF(BUTTONAND 6)==6THEN ANG=135 IF BUTTONAND 8THEN ANG=0:SPCHR 0,64 IF(BUTTONAND 9)==9THEN ANG=315 IF(BUTTONAND 10)==10THEN ANG=45 IF!(SPCHK(0)AND 8)THEN SPANIM 0,4,16 X=X+COS(RAD(ANG)) Y=Y+SIN(RAD(ANG)) SPOFS 0,X,Y RETURN  