How many characters did you use?
555

Include your code here, if you'd like to show it off!
a=0t=0s=0.5r=0.005l=1
c=63h={}add(h,{r=99,a=rnd(1)})add(h,{r=99*1.5,a=rnd(1)})
z=sin
v=cos
::_::cls()x=c+15*v(a)y=c+15*z(a)circ(c, c, 5, 7)circ(x, y, 1, 8)
if(not btn(0) or not btn(1))a+=r
if(btn(0))a+=0.03
if(btn(1))a-=0.03
for i=1,#h do
o=h[i]
q=o.r
n=o.a
k=c+q*v(n)u=c+q*z(n)
for d=1,5 do
p=c+q*v(n+d/6)j=c+q*z(n+d/6)line(k,u,p,j,7)k=p u=j
end
o.a+=r o.r-=s
if(q<=6)o.r=99o.a=rnd(1)
end
if(pget(x,y)==7 or pget(x+v(a),y+z(a))==7 or pget(x-v(a),y-z(a))==7)l=_
t+=1/30s+=0.0005r+=0.00001*(abs(r)/r)if(rnd(1)<=0.01)r=-r
?flr(t),1,1,8
flip()
if(l)goto _