# www.contextfreeart.org/gallery/view.php?id=4237 # # by flembobs # # Uploaded on: 18.07.2021
CF::Time = [ time 0 1 ] CF::Size = [ s 2 ]
H=0..360 B=-0.85..-0.95 CF::Background = [ b B h H sat 0.6..0.8 ]
startshape P [ h (-H±(5..20)) sat 0.87..1 b 1 r (360*ftime()) ]
sine(t,amp,freq,phase) = amp*sin( (freq*360*t) + (360*phase))
N = randint(3, 20) M = randint(3, 12) S() = rand(0.25, 1.5 ) X() = rand(0.5, 1) R = rand(360)
path P {
loop N [ s S() ] { pos = X() * sine(ftime(),1,1,0) loop M [ r (360/M) ] { shp = select( rand_static(3), CIRCLE, TRIANGLE, SQUARE ) path shp [ x pos r R ] } } FILL ( CF::EvenOdd ) []
}