Ronin experiment 12 - traces of a restless ghost
I created a fractal using a recursive function and animated the rotation angles
this is the recursive function I used to create the animation
(defn rec (v) (
(def s 150)
(if (gt v 0) (
(stroke
(circle 0 0 s s)
"#FFFAAF20" 10)
(pushTransform)
(move (div s -2) (div s -2))
(scale 0.75)
(rotate (sin (time 0.00074)))
(rec (sub v 1))
(popTransform)
(pushTransform)
(move (div s 2) (div s 2))
(scale 0.75)
(rotate (sin (time 0.00053)))
(rec (sub v 1))
(popTransform)
))
))
(resize 800 800)
(on "animate" '(
(resetTransform)
(clear)
(move 400 400)
(rec 11)
))
See also:
Ronin experiment 21 - morphing lissajous states
ronin experiment 20 - transform flower
ronin experiment 19 - Sonic Pi visualizer
Ronin experiment 18 - Rainbow
Ronin experiment 17 - boids
ronin experiment 20 - transform flower
ronin experiment 19 - Sonic Pi visualizer
Ronin experiment 18 - Rainbow
Ronin experiment 17 - boids