// Last edited on 2009-11-22 20:02:59 by stolfilocal
// Processed by remove-cam-lights

#macro eixo(ponta,cor,nome)
  union{
    sphere{ <0,0,0>, 0.02 }
    cylinder{ <0,0,0>, 0.91*ponta, 0.02 }
    cone{ 0.90*ponta, 0.06, ponta, 0.00 }
    texture{ pigment{ color rgb cor } finish{ ambient 0.5 diffuse 0.5 } }
  }
#end
#macro eixos(tamanho)
  union{
    object{ eixo( <tamanho,0,0>, <1.0,0.2,0.2>, "X") }
    object{ eixo( <0,tamanho,0>, <0.0,0.8,0.0>, "Y") }
    object{ eixo( <0,0,tamanho>, <0.3,0.3,1.0>, "Z") }
  }
#end

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

#declare tx_carro =
    texture{
    pigment{ color rgb < 1, 1, 1 > }
    finish{ diffuse 0.4 ambient 0.1 reflection 0.5*<1,1,1>}
  }

#declare tx_fosca =
  texture{
    pigment{ color rgb < 1.00, 0.80, 0.10 > }
    finish{ diffuse 0.8 ambient 0.2 }
  }

  #declare tx_nada =
  texture{
    pigment{ color rgb < 0.97, 0.98, 1.00 > filter 0.90 }
    finish{ diffuse 0.48 reflection 0.25 ambient 0.02 specular 0.25 roughness 0.005 }
  }

#declare p1 = 0.5*<0,0>;
#declare p2 = 0.5*<4,0.5>;
#declare p3 = 0.5* <2,1>;

#declare p6 = 0.5*<3.5,4.5>;
#declare p7 = 0.5*<2,5>;

#declare p10 = 0.5*<2,8>;
#declare p11 = 0.5*<2.5,10>;

#declare p14 = 0.5*<5.5,12.5>;
#declare p15 = 0.5*<6.5,13.5>;
#declare p16 = 0.5*<0.5,14>;

#declare p4 = (p3 + p6)/2;
#declare p5 = p4;
#declare p8 = (p7 + p10)/2;
#declare p9 = p8;
#declare p12 = (p11 + p14)/2;
#declare p13 = p12;

#declare p1_l2 = 0.5*<7,0>;
#declare p2_l2 = 0.5*<2,0.5>;
#declare p3_l2 = 0.5* <2.5,1>;

#declare p6_l2 = 0.5*<1.5,4.5>;
#declare p7_l2 = 0.5*<2.5,5>;

#declare p10_l2 = 0.5*<2,8>;
#declare p11_l2 = 0.5*<2.5,10>;

#declare p14_l2 = 0.5*<5.5,12.5>;
#declare p15_l2 = 0.5*<6.5,13.5>;
#declare p16_l2 = 0.5*<7.5,14>;

#declare p4_l2 = (p3_l2 + p6_l2)/2;
#declare p5_l2 = p4_l2;
#declare p8_l2 = (p7_l2 + p10_l2)/2;
#declare p9_l2 = p8_l2;
#declare p12_l2 = (p11_l2 + p14_l2)/2;
#declare p13_l2 = p12_l2;

#declare p1_p = 0.5*<1,1>;
#declare p2_p = 0.5*<2,0>;
#declare p3_p = 0.5* <3,1>;

#declare p6_p = 0.5*<5,3>;
#declare p7_p = 0.5* <5,4>;

#declare p10_p = 0.5*<3,7>;
#declare p11_p = 0.5*<2,7>;

#declare p14_p = 0.5*<0,4>;
#declare p15_p = 0.5*<0,3 >;

#declare p16_p = p1_p;

#declare p4_p = (p3_p + p6_p)/2;
#declare p5_p = p4_p;
#declare p8_p = (p7_p + p10_p)/2;
#declare p9_p = p8_p;
#declare p12_p = (p11_p + p14_p)/2;
#declare p13_p = p12_p;

#declare p1_c = <0,0>;
#declare p2_c = <2,0>;
#declare p3_c = <1, 1.7>;
#declare p4_c = p1_c;

#declare monumento_lathe = lathe{bezier_spline 16 p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16 texture{tx_fosca}};
#declare monumento_lathe2 = lathe{bezier_spline 16 p1_l2, p2_l2, p3_l2, p4_l2, p5_l2, p6_l2, p7_l2, p8_l2, p9_l2, p10_l2, p11_l2, p12_l2, p13_l2, p14_l2, p15_l2, p16_l2 texture{tx_fosca}};
#declare monumento_prism = prism{bezier_spline 0, 3.1, 16 p1_p, p2_p, p3_p, p4_p ,p5_p, p6_p, p7_p, p8_p, p9_p, p10_p, p11_p, p12_p, p13_p, p14_p, p15_p, p16_p texture{tx_fosca}};
#declare chao = box{<-10,0,0>, <30, 0.4, 10> texture{tx_fosca}};
#declare teto = box{<0,0,0>, <20, 0.4, 10> texture{tx_fosca}};
#declare cachopa = prism{conic_sweep 0, 0.1, 4 p1_c, p2_c, p3_c, p4_c texture{tx_fosca}};

union{
        object{monumento_lathe scale 0.72 translate <18,0.1,2>}
        object{monumento_lathe scale 0.72 translate <1,0.1,2>}
        object{monumento_prism scale 1.5 translate <4,0.4,4>}
        object{monumento_prism scale 1.5 translate <12,0.4,4>}
        object{monumento_lathe2 scale 0.9 translate <22,0.1,3>}
        object{monumento_lathe2 scale 0.9 translate <-2,0.1,3> }

        object{cachopa scale 80 translate <1.5,-10,5> rotate -90*x}

        object{chao}
        object{teto translate <0,5,0>}

        rotate 90*x
        rotate 110*z
        //rotate -10*y
        //rotate 90*z
}
// object{ eixos(20.00) }

// Original camera parameters:
// #local cam_ctr = <0.00,0.00,1.00>
// #local cam_loc = (8*<14.00,7.00,3.50>)
// #local cam_vec = ((8*<14.00,7.00,3.50>)-<0.00,0.00,1.00>)
// #local cam_sky = z

#include "camlight.inc"
camlight(<0,10,7>,26.00,<9,7,3>,90.00,z,1.2)