TweetTweetPang

TweetTweetPang!

Remember Pang? Loved it on Amiga, so here is a 60 fps demake made in 560 chars with Pico-8 for #tweettweetjam. Move with arrow keys, shoot with C. If you never played the game, well, you'll quickly get around it. Infinite levels and no game over, but if you get hit you restart the current level with the score you had when entering it.

And here's the complete code for you happy fellow Pico-8 owners.

o=0z=-1l=1p=64y=0r=rectfill function _update60() if(z<0)z=o m={}for n=1,l do add(m,{x=9+n/l*99,s=12,d=.3,t=0})end cls()r(0,0,128,98,1)for n in all(m)do s=n.s w=99-s-abs(cos(n.t)*s*7) if(n.x<s or n.x>128-s)n.d=-n.d n.x+=n.d circ(n.x,w,s,8)if(y>0 and w+s>y and x>n.x-s and x<n.x+s)then y=0 z+=1 n.s/=1.6 if(n.s<2)del(m,n)else add(m,{x=n.x,s=n.s,d=-n.d,t=n.t}) end n.t+=.02/s end if(btn(0))p-=1 if(btn(1))p+=1 if y<1 then if(btn(4))y=99x=p else r(x,y,x,98,6)end p=mid(2,p,125) if(y>0)y-=2 ?z,64,110,7 if(pget(p,93)==8)z=-1 if(#m<1)l+=1 o=z z=-1 ?"웃",p-3,94,7 end