// Last edited on 2005-01-05 17:13:31 by stolfi
// Processed by remove-cam-lights

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

#declare tinta_A =
  texture {
    pigment { color rgb < 1.00, 0.40, 1.00 > }
    finish { diffuse 0.8 specular 0.4 roughness 0.005 ambient 0.1 }
  }

#declare tinta_B =
  texture {
    pigment { color rgb < 0.30, 0.50, 0.90 > }
    finish { diffuse 0.8 specular 0.4 roughness 0.005 ambient 0.1 }
  }

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

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

#declare base =
  cylinder {
    < +1.00, +1.00, -2.00 >,
    < +1.00, +1.00, 0.00 >,
    0.30
    texture { tinta_C }
  }

 #declare quad_cima =
  box {
    < +2.00, +2.00, +1.00 >,
    < 0.00, 0.00, 0.00 >
    texture { tinta_D }
  }

#declare quad_base =
  box {
    < +2.00, +2.00, -2.50 >,
    < 0.00, 0.00, -2.00 >
    texture { tinta_B }
  }

#declare con =
  cone {
    < +1.50, +2.25, +0.50 >, 0.6
    < +1.50, +3.00, +1.00 >, 0.1
    texture { tinta_A }
  }

 #declare quad_lateral =
  box {
    < +2.00, -1.00, 0.00 >,
    < 0.00, 0.00, +1.00 >
    texture { tinta_A }
  }

  union {
    object { base }
    object { quad_cima }
    object { quad_base }
    object { quad_lateral rotate -25*x translate<0,-0.4,0.1>}
    object { con translate<-0.5,0,0> }
  }

#include "camlight.inc"
camlight(<0.00,0.00,-1.00>,<8.00,4.00,3.00>,1.00,z,1.0)