Context Free Forums and Gallery

Code: Select all

startshape face

background{b -1}

rule face{
	nose{x 6 y -4}
	mouth{x 7 y -10}
	eye{x 1 flip 90 r -10}
	eye{x 15 y 0 r -20}
	head{b .7}
}

rule head{
	CIRCLE{s 35 x 10 y 0}
	CIRCLE{s 55 x 12 y 15}
}
rule eye{
	eye_path{}
}
path eye_path{
	MOVETO{}
	CURVETO{x 0 y 0 x1 0 y1 30 x2 30 y2 0}
	CLOSEPOLY{}
	STROKE{}
	FILL{}
}
rule nose{
	SQUARE{s .5 3}
	SQUARE{s .5 3 x 1.5}
}
rule mouth{
	CIRCLE{}
}