// MC937 - Tabuleiro de Hiperxadrez
// Nome: Michell Henrique Lucino RA: 242056
//

// Cores e Texturas //
background{ color rgb < 1.0, 1.0, 1.0 > }

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

// Peças //
#declare peao =
    union{
        sphere {
            <1, 1, 0>, 0.400
            texture{ plastico }
        }
        cylinder{
            < 1.00, 1.00, 0.00 >,
            < 1.00, 1.00, -1.00 >,
            0.25
            texture{ plastico }
        }
        cylinder{
            < 1.00, 1.00, -1.00 >,
            < 1.00, 1.00, -1.25 >,
            0.6
            texture{ plastico }
        }
    }

#declare rainha =
    union {    
        box{
            <5, 1, 0>, <6, 2, 0.25>
            texture{ plastico }
        }
        cone {
            <5.5, 1.5, 1>, 0.2
            <5.5, 1.5, 0.25>, 0.4
            texture{ plastico }
        }
        box{
            <5.2, 1.2, 1>, <5.8, 1.8, 1.5>
            texture{ plastico }
        }
    }


#macro tabuleiro(m, n)
    union {
        object { peao }

        object { rainha }

        #while (m != 0)
            object {
                cylinder{
                    < 1.00, 8.00, 5.00 - m >,
                    < 1.00, 8.00, 4.75 - m >,
                    1.5*m
                    texture{ plastico }
                }
            }

            #local m = m - 1;
        #end
    }
#end

#include "eixos.inc"

union {
    object{ eixos(10.00) }

    object{ tabuleiro(3, 3) }
}

#include "camlight.inc"
#declare centro_cena = < 0.00, 0.00, 0.00 >;
#declare raio_cena = 15.0;
#declare dir_camera = < 10.00, 8.00, 5.0 >;
#declare dist_camera = 5*raio_cena;
#declare intens_luz = 1.20;
camlight(centro_cena, raio_cena, dir_camera, dist_camera , z, intens_luz)