// Exemplo de arquivo de descricao de cena para POV-ray
// Last edited on 2003-07-31 12:50:37 by stolfi

#include "colors.inc"


// ======================================================================
// CÂMERA 

camera {
  location  <  0.00, 30.00, 0.00 >  // Posição do observador.
  right     1.0*x                 // Largura RELATIVA da imagem.
  up        1.0*y                 // Altura RELATIVA da imagem.      
  sky       z                      // Qual direção é "para cima"?
  look_at   <  0.00, 0.00, 0.00 >  // Para onde a câmera está apontando.
} 
// Nota: os parâmetros "right" e "up" devem ter a mesma proporção
// que os parâmetros ${WIDTH} e ${HEIGHT} no Makefile.

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

light_source {
  10 * < +50.0, +30.0, +50.0 >              // Posição da lâmpada.
  color rgb 1.2 * < 1.00, 1.00, 1.00 >   // Intensidade e corda luz.
} 

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

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

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

#declare raio = 2.000;

#declare cor_cristal = <1.00, 0.0, 0.0>;
#declare tx_cristal=
 texture{
   finish{
      ambient 0.1 diffuse 0.1 reflection 0.25  specular 1 roughness 0.001
   }
   pigment { color cor_cristal filter 1}
 }
 
 #declare cor_cristal2 = <0.10, 0.90, 1.00>;
#declare tx_cristal2=
 texture{
   finish{
      ambient 0.1 diffuse 0.1 reflection 0.25  specular 1 roughness 0.001
   }
   pigment { color cor_cristal2 filter 1}
 }
 
 #declare cor_espelho = <1.00, 0.80, 0.10>;
 #declare tx_espelho =
  texture{
   pigment{ rgb cor_espelho }
   finish{
    ambient 0.05 diffuse 0.05 reflection cor_espelho  specular 0.20 roughness 0.05
   }
  }
  
  #declare cor_espelho2 = <0.10, 0.80, 1.00>;
 #declare tx_espelho2 =
  texture{
   pigment{ rgb cor_espelho2 }
   finish{
    ambient 0.05 diffuse 0.05 reflection cor_espelho2  specular 0.20 roughness 0.05
   }
  }
 

#declare tinta_A = 
  texture {
    pigment { color rgb < 0.10, 0.80, 1.00 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }

#declare tinta_B = 
  texture {
    pigment { color rgb < 1.00, 0.80, 0.10 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }

#declare vermelho = 
  texture {
    pigment { color rgb < 1.00, 0.00, 0.00 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }

#declare cinza = 
  texture {
    pigment { color rgb < 0.90, 0.90, 0.90 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }
    
  
#declare gera_cor = seed(1234);
#declare gera_junta = seed(5678);
  

#declare noh =
  sphere {
    < 0.00, 0.00, 0.00 >, 0.80
    texture { vermelho }
  }
    
#declare pau1 = 
  cylinder {
    < 0.00, 0.00, 0.00 >,
    < 0.00, 0.00, 3.00 >,
    0.2
    texture { cinza }
    
  }
  
#declare pau2 =
 cylinder {
    < 0.00, 0.00, 0.00 >,
    < 5.50, 0.00, 0.00 >,
    0.2
    texture { cinza }
    
  }
  
#declare pau3 =
 cylinder {
    < 0.00, 0.00, 0.00 >,
    < 0.00, -5.00, 0.00 >,
    0.2
    texture { cinza }
    
  }

#declare pacote1 =
  box 
  {
    <0.0, -0.60, 3.00>,
    <+0.30, -0.80, -3.00>
    texture { tinta_B }
  }

#declare parte=
union{
  object {noh}
  object {pau1}
  object {pau2}
  object {noh translate <0.0, 0.0, 2.5>}
  object {pau2 translate <0.0, 0.0, 2.5>}
  object {pau3}
  object {pau3 translate <0.0, 0.0, 2.5>}
  translate <-200.0, 0.0, 0.0>
}


// Aqui está a cena, finalmente:



#declare j=0;

#while (j<100)
#declare i=1;
 #while (i<100)
  object {parte  translate <i*5.5, -j*5, -10.0>}
  #declare i=i+1;
#end
#declare j=j+1;
#end

#declare j=0;

#while (j<100)
#declare i=1;
 #while (i<100)
  object {parte  translate <i*5.5, -j*5, 10.0>}
  #declare i=i+1;
#end
#declare j=j+1;
#end