// Last edited on 2007-07-22 22:44:28 by stolfi

background{ color rgb < 0.75, 0.80, 0.85 > }

#declare raio = 2.000;

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

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

#declare tinta_vermelha = 
  texture {
    pigment { color rgb < 1.00, 0.00, 0.00 > }
    finish { diffuse 0.8 specular 0.3 roughness 0.005 ambient 0.2 }
  }

#declare tinta_cinza = 
  texture {
    pigment { color rgb < 0.50, 0.50, 0.50 > }
    finish { diffuse 0.8 specular 0.3 roughness 0.005 ambient 0.2 }
  }

  

#declare base_cabo = 
  cylinder{
	< 0.0,0.0,0.0>,
	< 0.0,0.0,5.0 >,
        1.0
        texture{tinta_B}
        
}


#declare bola_recorte =
  sphere{
    < 0.0, 0.0,0.0> 0.75
    texture{tinta_A}
  }

#declare enfeite_quadrado =
 box{
    < 0.0,-1.1,0.0>
    <  0.25,0.8, 5.08>
}

#declare haste_principal =
  cylinder{
  <0.0, 0.0, -6.2>
  <0.0, 0.0, 0.0>
  0.40
  texture{tinta_cinza}
 }


#declare cabo_colher =
  box{
  <-0.1,-0.5,-0.1>
  <0.1, 1.0 ,0.1>
   texture{tinta_cinza}
  }

#declare bola_colher = 
 sphere { 
    <0.0, 0.0,0.0> 0.25
    texture{tinta_vermelha}
}

#declare colher_recorte =
 sphere {
  <0.0,0.0,0.0 > 0.35
   texture{tinta_vermelha}
}


#declare colher = 
union{
	object{cabo_colher}
	difference{
		object{bola_colher scale<1.0,2.0,1.25> translate <0.0,1.5,0.0>}
		object{colher_recorte scale<1.0,2.0,1.25> translate <0.3,1.5,0.0>}
	}
}

// Aqui está a cena, finalmente:
/*
difference { 
  union {
    object { bola } 
    object { pino }
  }
  object { furo }
}

*/

union{
	difference{
		object{base_cabo}
		object{bola_recorte scale<2.0,1.0,1.25> translate<-1.0, 1.25,4.25>  }
		object{bola_recorte scale<2.0,1.0,1.25> translate<-1.0, 1.25,3.25>  }
		object{bola_recorte scale<2.0,1.0,1.25> translate<-1.0, 1.25,2.25>  }
		object{bola_recorte scale<2.0,1.0,1.25> translate<-1.0, 1.25,1.25>  }
	}
	object{enfeite_quadrado}
        object{haste_principal}
	object {colher scale<2.0,2.0,2.0>  translate<0.0,0.0,-6.0>}
	object {colher scale<2.0,2.0,2.0>  translate<0.0,0.0,-6.0> rotate 90*z}
	object {colher scale<2.0,2.0,2.0>  translate<0.0,0.0,-6.0> rotate 180*z}
	object {colher scale<2.0,2.0,2.0>  translate<0.0,0.0,-6.0> rotate 270*z}
}


#include "camlight.inc"
camlight(<0,0,0>,<-10,-4,7>,0.85,z,1.0)