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

global_settings { max_trace_level 12 }

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

#declare dourado = 
    texture {
      pigment { color rgb < 0.9, 0.80, 0.10 > }
      finish { diffuse 0.4 specular 0.3 roughness 0.005 reflection 0.2 ambient 0.2 }
    }


#declare prata = 
    texture {
      pigment { color rgb < 0.50, 0.50, 0.50 > }
      finish { diffuse 0.5 specular 0.2 roughness 0.05  reflection 0.3 ambient 0.5 }
    }

#declare rubi = 
  texture {
    pigment { color rgb < 0, 1, 0 > filter 0.1}
    finish { diffuse 0.2 specular 0.5 roughness 0.005  reflection 0.4 ambient 0.1 }
  }


#declare DISTANCIA_OLHOS = 2;
#declare RAIO_ESFERA = 3;

#declare BASE_BOCA_X = -1;
#declare BASE_BOCA_Z = 2.5;
#declare ALTURA_BOCA = 1;
#declare LARGURA_BOCA = 2;

#declare LARGURA_DENTE = 0.5;
#declare ALTURA_DENTE = 0.4;
#declare ED = 0.6;


#declare boca =
  box{
    <BASE_BOCA_X,-1,BASE_BOCA_Z>,<BASE_BOCA_X+LARGURA_BOCA,4,BASE_BOCA_Z + ALTURA_BOCA> 
  }

#declare dentes =
  union{
    
    box{
      <BASE_BOCA_X+0.2+ED,3,BASE_BOCA_Z+ALTURA_BOCA>,<BASE_BOCA_X+LARGURA_DENTE,3.4,BASE_BOCA_Z+ALTURA_DENTE+0.15>
    }
    box{
      <BASE_BOCA_X+0.2+2*ED,3,BASE_BOCA_Z+ALTURA_BOCA>,<BASE_BOCA_X+LARGURA_DENTE+ED,3.4,BASE_BOCA_Z+ALTURA_DENTE+0.15>
    }
    
    
    box{
      <BASE_BOCA_X+0.2,3,BASE_BOCA_Z>,<BASE_BOCA_X+LARGURA_DENTE,3.4,BASE_BOCA_Z+ALTURA_DENTE>
    }
    box{
      <BASE_BOCA_X+0.2+ED,3,BASE_BOCA_Z>,<BASE_BOCA_X+LARGURA_DENTE+ED,3.4,BASE_BOCA_Z+ALTURA_DENTE>
    }
    box{
      <BASE_BOCA_X+0.2+2*ED,3,BASE_BOCA_Z>,<BASE_BOCA_X+LARGURA_DENTE+2*ED,3.4,BASE_BOCA_Z+ALTURA_DENTE>
    }
  }

#declare queixo =
  union{
    difference{
      difference{
 cylinder{
   <0,2,4.7>,<0,2,2>,1.5
 }
 cylinder{
   <0,1,4.7>,<0,1,1.7>,2
 }
      }
      object{boca}
    }
    object{dentes}
  }

#declare nariz = 
  object{
    box{
      <-0.5,3,5>,<0.5,3.1,5.5>
    }
    texture{rubi}
  }
    
#declare cranio =
  union{
    difference{
      difference{
 sphere{
   <0,0,5>,RAIO_ESFERA
 }
 sphere{
   <0,0,3>,RAIO_ESFERA
 }
      }
      box{
 <-RAIO_ESFERA-1,-RAIO_ESFERA-1,1>,<RAIO_ESFERA,RAIO_ESFERA,4.3>
      }
    }
    object{nariz}
    object{queixo}
  }

#declare olho_ouro =
  sphere{
   <-1,2.5,6>,0.45
  }

#declare orificio_olho =
  cylinder{
    <-1,3,6>, <-1,-2,6>,0.5
  }

#declare olhos =
  union{
    object{orificio_olho}
    object{orificio_olho translate DISTANCIA_OLHOS*x}
  }

#declare caveira =
  union{
    difference{
      object {cranio}
      object {olhos}
    }
    object{olho_ouro texture{prata}}
    object{olho_ouro texture{prata} translate DISTANCIA_OLHOS*x}
  }

object{caveira texture{dourado} }

plane{z,0
  translate -5*y
  texture{
    pigment{ checker color rgb < 0.30, 0.30, 0.30 >,
                     color rgb <1.5,1.5,1.5>
    }
  }
}

// Original camera parameters:
// #local cam_ctr = <0.00,0.00,1.00>
// #local cam_vec = (<-1.00,15.00,+5.00>-<0.00,0.00,1.00>)
// #local cam_sky = z

#include "camlight.inc"
camlight(<0.00,0.00,3.00>,<3,10,5>,15.0,z,1.0)