Characters/Bytes used
985/989

Source Code
--bowlingballblitz
--trix
function _init()n=125 q=118 p={x=64,y=q}b={}e={}k=0 ded=false pnt=0end
function _update()if not ded then cls(1)imp()sp()dau(b,0)dau(e,1)
?"*",p.x,p.y,7
?pnt,0,0,7
else cls(1)
?"gameover!\npoints: "..pnt,34,64
?"restart(❎)",34,76
if(btnp(5))then ded=false _init()
end end end
function imp()mul=2
if(btn(4))mul=4
if(btn(0))p.x-=mul
if(btn(1))p.x+=mul
if(p.x<0)p.x=0
if(p.x>n)p.x=n
if(btnp(5))pew()end
function pew()add(b,{x=p.x,y=p.y,d=function(s)
?"\127",s.x,s.y,9
if(s.y<0)del(b,s)
end})end
function sp()k+=1
if(k>30-flr(rnd(pnt/2)))then add(e,{x=flr(rnd(q)),y=0,d=function(s)
if((c(s.x,s.y,10,10,p.x,p.y,3,3))or(s.y>q))ded=true
for i in all(b)do if(c(s.x,s.y,10,10,i.x,i.y,3,3))then del(b,i)del(e,s)pnt+=1end end
?"\^w\^t●",s.x,s.y,6
end})k=0end end
function moo(s,d)
if(d==0)s.y-=1
if(d==1)s.y+=1
end function dau(t,di,ta)for i in all(t)do moo(i,di)i:d()end end function c(j,v,u,o,l,w,h,g)if(j<=l+h)and(j+u>=l)and(v<=w+g)and(v+o>=w)then return true end end