// Last edited on 2005-01-05 22:05:15 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.50, 0.50, 0.30 > }
    finish { diffuse 0.8 specular 0.4 roughness 0.005 ambient 0.1 }
  }

# declare cor_espelho =  < 1.00, 0.80, 0.10 >;
# declare tx_espelho =
   texture {
      pigment {rgb cor_espelho}
      finish {
          ambient 0.05 diffuse 0.55
   reflection 0.5*cor_espelho
          specular 0.20 roughness 0.05
 }
}

# declare cor_cruz =  < 0,0,0 >;
# declare tx_cruz =
   texture {
      pigment {rgb cor_cruz}
      finish {
          ambient 0.05 diffuse 0.55
   reflection cor_cruz
          specular 0.20 roughness 0.05
 }
}

# declare cor_cristal = <1,0,0>;
# declare tx_cristal =
   texture {
      pigment {rgb cor_cristal}
      finish {
          ambient 0.01 diffuse 0.01
   reflection 0.25
          specular 1 roughness 0.001
 }
 pigment { color cor_cristal filter 1}
}

#declare toro =
  torus {  1.70, 0.30
    rotate 90*x
    texture { tx_espelho }
  }

#declare corpo =
  lathe {  linear_spline
    3,< 1.7, 0 >,
    < +1.70, 1.70 >,
    <1.9, 2.6>

    texture {  tx_espelho }
    rotate 90*x
  }

# declare pedra =
  lathe {  linear_spline
    3,< 0.0, 0.0 >,
    < 0.15,0.1 >,
    <0.0,0.2>
    interior {ior 1.5 }
    translate <0,1.9,0>
    texture { tx_cristal }

  }

#declare cruz =
  union {
   box {<0,0,0>,<0.1,0.1,0.6>}
 box {<0.6,0.1,0.0>,<0,0,0.1> translate <-0.25,0,0.3>}
        texture { tx_cruz }
 translate <0,1.7,1>
        rotate 135*z

 }

#declare pino1 =
  cylinder {
    <  0.00, -2.50, 2.60 >,
    < 0.00, 2.50, 2.60 >,
    0.8
    rotate 90*z
    texture { tinta_B }
  }

#declare pino2 =
  cylinder {
    <  0.00, -2.50, 2.60 >,
    < 0.00, 2.50, 2.60 >,
    0.8
    rotate 180*z
    texture { tinta_B }
  }

plane{z,-1
    texture{
        pigment { checker <0.5,0.5,0.5>,<1,1,1> }
        finish  { ambient 0.6 diffuse 0.4 }
 scale 0.5
 }
}

difference {
   union {
   object { toro }
  object {corpo}
  object {cruz}
    union{
       object {pedra} rotate 90*z
  }
   union{
       object {pedra} rotate 180*z
  }
   union{
       object {pedra} rotate 270*z
  }
   union{
       object {pedra} rotate 0*z
  }
  union{
       object {pedra} rotate 45*z
  }
   union{
       object {pedra} rotate 135*z
  }
   union{
       object {pedra} rotate 225*z
  }
   union{
       object {pedra} rotate 315*z
  }

 }
 object {pino1}
 object {pino2} rotate -200*z
}

#include "camlight.inc"
camlight(<0,0,0.7>,<8.00,4.00,3.00>,0.80,z,1.0)