Colorful circles

Inspired by Diego Rattaggi https://twitter.com/diegorattaggi Zoom in with mouse in the centre!

GGB script

m = 318 M = Sequence(k, k, 0, 30.3π, 0.3) Execute(Sequence("A"+i+" := (x - cos(9999 * Element(M, "+i+")))² + (y - sin(9999 * Element(M, "+i+")))² = 1", i, 1, m)) Execute(Sequence("ShowLabel(A"+i+", false)", i, 1, m)) f(x) = 1/2sin( 2/3 x - 3/2)+1/2 t = Slider(0, 3 pi, 0.01, 1, 150, false, true, false, false) Execute(Sequence("SetDynamicColor(A"+i+", f("+i+"/150+t), f("+i+"/20+t), f("+i+"/200-t))", i, 1, m))