Disco Drum (TTJ4)

X to accelerate
UP/DOWN to avoid dots
Get points for going fast
CTRL-R (or enter for menu) to restart

For TweetTweetJam#4! PICO-8 Source code: (547 chars)

poke4(12868,0x0586.0585)poke4(12936,0x13e0.1b64)f,s,x,y,u,v=0,0,0,64,0,0::_::flip()f^^=1cls()for p=0,1 do
srand()for i=1,30+t()*4 do
a=x+rnd()z=12.4+7*sin(a)e,c=11.5/z,8+(rnd(4)+t())%8
if(e\1>1)c=7
if(e\1<1)c=1+(t()/2+i/400)%2
q=rnd(8)
if ((p==1)==(e>1)) circfill(64+7*cos(a)*92/z,64+(q-4)*92/z,e,c)
end end
x+=v+.002v*=.97u*=0.8y&=~0>>>9y+=u
if(l)then
l+=4circ(31,y,5+l,8+(l/4)%8)else
if(pget(37,y)>5)l=1sfx(2)
s+=v*50p=print
if(btn(5))sfx(1,0,0,1)v+=0.0002p("ミ",26+f,y-2,8+f)
if(btn(2))u-=.5
if(btn(3))u+=.5
p("▶",33,y-2,7)end
p(s\1,2,2,7)goto _