Minibar
About
Entry for #TweetTweetJam.
The ball has to ricochet two or three, but not more than three times before it hits the goal.
There is an issue with mouse input, 64p screenmode and HTML.
If you own Pico-8, you can paste the code there.
::a::x,y=9,9 s,l,a,b=0,0,0,0 u=false poke(0x5f2d,1)c=5 poke(0x5f2c,3)
g={rnd(60),rnd(60)}
::b::cls(2)
?s,30,30,1
if(abs(g[1]-x)<4 and abs(g[2]-y)<4 and u and l>1) s+=1 goto a
local mx,my=stat(32),stat(33)
if(not u and abs(x-mx)<5 and abs(y-my)<5) i=x-mx o=y-my d=sqrt(i*i+o*o) a=i/d b=o/d l=0 u=true
if(x>60 or x<0)a=-a l+=1
if(y>60 or y<0)b=-b l+=1
x+=a y+=b
?"◆",g[1],g[2],0
if(l>1 and u) c=10
if(c==10 and abs(x-mx)<4 and abs(y-my)<4)u=false c=5 l=0
if(l>3 and u) u=false l=0 c=5
?"●",x-2,y-2,c
rect(0,0,63,63)
circ(mx,my,2,7)
flip()goto b