// Last edited on 2003-03-19 22:59:41 by stolfi

background{ color rgb < 0.10, 0.13, 0.18 > }

light_source {
  < 17, 18.00, -10.00 >
  color rgb 1.2*< 1.00, 1.00, 1.00 >
} 
light_source {
  < -12, 2.00, -10.00 >
  color rgb 0.5*< 1.00, 1.00, 1.00 >
} 
camera {
    location 0.8*<5, 5, -15>
    look_at  <0, 0,  0>
    sky       <  0.00, 0.00, 1.00 >
 }

#declare tinta_A = 
  texture {
    pigment { color rgb < 0.10, 0.80, 1.00 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }

#declare tinta_B = 
  texture {
    pigment { color rgb < 1.00, 0.80, 0.10 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }

#declare tinta_C = //marrom
  texture {
    pigment { color rgb < 1, 0.70, 0.40 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }

#declare tinta_D = //vermelho
  texture {
    pigment { color rgb < 1.00, 0.10, 0.10 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }
  
#declare corpo =
  cylinder {
    < 0.00, -3.00, 0.00 >,
    < 0, 2, 0 >,
    1.5
    texture { tinta_C }
  }

#declare cilindro =
  cylinder {
    <1.5,0,0>,
    <-1.5,0,0>,
    .5
    texture { tinta_A }
  }

#declare esfera =
  sphere {
    <0,0,0>,
    1
    texture { tinta_A }
  }

#declare pernae =
  union {
    object { cilindro rotate <0,0,-35>  translate <3,0,0> }
    object { cilindro rotate <0,0,55>  translate <4.5,-2.5,0>  scale .8}
    object { esfera translate <9.8,-2,0>  scale  .45}
    translate <-1,-2.8,0>
  }
  
#declare pernad =
  object { pernae scale <-1,1,1> }

#declare bracoe =
  union {
    object { cilindro rotate <0,0,-45>  translate <3,0,0> }
    object { cilindro rotate <0,0,45>  translate <4.5,-2.5,0>  scale .8}
    object { esfera translate <9.8,-2,0>  scale  .45}
    scale <.8,-.8,.8>
    translate <-.5,2,0>
  }

#declare bracod =
  object { bracoe scale <-1,1,1> }

#declare pesco =
  object { cilindro rotate <0,0,90> translate <0,3,0> scale .7 }

#declare orelhae =
  torus { .2, .1  rotate <90,0,90> translate <1.2,4.1,0> texture { tinta_B } }

#declare orelhad =
  object { orelhae scale <-1,0,0> }

#declare nariz =
  cone {
    <0, 0, 0>, .2
    <0, 0, -.3>, 0
    translate <0,4,-.9>
    texture { tinta_B }
  }

#declare boca =
  torus {
    .2, .1
    rotate <90,0,90>  rotate <-10,0,0> translate <0,8.85,-1.2> scale <.7,.4,.7>
    texture { tinta_B }
  }

#declare cabe =
  union {
    object { esfera translate <0,4,0> texture { tinta_D } }
    object { orelhae }
    object { orelhad }
    object { nariz }
    object { boca }
  }

union {
  object { corpo }
  object { pesco }
  object { cabe }
  object { pernae }
  object { pernad }
  object { bracoe }
  object { bracod }
}