// Last edited on 2007-07-24 01:27:23 by stolfi
// Processed by remove-cam-lights






  






  

  

 

 




background{ color rgb < 0, 0, 0 > }

#declare raio = 2.000;

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

#declare ouro = 
  texture {
    pigment { color rgb < 1.00,0.95, 0 > }
    finish { diffuse 0.2 specular 0.5 roughness 0.005 ambient 0.1 reflection 0.4 }
  }
  
#declare prata = 
  texture {
 pigment { color rgb < 0.80, 0.80, 0.80 > }
 finish { diffuse 0.2 specular 0.5 roughness 0.005 ambient 0.1 reflection 0.4 }
  }
  
#declare verde = 
  texture {
    pigment { color rgb < 0, 1, 0 > }
    finish { diffuse 0.4 specular 0.5 roughness 0.005 ambient 0.1 reflection 0.2 }
  }
  
#declare preto = 
  texture {
 pigment { color rgb < 0.2, 0.2, 0.2 > }
 finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }
  
#declare branco = 
  texture {
 pigment { color rgb < 1, 1, 1 > }
 finish { diffuse 0 specular 0 roughness 0.005 ambient 1 }
  }

#declare vermelho = 
  texture {
    pigment { color rgb < 1.0, 0.0, 0.0 > }
    finish { diffuse 0.4 specular 0.5 roughness 0.005 ambient 0.1 reflection 0.2 }
  }
#declare bandeira =
bicubic_patch {
 type 1
 u_steps 3
 v_steps 3
 <0,0,0>,
 <-2,1.5,0>,
 <2,3,0>,
 <0,4.5,0>,

 <0,0,1>,
 <-0.7,1.5,1>,
 <0.7,3,1>,
 <0,4.5,1>,

 <0,0,2>,
 <0.7,1.5,2>,
 <-0.7,3,2>,
 <0,4.5,2>,

 <0,0,3>,
 <2,1.5,3>,
 <-2,3,3>,
 <0,4.5,3>
 }

#declare mastro =
union{
 cylinder{ <0,-0.1,0>,
  <0,-0.1,8>, 0.1
  texture{prata}
 }
 sphere{<0,-0.1,8.2>, 0.2
  texture{prata}
 }
}

plane{z,0
 texture {
  pigment { checker color rgb <1,1,0.8>,
   color rgb <0.4,0,0>
  }
 }
}

object {mastro}
object {bandeira
 // pigment { uv_mapping image_map{gif "flag.gif"}}
 pigment { uv_mapping image_map{jpeg "jsflag.jpg"}}
 translate<0,0,5>
 }

// Original camera parameters:
// #local cam_ctr = <0,2,4>
// #local cam_vec = (<10,2,6>-<0,2,4>)
// #local cam_sky = z

#include "camlight.inc"
camlight(<0,2,4>,<10,10,10>,20.0,z,1.0)