// MC930 - Laboratorio 3 - Palácio de Cristal
// Martim Carbone - RA:002193
// Last edited on 2003-10-22 04:16:02 by stolfi

global_settings { max_trace_level 10 }

#declare ctr = <  0.00, 0.00, 2.50 >;
#declare camdir = <  15, 20.00, 9 >;

camera {
  location  ctr + 1.20*camdir
  right     -1.00*x
  up        0.75*y
  sky       z
  look_at   ctr
} 

light_source { 100*< 12, -12,  5> color rgb 0.7*<1, 1, 1>}
light_source { 100*<-12,  12,  5> color rgb 0.7*<1, 1, 1>}
light_source { 100*<  8,   8, 20> color rgb 0.7*<1, 1, 1>}
light_source { 100*< -8,  -8, 20> color rgb 0.7*<1, 1, 1>}

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

plane { <0, 0, 1>, 0
  pigment {
    checker rgb <0.6,0.7,0.4>, rgb <0.8,0.9,0.6>
  }
}

#declare tx_corpo = 
  texture {
    pigment {rgb <0,1,0>}
    finish {
      ambient 0.05 diffuse 0.2
      reflection <0.3,1,0.3>
      specular 0.40 roughness 0.05
      metallic
    }
  }

#declare tx_torre = 
  texture {
    pigment {rgb <1,0,0>}
    finish {
      ambient 0.05 diffuse 0.2
      reflection <1,0,0>
      specular 0.40 roughness 0.05
      metallic
    }
  }

#declare tx_pico = 
  texture {
    finish {
      ambient 0.1 diffuse 0.1
      reflection 0.25
      specular 0.9 roughness 0.001
    }
    pigment {color <0,0,1> filter 1}
  }

#declare tx_aureola = 
  texture {
    finish {
      ambient 0.1 diffuse 0.1
      reflection 0.25
      specular 0.9 roughness 0.001
    }
    pigment {color <1,0.5,0> filter 1}
  }

#declare tx_pinaculo = 
  texture {
    pigment {rgb <1,1,0>}
    finish {
      ambient 0.05 diffuse 0.2
      reflection <0.6,0.6,0.1>
      specular 0.60 roughness 0.05
      metallic
    }
  }

// "fundação" do palácio

box {
  <-7, -7, 0>
  < 7,  7, 4>
  texture {tx_corpo}
}

// As 4 torres

cylinder {
  <8,8,0>, <8,8,6>, 1.4
  texture {tx_torre}
}

cylinder {
  <8,-8,0>, <8,-8,6>, 1.4
  texture {tx_torre}
}

cylinder {
  <-8,8,0>, <-8,8,6>, 1.4
  texture {tx_torre}
}

cylinder {
  <-8,-8,0>, <-8,-8,6>, 1.4
  texture {tx_torre}
}

// Os 4 picos das torres

cone {
  <8,8,6>, 1.4, <8,8,9>,0
  texture {tx_pico}
  interior {ior 1.5}
}

cone {
  <-8,8,6>, 1.4, <-8,8,9>,0
  texture {tx_pico}
  interior {ior 1.5}
}

cone {
  <8,-8,6>, 1.4, <8,-8,9>,0
  texture {tx_pico}
  interior {ior 1.5}
}

cone {
  <-8,-8,6>, 1.4, <-8,-8,9>,0
  texture {tx_pico}
  interior {ior 1.5}
}

// As duas "aureolas" do telhado

torus {
  6,
  0.5
  texture {tx_aureola}
  translate -4.5*y
  rotate -90*x
  interior {ior 1.5}
}

torus {
  5.5,
  0.5
  texture {tx_aureola}
  translate -5.5*y
  rotate -90*x
  interior {ior 1.5}
}

// pináculo

cone {
  <0,0,4>, 2, <0,0,12>,0
  texture {tx_pinaculo}
}