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 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 _