// Last edited on DATE TIME by USER
// Processed by remove-cam-lights

#declare vv = <3, -30.00, 0.00 >;
#declare uu = vrotate (vv, <0, 0, 0 >);
#declare ww = vaxis_rotate (vv, z, clock*360);

  

  

  

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.1 roughness 0.005 ambient 0.1 }
  }

#declare tinta_B = 
  texture {
    pigment { color rgb < 1.00, 0.80, 0.10 > }
   
  }
  
#declare vermelho = 
  texture {
    pigment { color rgb < 1.00, 0.00, 0.00 > }
   
  }

#declare branco = 
  texture {
    pigment { color rgb < 1.00, 1.00, 1.00 > }
   
  }

#declare azul = 
  texture {
    pigment { color rgb < 0.00, 1.00, 0.00 > }
}

#declare verde = 
  texture {
    pigment { color rgb < 0.00, 0.00, 1.00 > }
}

#declare amarelo = 
  texture {
    pigment { color rgb < 1.00, 1.00, 0.00 > }
}

#declare alfa = 0;
#declare beta = 0;
 
#macro colher()

 union {

 
 
 cylinder {
 < 0, 0, 0 >, < 2, 0, 0 >, 1
 texture { amarelo } 
 }
 sphere {
 < 0, 0, 0 >, 1
 texture { amarelo }
 }
 sphere {
 < 2, 0, 0 >, 1
 texture { amarelo }
 }
 difference {
 sphere {
 < 4, 0, 0 >, 1
 texture { branco }
  }
 }
 }
#end

#macro braco_1(alfa)

 union {
 
 cylinder {
 < 0, 0, 0 >, < 2, 0, 0 >, 1
 texture { vermelho }
 }
 sphere {
 < 0, 0, 0 >, 1
 texture { vermelho }
 }
 sphere {
 < 2, 0, 0 >, 1
 texture { vermelho }
 }
 
 object{colher()
 rotate < 0, alfa, 0 >
 translate < 3, 0, 0 >
 } 
}
#end

#macro braco_2(alfa)

 union {
 
 cylinder {
 < 0, 0, 0 >, < 2, 0, 0 >, 1
 texture { azul }
 }
 sphere {
 < 0, 0, 0 >, 1
 texture { azul }
 }
 sphere {
 < 2, 0, 0 >, 1
 texture { azul }
 }
 
 object{braco_1(alfa)
 rotate < 0, alfa, 0 >
 translate < 3, 0, 0 >
 } 
}
#end
 
#macro braco_3(alfa)

 union {
 
 cylinder {
 < 0, 0, 0 >, < 2, 0, 0 >, 1
 texture { verde }
 }
 sphere {
 < 0, 0, 0 >, 1
 texture { verde }
 }
 sphere {
 < 2, 0, 0 >, 1
 texture { verde }
 }
 
 object{braco_2(alfa)
 rotate < 0, alfa, 0 >
 translate < 3, 0, 0 >
 } 
}
#end

#declare nh = 2;
#declare nv = 5;
#declare nquadros = nh*nv;
#declare cini = 0;
#declare cfin = 1;
#declare cpasso = (cfin - cini) / (nquadros - 0.9999);

#declare c0= 0;
#declare c1= 0.2;
#declare c2= 0.4;
#declare c3= 0.6;

#declare ck = cini;
 
#macro quadro(ck)

    #if((ck>=c0)&(ck<c1))
      #declare rr=(ck-c0)/(c1-c0);
      #declare ss=(c1-ck)/(c1-c0);
      #declare alfa=ss*0 + rr*90;
    #end

    #if((ck>=c1)&(ck<c2))
      #declare rr=(ck-c1)/(c2-c1);
      #declare ss=(c2-ck)/(c2-c1);
      #declare alfa=ss*90 + rr*0;
    #end

    #if((ck>=c2)&(ck<c3))
      #declare rr=(ck-c2)/(c3-c2);
      #declare ss=(c3-ck)/(c3-c2);
      #declare alfa=ss*0 - rr*90;
    #end

    object{braco_3(alfa)}

#end

object {quadro(clock)}

// Original camera parameters:
// #local cam_ctr = <5.00,0.00,0.00>
// #local cam_vec = ((ww)-<5.00,0.00,0.00>)
// #local cam_sky = z

#include "camlight.inc"
camlight(<5.00,0.00,0.00>,<10,10,10>,20.0,z,1.0)