// Last edited on 2021-01-13 18:42:24 by jstolfi

#version 3.6;
global_settings{ max_trace_level 30 }

background{ color rgb < 0.850, 0.850, 0.850 > }

#declare tx_plastico1 = 
  texture{
    pigment{ color rgb < 1.00, 0.100, 0.800 > }
    finish{ diffuse 0.8 ambient 0.1 specular 0.5 roughness 0.005 }
  }

#declare tx_plastico2 = 
  texture{
    pigment{ color rgb < 0.100, 1.000, 0.800 > }
    finish{ diffuse 0.8 ambient 0.1 specular 0.5 roughness 0.005 }
  }

#declare tx_plastico3 = 
  texture{
    pigment{ color rgb < 0.100, 0.800, 1.000 > }
    finish{ diffuse 0.8 ambient 0.1 specular 0.5 roughness 0.005 }
  }

#declare tx_lata1 =
  texture{
    pigment{ color rgb < 1.00, 0.100, 0.800 > }
    finish{ diffuse 0.8 ambient 0.1 specular 0.5 roughness 0.005 }
  }

#declare tx_lata2 =
  texture{
    pigment{ color rgb < 0.100, 1.000, 0.800 > }
    finish{ diffuse 0.8 ambient 0.1 specular 0.5 roughness 0.005 }
  }

#declare tx_lata3 =
  texture{
    pigment{ color rgb < 0.100, 0.800, 1.000 > }
    finish{ diffuse 0.8 ambient 0.1 specular 0.5 roughness 0.005 }
  }

#declare tx_fixa = 
  texture{
    pigment{ color rgb < 0.000, 0.800, 0.100 > }
    finish{ diffuse 0.0 ambient 1.0 }
  } 

#declare tx_xadrez =
  texture{
    pigment{ checker color rgb < 0.600, 0.600, 0.600 >, color rgb < 0.900, 0.900, 0.900 > }
    finish{ diffuse 0.9 ambient 0.1 }
    scale 0.5
  }

#local tx_vidro = 
  texture{
    pigment{ color rgb < 1,1,1 > filter 0.960 }
    finish{ 
      diffuse 0.005
      ambient 0.005 
      reflection 0.030 * < 1,0,0 >
      specular 0.35 roughness 0.005
    }
  }

#include "eixos.inc"

#include "retalho-simples.inc"

#local A = array[4][4]

#local A[0][0] = < 0, 0, 0 >;
#local A[0][1] = < 0.2, 0, 0 >;
#local A[0][2] = < 0.4, 0, 0 >;
#local A[0][3] = < 0.6, 0.4, 0 >;

#local A[1][0] = < 0, 0, 0.2 >;
#local A[1][1] = < 0.2, 0, 0.2 >;
#local A[1][2] = < 0.4, 0, 0.2 >;
#local A[1][3] = < 0.6, 0.4, 0.2 >;

#local A[2][0] = < 0, 0, 0.4 >;
#local A[2][1] = < 0.2, 0, 0.4 >;
#local A[2][2] = < 0.4, 0, 0.4 >;
#local A[2][3] = < 0.6, 0.4, 0.4 >;

#local A[3][0] = < 0, 0, 0.6 >;
#local A[3][1] = < 0.2, 0, 0.6 >;
#local A[3][2] = < 0.4, 0, 0.6 >;
#local A[3][3] = < 0.6, 0.4, 0.6 >;

#local B = array[4][4]

#local B[0][0] = < 0, 0, 0.6 >;
#local B[0][1] = < 0.2, 0, 0.6 >;
#local B[0][2] = < 0.4, 0, 0.6 >;
#local B[0][3] = < 0.6, 0.4, 0.6 >;

#local B[1][0] = < 0, 0.5, 0.4 >;
#local B[1][1] = < 0.2, 0.5, 0.4 >;
#local B[1][2] = < 0.4, 0.5, 0.4 >;
#local B[1][3] = < 0.6, 0.5, 0.4 >;

#local B[2][0] = < 0, 1, 1 >;
#local B[2][1] = < 0.2, 1, 1 >;
#local B[2][2] = < 0.4, 1, 1 >;
#local B[2][3] = < 0.6, 1, 1 >;

#local B[3][0] = < 0, 1.5, 1 >;
#local B[3][1] = < 0.2, 1.5, 1 >;
#local B[3][2] = < 0.4, 1.5, 1 >;
#local B[3][3] = < 0.6, 1.5, 1 >;

#local C = array[4][4]

#local C[0][0] = < 0, 1.5, 1 >;
#local C[0][1] = < 0.2, 1.5, 1 >;
#local C[0][2] = < 0.4, 1.5, 1 >;
#local C[0][3] = < 0.6, 1.5, 1 >;

