icy penguins

set seed 185 {rx 55 y -5} scene rule scene { {x -5.0 z 5.0 y 0.75 ry 30 s 0.55} penguin {x -7.0 z 4.6 y 0.65 ry 90 s 0.45} penguin {x -6.0 z 4.1 y 0.70 ry -20 s 0.45} penguin bergia {x +5 s 1 4 2} bergia {x -5 ry 72 s 1 1 5} bergia {y -1 s 1000 0.5 1000 color #488} box } rule bergia { {x +5} bergtown {z 5} bergtown {x -3 z -2} bergtown {x -4 z 1} bergtown } rule bergtown { 64 * {ry 130 x 1 s 1.025} mayberg } rule mayberg w 20 {} rule mayberg { {s 0.25} berg } rule berg { 6 * {ry 240 x 1 s 0.9} berglet } rule berglet { 12 * {rx 130 rz 47 x 0.5 s 0.9} block } rule block { {s 2 2.2 1 ry 40 rz 10 color white} unit } rule unit { {s 1.1 0.85 1.5} box {s 1.05 1.025 0.9 x 0.5} box } rule penguin { {y 1 z 0.5 rx 20 s 1 0.5 1.2 rx 45 ry 45 c #000} box {z -0.5 rx 10 s 0.6 2 0.6 color #000} box {s 1 1.8 1 color #000} box {z 0.15 y -0.2 s 0.8 1.5 0.8 color #fff} box {y -1.25 ry 5 rx 8 s 1.5 0.5 1.5 color #fff} box }