# =========================================================================== # # === askew.cfdg # # Original author: flembobs # Originally created: 28.01.2022 # Original URL: www.contextfreeart.org/gallery/view.php?id=4265 # # =========================================================================== #
CF::Background=[b -0.8 sat 0.2 h 230] D=9 startshape C (D) [a-0.9 sat 1 h select(rand(3),23,66,145)] S=(1..30,1..30) N()=randint(4,12)
shape C(natural R) {
if(R<5) CIRCLE[b 0.25..1 sat 0..0.4 blend CF::Screen] n=N() if(R > 0) transform [ h if(rand()>(R/D),60,0) ] loop n [ r (360/n) ] if(rand(R)<(D/2)) C(R--1) [ x 0.5 s 0.5 skew S sat -0.2..0.2 h 3..15]
}