Avoidabubble

A game where you have to avoid bubbles for as long as you can. And it all fits in a tweet.

Here's the code:

cls()x,y,s,d,r=64,64,0,2,rnd::a::
if(r()<.2)circ(r(127),r(127),r(4),8)
if((btn(0)or d==0)and x>0)x-=1d=0
if((btn(1)or d==1)and x<127)x+=1d=1
if((btn(2)or d==2)and y>0)y-=1d=2
if((btn(3)or d==3)and y<127)y+=1d=3
if(pget(x,y)==8)goto e
pset(x,y,10)s+=1flip()goto a::e::
?s