::_::t=time()for i=0,238 do
x,y,a=i%16*9,i/16\1*9a=((64-x)^2+(64-y)^2)^.4
r=mid(0,sin(a/2+t/5)*30,10)
for i=0,1 do
circfill((i+x+mid(cos(t/2+a)*r,12)+t*10)%136-4,(y-i+mid(sin(t/2+a)*r,12)+t*10)%136-4,3-i*2,(r==10and 13or 5)+i*2)end
end?"\^1\^c1"
goto _