How many characters of code did you use?
553

Include your code here, if you'd like to show it off!
z=0::g::t=60d=128w=64r=rnd v=btn
for i=1,16383do
sset(i%d,i/d,r(3))mset(i%16,i/1024,r(d))end
q=0e={}f=0a=w b=w
for i=1,999do add(e,{x=r(d),y=r(d)})end::_::cls()t-=.03if(v(0))q-=.01
if(v(1))q+=.01
h=q+1/8o=cos(h)p=sin(h)k=p+o l=p-o
if(v(2))a+=k b+=l
if(v(3))a-=k b-=l
c=cos(q)s=sin(q)for i=-w,w do
tline(0,w+i,d,w+i,a/8-w*c/24-i*s/24,b/8+i*c/24-w*s/24,c/24,s/24)end
for i in all(e)do
n=(i.x-a)*3m=(i.y-b)*3x=n*c+m*s y=m*c-n*s
?"●",x+w,y+w,9
if(abs(x)<8and abs(y)<8)del(e,i)f+=1
end
?"웃"..f.."~"..z,60,60,7
?flr(t),0,0
if(t<0)z=max(f,z)goto g
flip()goto _