background {b -.10}
startshape frame
rule frame {
shape {s .05 y -2 h 30 sat -.5 b -.5 a -.8}
}
rule shape{
dit {r 2 s .9997}
}
rule dit {
CIRCLE {x .5 s .8}
shape {x 1}
}
rule dit {
SQUARE {x 1 s 1.6 .8}
shape {x 2 r 2}
}
rule dit .7 {
shape {x 1}
}
startshape box{ s .2 }
rule box 20 {
SQUARE {}
box {s .99 r 3 y .8}
}
rule box 8 {
SQUARE {}
box {s .99 r 3 y .8 flip 90}
}
rule box {
SQUARE {}
box [s .5 r 10 y .8 b .07 z -.07]
box {s .99 y .8}
box [s .6 flip 90 r 10 y .8 b .07 z -.07]
}
rule box {
SQUARE {}
box [s .5 r 10 y .8 b .07 z -.07]
box {s .99 y .8 flip 90}
box [s .5 flip 90 r 10 y .8 b .07 z -.07]
}
rule box 3 {
SQUARE {}
box [s .8 r 10 y .8 b .015 z -.015]
box [s .8 flip 90 r 10 y .8 b .015 z -.015]
}
startshape r0
background {h 215 sat 0.37 b 1}
rule r0{
4*{x 3}{4*{y 3}r1{s 0.7 b 1}}
sun[x 0 y 0 a -100 b 1 sat 0.4 hue 60]
}
rule r1 {r2[] r1[x 2]}
rule r1 {r2[] r1[y 2]}
rule r1 0.3 {r1 {r 80} r1 {r -80}}
rule r1 {r1[s 0.85]}
rule r2 {r4{a -100}}
rule r4 {CIRCLE[b 1 a 0.03 s 10]}
rule sun{180*{r 2} ray{}}
rule ray{ray[s 1.05] CIRCLE[x 0.5 a 0.03]}
rule ray 0.1 {}
startshape starter
rule starter{
snakeparty{ s .2 }
}
rule snakeparty {
snake { }
snakeparty {y 1.0 s 0.95 r -15}
}
rule snakeeye {
CIRCLE {b 1}
CIRCLE {b -1 s 0.4 x -0.35}
}
rule snake {
snaketail { }
snakeeye {s 0.4 x -0.2 y 0.2}
snakemouth {x -0.5 y -0.2 s 0.3}
}
rule snaketail {
CIRCLE {}
SQUARE {x 0.32 y 0.1 s 0.5 r -30}
SQUARE {x 0.32 y -0.1 s 0.5 r 30}
snaketail {x 0.8 s 0.7}
}
rule snakemouth {
SQUARE {b 1 r 65}
}
startshape circ
rule circ {
CIRCLE{ sat .3 hue 100 b .5 }
}
startshape start
rule start {
EDERA { s .006 y .5 x -.5 }
EDERA { s .009 y .5 x -1 a -.5 }
}
rule EDERA{
CIGLIO {x 0} CIRCLE { x 0 s 5 hue 200 sat 0.5}
CIGLIO {x 5} CIRCLE { x 5 s 5 hue 200 sat 0.5}
CIGLIO {x 10} CIRCLE { x 10 s 5 hue 200 sat 0.5}
CIGLIO {x 15} CIRCLE { x 15 s 5 hue 200 sat 0.5}
CIGLIO {x 20} CIRCLE { x 20 s 5 hue 200 sat 0.5}
CIGLIO {x 25} CIRCLE { x 25 s 5 hue 200 sat 0.5}
CIGLIO {x 30} CIRCLE { x 30 s 5 hue 200 sat 0.5}
CIGLIO {x 35} CIRCLE { x 35 s 5 hue 200 sat 0.5}
CIGLIO {x 40} CIRCLE { x 40 s 5 hue 200 sat 0.5}
CIGLIO {x 45} CIRCLE { x 50 s 5 hue 200 sat 0.5}
}
rule CIGLIO 100 {
SQUARE {hue 200 sat 0.5}
CIGLIO {y -1 s 0.998 b 0.005 alpha -.04}
}
rule CIGLIO {
SQUARE {hue 200 sat 0.5}
CIRCLE {hue 200 sat 0.5 alpha -0.4 s 10 y -10 }
CIGLIO {y -1 r 1 s 0.998 b 0.005 alpha -.04}
}
rule CIGLIO 0.0005 {
SQUARE {hue 200 sat 0.5}
CIRCLE {hue 200 sat 0.5 alpha -0.8 s -20 x 20 y -10 }
CIGLIO {y -1 s 0.998 b 0.005 alpha -.04}
}
rule CIGLIO {
SQUARE {hue 200 sat 0.5}
CIRCLE {hue 200 sat 0.5 alpha -0.4 s 5 y -10 }
FIORE {}
FIORE { x -1 flip 90}
CIGLIO {y -1 s 0.998 b 0.005 alpha -.04}
}
rule FIORE {
CIRCLE {hue 200 sat 0.5}
FIORE {y -1 r 4 s 0.998 b 0.005}
}
rule FIORE 0.005 {
CIRCLE {s 5 hue 200 sat 0.5}
FIORE {y -1 r 4 s 0.998 b 0.005 flip 90}
}
startshape scale
background { hue 400 sat 0.2 b -1 }
rule MOUSECLICK{ START{ s .001 } }
rule MOUSECLICK{ START{ s .005 } }
rule MOUSECLICK{ START{ s .01 } }
rule MOUSECLICK{ START{ s .003 r 5} }
rule scale{
START{ s .01 }
}
rule START {
SCENE { h 900 sat 1 b .5 }
FUXIA {h 400 sat 1 b .5}
START {y 100 r 90 s 0.29}
}
rule FUXIA{
CIRCLE { s 10 x -10 }
CIRCLE { x 50 s 5 }
CIRCLE { x 15 y 15 size 5 }
FUXIA {y 50 r 88 s 0.59 alpha -0.15}
}
rule FUXIA 0.45 {
FUXIA{flip -50}
FUXIA {flip -10}
}
rule SCENE {
CIRCLE { size 20 }
CIRCLE { size 30 alpha -0.7 }
CIRCLE { size 40 alpha -0.7 }
FLOW { }
FLOW { }
FLOW { flip -50 }
FLOW { flip -50 }
FLOW { flip -10 }
FLOW { flip -10 }
}
rule FLOW 0.008 {
SQUARE { }
CIRCLE { s 5 alpha -0.7 }
FLOW { x 1 s 0.995 r 2}
}
rule FLOW 0.0001 {
FLOW { flip 2 }
}
startshape scale
rule scale{
SPIKES{ s .09 }
}
rule SPIKES {
SPIKE {}
SPIKE { r 77 }
SPIKE { r 180 }
SPIKE { r 170 }
}
rule SPIKE {
LSPIKE {}
}
rule SPIKE {
LSPIKE { flip 30 }
}
rule LSPIKE {
SQUARE {}
LSPIKE { y 0.91 s 0.79 r 1}
}
rule LSPIKE 0.005 {
SPIKE { r 90 }
SPIKE { r -90 }
LSPIKE { y 0.98 s 0.99 r 1}
}
rule MOUSECLICK{
SPIKES{ s .09 }
}