# This was originally named forest.cfdg, but the longer name seems # to be a better description of what it does, IMO. startshape forest
CF::Background = [hue 120 sat .1 b -0.5] CF::MinimumSize = 0.2 CF::Size = [s 80 80 x -25 -35]
shape forest {
loop num=50 [z 1] tree [x (-2..52) b (.45-num/120)] ground [z 51]
}
shape tree rule {
CIRCLE [] tree [[b .001 .40 r (-5..5) y .3 s 0.9999995]]
}
rule 0.04 {
CIRCLE [] tree [[b .0005 .40 x -.1 r (15..20) y .3 s (0.7*0.9999995)]] tree [[b .0005 .40 x .1 r (-25..-10) y .3 s (0.7*0.9999995)]]
}
shape ground {
SQUARE [s 80 5 x 25 -2.5 b 0]
}