// Last edited on 2001-06-10 14:56:26 by stolfi

#include "colors.inc"

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

light_source {
  < 20.00, 0.00, 30.00 >
  color rgb < 1.00, 1.00, 1.00 >
} 

camera {
  location  <  12.00, 0.00  , 13.00 >
  right     < -0.90, 0.00, 0.00 >
  up        <  0.00, 0.00, 1.20 >
  sky       <  0.00, 0.00, 1.00 >
  look_at   <  0.00, 0.00, 7.00 >
}   

#declare tinta_A = 
  texture {
    pigment { color rgb < 0 , 0 , 0 > }
    finish { diffuse 1.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }

#declare tinta_B = 
  texture {
    pigment { color rgb < 1.00, 1.00, 0.00 > }
    finish { diffuse 1.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }
  

#declare tx_cristal =
 texture {
   finish {
    ambient 0.1 diffuse 0.1
     reflection 0.15
     specular 1 roughness 0.001
  }
 pigment { color Red  filter 1 }
}


#declare  tx_espelho =
 texture {
    pigment{rgb Gray}
   finish {
    ambient 0.05 diffuse 0.05
     reflection Gray
     specular 0.20  roughness 0.05
   }
} 


#declare caixa = 
  box {
    < -2.00, +4.00, 1.00 >,
    <  2.00, -4.00, 5.00 >
    texture { tinta_A }
  }

 
#declare cone1 =
  cone {
    < 0.00, 0.00, 5.00  >,1.00
    < 0.00, 0.00,  10.00 >,3.00
    texture { tinta_B }
  }

#declare bola =
 sphere {
   < 0 , 0 , 10 >, 1.8
   texture {tx_cristal}
}

# declare detalhe =
  torus { 1.5 , 1
   rotate x*90
   translate  < 0 , 0 , 6 > 
   texture {tx_espelho}
}

# declare detalhe2 =
  torus { 2 , 1
   rotate x*90
   translate  < 0 , 0 , 9.4 > 
   texture {tx_espelho}

}
  
// Aqui está a cena, finalmente:

  
 union {
    object { caixa }
    object { cone1 }
    object { bola }
    object { detalhe }
    object { detalhe2 }
  }

object { plane {z,0}
         translate <0,0,1>
         pigment { checker color White, color Gray }
}