// Last edited on 2005-01-05 18:23:52 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.10, 0.80, 1.00 > }
    finish { diffuse 0.8 specular 0.4 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.4 roughness 0.005 ambient 0.1 }
  }

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

#declare tinta_D =
  texture {
    pigment { color rgb < 0.90, 0.10, 0.10 > }
    finish { diffuse 0.8 specular 0.4 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 bico =
  cone {
    < 1, 3.2, 0 > , 0.6
    < 1.0, 5.5, 0 >, 0
    texture { tinta_B }
  }

#declare caixa1 =
   box{
        <2,-1,-1>,
        <0,1,1.0>
   texture { tinta_B}
}

#declare base1 =
   box{
        <1.8,-0.8,-1.4>
        <0.2,0.8,-1>
        texture { tinta_A }
}

#declare caixa2 =
   box{
        <2,1,-1.0>,
        <0,3,1.0>
   texture { tinta_A}
}

#declare base2 =
   box{
        <1.8,1.2  ,-1.4>
        <0.2,2.8,-1>
        texture { tinta_A }
}

#declare caixa3 =
   box{
        <1.8,3,-0.8>,
        <0.2,3.2,0.8>
   texture { tinta_C}
}

#declare dobradica =
   cylinder{
             <2,1,-1>,
             <2,1,1>,
             0.05
   texture{ tinta_D}
}

#declare bloco1 =
  union{
         object{ caixa1 }
         object{ base1  }
         translate<-2,-1,0>
         rotate 60*z
         translate<2,1,0>
}

#declare bloco2 =
  union{
         object {caixa2}
         object {base2}
}

#declare bigorna =

union{
  object { bloco1 }
  object { bloco2 }
  object { caixa3 }
  object { bico }
  object { dobradica }
}

difference {

union{
  object { bigorna translate<0,-1.5,0> }
  }
}

#include "camlight.inc"
camlight(<2,0,0>,<8.00,4.00,2.00>,1.20,z,1.0)