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}

}