#local C[1][0] = < 0.0, 1.7, 1.1 >;
#local C[1][1] = < 0.3, 1.7, 1.1 >;
#local C[1][2] = < 0.5, 1.7, 1.1 >;
#local C[1][3] = < 0.7, 1.7, 1.1 >;

#local C[2][0] = < 0, 1.9, 1.1 >;
#local C[2][1] = < 0.3, 1.9, 1.1 >;
#local C[2][2] = < 0.5, 1.9, 1.1 >;
#local C[2][3] = < 0.7, 1.9, 1.1 >;

#local C[3][0] = < 0, 2.1, 1 >;
#local C[3][1] = < 0.2, 2.1, 1 >;
#local C[3][2] = < 0.4, 2.1, 1 >;
#local C[3][3] = < 0.6, 2.1, 1 >;


#local D = array[4][4]

#local D[0][0] = < 0, 2.1, 1 >;
#local D[0][1] = < 0.2, 2.1, 1 >;
#local D[0][2] = < 0.4, 2.1, 1 >;
#local D[0][3] = < 0.6, 2.1, 1 >;

#local D[1][0] = < 0, 2.5, 1.2 >;
#local D[1][1] = < 0.2, 2.5, 1.2 >;
#local D[1][2] = < 0.4, 2.5, 1.2 >;
#local D[1][3] = < 0.6, 2.5, 1.2 >;

#local D[2][0] = < 0, 2.9, 0.6 >;
#local D[2][1] = < 0.2, 2.9, 0.6 >;
#local D[2][2] = < 0.4, 2.9, 0.6 >;
#local D[2][3] = < 0.6, 2.9, 0.6 >;

#local D[3][0] = < 0, 3.2, 0.6 >;
#local D[3][1] = < 0.2, 3.2, 0.6 >;
#local D[3][2] = < 0.4, 3.2, 0.6 >;
#local D[3][3] = < 0.6, 3.2, 0.6 >;

#local E = array[4][4]

#local E[0][0] = < 0, 0, 1.1 >;
#local E[0][1] = < 0, 1, 0.0 >;
#local E[0][2] = < 0, 2, 0.1 >;
#local E[0][3] = < 0, 3, 0.3 >;

#local E[1][0] = < 1, 0, 0.0 >;
#local E[1][1] = < 1, 1, 1.0 >;
#local E[1][2] = < 1, 2, 1.3 >;
#local E[1][3] = < 1, 3, 0.1 >;

#local E[2][0] = < 2, 0, 0.0 >;
#local E[2][1] = < 2, 1, 1.2 >;
#local E[2][2] = < 2, 2, 1.5 >;
#local E[2][3] = < 2, 3, 0.0 >;

#local E[3][0] = < 3, 0, -0.2 >;
#local E[3][1] = < 3, 1, 0.0 >;
#local E[3][2] = < 3, 2, 0.5 >;
#local E[3][3] = < 3, 3, 0.0 >;


#local F = array[4][4]

#local F[0][0] = < 0.6, 0.4, 0 >;
#local F[0][1] = < 0.7, 0.5, 0 >;
#local F[0][2] = < 0.7, 1.0, 0 >;
#local F[0][3] = < 0.6, 1.5, 0 >;

#local F[1][0] = < 0.6, 0.4, 0.2 >;
#local F[1][1] = < 0.7, 0.5, 0.2 >;
#local F[1][2] = < 0.7, 1, 0.2 >;
#local F[1][3] = < 0.6, 1.5, 0.2 >;

#local F[2][0] = < 0.6, 0.4, 0.4 >;
#local F[2][1] = < 0.7, 0.5, 0.4 >;
#local F[2][2] = < 0.7, 1, 0.4 >;
#local F[2][3] = < 0.6, 1.5, 0.4 >;

#local F[3][0] = < 0.6, 0.4, 0.6 >;
#local F[3][1] = < 0.7, 0.5, 0.4 >;
#local F[3][2] = < 0.7, 1, 1 >;
#local F[3][3] = < 0.6, 1.5, 1 >;

#local G = array[4][4]

#local G[0][0] = < 0, 0, 1.1 >;
#local G[0][1] = < 0, 1, 0.0 >;
#local G[0][2] = < 0, 2, 0.1 >;
#local G[0][3] = < 0, 3, 0.3 >;

#local G[1][0] = < 1, 0, 0.0 >;
#local G[1][1] = < 1, 1, 1.0 >;
#local G[1][2] = < 1, 2, 1.3 >;
#local G[1][3] = < 1, 3, 0.1 >;

#local G[2][0] = < 2, 0, 0.0 >;
#local G[2][1] = < 2, 1, 1.2 >;
#local G[2][2] = < 2, 2, 1.5 >;
#local G[2][3] = < 2, 3, 0.0 >;

