// Last edited on 2009-07-24 12:49:38 by stolfilocal
// 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.10, 0.80, 1.00 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

#declare tinta_B = 
  texture {
    pigment { color rgb < 1.00, 0.80, 0.10 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }
  
#declare bola =
  sphere {
    < 0.00, 0.00, 0.00 >, 2.00 
    texture { tinta_A }
  }
  
#declare furo = 
  cylinder {
    < -1.00, -2.00, -2.00 >,
    < +1.00, +2.00, +2.00 >,
    1.50
    texture { tinta_B }
  }
  
#declare pino = 
  cylinder {
    < -2.00, +2.00, -1.00 >,
    < +2.00, -2.00, +1.00 >,
    0.75
    texture { tinta_B }
  }
  

# macro peca1()

   
      box {
  <5, -10,-5>,
  <0, 0, 0>
  texture { tinta_A }
}

# end

# macro peca2(beta)

union{  
      box{
  <5, -5, -10>,
  <0, 0, 0>
  texture {tinta_A}
}

object{ peca1() rotate<beta, 0, 0> translate<0, 0, -10>}

}
#end

#macro peca3( alfa, beta )

       union{
  
  box{
   <5, -10, -5>,
   <0, 0, 0>
   texture { tinta_A }
  }

 object{ peca2(beta) rotate<-alfa, 0, 0> translate <0, -10, 0>}
 }

#end

# macro peca4 (teta, alfa, beta)

  union {
  

  box{
   <5,-5,-30>,
   <0, 0, 0>
   texture { tinta_A }
  }

  box{
   <10, -10, -35>,
   <-10, 10, -30>
   texture {tinta_B}
  }

  object { peca3(alfa, beta) rotate<-teta,0,0> translate<0,0,0>}
 }
#end
   

object{ peca4(-10,10,10) translate -20*x  }

object{ peca4(+60,60,60) translate +20*x }

// Original camera parameters:
// #local cam_ctr = <0,0,0>
// #local cam_vec = <80.00,40.00,20.00>
// #local cam_sky = z

#include "camlight.inc"
camlight(<0,0,-15>,<-10,-8,5>,120.0,z,1.0)