// Last edited on 2009-07-24 12:54:34 by stolfilocal
// Processed by remove-cam-lights

background{ color rgb < 1.00, 1.00, 1.00 > }

#declare marrom = 
  texture {
    pigment { color rgb < 0.8, 0.8, 0.10 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }
  
#declare cinza = 
  texture {
    pigment { color rgb < 0.8, 0.8, 0.8 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

#declare preto = 
  texture {
    pigment { color rgb < 0.3, 0.3, 0.3 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

#declare bege = 
  texture {
    pigment { color rgb < 1.00, 0.80, 0.20 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

#macro paral1()   
    box {
      <0.00, 0.00, 0.00>,    
      <2.00, 0.50, 0.50>
      texture {cinza}
    }   
#end
    
#macro paral2()   
    box {
      <0.00, 0.00, 0.00>,    
      <2.00, 0.50, 0.50>
      texture {cinza}
    }   
#end
    
#macro paral3()   
    box {
      <0.00, 0.00, 0.00>,    
      <2.00, 0.50, 0.50>
      texture {cinza}
    }   
#end

#macro base(alfa1, alfa2, alfa3, alfa4, alfa5, alfa6)  
 union{
  cylinder {
    < 0.00, 0.00, 0.00 >, 
    < 0.30, 0.00, 0.00 >, 
    3.00
    texture {preto}
  }
  object{paral1() rotate <alfa1, alfa2, 0.00> translate <0.2, -2.50, 0.00>}
  object{paral2() rotate <alfa3, alfa4, 0.00> translate <0.2, 0.00, 0.00>}
  object{paral3() rotate <alfa5, alfa6, 0.00> translate <0.2, 2.50, 0.00>}
}  
#end 

#macro base2(beta, alfa1, alfa2, alfa3, alfa4, alfa5, alfa6)
union{
  cylinder {
      < 0.00, 0.00, 0.00 >,
      < 5.00, 0.00, 0.00 >,
      1.00
      texture { bege } 
    }
    object{base(alfa1, alfa2, alfa3, alfa4, alfa5, alfa6) rotate <beta, 0.00, 0.00> translate <5.00, 0.00, 0.00>}
}    
#end 

#macro garfo(gama, beta, alfa1, alfa2, alfa3, alfa4, alfa5, alfa6)
union{
  cylinder {
      < 0.00, 0.00, 0.00 >,
      < 5.00, 0.00, 0.00 >,
      1.00
      texture { preto } 
    }
    object{base2(beta, alfa1, alfa2, alfa3, alfa4, alfa5, alfa6) rotate <0.00, gama, 0.00> translate <5.00, 0.00, 0.00>}
 }
#end 

union{
object {garfo(+15, -45, -40, +10, +20, -10, +30, +30) translate -10*y}   
object {garfo(-65, +65, +80, -10, -60, +60, -30, +30) translate +10*y}   
}

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

#include "camlight.inc"
camlight(<0,0,0>,<10,10,5>,40.0,z,1.0)