Prince of Persia(ish) #TweetTweetJam

Prince of Pico #TweetTweetJam

My 5th annual #TweetTweetJam entry is: Prince of Pico !
An attempt to remake the classic "Prince of Persia" game, by Jordan Mechner  in PICO-8, but in just 560 chars, using NO art assets! 😅

CONTROLS

• Walk   = ◀ /  ▶
• Jump = 🔼

GAME

• Explore a 3D(ish), Procedurally-generated Dungeon ⛓
• Unlock gates using floor triggers to advance 🚪
• Jump around with realistic* physics and collision 👀
• ...That's about it! 😅
  Alas, while I got a full platformer, with generated map + sprites in just 560 chars - I didn't have space to add what I wanted (lose life, sword, enemies, traps)

SOURCE CODE (560 bytes / 552 chars)

e=370poke(24364,3)g="■■▥"x=9y=24v=0t=58r=rnd
cls()srand()rectfill(8,0,15,7,13)d=0l=0p=pget
?g,9,0,6
?g,7,4
?g,y,6,5
memcpy(0,24576,▤)for a=0,64do
fset(a,a==2and 2or 1)for b=0,e do
l-=1if l<1then
l=r(14)c=r{0,1}k=camera
if(c==1and mget(b,a-2)>0)mset(b,a-1,r{2,3})end
mset(b,a,c)end
end::_::cls()k(x\t*t,y\t*t)for z=1,5do
o=0l=1d=max(d-.01)g=btn
if(z==4)l=2o=d
map(0,0,-z,z-o,e,e,l)end
if(p(x,y+v)!=0)v=0
if(g(2)and v==0)v-=2.2
x+=g()\2%2-g()%2y+=v
c=p(x,y)
if(c>5)v=0y,x=m,n
if(c==5)d=min(d+1,7)
?"웃",x-3,y-3,7
v+=.2k()
?"▶▶▶",1,t,8
n,m=x,y
flip()goto _