GuruBlog

Since the HSL color command is back in ronin, I created a rainbow. Also experimented with the svg paths for the first time

(on "animate" '(
(transform:reset)
(clear)
(fill frame-rect "#AAAAFF")
(transform:move 300 300)

(each (range 0 9) (lambda (c) (
(stroke
(arc 0 0 (add 90 (mul c 4)) PI 0 )
(hsl (mul (sub 9 c) 36) 100 50 0.8) 5
)
)))

(stroke
(fill
(svg (add -100 (mul 10 (sin (time 0.0003)))) (add 30 (mul 5 (cos (time 0.00073)))) 
    "M-40,-40 S -70,-40 -70,-10 S-60,0 -60,10 L60,10 S 70,0 70,-10 S 70,-40 40,-40 M40,-30 S40,-60 0,-60 S-40,-40 -40,-30 ")
"#EEEEFF")
"white" 5)

(stroke
(fill
(svg (add 120 (mul 10 (cos (time 0.00027)))) (add 25 (mul 5 (sin (time 0.000713)))) i
    "M-40,-40 S -70,-40 -70,-10 S-60,0 -60,10 L60,10 S 70,0 70,-10 S 70,-40 40,-40 M40,-30 S40,-60 0,-60 S-40,-40 -40,-30 ")
"#EEEEFF")
"white" 5)

))