# From:www.contextfreeart.org/gallery/view.php?id=4113
HUE_BORDER = 210 STEPS = 100
CF::Background = [h HUE_BORDER sat 1 b -5] CF::Size = [s 120]
startshape galaxy []
shape galaxy {
loop STEPS [x -5..5 y -5..5 h .5] cloud [h HUE_BORDER sat 1 b 1]
}
shape cloud {
randomShape = let(n = 0..3; select(n, CIRCLE, SQUARE, TRIANGLE)) randomShape [] cloud [x -5..5 y -5..5 a -.03 r 1..10 s .995]
}