// Last edited on 2003-03-19 23:11:19 by stolfi
// Exemplo de arquivo de descricao de cena para POV-ray
// Last edited on 2003-03-18 18:00:00 by evandro

#include "colors.inc"

background{ color rgb < 0.9, 0.90, 0.80 > }

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

light_source { <7,  15, 15> color White }

light_source { <-10, 8, 15> color 0.6*White }

#declare metade_cabeca_robo =
  union {
    sphere { <0, 1.5, 0>, 0.5 scale <1, 2, 1> pigment {Grey} normal {granite 1 scale 0.9} }
    sphere { <-0.2, 3.5, 0.4>, 0.1 pigment {Red} }
    sphere { <+0.2, 3.5, 0.4>, 0.1 pigment {Red} }
    cylinder { <0, 3.25, 0>, <0, 2.75, 2>, 0.1 pigment {Green} }
  }

#declare boca_robo =
  sphere { <0, 2.5, 0.5>, 0.2 scale <2, 1, 1> pigment {White} }

#declare cabeca_robo =
  difference {
    object { metade_cabeca_robo }
    object { boca_robo }
}

#declare corpo_robo =
  difference {
    cylinder { <0, -1, 0>, <0, +2, 0>, 1 pigment {Grey} normal {granite 1 scale 0.9} }
    cylinder { <-1, 1, 0.15>, <+1, 1, 0.15>, 0.5 pigment {Blue} }
  }

#declare braco_robo =
  union {
    sphere { <-1.2, 1, 0>, .3 pigment {SkyBlue} }
    cylinder { <-4, 1, 0>, <-1.2, 1, 0>, 0.3 pigment {SkyBlue} normal {granite 1 scale 0.9} }
    cylinder { <-3.9, 1.35, 0>, <-3.9, 1.6, 0>, 0.1 pigment {SkyBlue} }
    cylinder { <-4.1, 0.8, 0>, <-4.4, 0.8, 0>, 0.05 pigment {SkyBlue} }
    cylinder { <-4.1, 1.0, 0>, <-4.4, 1.0, 0>, 0.05 pigment {SkyBlue} }
    cylinder { <-4.1, 1.2, 0>, <-4.4, 1.2, 0>, 0.05 pigment {SkyBlue} }
  }

#declare pe_robo =
  blob {
    threshold .5
    cylinder { <0, 0, 0>, <0, 0.8, 0>, 0.5, 1 pigment {SeaGreen} normal {granite 1 scale 0.9} }
    cylinder { <-1, 0, 0>, <1, 0, 0>, 0.5, 1 pigment {SeaGreen} normal {granite 1 scale 0.9} }
    sphere { <-1.6, 0, 0>, 0.6, 1 pigment {Green} normal {granite 1 scale 0.9} }
    sphere { <+1.6, 0, 0>, 0.6, 1 pigment {Green} normal {granite 1 scale 0.9} }
    finish { phong 1 }
  }

#declare robo =
  union {
    object { cabeca_robo }
    object { corpo_robo }
    object { braco_robo scale <1, 1, 1> }
    object { braco_robo scale <-1, 1, 1> }
    object { pe_robo translate <0, -2, 0> }
  }

union {
  object { robo rotate <-10, -25, 0> }
}