// Last edited on 2009-07-22 19:53:27 by stolfilocal
// Processed by remove-cam-lights

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

#declare tinta_A = 
  texture {
    pigment { color rgb < 0.25, 0.25, 0 > }
    finish { diffuse 0.05 ambient 0.1 specular 0.1 reflection 0.7}
  }

#declare base =
  cylinder {
    < 0, 0, 0 >,
    < 0, 0, 0.1 >,
    1
    texture { tinta_A }
  }

#declare cabo =
  cylinder {
    < 0, 0, 0 >,
    < 0, 0, 0.7 >,
    0.09
    texture { tinta_A }
  }

#declare h1 =
  cylinder {
    < 0, 0, 0 >,
    < 0, 0, 0.7 >,
    0.07
    texture { tinta_A }
  }

#declare b1 = 
box {
<-0.6, -0.1, 0.7>, 
<0.6, 0.1, 0.9>
texture {tinta_A}
}

#declare cristal1 = 
  cone {
  <0, 0, 0>, 
  1, 
  <0, 0, 1>, 
  0

  texture {
      pigment { color rgb < 2.25, 2.05, 2.05 > filter 0.8}
      finish { diffuse 0.1 ambient 0.1 }
     }
    interior {ior 1.5}
  }


union {
object{base}
object{cabo}
object{b1}
object{b1 rotate <0,0,90>}

object{h1 translate<0.6,0,0.7>}
object{h1 translate<-0.6,0,0.7>}
object{h1 translate<0,0.6,0.7>}
object{h1 translate<0,-0.6,0.7>}
}

plane{z, 0
texture {pigment{checker rgb <1,1,1>, rgb <0.5,0.5,0.5> rotate 17*z }
finish{diffuse 0.5 ambient 0.5}
}
translate -10*z

}

merge{
object{cristal1 translate <0,0,1.7>}
object{cristal1 rotate<180, 0, 0> translate<0,0,1.7>}
}

// Original camera parameters:
// #local cam_ctr = <0,0,2>
// #local cam_vec = (<2.00,-6.00,2.00>-<0,0,2>)
// #local cam_sky = z

#include "camlight.inc"
camlight(<0,0,1.2>,<-7,10,5>,6.0,z,1.0)