All the way UP (TweetTweetJam 7)

Jump... don't fall down... all the way up. A game in 555 characters of code for TweetTweetJam 7.

Controls: Left / Right

PICO-8 Source Code:

_set_fps(60)t=0f=128l=64r=rectfill::s::x=l y=l v=0p={}z={}s=-8m=0k=1g=l h=f::_::cls(1)
?s
?t
for i=1,f do
a=i/f
b=(time()+i*1.27)*50%90pset(l+b*cos(a),l+b*sin(a),b)end
if(y-h<l)add(p,{x=g%f,w=8,y=h})g+=rnd(2)\1*l-32h-=16s+=1k+=.01
m+=.1*(y-l-m)
for q in all(p)do
a,b,c,d=q.x-q.w,q.y-m,q.x+q.w,q.y-m+4r(a,b,c,d,12)r(a+f,b,c+f,d)
if((abs(x-q.x)<9or abs(x+f-q.x)<9or abs(x-f-q.x)<9)and abs(y+2-q.y)<4and v>0)v=-1.3
if(q.y-h>f)del(p,q)
end
b=btn()x+=k*((b&2)/2-(b&1))x%=f
?"웃",x-3,y-m,10
?"웃",x+125,y-m
y+=k*v
v+=k*.04
if(y-h>256)t=max(t,s)goto s
flip()goto _