Context Free Forums and Gallery

Code: Select all

startshape net

// two rules only for bright variation
// angles other then 90 give some julia things...
rule net {
	expand { }
	dot { }
	net { x 1 r 90 s 0.71 b 0.5} // actual sqrt(2) leaves gaps at the infinite...
	net { x -1 r 90 s 0.71 b -0.5}
}
rule net {
	expand { }
	dot { }
	net { x 1 r 90 s 0.71 b -0.5}
	net { x -1 r 90 s 0.71 b 0.5}
}

rule expand {
	arm { s 0.1 }
	arm { s 0.1 r 180 }
}

// three rules for less perspective

rule dot {
	CIRCLE { s 0.4 }
}
rule dot 0.7 {
	CIRCLE { s 0.565685424949 }
}
rule dot 0.2 {
	CIRCLE { s 0.8 }
}

rule arm {
	SQUARE { }
	SQUARE { x 1 }
	SQUARE { x 2 }
	SQUARE { x 3 }
	SQUARE { x 4 }
	SQUARE { x 5 }
	SQUARE { x 6 }
	SQUARE { x 7 }
	SQUARE { x 8 }
	SQUARE { x 9 }
	SQUARE { x 10 }
}