// Exemplo de arquivo de descricao de cena para POV-ray
// Last edited on 2023-12-28 17:31:05 by stolfi

// Raio da grade debug:
// #declare rdb = 0.025;
#declare rdb = 0;

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

#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 

#include "retalho.inc"

#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, rdb, cret0, 3) rotate<0, 0, 0> }
    object { retalho(B, rdb, cret1, 3) rotate<0, 0, 0> }
    object { retalho(C, rdb, cret2, 3) rotate<0, 0, 0> }
    object { retalho(D, rdb, cret3, 3) rotate<0, 0, 0> }
  }
#end

#declare cmin = < -4, -3, -4 >;
#declare cmax = < +4, +7, +3 >;
object{ cadeira(1, 1, 1) }

#include "eixos.inc"
// #if (rdb > 0) eixos(5.0) #end

#include "gaiola.inc"
#if (rdb > 0) object{ gaiola(cmin,cmax) } #end
#if (rdb = 0) object{ gaipiso(cmin,cmax) } #end

#declare centro_cena = (cmin + cmax)/2;
#declare raio_cena = 0.65*vlength(cmax-cmin);
#declare dist_camera = 7*raio_cena;

#include "camlight.inc"
#declare dir_camera =  < 7, 5, 3 >;
#declare intens_luz = 1.20;
camlight(centro_cena, raio_cena, dir_camera, dist_camera , z, intens_luz)