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

#include "colors.inc"

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

#declare raio = 2.000;
#declare amarelo = <1,.8,.1>;
#declare verde = <0,1,0>;
#declare vermelho = <1,0,0>;

#declare tverde =
    texture {
 finish {
  ambient 0.1 diffuse .1 reflection .25
  specular 1 roughness .001
  }
 pigment { color verde filter 1 }
}

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

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

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

#declare tvermelho =
    texture {
 finish {
  ambient 0.1 diffuse .1 reflection .25
  specular 1 roughness .001
  }
 pigment { color vermelho filter 1 }
 }

#declare tx_espelho =
texture {
 pigment { rgb amarelo }
 finish {
 ambient .05 diffuse .05
 reflection amarelo *.50
 specular .20 roughness .05
}
}

#if  (clock < .5)
#declare A = 60*clock;
#declare B = 90*clock;
#declare C = -60*clock;
#declare D = -90*clock;
#else
#declare A = -60*clock + 60;
#declare B = -90*clock + 90;
#declare C = 60*clock - 60;
#declare D = 90*clock - 90;
#end

#declare mao = box { <-.25,0,.25>, <0.25,1.5,-.25>  texture {tinta_A}}

#declare antebraco_1 =
 union {
  cylinder { <0,0,0>, <0,2,0> .5 texture {tinta_B}}
  object {mao rotate A*x translate<0,2,0> }
  }

#declare antebraco_2 =
 union {
  cylinder { <0,0,0>, <0,2,0> .5 texture {tinta_A}}
  object {antebraco_1 rotate B*x translate<0,2,0> }
  }

#declare antebraco_3 =
 union {
  cylinder { <0,0,0>, <0,2,0> .5 texture {tinta_B}}
  object {antebraco_2 rotate C*x translate<0,2,0> }
  }

#declare antebraco_4 =
 union {
  cylinder { <0,0,0>, <0,2,0> .5 texture {tinta_A}}
  object {antebraco_3 rotate D*x translate<0,2,0> }
  }

object {antebraco_4}

#include "camlight.inc"
camlight(<0,0,0>,<27.00,0,0>,1.00,z,1.0)