m=math s=m.sin c=m.cos C=circ b=circb
function TIC()cls(14)t=time()/8^4
for i=0,240 do
x=20+i*c(i+t)y=50+i*s(i+t)I=1+(i/20)%8
for j=0,6.3,.9 do
R=12*c(j)S=12*s(j)C(x+R,y+S,6,I+3)b(x+R,y+S,6,I)
end C(x,y,6.2,I)end
end
217 bytes
Fleurs contour
m=math s=m.sin c=m.cos C=circ b=circb
function TIC()cls(14)t=time()/8^4
for i=0,240 do
x=20+i*c(i+t)y=50+i*s(i+t)I=1+(i/20)%8
for j=0,6.3,.9 do
R=12*c(j)S=12*s(j)C(x+R,y+S,6,I+3)b(x+R,y+S,6,I)
end C(x,y,6.2,I)end
end