// Exemplo de arquivo de descricao de cena para POV-ray
// Last edited on 2020-09-30 19:57:13 by jstolfi

// ======================================================================
// CORES E TEXTURAS

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


#declare tx_vidro = 
  texture{
    pigment{ color rgb < 1, 0.95, 1.00 > filter 0.70 }
    finish{ diffuse 0.03 reflection 0.25 ambient 0.02 specular 0.25 roughness 0.005 }
  }


#declare tx_plastico = 
  texture{
    pigment{ color rgb < 0.50, 0.90, 0.50 > }
    finish{ diffuse 0.8 ambient 0.1 specular 0.5 roughness 0.005 }
  }

#declare tx_fosca = 
  texture{
    pigment{ color rgb < 0.40, 0.01, 0.10 > }
    finish{ diffuse 0.9 ambient 0.1 }
  }


// ======================================================================
// DESCRI��O DA CENA 

#declare raio = 2.500;
 

#include "eixos.inc"


#macro emenda(X, Y)
  #declare X[3][0] = (X[2][0] + Y[1][0]) / 2;
  #declare X[3][1] = (X[2][1] + Y[1][1]) / 2;
  #declare X[3][2] = (X[2][2] + Y[1][2]) / 2;
  #declare X[3][3] = (X[2][3] + Y[1][3]) / 2;

  #declare Y[0][0] = X[3][0];
  #declare Y[0][1] = X[3][1];
  #declare Y[0][2] = X[3][2];
  #declare Y[0][3] = X[3][3];
#end 


#macro emenda_braco(X1, Y1)
  #declare X1[0][3] = (X1[0][2] + Y1[0][1]) / 2;
  #declare X1[1][3] = (X1[1][2] + Y1[1][1]) / 2;
  #declare X1[2][3] = (X1[2][2] + Y1[2][1]) / 2;
  #declare X1[3][3] = (X1[3][2] + Y1[3][1]) / 2;

  #declare Y1[0][0] = X1[0][3];
  #declare Y1[1][0] = X1[1][3];
  #declare Y1[2][0] = X1[2][3];
  #declare Y1[3][0] = X1[3][3];
#end 

#macro cadeira(altura, inclinacao, largura)

  // assento
  #declare P = array[4][4];
  #declare P[0][0] = <0, 0, 0>;
  #declare P[0][1] = <1, 0, 0>;
  #declare P[0][2] = <2, 0, 0>;
  #declare P[0][3] = <3, 0, 0>;

  #declare P[1][0] = <0, 1, 0>;
  #declare P[1][1] = <1, 1, 0>;
  #declare P[1][2] = <2, 1, 0>;
  #declare P[1][3] = <3, 1, 0>;

  #declare P[2][0] = <0, 2, 0>;
  #declare P[2][1] = <1, 2, 0>;
  #declare P[2][2] = <2, 2, 0>;
  #declare P[2][3] = <3, 2, 0>;

  // emenda
  #declare P[3][0] = <0, 0, 0>;
  #declare P[3][1] = <0, 0, 0>;
  #declare P[3][2] = <0, 0, 0>;
  #declare P[3][3] = <0, 0, 0>;
 

  // pé
  #declare B = array[4][4];

  // emenda 
  #declare B[0][0] = <0, 0, 0>;
  #declare B[0][1] = <0, 0, 0>;
  #declare B[0][2] = <0, 0, 0>;
  #declare B[0][3] = <0, 0, 0>;

  #declare B[1][0] = <0, 4, -2>;
  #declare B[1][1] = <1, 4, -2>;
  #declare B[1][2] = <2, 4, -2>;
  #declare B[1][3] = <3, 4, -2>;

  #declare B[2][0] = <0, 5, -3>;
  #declare B[2][1] = <1, 5, -3>;
  #declare B[2][2] = <2, 5, -3>;
  #declare B[2][3] = <3, 5, -3>;

  #declare B[3][0] = <0, 6, -3>;
  #declare B[3][1] = <1, 6, -3>;
  #declare B[3][2] = <2, 6, -3>;
  #declare B[3][3] = <3, 6, -3>;

  #declare C = array[4][4];
  #declare C[0][0] = <0, -2, 2>;
  #declare C[0][1] = <1, -2, 2>;
  #declare C[0][2] = <2, -2, 2>;
  #declare C[0][3] = <3, -2, 2>;

  #declare C[1][0] = <0, -1.5, 1>;
  #declare C[1][1] = <1, -1.5, 1>;
  #declare C[1][2] = <2, -1.5, 1>;
  #declare C[1][3] = <3, -1.5, 1>;

  #declare C[2][0] = <0, -1, 0>;
  #declare C[2][1] = <1, -1, 0>;
  #declare C[2][2] = <2, -1, 0>;
  #declare C[2][3] = <3, -1, 0>;

  // emenda 
  #declare C[3][0] = <0, 0, 0>;
  #declare C[3][1] = <0, 0, 0>;
  #declare C[3][2] = <0, 0, 0>;
  #declare C[3][3] = <0, 0, 0>;  

  #declare D = array[4][4];
  #declare D[0][0] = <0, 0, 0>;  // emenda
  #declare D[0][1] = <-1, 0, 0>;
  #declare D[0][2] = <-2, 0, 0>;
  #declare D[0][3] = <-3, 0, 0>;

  #declare D[1][0] = <0, 1, 0>;// emenda
  #declare D[1][1] = <-1, 1, 0>;
  #declare D[1][2] = <-2, 1, 0>;
  #declare D[1][3] = <-3, 1, 0>;

  #declare D[2][0] = <0, 2, 0>; // emenda
  #declare D[2][1] = <-1, 2, 0>;
  #declare D[2][2] = <-2, 2, 0>;
  #declare D[2][3] = <-3, 2, 0>;

  #declare D[3][0] = <0, 3, 0>; // emenda
  #declare D[3][1] = <-1, 3, 0>;
  #declare D[3][2] = <-2, 3, 0>;
  #declare D[3][3] = <-3, 3, 0>; 

  emenda(P, B)
  emenda(C, P)
  // emenda_braco(P, D)
  
  union {
    object { retalho(P, 0.01, tx_plastico, tx_fosca, 0, 1, 0, 1) rotate<0, 0, 0> }
    object { retalho(B, 0.01, tx_fosca, tx_plastico, 0, 1, 0, 1) rotate<0, 0, 0> }
    object { retalho(C, 0.01, tx_fosca, tx_plastico, 0, 1, 0, 1) rotate<0, 0, 0> }
    object { retalho(D, 0.01, tx_fosca, tx_plastico, 0, 1, 0, 1) rotate<0, 0, 0> }
  }
#end

#include "retalho.inc"

union{
  object{ eixos(5.00) }


  object { cadeira(0, 0, 0) }
}

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