Boulder Dash TTJ

Boulder Dash TTJ

My 7th annual #TweetTweetJam entry is:  Boulder Dash TTJ 💎
An attempt to demake the classic Boulder Dash in just 560 chars, using NO art assets!

CONTROLS

• ⬆️⬇️⬅️➡️  = Move

FEATURES

• 🎲 RND Cave Levels
• 🔊 SFX
• 🍎 Dodgy Collision & Physics*
• 💎 Diamond Score
• ️♻️ Auto-Restart on Death (and Win)
  

*(Alas, I could only fit in basic collision & gravity - so no object "spill over", no boulders pushing and no explosions - sorry! 😕)

GAME ORIG SOURCE CODE (560 chars)

s=mset
g=mget
x=2y=3t=0z=0k=0cls()?"웃◆●◆●\#5::",17,2
?"\#4░\vh░",8,2,0
?"🐱",17,0,5
memcpy(0,6^13,▤)::_::cls()s(x,y,0)a=x
b=y
p=btnp()a+=p\2%2-p%2b+=p\8%2-p\4%2c=g(a,b)
if(c<4)x,y=a,b
if(c==3)z+=1?"\aszx5e1"
if(z>8)s(15,9)
s(x,y,2)for i=0,239do
v=16-i\16h=i%16if t<1then
c=rnd{0,1,1,1,1,1,1,1,3,4}
if(h<1or h>14or v<3or v>15)c=7
s(h,v-1,c)elseif t%3==0then
c=g(h,v)d=g(h,v+1)
if(c>2and c<5and d<1)s(h,v+1,c+2)s(h,v)
if c>4and c<7then
if d<1then
s(h,v+1,c)s(h,v)elseif d==2then
run()else
s(h,v,c-2)end
end
end
end
map()?"\^w9◆"..z
flip()
if(x>14)run()
t+=1goto _