// TP07 - MP003 - Eduardo Kerr
// RA800271
// Last edited on 2001-07-31 16:52:46 by stolfi

#include "colors.inc"
#include "stones.inc"
#include "woods.inc"
#include "glass.inc"
background{ color rgb <0.6, 0.7, 1> }

light_source { <100, 500, 800 > White } 

#declare ctr = < 0, 50, 0> ;

camera {
  location  ctr + 0.65*< 30,90,120 >
  right < -1.2, 0, 0>
  up < 0, 0, 0.9 >
  sky z
  look_at ctr
}

#declare prata = texture {
  pigment { Silver}
  finish {
   ambient .1
   diffuse .4
   specular 1
   roughness 0.001
   reflection .5*Silver
   metallic
  }
}

#declare ouro = texture {
  pigment { BrightGold }
  finish {
   ambient .1
   diffuse .4
   specular 1
   roughness 0.001
   reflection .5*BrightGold
   metallic
  }
}

#declare GreenSilver = color rgb <0.95,1.0,0.95>;
#declare prata_verde = texture {
  pigment { color GreenSilver }
  finish {
   ambient .1
   diffuse .4
   specular 1
   roughness 0.001
   reflection .5*GreenSilver
   metallic
  }
}

#declare GreenGold =  color rgb <0.9,1.0,0.75>;
#declare ouro_verde = texture {
  pigment { color GreenGold }
  finish {
   ambient .1
   diffuse .4
   specular 1
   roughness 0.001
   reflection .5*GreenGold
   metallic
  }
}


#declare a01 = <0, 40, 20   >;
#declare a02 = <10, 40, 10   >;
#declare a03 = <20, 40, 5   >;
#declare a04 = <30, 40, 0   >;

#declare a05 = <0, 30, 20   >;
#declare a06 = <10, 30, 8   >;
#declare a07 = <20, 30, 5   >;
#declare a08 = <25, 30, 0   >;

#declare a09 = <0, 10, 15   >;
#declare a10 = <10, 10, 7   >;
#declare a11 = <18, 10, 5   >;
#declare a12 = <20, 10, 0   >;

#declare a13 = <0, 0, 5   >;
#declare a14 = <0, 0, 5   >;
#declare a15 = <0, 0, 5   >;
#declare a16 = <0, 0, 0   >;


#declare b01 = <0, 40, 20   >;
#declare b02 = <10, 40, 10   >;
#declare b03 = <18, 40, 5   >;
#declare b04 = <20, 40, 0   >;

#declare b05 = <0,  50, 24   >;
#declare b06 = <10, 50, 20   >;
#declare b07 = <18, 50, 19   >;
#declare b08 = <20, 50, 0   >;

#declare b09 = <0, 60, 28   >;
#declare b10 = <10, 60, 25   >;
#declare b11 = <18, 60, 19   >;
#declare b12 = <20, 60, 0   >;

#declare b13 = <0, 70, 26   >;
#declare b14 = <10,  70, 20   >;
#declare b15 = <18,  70, 15   >;
#declare b16 = <20,  70, 0   >;



#declare c01 = <0, 40, 20   >;
#declare c02 = <10, 40, 10   >;
#declare c03 = <20, 40, 5   >;
#declare c04 = <30, 40, 0   >;

#declare c05 = <0, 78, 20   >;
#declare c06 = <14, 78, 10   >;
#declare c07 = <22, 78, 8  >;
#declare c08 = <35, 78, 0   >;

#declare c09 = <0, 82, 15   >;
#declare c10 = <12, 82, 8   >;
#declare c11 = <20, 82, 5   >;
#declare c12 = <28, 82, 0   >;

#declare c13 = <0, 85, 0   >;
#declare c14 = <12, 85, 0   >;
#declare c15 = <18, 85, 0   >;
#declare c16 = <20, 85, 0   >;



sphere { a01, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a02, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a03, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a04, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a05, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a06, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a07, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a08, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a09, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a10, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a11, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a12, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a13, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a14, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a15, 1 texture { pigment{ color rgb<1, 0, 0>}}}
sphere { a16, 1 texture { pigment{ color rgb<1, 0, 0>}}}

#declare patchb =
  bicubic_patch{
   type 1
   flatness 0.008
   u_steps 5
   v_steps 5
   a01, a02, a03, a04,   b05, b06, b07, b08,
   b09, b10, b11, b12,   b13, b14, b15, b16
 }
 
#declare patcha =
  bicubic_patch{
   type 1
   flatness 0.008
   u_steps 5
   v_steps 5
   a01, a02, a03, a04,   a05, a06, a07, a08,
   a09, a10, a11, a12,   a13, a14, a15, a16
 }
  
#declare patchc =
  bicubic_patch{
   type 1
   flatness 0.008
   u_steps 5
   v_steps 5
   b13, a14, a15, a16,   c05, c06, c07, c08,
   c09, c10, c11, c12,   c13, c14, c15, c16
 }
 
 
object { patcha  texture { prata} }
object { patchb  texture { prata_verde } }
object { patchc  texture { prata} }

union{
  object { patcha scale <-1,1, 1>  texture { ouro} }
  object { patchb scale < -1, 1, 1> texture { ouro_verde } }
  object { patchc  scale <-1, 1, 1> texture { ouro} }
  // translate -10*x
}

plane{
  y,0 
  texture{ 
    pigment{ checker color Grey, color White }
    finish{ ambient 0.4 diffuse 0.6 }
  }
  translate -5*x
  scale 100
}