Inspired by Diego Rattaggi [url=https://twitter.com/diegorattaggi]https://twitter.com/diegorattaggi[br][br][/url]Zoom in with mouse in the centre!

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