Thread:Lumage/@comment-15974427-20141214061144/@comment-14600979-20141215042842

BCNT=10 X=RND(128):Y=RND(4)*8:R1=0:R2=0 SPSET 0,194,5,0,0,0:SPANIM 0,2,10:SPHOME 8,8:SPOFS 0,X,Y P1=1 TI=MAINCNTL @GLOOP VSYNC 1 GCLS IF MAINCNTL-80=TI THEN P2=1 IF P1 AND CLD<1 THEN RTM=0:GOSUB @B IF P2 AND CLD<2 THEN RTM=80:GOSUB @B RT=RT+1 GOTO @GLOOP @B FOR I=0 TO BCNT GCIRCLE X+((RT-RTM)*SIN(RAD(I*3.6))),Y+((R2-RTM)*COS(RAD(I*3.6))),5,80 GPAINT X+((RT-RTM)*SIN(RAD(I*3.6))),Y+((R2-RTM)*COS(RAD(I*3.6))),67 IF GSPOIT(X+((RT-RTM)*SIN(RAD(I*3.6))),Y+((R2-RTM)*COS(RAD(I*3.6))))==0 THEN CLD=(RTM+80)/80 RETURN

scale one ten how buggy