// Last edited on 2010-12-16 08:53:39 by stolfilocal
// Processed by remove-cam-lights

#include "eixos.inc"
#include "texturas.inc"
#include "camlight.inc"
#include "retalho.inc"

#declare chao =
  box{ <-20,-20,-1>, <+20,+20,0> }

#local p11= <0,0,3>;
#local p12= <2,2,3>;
#local p13= <-2,2,3>;
#local p14= <-1,4,3>;

#local p21= <0,0,2>;
#local p22= <2,2,2>;
#local p23= <-2,2,2>;
#local p24= <-1,4,2>;

#local p31= <0,0,1>;
#local p32= <2,2,1>;
#local p33= <-2,2,1>;
#local p34= <-1,4,1>;

#local p41= <0,0,0>;
#local p42= <2,2,0>;
#local p43= <-2,2,0>;
#local p44= <-1,4,0>;

#declare tx_bandeira = texture{ uv_mapping
        pigment{ image_map{jpeg "flag.jpg" }}
}

#declare tecido =
retalho(p11,p12,p13,p14,
        p21,p22,p23,p24,
        p31,p32,p33,p34,
        p41,p42,p43,p44,
        0.00001,tx_fosca,tx_bandeira
        )

#declare predio =
        box{ <0,0,0>, <5,5,7> texture{tx_fosca}}

#declare imagem = pigment{
        image_map{
                jpeg "outdoor.jpg"
        }
        scale<2.6,1.1,1.1>
        rotate<0,90,0>
        rotate<90,0,0>
}

#declare outdoor =
        box{<0,0,0>, <.5,3,1> texture{imagem} translate<-.5,0,0>}

#declare mastro =
        cylinder{<0,0,0>, <0,0,8>, .2 texture{branco} }

object{ chao  texture{ tx_xadrez } }
object{ eixos(3.00) }

union{
        object{tecido translate<0,0,5>}
        object{mastro}
        scale<.5,.5,.5>
        translate<0,0,7>
}

object{ predio }
object{ outdoor translate<5.02,1,5>}

#declare centro_cena = < 0.00, 0.00, 1.00 >;
#declare raio_cena = 20.0;
#declare dir_camera = < 14, 7.00, 4.00 >;
#declare dist_camera = 16.0;
#declare intens_luz = 1.00;
camlight(centro_cena, raio_cena, dir_camera, dist_camera , z, intens_luz)