Page 1 of 1
dirty drawing
Posted: Wed Aug 10, 2005 4:18 am
by momo
Code: Select all
startshape INIT { color }
rule INIT {
DRAW { }
DRAW { r 180 }
BALL { x -50 y 2 }
}
rule BALL {
SHAPE { }
SHAPE { flip 90 }
BALL { y 1 s 0.999 r 5}
}
rule DRAW {
SHAPE { }
SHAPE { flip 90 }
DRAW { y 1 s 0.999 r 1}
}
rule DRAW 0.006 {DRAW_B { }}
rule DRAW_B {
SHAPE { }
SHAPE { flip 90 }
DRAW_B { y 1 s 0.997 r -1}
}
rule DRAW_B 0.006 {DRAW { }}
rule SHAPE {
LINE { }
SHAPE { x 1 alpha -0.2}
}
rule SHAPE 0.1 {}
rule LINE {SQUARE { s 0.5 20 }}
rule LINE {SQUARE { s 0.1 20 }}
rule LINE {SQUARE { s 0.9 20 }}
rule LINE {SQUARE { s 0.6 20 }}
rule LINE {SQUARE { s 0.3 20 }}
http://chriscoyne.com/gallery/view.php? ... 3869299968
Posted: Wed Aug 10, 2005 4:24 am
by lagroue
Sweet texture !
With some more balls, and no DRAW_B rule (flip can be used instead) :
Code: Select all
# no color declaration in last Context Free version
startshape INIT
rule INIT {
DRAW { }
DRAW { r 180 }
BALL { x -50 y 2 }
}
rule BALL {
SHAPE { }
SHAPE { flip 90 }
BALL { y 1 s 0.999 r 5}
}
rule DRAW {
SHAPE { }
SHAPE { flip 90 }
DRAW { y 1 s 0.999 r 1}
}
rule DRAW 0.002 {
BALL { x -50 y 2 }
DRAW { }
}
rule DRAW 0.006 {DRAW { flip 90 }}
rule SHAPE {
LINE { }
SHAPE { x 1 alpha -0.2}
}
rule SHAPE 0.1 {}
rule LINE {SQUARE { s 0.5 20 }}
rule LINE {SQUARE { s 0.1 20 }}
rule LINE {SQUARE { s 0.9 20 }}
rule LINE {SQUARE { s 0.6 20 }}
rule LINE {SQUARE { s 0.3 20 }}