Thread:Berneyvonbean/@comment-26864186-20150807055211/@comment-26864186-20150809050543

@ENDLEV GOSUB @SONG3 GPAGE 0 SPANIM 0,1,2 IF SIZE > 1 THEN SPANIM 99,1,2 D=0 @FINDFLG IF GSPOIT(X+D,Y+8) != 7 THEN D=D+1:GOTO @FINDFLG IF D==0 THEN X=X-20:GOTO @FINDFLG SPCHR 0,10 IF SIZE>1 THEN SPCHR 99,26 @ENDLP SPOFS 0,X,Y,2 IF SIZE>1 THEN SPOFS 99,X-2,Y-16,2 Y=Y+2 C=GSPOIT(X+D,Y+16) IF C==1 THEN GOTO @ENDCON WAIT 2 GOTO @ENDLP @ENDCON WAIT 20 Y=Y-2 X=X+20 SPOFS 0,X,Y,2 IF SIZE>1 THEN SPOFS 99,X-2,Y-16,2 SPCHR 0,11 IF SIZE>1 THEN SPCHR 99,27 WAIT 30 X=X+8 SPOFS 0,X,Y,10 IF SIZE>1 THEN SPOFS 99,X-2,Y-16,10 WAIT 10 D=2 @REPTOFLR WAIT 2 Y=Y+D IF D<8 THEN D=D+2 SPOFS 0,X,Y,2 IF SIZE>1 THEN SPOFS 99,X-2,Y-16,2 IF GSPOIT(X,Y+14)==0 THEN GOTO @REPTOFLR Y=Y-(Y%16) SPOFS 0,X,Y,2 IF SIZE>1 THEN SPOFS 99,X-2,Y-16,2 WAIT 20 SPCHR 0,2 SPANIM 0,4,10 SPOFS 0,280,Y,100 IF SIZE==1 THEN GOTO @ENDRTR SPCHR 99,18 SPANIM 99,4,10 SPOFS 99,278,Y-16,100 @ENDRTR WAIT 350 GOTO @PTOE