cartdata("hay")function w()h=dget(0)b={}x=50l=127s=0e={}y=84k=0end
w()c=btn::b::flip()cls(k%4)k=.04+k%28?"\aa"..sub("deffdeffeddeffdeffeddcedc",k,k)
if(c(0))x-=2
if(c(1))x+=2
if(c(2))y-=2
if(c(3))y+=2
x=x%90?"pt:"..s,95,0,7
y=y%l?"hi:"..h
if(btnp(4))add(b,{x=x,y=y})
for i in all(e)do
u=i.v*k
p=i.x?"♥",p,u,8
if(#e>l)del(e,i)
if(x<p+3and p<x+3and u<y+3and y<u+3)w()?"\a"
for o in all(b)do?"a",o.x+2,o.y,12
o.y-=.1if(o.y<0)del(b,o)
if(o.x<p+9and p<o.x+9and u<o.y+9and o.y<u)s+=1del(e,i)?"★\ab",7
end
end?"☉",x,y,7
add(e,{x=rnd(90),v=k%6})if(s>h)dset(0,s)
goto b