Tiny TV Snake

Play the classic game of snake on a voxel TV! Made for #pico1K jam 2021.

Controls:
Arrow Keys: Control Snake

To restart the game, refresh the page.

Huge thanks to @TRASEVOL_DOG for an excellent blog post on voxel rendering, as well as the inspiration for the Tiny TV idea! (https://trasevol.dog/2017/04/13/doodle-insights-12-voxels-in-pico-8/)
As well, huge thanks to @JadeLombax for their sprite data compression, this would not have been possible without it!
(https://www.lexaloffle.com/bbs/?tid=44375)

Code: (997 characters)

memset(0,238,2048)p={1,14,13,6,5,7}n=rnd k=0for i=1,254do v=ord("…&█'☉'☉'☉'☉'☉'☉.v5&웃☉'☉'☉'☉'☉'☉.)r.&'p.⌂'⌂'⌂'⌂'⌂'☉.)r.&'p.ヲヲヲ-.)r.&'p.⌂'⌂'⌂'⌂'⌂'☉.)r.&'p.ヲヲヲ-.)r.&'p.⌂'⌂'⌂'⌂'⌂'☉.)r.&'p.ヲヲヲ-.)r.&'p.☉'☉'☉'☉'☉'☉.)r.&'p.☉'☉'☉'☉'☉'☉.)r.&'p.⌂&⌂&⌂&⌂&⌂◆.)r.&'p.%○,○,○,○,○%☉.)r.&'p.%○,○,○,○,○%☉5r.&'p.%○,○,○,○%ン❎&웃☉'☉'☉'☉'&ンンンンし",i)-35for j=0,v\7do sset(k%128,k\128,p[v%7])k+=1end end m=.3r=0w=7.5t=0h=6d=0p={4,4}sset(18+n(12),2+n(12),8)c=cos s=sin::_::t+=1b=btn()q=b\2%2-b%2e=b\8%2-b\4%2f=sset if(q!=0or e!=0)d=atan2(q,-e)&.75 b=p[2]+s(d)a=p[1]+c(d)o=sget(18+a,2+b) if(o==11or a>12or a<-1or b>12or b<-1)stop() if(o==8and t%9==1)h+=2f(18+n(12),2+n(12),8) if(t%9==1)add(p,b,1)add(p,a,1) f(18+p[1],2+p[2],11) if(#p>h)f(18+deli(p,#p-1),2+deli(p,#p),0) m-=(m-.3)/8r-=r/4cls(14)camera(-64,-96)r+=q/64m+=e/28g=c(r)i=s(r)u=sgn(i)for z=0,15do for x=w-w*u,w+w*u,u do for y=8,0,-1do o=sget(x+y%8*16,z+y\8*16) if(o!=14)j,k=x*4-32,y*4-32j,k=j*g+k*i,j*i-k*g k=k*m-z*4rectfill(j-2,k-2,j+2,k+2,o) end end end flip()goto _