// Last edited on 2009-08-26 17:09:58 by stolfilocal
// Processed by remove-cam-lights

#macro eixo(ponta,cor,nome)
  union{
    sphere{ <0,0,0>, 0.02 }
    cylinder{ <0,0,0>, 0.91*ponta, 0.02 }
    cone{ 0.90*ponta, 0.06, ponta, 0.00 }
    texture{ pigment{ color rgb cor } finish{ ambient 0.5 diffuse 0.5 } }
  }
#end
#macro eixos(tamanho)
  union{
    object{ eixo( <tamanho,0,0>, <1.0,0.2,0.2>, "X") }
    object{ eixo( <0,tamanho,0>, <0.0,0.8,0.0>, "Y") }
    object{ eixo( <0,0,tamanho>, <0.3,0.3,1.0>, "Z") }
  }
#end

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

#declare tx_metal =
  texture{
    pigment{ color rgb < 0.50, 0.50, 0.50 > }
    finish{ diffuse 1 ambient 0.1 reflection 0.05 specular 0.8 roughness 0.005 }
  }

#declare tx_fosca =
  texture{
    pigment{ color rgb < 1.00, 0.80, 0.10 > }
    finish{ diffuse 0.9 ambient 0.1 }
  }

#declare tx_fosca_rosa =
  texture{
    pigment{ color rgb < 1.00, 0.50, 0.50 > }
    finish{ diffuse 0.9 ambient 0.1 }
  }

#declare tx_espelho =
  texture{
    pigment{ color rgb < 1.00, 0.90, 0.70 > }
    finish{ diffuse 0.1 reflection 0.8*< 1.00, 0.90, 0.70 > ambient 0.1 }
  }

#declare tx_vidro =
  texture{
    pigment{ color rgb < 0.97, 0.98, 1.00 > filter 0.70 }
    finish{ diffuse 0.03 reflection 0.25 ambient 0.02 specular 0.25 roughness 0.005 }
  }

#declare raio = 2.000;

#declare corpo =
  cylinder{
    < 0.00, 0.00, 0.00 >,
    < 0.00, 0.00, +3.00 >,
    2.00
  }

#declare furo =
   cylinder{
   < 0.00, 0.00, +2.40 >,
    < 0.00, 0.00, +3.30 >,
   1.80
  }
  #declare base =
   cylinder{
   < 0.00, 0.00, -0.10 >,
    < 0.00, 0.00, +0.40 >,
   1.80
  }

#declare espremedor =
   cone{
   < 0.00, 0.00, +4.00 >, 0.00,
    < 0.00, 0.00, +2.40 >,   0.80
  }

#declare saida =
   cylinder{
   < 1.80, -0.50, +2.40 >,
    < 2.50, -0.50, +2.40 >,
   0.25
  }

#declare saida_furo =
   cylinder{
   < 1.40, -0.50, +2.40 >,
    < 2.60, -0.50, +2.40 >,
   0.20
  }

#declare manivela =
   cylinder{
   < 0.00, 0.00, 0.00 >,
    < 0.00, 0.00, +1.00 >,
   0.15
   texture{ tx_metal }
  }

#declare canto =
   sphere{
   < 0.00, 0.00, 0.00 >,
   0.15
   texture{ tx_metal }
  }

  #declare cortador =
   box{
   < 0.00, 0.00, -2.00 >,
   < 5.00,-5.00, 4.00 >
  }

#declare cena=
 union{
   // object{ eixos(3.00) }

   union{
    difference{
        difference{
         object{ corpo translate < 2,1,-1 > texture{ tx_fosca_rosa } }
         object{ furo translate < 2,1,-1 > texture{ tx_metal } }
     }
        object{ base translate < 2,1,-1 > texture{ tx_fosca_rosa } }

    }

    object{ espremedor translate < 2,1,-1 > texture{ tx_metal } }

    difference{
      object{ saida translate < 2,1,-1 > texture{ tx_fosca_rosa } }
      object{ saida_furo translate < 2,1,-1 > texture{ tx_metal } }

    }
    union{
      object{ manivela rotate 90*x translate < 2,1,0 >  }
      object{ canto  translate < 2,1,0 >  }
      object{ manivela translate < 2,1,-1 > }
      object{ canto  translate < 2,1,-1 >  }
      object{ manivela rotate 270*x translate < 2,1,-1 >  }
      object{ canto  translate < 2,2,-1 > }
      translate < 0,2.5,1 >
    }

    rotate 3*y
    }
 }

union {
 intersection{
  object { cena translate < 0,-1,0 >}
  object{cortador   texture{ tx_espelho }}
  translate < 0,1,0 >
  translate < 0,0,+3 >
 }

 object { cena translate < 0, 0, -3 >}
 }

// Original camera parameters:
// #local cam_ctr = <0.00,0.00,1.00>
// #local cam_vec = (<14.00,7.00,7.00>-<0.00,0.00,1.00>)
// #local cam_sky = z

#include "camlight.inc"
camlight(<1.00,0.00,0.00>,0.5*15.0,<10,10,4>,15.0,z,1.2)