// Segundo Exercicio de Computaçao Grafica
// Fabio Abreu Hashimoto RA 970640

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

light_source {
  <7.00, 0.00, 10.00 >
  color rgb < 1.00, 1.00, 1.00 >
}

camera {
  location  < 9.00, 9.00, 8.50 >
  right     < 2.40, 0.00, 0.00 >
  up        < 0.00, 0.00, 1.80 >
  sky       < 0.00, 0.00, 1.00 >
  look_at   < 0.00, 0.00, 4.00 >
}


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

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

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

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

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

#declare base =
  sphere {
    < 0.00, 0.00, 2.50 >
    3.00	
    texture { vermelho }
  }

#declare carga =
  box {
    < 5.00, 5.00, 4.20 >,
    <-5.00, -5.00, 0.00>
    texture { azul }
  }


#declare cabine_inf =
  prism {
    linear_spline
    4,
    -4,
    3,
    <5,0>,<5,4.2>,<7,0>
    texture { azul }
  }

#declare cabine_sup =
  prism {
    linear_spline
    4,
    -4,
    3,
    <5,1.5>,<5,4.2>,<6.3,1.5>
    texture { cinza_claro }
  }

#declare roda =
  cylinder {
    < 4.0, 5, 0.2 >,
    < 4.0, 5.3, 0.2 >,
    0.9
    texture { preto }
  }

#declare helice1 =
  prism {
    linear_spline
    5.5,
    5.8,
    3,
    <0,0>,<1,8.2>,<-1,8.2>
    texture { cinza }
    rotate x*90

}

#declare helice2 =
  prism {
    linear_spline
    5.5,
    5.8,
    3,
    <0,0>,<1,-8.2>,<-1,-8.2>
    texture { cinza }
    rotate x*90

  }

// Aqui está a cena, finalmente:

 	object { helice1 }
	object { helice2 }
	object { carga }
	object { cabine_inf }
	object { cabine_sup }
  	object { roda }
	object { roda
			translate<-7.6,0,0>
		}
	object { roda
			translate<-7.6,-10,0>
		}
	object { roda
			translate<0,-10,0>
		}
	object { base }