// CORES E TEXTURAS

background{ color rgb < 0.90, 0.20, 0.85 > }

#declare tx_tanque = 
  texture{
    pigment{ color rgb < 0.7, 0.50, 0.40 > }
    //finish{ diffuse 0.8 ambient 0.1 specular 0.5 roughness 0.005 }
  }




/////////////////////////////////////////////////////////////////////////////////////////////

// DESCRICAO DA CENA

#include "eixos.inc"

#macro pata()
  object { box { < 0, -1, -0.2 >, < 2, 1, 0.2 > } }
#end


#macro submembro(b4)
  #local objeto = cylinder { < 0, 0, 0 >, < 0, 0, -5 >, 1 }
  #local subobjeto = object { pata() }
  union {
    object { objeto }
    object { subobjeto
             rotate b4*y
             translate < 0, 0, -5 >
    }
  }
#end


#macro membro(b3, b4)
  #local objeto = cylinder { < 0, 0, 0 >, < 0, 0, -5 >, 1 }
  #local subobjeto = object { submembro(b4) }
  union {
    object { objeto }
    object { subobjeto
             rotate b3*y
             translate < 0, 0, -5 >
    }
  }
#end


// b11 a b14: perna esquerda
// b21 a b24: perna direita
#macro tronco(b11, b12, b13, b14, b21, b22, b23, b24)
  #local objeto = cylinder { < 0, 0, 15 >, < 0, 0, 0 >, 5 }
  #local perna_esquerda = object { membro(b13, b14) }
  #local perna_direita = object { membro(b23, b24) }
  union {
    object { objeto }
    object { perna_esquerda
             rotate b11*y
             rotate b12*z
             translate < 0, 3, 0 >
    }
    object { perna_direita
             //scale < +1, -1, +1 >
             rotate b21*y
             rotate b22*z
             translate < 0, -3, 0 >
    }
  }
#end

tronco(0, 0, 25, 25, 25, -25, 15, 25)

//////////////////////////////////////////////////////////////////////////////////////////////////



object{ eixos(20.0) }

#include "camlight.inc"
#declare centro_cena = < 0.00, 5.00, 7.00 >;
#declare raio_cena = 30.0;
#declare dir_camera = < 7.00, 2.00, 1.00 >;
#declare dist_camera = 2*raio_cena;
#declare intens_luz = 1.20;
camlight(centro_cena, raio_cena, dir_camera, dist_camera , z, intens_luz)