/*
	Drafts
	www.lazymoon.org
	drafts.cfdg
*/

startshape INIT

rule INIT {
	LTURN[]
	RTURN[]
}

rule RUN 85{
	CIRCLE[x 0.0]
	RUN[x 2]
}
rule RUN 5	{LTURN[]}
rule RUN 5	{RTURN[]}
rule RUN 5	{CIRCLE[s 5]RUN[r 45]RUN[r -45]}

rule LTURN 99{
	CIRCLE[s 0.25]	
	LTURN[x 1 r 10 s 0.999]
}
rule LTURN 1 {
	RUN[s 0.75]
}
rule RTURN 99{
	CIRCLE[s 0.25]
	LTURN[x 1 r -10 s 0.999]
}
rule RTURN 1 {
	RUN[s 0.75]
}