// Last edited on 2005-01-05 22:03:04 by stolfi
// Processed by remove-cam-lights

background{ color rgb < 0.8, 0.85, 0.9 > }

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

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

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

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

#declare cor_Espelho = < 0.20, 0.20, 1.00 >;
#declare tx_Espelho =
  texture{
    pigment { rgb cor_Espelho }
    finish {
      ambient 0.05 diffuse 0.05
      reflection cor_Espelho
      specular 0.20 roughness 0.05
      }
    }

#declare cor_Cristal = < 1.00, 0.20, 0.20 >;
#declare tx_Cristal =
  texture{
    finish{
      ambient 0.05 diffuse 0.15 reflection 0.25
      specular 0.2 roughness 0.00
    }
    pigment { color rgb cor_Cristal filter 1 }
  }

#declare toroide =
  torus {
        3, 0.8
        texture  { tx_Espelho }
  }

#declare coroa =
  lathe {
        linear_spline
        8,
        <0,0>, <2.7,0>, <2.7,1>, <3,2>, <3,3>, <2.7,4>, <0.5,4.3>, <0,5>
        texture { tx_Cristal }
        finish {
        ambient 0.3
        phong 0.75
        }
        translate <0,0.7,0>
 }

#declare solo =
 plane { y, -5
   texture {
     pigment { checker <1.0,1.0,1.0>, <0.5,0.5,0.5> }
     finish { ambient 0.6 diffuse 0.4 }
     scale 3.0
   }
 }

#declare pedra =
  box {
    <-0.2,3.2,3.1>, <0.2,3.6,2.9>
    texture { tinta_Verde }
  }

union {
  object { toroide }
  object { coroa }
  object { pedra }
  object { solo }

}

#include "camlight.inc"
camlight(<0,1,0>,<2.00,8.00,15.00>,0.80,y,1.0)