Treasure finder (Craig Tinney)

TREASURE FINDER

You open your eyes and step out of the trees.
Treasure is afoot, but where can it be?
Good thing you've got your handy tresure detector!
Shame it only works when you stand still...

Arrow keys -  move around
X - restart

Made for Tweet Tweet Jam 4

Cartridge code (made with Pico-8 0.2.0d)

r=rnd s=sin c={1,7,13,15,3,11}o=64u={-1,1,0,0}p=1l=r()t=0i=o+o*s(l)j=o-o*cos(l)v=24z=o::q::flip()t+=.01cls(12)camera(v-o,z-o)for i=1,6 do srand(l)for j=0,19+r(9)do if i<4then w=43-i+4*s(t)else w=36/(i-3)end if(i<2)w=45 circfill(o+s(r())*w,o-s(r())*w,w,c[i])n=print if(i<5)n("웃",v,z,4) x=o+s(t/7)*22y=o-22*s(t/4)end end if(btn(5))run() d=sqrt((i-v)^2+(j-z)^2)/128if p>0then if(t%d>d/2)circ(v+3,z+2,6,10) if(d<.05)n("★",i-2,j-2,9)n("t𝘳𝘦𝘢𝘴𝘶𝘳𝘦 𝘧𝘰𝘶𝘯𝘥!",v-o+36,z-o+2)goto q end p=1 for i=1,4 do if(btn(i-1)and pget(v+u[i],z-u[5-i])!=12)p=0v+=u[i]z-=u[5-i]end goto q