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))