Forever Hungry

Made in 554 chars of Pico-8 for TweetTweetJam 6.

Cute little guy must keep eating to grow or it'll just shrink back to a young larvae. Luckily those delicious redish things can help you grow up to impressive length. Since the game starts slowing down at 700, let's consider this score a winning condition!

Controls

Press any key or any button to alternate snake angle: turn left -> turn right -> turn left...

This game should run at 60 fps, in case you meet any problem playing the web version you can download a stand-alone version below. Or if you have Pico-8, just copy & paste the complete code here to get the whole game:

function _update60()
if(f<2)f=rnd(96)+16g=rnd(96)+16
x+=cos(a)y+=sin(a)x%=128y%=128add(t,{x=x,y=y})cls(13)
while(#t>l-8)del(t,t[1])
for v=0,1do
b=v*3c(f,g+3-b,3,5+b)c(f,g-1,1,9)for u=1,#t do
r=min(4,u/12)w=t[u].x
z=t[u].y+3-b
ovalfill(w-r,z-r,w+r,z+r,({-5,-3,-1,4})[u\9%4+1]*v+5)
end
u=t[#t]for n=-.2,.3,.4do
c(w+cos(a+n)*r,z+sin(a+n)*r,1,v*5+5)end
if(v>0and sqrt((u.x-f)^2+(u.y-g)^2)<r+3)print("\as5x5c2egc3")l+=9f=0
h=max(h,l)\1
?l\1,50,8-b,v*2+5
?"\^w\^t"..h
end
if(btnp()>0)s=-s
a+=s/l
l=max(40,l-.03)end
c=circfill
srand()f=1x=64y=70a=0s=1t={}l=9h=l