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

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

#declare marrom1 = <0.7,0.4,0.2>;
#declare marrom2 = <0.6,0.3,0.1>;
#declare marrom3 = <0.8,0.3,0.1>;
#declare marrom4 = <0.9,0.2,0.1>;
#declare marrom5 = <0.1,0.1,0.8>;
#declare branco = <1,1,1>;

#declare t0=0;
#declare t1=0.4;
#declare t2=1;

#declare alpha11=(0+(40/t1))*(clock);
#declare alpha12=40;
#declare alpha21=(0+(-10/t1))*(clock);
#declare alpha22=-10+((-90/t2-t1)*(clock-t1));
#declare alpha31=(0+(45/t1))*(clock);
#declare alpha32=45+((110/t2-t1)*(clock-t1));
#declare alpha_obj=45*clock;

#declare fugitivo =
  cylinder {
    <0,0,0>, <0,30,0>, 15
    pigment {color branco}
  }

#declare dedos =
  union {

    #declare i = 0;
    #while(i<4)
      #declare dedo =
      cylinder {
        <0,0,0>, <6,0,0>, 0.8
        pigment {color marrom1}
      }
      object {dedo translate <0,i*2,0>}
      #declare i=i+1;
    #end
  }

#declare mao1 =
  union {
    cylinder {
        <0,7.6,0>, <4,7.6,0>, 0.8
        pigment {color marrom1}
    }
    box {
      <0,-0.8,-0.8>,<8,6.8,0.8>
      pigment {color marrom2 }
    }
    # if (clock < t1)
      object {dedos rotate -alpha11*y  translate <8,0,0>}
    #else
      object {dedos rotate -alpha12*y  translate <8,0,0>}
    #end
  }

#declare cotovelo1 =
  union {
    cylinder {
        <0,3,0>, <20,3,0>, 3
        pigment {color marrom3}
    }
      object {mao1 translate <20,0,0>}
  }

#declare braco1 =
  union {
    cylinder {
        <0,0,0>, <0,-20,0>, 3
        pigment {color marrom4}
    }
    # if (clock < t1)
      object {cotovelo1 rotate alpha21*z translate <2,-20,0>}
    #else
      object {cotovelo1 rotate alpha22*z translate <2,-20,0>}
    #end

  }

#declare mao2 =
  union {
    cylinder {
        <0,7.6,0>, <4,7.6,0>, 0.8
        pigment {color marrom1}
    }
    box {
      <0,-0.8,-0.8>,<8,6.8,0.8>
      pigment {color marrom2 }
    }
    # if (clock < t1)
      object {dedos rotate alpha11*y  translate <8,0,0>}
    #else
      object {dedos rotate alpha12*y  translate <8,0,0>}
    #end
  }

#declare cotovelo2 =
  union {
    cylinder {
        <0,3,0>, <20,3,0>, 3
        pigment {color marrom3}
    }
    object {mao2 translate <20,0,0>}
  }

#declare braco2 =
  union {
    cylinder {
        <0,0,0>, <0,-20,0>, 3
        pigment {color marrom4}
    }
    # if (clock < t1)
      object {cotovelo2 rotate alpha21*z translate <2,-20,0>}
    #else
      object {cotovelo2 rotate alpha22*z translate <2,-20,0>}
    #end

  }

#declare corpo =
  union {
    box {
      <0,0,0>, <20,40,20>
      pigment {color marrom5}
    }
    cylinder {
      <0,0,0>, <0,6,0>, 3
      pigment {color marrom5}
      translate <10,40,10>
    }
    sphere {
      <0,0,0> , 10
      pigment {color marrom5}
      translate <10,55,10>
    }
  }

    # if (clock < t1)
      object {braco1 rotate alpha31*z }
      object {braco2 translate <0,0,25> rotate alpha31*z}
      object {fugitivo translate <40,-20,10>}
     #else
      object {braco1 rotate alpha32*z }
      object {braco2 translate <0,0,25> rotate alpha32*z}
      object {fugitivo translate <40,-20,10> rotate alpha_obj*z}
    #end

object {corpo translate <-10,-30,3>}

#include "camlight.inc"
camlight(<15,-10,0>,<65,90,80>,1.00,y,1.0)