Page 1 of 1

Basic fern

Posted: Wed Jul 06, 2005 2:51 pm
by romulusnr
Pretty simple... probably could be improved upon, but makes an impressive fern frond.

startshape FERN

rule FERN {
CIRCLE { }
FERN { y .5 s .95 r 1.5 }
FERN { x -.5 r 90 s .2 }
FERN { x .5 r 270 s .2 }
}

Posted: Wed Jul 06, 2005 3:22 pm
by antipex
Awesome! Here's a basic adaptation into a tree fern: :)

Code: Select all

startshape FERNTREE

rule FERNTREE {
	TRUNK { }
	FERN { y 12 }
	FERN { y 12 r 40 }
	FERN { y 12 r 80 }
	FERN { y 12 r 120 }
	FERN { y 12 r -40 }
	FERN { y 12 r -80 }
	FERN { y 12 r -120 }
}

rule FERN {
	CIRCLE { }
	FERN { y .5 s .95 r 1.5 }
	FERN { x -.5 r 90 s .2 }
	FERN { x .5 r 270 s .2 }
}

rule TRUNK {
	CIRCLE { }
	CIRCLE { y 0.5 }
	CIRCLE { y 1 }
	CIRCLE { y 1.5 }
	CIRCLE { y 2 }
	CIRCLE { y 2.5 }
	CIRCLE { y 3 }
	CIRCLE { y 3.5 }
	CIRCLE { y 4 }
	CIRCLE { y 4.5 }
	CIRCLE { y 5 }
	CIRCLE { y 5.5 }
	CIRCLE { y 6 }
	CIRCLE { y 6.5 }
	CIRCLE { y 7 }
	CIRCLE { y 7.5 }
	CIRCLE { y 8 }
	CIRCLE { y 8.5 }
	CIRCLE { y 9 }
	CIRCLE { y 9.5 s 2 }
	CIRCLE { y 10 s 2 }
	CIRCLE { y 10.5 s 2 }
	CIRCLE { y 11 s 2 }
	CIRCLE { y 11.5 s 2 }
	CIRCLE { y 12 s 2 }
}