// José Renato Paulon ra 970904
// Last edited on 2003-05-31 15:19:24 by stolfi
// Exercicio 7

#include "colors.inc"

#declare imgname = "kowa.gif";

#declare ctr = <0, 0, 0>;
camera {
  location ctr + 2.0 * <1, 3, -20>
  right 1.0*x  up 0.50*y  sky y
  look_at ctr
}
light_source {10*<+30,30,-30> color 1.2*White}
light_source {10*<-30,20,-30> color 0.8*White}
light_source {10*< +5, 3,-10> color 0.5*White}

background{Gray80}

#include "textures.inc"
#include "stones.inc"
#include "finish.inc"

  #declare tx_madeira =
  texture {
	pigment {
       	DMFWood4
       	scale 4
        }
      	finish { Shiny } // pre-defined in finish.inc
	}
  #declare cor_metal = <0.2,0.2,0.2>;
  #declare tx_metal=
  texture{
	pigment{ rgb cor_metal}
    	finish{
		ambient 0.05 diffuse 0.05
		reflection cor_metal
		specular 0.20 roughness 0.05
	}

  }

//  plane {
//	y, -6
//	texture {T_Stone15}
//  }

//Cabeça
#declare cabeca = blob{
	threshold .65
	//primeira parte (cabeça)
	sphere {<  0, 0, 0 > ,8 , 2  } 
	sphere {<  0, -5, 1.5 > ,  5, 2 } 

	
	//Nariz
	sphere {<-.7,-1.2,5.1>, 1.4, 1.5  }
	sphere {<-.7,-2.2,5.1>, 1, 1.5  }
	sphere {<-.7,-2.2,6.1>, 1, 1.5  }

	//orelha 1
	sphere {<10.3,-.7,.5>, 1.5, 1.5  scale <0.5,1.2,1> }
	sphere {<10.3,-1.4,.7>, .8, 1.5  scale <0.5,1.2,1> }
	
	//orelha 2
	sphere {<-10.3,-.7,.5>, 1.5, 1.5  scale <0.5,1.2,1> }
	sphere {<-10.3,-1.4,.7>, .8, 1.5  scale <0.5,1.2,1> }
	rotate y*180
	pigment {image_map{gif imgname}  scale <15,16,13> translate <-7,-9,0>}

	
}

object { cabeca }
object { cabeca rotate +53*y translate -12*x }
object { cabeca rotate -53*y translate +12*x }