// Last edited on 2007-07-22 23:08:57 by stolfi
// Processed by remove-cam-lights

background{ color rgb < 0.75, 0.80, 0.85 > }

#declare raio = 2.000;

#declare tinta_A = 
  texture {
    pigment { color rgb < 0.100, 0.800, 1.000 > }
    finish { diffuse 0.8 specular 0.2 roughness 0.005 ambient 0.2 }
  }

#declare tinta_B = 
  texture {
    pigment { color rgb < 1.000, 0.800, 0.100 > }
    finish { diffuse 0.8 specular 0.2 roughness 0.005 ambient 0.2 }
  }

#declare tinta_preta = 
  texture {
    pigment { color rgb < 0.00, 0.00, 0.00 > }
    finish { diffuse 0.8 specular 0.2 roughness 0.005 ambient 0.2 }
  }

#declare tinta_branca = 
  texture {
    pigment { color rgb < 1.00, 1.00, 1.00 > }
    finish { diffuse 0.8 specular 0.2 roughness 0.005 ambient 0.2 }
  }

#declare quadra_A = box {
     < 0.00, 0.00, 0.00 >, < 1.00, 1.00, 1.00 > 
     texture { tinta_A }
}

#declare quadra_B = box {
     < 0.00, 0.00, 0.00 >, < 1.00, 1.00, 1.00 > 
     texture { tinta_B }
}

#declare peca1 = cone {
 < 0, 0, 0 >, 0.50,
 < 0, 0, 1 >, 0.10
 texture { tinta_preta }
}

#declare peca2 = cylinder {
 < 1, 1, 1 >, < 0, 0, 0 >, 0.50
 texture { tinta_branca }
}

#declare peca3 = sphere {
 < 0.00, 0.00, 0.00 >, 0.4 
 texture { tinta_preta }
}

#declare roleta = seed(12345);
#declare i = 0;

#while (i < 100)
 #declare j = 0;
 #while (j < 100)

  #if ( mod((i+j),2) = 0)
   object{ quadra_A
    translate <i,j,0>
   }
  #else
   object{ quadra_B
    translate <i,j,0>
   }
  #end
  #declare j = j + 1;
 #end
 #declare i = i + 1;
#end

// Original camera parameters:
// #local cam_ctr = <50.00,50.00,0.00>
// #local cam_vec = (<100.00,100.00,30.00>-<50.00,50.00,0.00>)
// #local cam_sky = z

#include "camlight.inc"
#local RR = (100 * 1)/2;
camlight(<RR,RR,0>,<10,10,10>,120.0,z,1.0)