m=math s=m.sin c=m.cos C=circ t=0
function TIC()cls(14)t=t+0.02
for i=0,240 do
x=20+i*c(i+t)
y=50+i*s(i+t)
r=6 P=0 T=r
for j=0,6.3,1.05 do
R=r*2*c(j) S=r*2*s(j)
C(x+R,y+S,r,i%16+1)
end
C(x,y,r*1.2,i%16)
end end