How many characters of code did you use?
558

Include your code here, if you'd like to show it off!
_set_fps(60)n,x,y,a,b,r,m,l,g,h,p=64,0,0,0,0,20,15,20,btn,mid,{}for i=1,2000 do p[i]={x=x,y=y}c,d=cos(a),sin(a) x+=m*c y+=m*d a+=b if(l<i)l+=20 b=(rnd(2)-1)*.01 end x,y,z,a,w,b,t=-n,-n,0,0,0,.005,3000::_::cls(3)t-=1 if(g(0))a+=b if(g(1))a-=b if(g(4) or t<0)w-=.04 if(g(5))run() w=h(w+.02,4)c,d=cos(a),sin(a) x+=w*c y+=w*d z+=w for i=1,#p do q=p[i]e,f=q.x-x,q.y-y if h(-r,e,128+r)==e and h(-r,f,128+r)==f then circfill(e,f,r,2) if(i>2 and i%4<1)o=p[i-2]line(o.x-x,o.y-y,e,f,7) end end if(pget(n,n)==3)w=.1*w+.1 line(n,n,n+5*c,n+5*d,10) ?t.." "..z flip()goto _