// Last edited on 2005-01-05 23:29:47 by stolfi
// Processed by remove-cam-lights

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

#declare verde =
  texture {
    pigment { color rgb < 0, 1, 0 > }
    finish { diffuse 0.8 specular 0.2 roughness 0.005 ambient 0.1 }
  }

#declare azul =
 texture {
    pigment { color rgb < 0.30, 0.40, 1.00 > }
    finish { diffuse 0.8 specular 0.2 roughness 0.005 ambient 0.1 }
  }

#declare tempo=clock;

#if (tempo<0.5)
 #declare a= 80*clock;
 #declare b= 80*clock;
 #declare c= -80*clock;
 #declare d= 80*clock;
 #declare e= 80*clock;
#else
 #declare a= -80*clock+80;
 #declare b= -80*clock+80;
 #declare c= 80*clock-80;
 #declare d= -80*clock+80;
 #declare e= -80*clock+80;
#end

#declare mao =
 union {
  box { <-0.2,0,-0.5>, <0.2,1.5,0.5>  texture {azul}}
  cylinder { <0,1,0.5>, <0,1,1> 0.2 texture {azul}}
  cylinder { <0,1.5,0.3>, <0,2.2,0.3> 0.1 texture {azul}}
  cylinder { <0,1.5,0.1>, <0,2.2,0.1> 0.1 texture {azul}}
  cylinder { <0,1.5,-0.1>, <0,2.2,-0.1> 0.1 texture {azul}}
  cylinder { <0,1.5,-0.3>, <0,2.2,-0.3> 0.1 texture {azul}}

 }
#declare b1 =
 union {
  cylinder { <0,0,0>, <0,3,0> 0.5 texture {verde}}
  object {mao rotate a*x translate<0,3,0> }
  }

#declare b2 =
 union {
  cylinder { <0,0,0>, <0,3,0> 0.5 texture {azul}}
  object {b1 rotate b*x translate<0,3,0> }
  }

#declare b3 =
 union {
  cylinder { <0,0,0>, <0,3,0> 0.5 texture {verde}}
  object {b2 rotate c*x translate<0,3,0> }
  }

#declare b4 =
 union {
  cylinder { <0,0,0>, <0,3,0> 0.5 texture {azul}}
  object {b3 rotate d*x translate<0,3,0> }
  }

object {b4 rotate e*x}

#include "camlight.inc"
camlight(<0,5,5>,<20,-5,-5>,1.00,z,1.0)