// Last edited on 2007-06-28 09:27:20 by stolfi
// Processed by remove-cam-lights

global_settings { max_trace_level 12 }

background { color rgb < 0.90, 0.95, 1.00 > }

#declare raio = 2.000;

#declare ouro = 
  texture {
    pigment { color rgb < 1.00, 1.00, 0.00 > }
    finish { diffuse 0.20 specular 0.30 reflection 0.30 ambient 0.20 }
  }

#declare rubi = 
  texture {
    pigment { color rgb < 1.00, 0.00, 0.00 > filter 1.0 }
    finish { diffuse 0.10 reflection 0.20 roughness 0.005 } 
  }
  
#declare esmeralda = 
  texture {
    pigment { color rgb < 0.00, 1.00, 0.00 > filter 1.0 }
    finish { diffuse 0.15 reflection 0.20 roughness 0.005 }
  }

#declare tinta_xadrez = 
  texture {
    pigment { checker color rgb < 0.20, 0.70, 0.20 >, color rgb <1.0,0.8,1.0> }
    finish { ambient 0.6 diffuse 0.4 }
  }

#declare plano =
  plane {
    z,0
    translate -5*z
    texture { tinta_xadrez }
  }

#declare cranio =
  sphere {
    < 0.00, 0.00, 0.00>, 3.00
    texture { ouro }
  }

#declare bola =
  sphere {
    < 0.00, 0.00, 0.00>, 2.40
    texture { ouro }
  }

#declare caixa =
  box { 
    < -4.00, -4.00, -4.00 >,
    < +4.00, +4.00  0.00 >
    texture {ouro }
  }
 
 #declare mandibula =
  box {
    < +2.70, -1.00, 0.00 >,
    < +2.20, +1.00, -3.00 >
    texture { ouro }
  }

#declare olho =
  cylinder {
    < 0.00, -0.75, +0.60 >,
    < 4.00, -0.75, +0.60 >,
    0.30
    texture { ouro }
  }

#declare nariz=
  box {
    < +4.00, -0.20, -0.50 >,
    < +0.00, +0.20, -2.00 >
    texture { ouro }
  }

#declare dente=
  box {
    < +2.70, -1.00, -3.00 >,
    < +2.20, -0.60, -3.60 >
    texture { ouro }
  }

#declare pedra_r=
  box {
    < +2.40, -0.20, +1.70 >,
    < +2.10, +0.20, +2.20 >
    texture { rubi }
    interior { ior 1.6 }  
  }

#declare pedra_e=
  box {
    < +2.15, -0.80, +2.00 >,
    < +1.75, -0.40, +2.50 >
    texture { esmeralda }
    interior { ior 1.6 }  
  }




union {
  object { plano }
  difference{
    object { cranio }
    object { bola }
    object { caixa }
    object { olho }
    object { olho
             translate 1.5*y
           }
    object { pedra_r }
    object { pedra_e }
    object { pedra_e
             translate 1.2*y
           }
  }
  difference{
    object{ mandibula }
    object{ nariz }
  }
  object{ dente }
  object{ dente
          translate 0.8*y
        }
  object{ dente
          translate 1.6*y
        }
  object{ pedra_r }
  object{ pedra_e }
  object { pedra_e
           translate 1.2*y
         }   
}

// Original camera parameters:
// #local cam_ctr = <0,0,0>
// #local cam_vec = <10.00,2.00,+3.00>
// #local cam_sky = z

#include "camlight.inc"
camlight(<0,0,0>,<10,10,10>,20.0,z,1.0)