# ======================================================== # # Tentacle Tree # www.lazymoon.org # tentacletree.cfdg # ======================================================== #
startshape petree background {b -1}
rule petree {
virus{}
}
rule virus {
stem{flip 0 b 1 sat 1 hue 0} stem{flip 90 b 1 sat 1 hue 0}
}
rule glow {
CIRCLE {} SQUARE {s 0.5 x 1 y -1} SQUARE {s 0.5 x -1 y 1}
}
rule stem {
glow{} stem{s 0.99 x 0.99 r 1 }
} rule stem {
glow{} stem{s 0.99 x 0.99 r 5 }
} rule stem 0.03 {
splice{ hue 5 }
}
rule splice {
point {} stem{flip 45} stem{flip -45}
} rule splice {
point {} stem{flip 0} stem{flip -45} stem{flip 45}
}
rule point {
sqr {s 4 b 1 sat 1 hue 0}
}
rule sqr{
CIRCLE {} sqr {alpha -0.1 s 0.99 x 0.99 r 90 skew 1 5}
}