paper 0 repeat x 1 10 { repeat y 1 10 { set [((10*x)-5) ((10*y)-5+x)] 100 set [((10*x)+(2*y)+x) ((10*y)-(2*y))] 80 } }