#local G[3][0] = < 3, 0, -0.2 >;
#local G[3][1] = < 3, 1, 0.0 >;
#local G[3][2] = < 3, 2, 0.5 >;
#local G[3][3] = < 3, 3, 0.0 >;

#local H = array[4][4]

#local H[0][0] = < 0, 0, 1.1 >;
#local H[0][1] = < 0, 1, 0.0 >;
#local H[0][2] = < 0, 2, 0.1 >;
#local H[0][3] = < 0, 3, 0.3 >;

#local H[1][0] = < 1, 0, 0.0 >;
#local H[1][1] = < 1, 1, 1.0 >;
#local H[1][2] = < 1, 2, 1.3 >;
#local H[1][3] = < 1, 3, 0.1 >;

#local H[2][0] = < 2, 0, 0.0 >;
#local H[2][1] = < 2, 1, 1.2 >;
#local H[2][2] = < 2, 2, 1.5 >;
#local H[2][3] = < 2, 3, 0.0 >;

#local H[3][0] = < 3, 0, -0.2 >;
#local H[3][1] = < 3, 1, 0.0 >;
#local H[3][2] = < 3, 2, 0.5 >;
#local H[3][3] = < 3, 3, 0.0 >;


#local A[3][0] = (B[1][0]+A[2][0])/2;
#local B[0][0] = A[3][0];

#local A[3][1] = (B[1][1]+A[2][1])/2;
#local B[0][1] = A[3][1];

#local A[3][2] = (B[1][2]+A[2][2])/2;
#local B[0][2] = A[3][2];

#local A[3][3] = (B[1][3]+A[2][3])/2;
#local B[0][3] = A[3][3];

////

#local B[3][0] = (C[1][0]+B[2][0])/2;
#local C[0][0] = B[3][0];

#local B[3][1] = (C[1][1]+B[2][1])/2;
#local C[0][1] = B[3][1];

#local B[3][2] = (C[1][2]+B[2][2])/2;
#local C[0][2] = B[3][2];

#local B[3][3] = (C[1][3]+B[2][3])/2;
#local C[0][3] = B[3][3];

////

#local C[3][0] = (D[1][0]+C[2][0])/2;
#local D[0][0] = C[3][0];

#local C[3][1] = (D[1][1]+C[2][1])/2;
#local D[0][1] = C[3][1];

#local C[3][2] = (D[1][2]+C[2][2])/2;
#local D[0][2] = C[3][2];

#local C[3][3] = (D[1][3]+C[2][3])/2;
#local D[0][3] = C[3][3];

////
/*
#local A[0][3] = (F[0][1]+A[0][2])/2;
#local F[0][0] = A[0][3];

#local A[1][3] = (F[1][1]+A[1][2])/2;
#local F[1][0] = A[1][3];

#local A[2][3] = (F[2][1]+A[2][2])/2;
#local F[2][0] = A[0][3];

#local A[3][3] = (F[3][1]+A[3][2])/2;
#local F[3][0] = A[0][3];

#local B[0][3] = (F[0][2]+B[0][2])/2;
#local F[0][3] = B[0][3];

#local B[1][3] = (F[1][2]+B[1][2])/2;
#local F[1][3] = B[1][3];

#local B[2][3] = (F[2][2]+B[2][2])/2;
#local F[2][3] = B[2][3];

#local B[3][3] = (F[3][2]+B[3][2])/2;
#local F[3][3] = B[3][3];
*/

#local cena = 
  union{
    object{ eixos(5.0) }
    box{ < -10, -10, -0.1 >, < +10, +10, 00.0 > translate -2*z texture{ tx_xadrez } }
    object{ retalho(A, 0.01, tx_plastico1, tx_lata1) }
    object{ retalho(B, 0.01, tx_plastico2, tx_lata2) }
    object{ retalho(C, 0.01, tx_plastico3, tx_lata3) }
    object{ retalho(D, 0.01, tx_plastico2, tx_lata2) }

    //object{ retalho(E, 0.02, tx_plastico, tx_lata) translate <4,0,0>}
    //object{ retalho(F, 0.01, tx_plastico3, tx_lata3) }
    //object{ retalho(G, 0.02, tx_plastico, tx_lata) translate <8,-4,0>}
    //object{ retalho(H, 0.02, tx_plastico, tx_lata) translate <8,0,0>}
  }

object{ cena }

#include "camlight.inc"
#declare centro_cena = < 1.5, 1.5, 0.0 >;
#declare raio_cena = 3.0;
#declare dir_camera = < 10.00, -5.00, 7.00 >;
#declare dist_camera = 5*raio_cena;
#declare intens_luz = 1.20;
camlight(centro_cena, raio_cena, dir_camera, dist_camera, z, intens_luz)