// Last edited on DATE TIME by stolfi
#include "colors.inc"

background{ color White }

light_source {
  < 0.00, 30.00, 30.00 >
  color rgb < 1.00, 1.00, 1.00 >
} 

#declare ctr = < 0.00, 0.00, 0.00 >;
#declare camDir = < 5.00, 14.00, 6.00 >;

camera {
  location   ctr + 0.50*camDir
  right      -1.00*x
  up         0.75*y
  sky        z
  look_at    ctr
}
 

#declare fonte=seed  (338964);
#declare fonte2=seed (192536);
#declare fonte3=seed (5593479);


//EIXOS

#declare eixoX =
cylinder{
   <3, 0, 0 >
   <-3, 0 ,0 >
  0.1
  texture {
  pigment { color Red filter 1}}
}

#declare eixoY =
cylinder{
   <0, 3, 0 >
   <0, -3 ,0 >
  0.1
  texture {
  pigment { color Blue filter 1}
  }
}


//OBJETOS

#declare dedo=

blob{
 threshold .65
sphere { <0.00,0.00,0.00>
     0.25 ,2.0 
     pigment{ color Blue}}
sphere { <0.30,0.00,0.00>
     0.17 ,2.00 
     pigment{ color Red}}
}

#declare mao =
 union{
  object{ dedo rotate -45*z}
  object{ dedo }
  object{ dedo rotate 45*z }  
}

#declare perninha=
blob{ 
 cylinder{<0.85,1,0>, <1.2,1,0>, 0.80, 1.26 
 pigment {color Green} }   
}
 
#declare pop = 0;
#declare pup = 0; 

#declare perna =
 union{
 object{ perninha rotate <0,pop,pup> } 
 //object{ sphere { <1.2,1,0.00> 0.45 , 1  pigment{ color Blue}}}
 object{ perninha rotate <0,pop,pup> translate<.25,0,0>}  
// object {sphere { <1.2 + 0.70,1,0.00> 0.45 , 1   pigment{ color Blue}}}
 object{ perninha rotate <0,pop,pup> translate<2*0.25,0,0>}
// object { sphere { <1.2 + 2*0.70,1,0.00> 0.45 , 1  pigment{ color Blue}}}
 object{ perninha rotate <0,pop,pup> translate<3*0.25,0,0>}

 object{mao rotate pop*y translate<7*0.25+0.36,0,-0.5> }
 }


#declare corpo=
union{
 sphere {<0,0,0> 0.50 
       pigment{color Red} translate<0,1,1>} 

 difference{   
  sphere {
          <0, 0, 0>   
                1.20
                 texture {pigment{rgb <1,1,1> }
                 }
}              
  box{
      <-1.2, -1.2,-1.2 >
      < 1.2 ,1.2 ,0 >
          }
  }

}


#declare bicho=
  union{   
  #declare n=2;
  #declare i=0;
  #while (i<n)
   #declare ale = rand(fonte2);
   object{perna rotate ale*90*y  translate<0,i*-2,0>}  
   #declare ale = rand(fonte);
   object{perna rotate 180*y rotate ale*90*z  translate<0,i*-2,0>}

 #declare i=i+1;
 #end
}

//CENARIO

union{
   object{bicho} 
   object{corpo}  
 // object {eixoX}
 // object {eixoY}
 // object{mao scale 2}
 // object{perna  scale 2} 
}