How many characters did you use?
560

Include your code here, if you'd like to show it off!
h=0::z::x=6j=0s={}e={}f={}y=56m=128g=pget
a=add
r=rnd
b=band
for n=1,32 do
a(s,{x=r(m),y=n/.2})end::w::cls()
if(btnp(4))a(f,{x=x-2,y=y})
x-=b(p,1)*2p=btn()x+=b(p,2)y+=b(p,8)/4y-=b(p,4)/2y=mid(y,2,m-5)x=mid(x,0,m-4)
if(r()>.8)a(e,{x=m,y=r(m)})
::l::for ★ in all(s)do
q=★.x%m-2★.x=q
?"★",q,★.y+7,1
?"★",q*2,★.y,9
end
?"}",x,y,3
for ∧ in all(f)do
∧.x+=3if(j>h)h=j
?"∧",∧.x,∧.y,11
if(∧.x>m)del(f,∧)end
?j,0,1,7
?h,64,0
for ☉ in all(e)do
for i=0,4 do
if(g(☉.x-1,☉.y+i)>9)j+=1☉.x-=m
?"☉",☉.x,☉.y,8
end
☉.x-=5if(☉.x<0)del(e,☉)end
flip()
if(g(x+1,y+2)==8)goto z
goto w