1k Jump

Created for PICO-1K Jam! This whole game uses only 1,013 bytes  and includes:

• Title screen
• Sound effects
• Difficulty increase over time
• Procedural background
  
• A delightful spinning guy

BREAKDOWN

The full source code for this game is below. If you would like to learn how it works, I had a breakdown of the code where I add white space and a lot of comments here.

https://gist.github.com/andymasteroffish/1e29e35ca1d80fdb9e2b3e43a0e11004

SOURCE CODE

You can copy/paste this into a new Pico-8 cart to try it out! Make sure you are using Pico-8 version 0.2.2 or later.

pal({7,13,136,141},1)a=0 b=btn r=rnd::_r:: g=1t=0n=0s=0w=128x=64y=60v=-1o={}a+=1 ?"\ab" cls()::_:: for i=0,1500do d=r(w) e=r(w) c=pget(d,e) if(c==1)pset(d,e,0) if(c>1)pset(d+r(2)-1,e+r(2)-1,c) end m=min(12,2+s/7)*g for j=1,m do if(b()>0and b()<3)x+=(b()*2-3)*max(.3,-v*1.2) v+=.01 y+=v for k,z in pairs(o)do z.y-=.14 c=1 if abs(x-z.x)<9and abs(y-z.y)<7then c=2+s%3 v=-0.9 s+=1 ?"\as"..flr(m).."c.e.-g" end rect(z.x-4,z.y-3,z.x+4,z.y+3,c) if(c>1)del(o,z) end if(t>n)add(o,{x=r(128),y=w+4})n+=120+r(m*15) t+=1 end f="\#5\^t\^w" if y>w or y<0then if(g>0and a>1)print("\af#..f#..e7..e7") g=0 ?f..s,57,48,1 ?"\#5⬅️ & ➡️ to move",35,72 ?"\#5❎ to start",43,82 if(b(5))goto _r else c=cos z=sin ?".",r(128),0,1 e=-x/30j=x+c(e)*3k=y+z(e)*3u=x-c(e)*3h=y-z(e)*3line(j,k,u,h)e+=.25 for i=-1,1,.25do p=.5+i/4l=p*j+u*(1-p)m=p*k+h*(1-p)d=3 if(abs(i)<.8)d=0 line(l+c(e)*3,m+z(e)*3,l-c(e)*d,m-z(e)*d) end circ(x+c(e)*4,y+z(e)*4,2) ?s,1,8 end if a<2then y=-1 ?f.."\#41k jump",37,48 ?"by @andy_makes",36,99 end flip()goto _