// Exercicio numero 8 - 23/11/2000
// Fabio Rogerio Candido - RA 962319

#include "colors.inc"
#include "textures.inc"

camera {
    location < 1, 5, 30 >
    look_at 0
    angle 15
}

background { Red }

light_source {
  <0, 5, 50>
  color rgb <1,1,1>
}

#declare espessura = 2;

#declare amarelado = color rgb (1.0/espessura)*<1,1,0>;

#declare body =
  sphere {
    < 0.00, 0.00, 0.00 >
    2
    pigment { Blue }
//    interior { media { scattering {1, color amarelado } } }
  }

#declare body_cont =
  sphere {
    < 2.00, -1.00, 0.00 >
    2
    pigment { Blue }
  }

#declare nack =
  cylinder {
    < 0.00, 0.00, 0.00 >
    < 0.00, 1.50, 0.00 >
    0.25
    pigment { Blue }
  }

#declare corn =
  cone {
    < 0.00, 0.00, 0.00 > 0.30
    < -0.80, 0.00, 0.00 > 0.00
    pigment { Yellow }
  }

// Joining...

union {
  object {
    body
    scale < 0.75, 0.75, 0.75 >
  }
  object {
    body_cont
    scale < 0.75, 0.75, 0.75 >
  }
  object {
    nack
    translate < -1.00, 1.00, 0.00 >
    rotate < 0.00, 0.00, 30.00 >
 }
    object {
      body
      scale < 0.40, 0.30, 0.30 >
      translate < -2.50, 1.50, 0.00 >
    }
  object {
    corn
    translate < -3.00, 1.50, 0.00 >
  }
}