// Last edited on 2007-07-23 07:59:26 by stolfi
// Processed by remove-cam-lights

global_settings { max_trace_level 12 }

background { color rgb < 0.90, 0.95, 1.00 > }

#declare tinta_xadrez =
  texture {
    pigment { checker color rgb < 0.40, 0.40, 0.40 >, color rgb <1.0,1.0,1.0> }
    finish { ambient 0.6 diffuse 0.4 }
  }

plane{ z, 0 translate -5*z
 texture{ tinta_xadrez }
}

#declare raio = 2.000;

#declare tinta_A =
  texture {
    pigment { color rgb < 1.0, 0.0, 0.00 > filter 0.5 }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }

#declare tinta_B =
  texture {
    pigment { color rgb < 0.00, 0.0, 0.0 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }
#declare tinta_C =
  texture {
    pigment { color rgb < 1.00, 0.80, 0.2 >  }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.2 reflection 0.2 }
  }
#declare tinta_D =
  texture{
 pigment{ color rgb<0.00, 0.80, 0.0> filter 0.5}
  finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
}

#declare peao =
union{
 cone{
 <0.00, 0.00, 2.00>, 0.00,
 <0.00, 0.00, 0.00>, 0.50

 }
 sphere{
 <0.00, 0.00, 2.25>, 0.125

 }
}

#declare rei =

union
{
 cone{
   <0.00, 0.00, 2.00>, 0.25,
   <0.00, 0.00, 0.00>, 0.50

 }
 difference
 {
  cylinder{
      <0.00, 0.00, 3.00>,
    <0.00, 0.00, 2.00>,
    0.50

  }
  cylinder{
   <2.00, 0.00, 3.00>,
   <-2.00, 0.00, 3.00>,
   0.50

  }
 }
}

#declare torre =
difference
{
    cylinder{
 <0.00, 0.00, 2.50>,
 <0.00, 0.00, 0.00>,
 0.50

 }
    cylinder{
 <2.00, 0.00, 2.50>,
 <-2.00, 0.00, 2.50>,
 0.50

 }
}

#declare coroa =
union
{
difference
{
difference
{
difference
{
cylinder {
 <0.00, 0.00, 3.00>,
 <0.00, 0.00, 0.00>,
 1.5
 texture{ tinta_C}
 }
cylinder{
 <0.00, 0.00, 4.00>,
 <0.00, 0.00, -1.00>,
 1.25

}
}
cylinder {
 <0.00, 2.00, 3.00>,
 <0.00, -2.00, 3.00>,
 1.0
 }
}
cylinder{
 <2.00, 0.00, 3.00>,
 <-2.00, 0.00, 3.00>,
 1.0}
}
sphere{
 <1.10, -1.10, 3.00>,
 0.3
 texture{tinta_D}
 }
sphere{
 <-1.10, -1.10, 3.00>,
 0.3
 texture{tinta_D}
 }
sphere{
 <1.1, 1.1, 3.00>,
 0.3
 texture{ tinta_D}
 }
sphere{
 <-1.1, 1.1, 3.00>,
 0.3
 texture { tinta_D}
}
sphere{
 <0.7, 1.00, 1.50>,
 0.4
 texture{tinta_A}
}
sphere{
 <-0.7, 1.00, 1.5>,
 0.4
 texture{ tinta_A}
}
sphere{
 <0.3, 1.3, 1.0>,
 0.2
 texture{ tinta_A}
}
sphere{
 <-0.3, 1.3, 1.0>,
 0.2
 texture{ tinta_A}
}
box{
 <0.500, 1.00, 0.25>,
 <-0.500, 1.50, 0.5>
 texture{ tinta_A}
}
}

union
{
object { coroa }

}

// Original camera parameters:
// #local cam_ctr = <0.00,00.00,3.00>
// #local cam_vec = (<0.00,10.00,0.00>-<0.00,00.00,3.00>)
// #local cam_sky = z

#include "camlight.inc"
camlight(<0.00,00.00,1.50>,<5,10,5>,7.0,z,1.0)