How many characters did you use?
556

Include your code here, if you'd like to show it off!
a=abs
l=rectfill
b=btn
w=0
f=0
x=32
y=32
d=0
s=0
m={}
p="●"
r={}
n=128
o=99
t=900::_::f+=3cls(4)t-=1
?w
if(t==0)return
if(b(1))s+=0.9
if(b(5)and d==0)d=-5-a(s)p="●"
for u=0,n do
q=u*8-f%16
h=96+10*sin((f+u)/o)for v=0,9 do
k=(u%2)*8+v*16l(q,k,q+8,k+8,2)end l(u,0,u,h+9,11)l(u,0,u,h+4,13)m[u]=h end
if(f%9==0)add(r,{x=n,y=min(64-w/2+rnd(w),h)})
x=max(9,min(99,x+s))s-=0.3if(x<10)s=0
y+=d d+=0.9 g=m[flr(x)]
if(y>g)y=g d=0 p="★"s*=0.9
?p,x,y,12
for c in all(r)do
c.x-=3
?0,c.x,c.y,10
if(8>a(c.x-x)and 5>a(c.y-y))w+=1del(r,c)end
?w,0,0,7
?t/30,0,6
flip()goto _