// Last edited on DATE TIME by USER
// Processed by remove-cam-lights

#include "eixos.inc"
#include "textures.inc"
#include "camlight.inc"
#include "colors.inc"

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

#declare botao2=
        box{<0,0,-0.2>,<0,0,0.2> texture{Gold_Metal}}

#declare base=union{
    box{<-5,-5,-0.2>,<5,5,0.2> texture{Rust}}
}

#macro castelo(s,k,h)
union{

    #if(s<0.001)
        object{botao2 translate z*h/5}
    #else
        object{base scale x*s scale y*s scale z*h translate z*h/5 translate y*k }
        castelo(s/3,k,h+z)
        object{base scale x*s scale y*s scale z*h translate z*h/5 translate x*k }
        castelo(s/2,k,h+z)
    #end
    }
#end

object{eixos(5)}
object{base}
castelo(0.2,3,5)

#declare centro_cena = < 0.00, 0.00, 1.00 >;
#declare raio_cena = 10.0;
#declare dir_camera = < 12, 12, 3 >;
#declare dist_camera = 80.0;
#declare intens_luz = 1.40;
camlight(centro_cena, raio_cena, dir_camera, dist_camera , z, intens_luz)