How many characters of code did you use?
555

Include your code here, if you'd like to show it off!
a=0g=0h=1s=0w=128b={}o={}::_::for i=0,999do
​x=rnd(w)y=rnd(w)c=0
​if(h<1)c,x,y=pget(x,y),x-1+rnd(2),y-1+rnd(2)
​pset(x,y,c)end
​y=64+sin(a)*55for k=1,4do
​if(g<1)o[k]={x=64,y=-rnd(w)}
​o[k].y+=h/2c=o[k].x
​r=o[k].y
​circ(c,r,3,8)
​if(r>w)h=0
​for i=3,11,2do
​if(g<1)b[i]=34
​if(abs(y/9-.5-i)<.6)b[i]=max(b[i],g)
​b[i]-=i/250x=b[i]
​if(i==flr(r/9)and c<x+34and c>x)o[k],s={x=10+rnd(115),y=-rnd(w)},s+1
​rect(x,i*9,x+30,(i+1)*9,8-h)
​end
​end
​if btn(4)then
​g+=h*2else
​g=max(g-3,9)
​if(g==9)a+=h/w
​end
​line(6,y,g,y,7+9-g)rectfill(44,6,89,14,0)
​?"score:"..s,46,8,7
​flip()goto _