s,b,c=srand,{peek(0,8)},0::_::cls(1)c+=1for i=1,8 do
b[i]+=btn(i-1) and 2 or 0
s(i)i=c-rnd(1024)s(i\10)x,y,r=(rnd(127)+b[1]-b[2])%128,(rnd(127)+b[3]-b[4])%128,sin(i/20)*8circ(x,y,r,2)oval(x-r,y,x+r,y,10)oval(x,y-r,x,y+r)circfill(x,y,r/2,7)end
flip()goto _