Frank LLoyd Wright-esque Design

If you have a design you're proud of, share the cfdg file here. It's also a good place to ask for feedback and collaborate.

Moderators: MtnViewJohn, chris, mtnviewmark

Post Reply
t3knomanser
Posts: 21
Joined: Wed Jul 06, 2005 4:53 pm

Frank LLoyd Wright-esque Design

Post by t3knomanser »

Code: Select all

startshape THING
rule BASE {
	LINE{r 45}
	LINE{r -45}
}

rule BASE2 {
	BASE{}
	BASE{y 5.72 r 180}
}

rule THING {
	BASE2{}
	THING{x 3 s .5}
	THING{x -3 s .5}
}


rule THING {
	BASE2{}
	THING{y 3 s .5}
	THING{y -3 s .5}
}

rule LINE {
	SQUARE{}
	SQUARE {y 1}
	SQUARE {y 2}
	SQUARE {y 3}
	SQUARE {y 4}
}

Post Reply