startshape COLONIZE
rule COLONIZE {
200*{x 1 h .9} COLONIZE2{}
}
rule COLONIZE2 {
SQUARE {h 0 sat 1 b 1} 200 * {y 1 h .9} CULTURE{}
}
rule CULTURE {
SQUARE{hue 1 sat 1 b 1}
}
startshape COLONIZE
rule COLONIZE {
200*{x 1 h .9} COLONIZE2{}
}
rule COLONIZE2 {
SQUARE {h 0 sat 1 b 1} 200 * {y 1 h .9} CULTURE{}
}
rule CULTURE {
SQUARE{hue 1 sat 1 b 1}
}