// Last edited on 2003-12-08 17:50:00 by stolfi
/* Comentario :
  eu coloquei mais um par de pernas porque o meu inseto anterior ficou com quatro patas porque não era um inseto de verdade */ 

#declare ctr = < 00.00, -2.00, 00.00 > + clock*<0,4,0>;
#declare camDir = < 10.00, 5.00, 6.00 >;

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

#include "colors.inc"
#include "textures.inc"

background{ color White }

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

 

#declare fonte=seed  (338964);
#declare fonte2=seed (192536);
#declare fonte3=seed (5593479);
#declare clock1 =0;
#declare clock2 =0;
#declare pxp1 = 0; // JS: 10;
#declare pyp1 = 0; // JS: 07;
#declare pzp1 = 0; // JS: 05;

#declare pxp2 = 0; // JS: 04;
#declare pyp2 = 0; // JS: 08;
#declare pzp2 = 0; // JS: 10;

#declare pxp3 = 0; // JS: 03;
#declare pyp3 = 0; // JS: 06;
#declare pzp3 = 0; // JS: 09;

#declare pxp4 = 0; // JS: 10;
#declare pyp4 = 0; // JS: 04;
#declare pzp4 = 0; // JS: 07;

#declare pxp0 = 0; // JS: 04;
#declare pyp0 = 50;
#declare pzp0 = 50;

//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 comp = 0.4;

#declare perninha4=
blob{ 
 cylinder{<0.00,0.00,0.00>, <comp,0.00,0.00>, 1, 1.26 
 pigment {color Green} }   
}
 
#declare perninha4m=
union{
 object {perninha4}
 object{mao scale 1.3 rotate pzp1*z translate<comp + 0.3 ,0.00,0.00> }

}

#declare perninha3 =
union{ object{ perninha4 } 
 object{ perninha4m rotate <pxp1,pyp1,pzp1> translate<comp,0,0>}  
  }

#declare perninha2 =
union{ object{ perninha4 } 
 object{ perninha3 rotate <pxp2,pyp2,pzp2> translate<comp,0,0>}  
}
#declare perninha1 =
union{
 object{ perninha4 } 
 object{ perninha2 rotate <pxp3,pyp3,pzp3> translate<comp,0,0>}  
}
#declare perninha0 =
union{
 object{ perninha4 } 
 object{ perninha1 rotate <pxp4,pyp4,pzp4> translate<comp,0,0>}  
}

#declare perna =
  object{ perninha0 scale 1  } 
 

#declare raio = 2.00;

#declare corpo=
union{
 //cabeça
 union{
 sphere {<0,0,0> 0.8 
       pigment{color Red} translate<0,raio-0.5,raio-0.5>} 
 blob{ 
 cylinder{<0.00,0.00,0.00>, <0.6,0.00,0.00>, 0.2, 1.26 
 pigment {color Black} }   
 rotate -40*y 
 rotate  130*z 
 translate <-.4,raio,raio>
}       
 blob{ 
 cylinder{<0.00,0.00,0.00>, <0.6,0.00,0.00>, 0.2, 1.26 
 pigment {color Black} }   
 rotate -40*y
 translate <+.4,raio,raio>
}
}

difference{   
  sphere {
          <0, 0, 0>   
                raio
                 texture {
                 pigment {checker color rgb<0.3,0.5,0.1> color rgb<0.2,0.5,0.8> }}
                  
 finish{
 ambient 0
 diffuse 0.6
 phong 0.5
 specular 0.5
 }
}             
  box{
      <-raio, -raio,-raio >
      < raio ,raio ,0 >
          }
  }

}


#declare bicho=
  union{   
  #declare n=2;
  #declare i=0;
 #while(i<n)

 #if( n = 0)
 
 #declare clock1 = clock;
 
#else
 #declare clock1 = mod(clock + 0.5,1);
 
#end

 
 object{perna  rotate clock1*90*y  rotate clock1*160*z  translate<raio,0,0> rotate 50*(2*i -1)*z }  
 object{perna  rotate clock1*(90)*y  rotate clock1*160*z translate<raio,0,0> rotate 135*(2*i -1)*z }
 object{perna  rotate clock1*(90)*y  rotate clock1*(-160)*z translate<raio,0,0> rotate 180*i*z}

 #declare i=i+1;
 #end
}

#declare terra =
 plane {z ,-5
 pigment { checker color DarkWood, color LightWood } 
 normal { bumps 4 }
 finish{ phong 0.3 }
 scale 0.25*<4,4,4>
}
//CENARIO

#declare anda = (1-clock)*-2 + clock*(2);
union{
  
 union { 
   object{bicho} 
   object{corpo} 
   translate <0,anda,0> }  
   object{terra} 
}