// Last edited on 2003-12-07 13:08:51 by stolfi
// Daniel Kalil Franulovic ra 001525

// ======================================================================


#declare ctr = < -7.50, 30.00, 0.00 >;
#declare camDir = < 0.00, -60.00, 5.00 >;

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

// ======================================================================
// FONTES DE LUZ

light_source {
   < +10.0, +10.0, +70.0 >              // Posição da lâmpada.
  color rgb 2 * < 1.00, 1.00, 1.00 >   // Intensidade e corda luz.
} 

light_source {
  < +10.0, 15.0, +100.0 >             // Posição da lâmpada.
  color rgb 0.8 * < 1.00, 1.00, 1.00 >   // Intensidade e corda luz.
} 

light_source {
  < +10.0, -70.0, 100.0 >             // Posição da lâmpada.
  color rgb 2 * < 1.00, 1.00, 1.00 >   // Intensidade e corda luz.
} 


// ======================================================================
// DESCRIÇÃO DA CENA 

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

#declare fonte = seed(4641344659);

#include "colors.inc"
#include "stoneold.inc"
#include "skies.inc"
 

 
#declare tinta_marrom = 
  texture {
    pigment { color rgb < 0.3, 0.2, 0.05 > }
    finish { diffuse 0.5 specular 0.4 roughness 0.005 ambient 0.1 }
  }

 
#declare tinta_corpo = 
  texture {
    pigment { color rgb < 0.3, 0.2, 0.05 > }
    finish { diffuse 0.5 specular 0.4 roughness 0.005 ambient 0.1 }
  }




#declare mao = 

  prism {
    linear_sweep
    linear_spline
    0, // sweep the following shape from here ...
    0.7, // ... up through here
    5, // the number of points making up the shape ...
    <-0.6,-0.2>, <0.1,-0.15>, <0.1,0.15>, <-0.6,0.2>, <-0.6, -0.2>
    texture { tinta_marrom }
  }

#declare garra = 

  prism {
    linear_sweep
    linear_spline
    0, // sweep the following shape from here ...
    0.2, // ... up through here
    5, // the number of points making up the shape ...
    <-1.2,0>, <-0.6,0.15>, <-0.6,0.2>, <-0.9,0.1>, <-1.2, 0>
    texture { tinta_marrom }
    }



#declare pata = 

  object {union{
      object{mao}
      object{garra}
      object{garra translate<0,0.5,0>}
      }
    translate <0,-0.35,0>
  }



#declare articulacao = 

  cylinder{

  <0,-0.4,0>,
  <0,0.4,0>,
  0.4
  texture {tinta_marrom}

  }


#declare braco1 = 

  cylinder{

  <0,0,0>,
  <0,0,3>,
  0.4
  texture {tinta_marrom}

  }


#declare braco2 = 

  cylinder{

  <0,0,0>,
  <0,0,3.5>,
  0.4
  texture {tinta_marrom}

  }

#declare braco3 = 

  cylinder{

  <0,0,0>,
  <0,0,5>,
  0.4
  texture {tinta_marrom}

  }


#declare braco1pata = 
  union
  {
    object {pata scale 1.3 rotate <0,rand(fonte)*180,0> translate <0,0,3>}
    object {articulacao translate <0,0,3>}
    object {braco1}
}

#declare perna1 = 
  union
  {
    object {braco1pata  rotate <0,(rand(fonte)-0.5)*90,0> translate <0,0,3.5>}
    object {articulacao translate <0,0,3.5>}
    object {braco2}
  }

#declare perna = 
  union
  {
    object {perna1  rotate <0,(rand(fonte)-0.5)*50,0> translate <0,0,5>}
    object {articulacao translate <0,0,5>}
    object {braco3}
  }



#declare corpo = 
  object{
  difference 
  {
    object {sphere {<0,0,0>,10 texture {tinta_corpo} scale <1,3,0.6>}}
    object {box   {<-100,-100,0>,<100,100,100> texture {tinta_corpo}} }
  }
  translate <-7.5,15,0>
  }


#declare i = 0;


#declare pernas = 
  union
  {

#while (i<3)


  object{
    union {
      object {  
      union
      {
        object { 

        union
        {
          object {pata  rotate <0,rand(fonte)*180,0> translate <0,0,3>}
          object {articulacao translate <0,0,3>}
          object {braco1}
        }

           rotate <0,(rand(fonte)-0.5)*90,0> translate <0,0,3.5>}
        object {articulacao translate <0,0,3.5>}
        object {braco2}
       }


        rotate <0,(rand(fonte)-0.5)*50,0> translate <0,0,5>}
      object {articulacao translate <0,0,5>}
      object {braco3}
      object {articulacao}
    }
  rotate <0,(rand(fonte)-0.5)*90,0> translate<0,15*i,0>}

  object{
    union {
      object {  
      union
      {
        object { 

        union
        {
          object {pata  rotate <0,rand(fonte)*180,0> translate <0,0,3>}
          object {articulacao translate <0,0,3>}
          object {braco1}
        }

           rotate <0,(rand(fonte)-0.5)*90,0> translate <0,0,3.5>}
        object {articulacao translate <0,0,3.5>}
        object {braco2}
       }


        rotate <0,(rand(fonte)-0.5)*50,0> translate <0,0,5>}
      object {articulacao translate <0,0,5>}
      object {braco3}
      object {articulacao}

    }
  rotate <0,(rand(fonte)-0.5)*90,0> scale<-1,1,1> translate<-15,15*i,0>}



#declare i = i + 1;

#end

}





#declare chao = 
  plane { z,-2
  texture {Grnt15}
}


#declare teste = 
  object {braco1pata scale 2
    }



sky_sphere{ S_Cloud5} //pq tah de lado???

pernas
corpo
chao