Get Home

This is an entry for the November 2018 #tweettweetjam.  

It comes in at 547 characters.  I could have gone smaller, but something in me quite likes function _draw() rather than goto!

Code is below:

p=print
o=btn
r=rnd
a=band
y=92
h=0
w=110
function t()l=0
x=5
u=30
m={}end
t()
function c(x)
add(m, {p=x,x=r(w),y=-r(20),d=0,s=self,
k=function(s)p("🅾️",s.x,s.y,8)end,
u=function(s)s.y+=s.d
s.d+=0.01
if(s.y>97)s.y=-r(30)s.d=0
end})end
function _draw()
cls()
if(l>20)then
p("you win",45,63)u-=1
if(u<0)t()
else
x+=a(o(),2)/2-a(o(),1)p("웃",x,y,7)p("⌂",w,y)p("high score: "..h,7,106)
for i=0,20-l do
p("웃",i*6,99)end
line(0,97,128,97)
for a in all(m)do
a:u()a:k()
if(a.x>x-1 and a.x<x+7 and a.y>93)cls(8)t()
end
if(x>w)l+=1 x=5 c()
if(l>h)h=l
end
end