// Last edited on 2003-04-12 01:41:16 by stolfi

#include "colors.inc"
#include "stones.inc"
#include "woods.inc"

background{color Gray80}

#declare ctr = <0,0,1>;
#declare vis = <-7.50, 0, -15.50>;
#declare cam = vis + 15*y;

camera {
  location  ctr + 0.9 * cam
  right 0.6*x up 0.8*y
  sky y
  look_at   ctr
} 

light_source {
  ctr + 200*(vrotate(vis, -25*y) + 13*y)
  color 1.5*White
} 

light_source {
  ctr + 200*(vrotate(vis, 10*y) + 2*y)
  color 0.5*White
} 

light_source {
  ctr + 200*(vrotate(vis, 100*y) + 2*y)
  color 0.9*White
} 

#declare cor_cristal = color Gray40;

#declare tx_cristal =
  texture {
    finish {
      ambient 0.1 diffuse 0.1
      reflection 0.25
      specular 1 roughness 0.02
    }
    pigment {color cor_cristal filter 1}
  }

#declare cor_espelho = color Gray40;

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

#declare base = 
  box {
    <-2, -3, -1>,
    < 2, 2, 3>
    texture {T_Stone25}
  }

#declare furo = 
  cylinder {
    <1.5, -0.5, -1.1>,     
    <1.5, -0.5, 3.1>,     
    0.9
    texture {T_Stone25}            
  }

#declare perna =
  cylinder {
    <-5, -0.5, 1>,     
    <5, -0.5, 1>,     
    0.5
    texture {tx_espelho}            
  }

#declare pino =
  cylinder {
    <4.0, -0.5, 1>,     
    <4.0, 1.0, 1>,     
    0.3
    pigment {color Black}            
  }

#declare detonador = 
  sphere {<4.0, 1.2, 1>, 0.5
    pigment {color Red}
  }


#declare pe =
  cylinder {
    <-4.6, -0.5, 1>,     
    <-4.6, -3, 1>,     
    0.5
    texture {tx_espelho}            
  }

#declare pescoco =
  cylinder {
    <0.0, 1.9, 0.5>,     
    <0.0, 4.5, 0.5>,     
    0.8
    texture {tx_cristal}
  }

#declare porta_copo =
  torus {
    0.8, 0.3
    translate <0,4.5,-0.8>
    scale <0,0,1.3>
    texture {T_Stone25} 
  }

#declare porta_copo2 =
  torus {
    0.8, 0.3
    translate <0,4.5,0.8>
    scale <0,0,1.3>
    texture {T_Stone25}
  }

#declare porta_copo3 =
  torus {
    0.8, 0.3
    translate <-1.5,4.5,0>
    scale <1.3,0,0>
    texture {T_Stone25}
  }

#declare porta_copo4 =
  torus {
    0.8, 0.3
    translate <1.5,4.5,0>
    scale <1.3,0,0>
    texture {T_Stone25} 
  }

plane { y, -30 texture {T_Wood31}}

union {
  object {perna}
  object {pe scale <-1,1,1>}
  object {pe}
  object {pescoco}
  object {porta_copo}
  object {porta_copo2}
  object {porta_copo3}
  object {porta_copo4}
  object {pino}
  object {detonador}
  difference {
    object {base}
    object {furo}
    object {furo scale <-1,1,1>}
  }
}