//ALUNO: Pedro Henrique Machado Martins

camera{
  location  < 45.00, 45.00, 45.00 >  // Posi��o do observador.
  right     -1.2*x                // Largura RELATIVA da imagem.
  up        0.9*y                 // Altura RELATIVA da imagem.      
  sky       z                      // Qual dire��o � "para cima"?
  look_at   < 0, 0, 0 >  // Para onde a c�mera est� apontando.
} 
// Nota: os par�metros "right" e "up" devem ter a mesma propor��o
// que os par�metros ${WIDTH} e ${HEIGHT} no Makefile.

// ======================================================================
// FONTES DE LUZ

light_source{
  10 * < +50.0, +30.0, +50.0 >           // Posi��o da l�mpada.
  color rgb 1.0 * < 1.00, 1.00, 1.00 >   // Intensidade e cor da luz.
} 

light_source{
  10 * < +50.0, -10.0, +10.0 >           // Posi��o da l�mpada.
  color rgb 0.5 * < 1.00, 1.00, 1.00 >   // Intensidade e cor da luz.
} 

// ======================================================================
// EIXOS DE COORDENADAS

#macro eixo(ponta,cor,nome)
  union{
    sphere{ <0,0,0>, 0.02 }
    cylinder{ <0,0,0>, 0.91*ponta, 0.02 }
    cone{ 0.90*ponta, 0.06, ponta, 0.00 }
    texture{ pigment{ color rgb cor } finish{ ambient 0.5 diffuse 0.5 } }
  }
#end
#macro eixos(tamanho)
  union{ 
    object{ eixo( <tamanho,0,0>, <1.0,0.2,0.2>, "X") }
    object{ eixo( <0,tamanho,0>, <0.0,0.8,0.0>, "Y") }
    object{ eixo( <0,0,tamanho>, <0.3,0.3,1.0>, "Z") }
  }
#end

// ======================================================================
// CORES E TEXTURAS

background{ color rgb < 0.75, 0.80, 0.85 > }

#declare tx_plastico = 
  texture{
    pigment{ color rgb < 0.10, 0.80, 1.00 > }
    finish{ diffuse 0.8 ambient 0.1 specular 0.5 roughness 0.005 }
  }

#declare tx_fosca = 
  texture{
    pigment{ color rgb < 1.00, 1.00, 1.00 > }
    finish{ diffuse 0.9 ambient 0.1 }
  }

#declare tx_espelho = 
  texture{
    pigment{ color rgb < 1.00, 0.90, 0.70 > }
    finish{ diffuse 0.1 reflection 0.8*< 1.00, 0.90, 0.70 > ambient 0.1 }
  }

#declare tx_furo = 
  texture{
    pigment{ color rgb < 0.10, 0.80, 1.00 > filter 0.70 }
    finish{ diffuse 0.01 ambient 0.02}
  }

#declare tx_vidro = 
  texture{
    pigment{ color rgb < 0.97, 0.98, 1.00 > filter 0.70 }
    finish{ diffuse 0.03 reflection 0.25 ambient 0.02 specular 0.25 roughness 0.005 }
  }

#declare tx_world =
   texture{
     pigment{ color rgb < 1.0, 1.0, 1.0 > }
     finish{ diffuse 0.01 ambient 0.02}
   }

// ======================================================================
// DESCRI��O DA CENA 

#declare raio = 2.000;

/*
	Os parâmetros enviados devem ser na ordem: pescoço, pernas esquerdas da frente para trás, pernas direitas de frente para trás, asa esquerda e asa direita, sendo que:
		-> O pescoço possui dois ângulos: um para a rotação do pescoço e outro para a rotação da cabeça;
		-> Cada perna possui três ângulos: um para a rotação da coxa, outra para a rotação da canela e outra para a rotação do pé;
		-> Cada asa possui dois ângulos: um para a parte anterior e outro para a parte posterior.
	Ou seja, a galinha receberá 24 parâmetros no total
*/

/*
	padrão do a_pescoco = -60
	padrão do a_cabeca = 45
	padrão do a_coxa = 120
	padrão do a_canela = -30
	padrão do a_pe = -90

*/

#macro galinha (a_pescoco, a_cabeca,
		a_coxa1e, a_canela1e, a_pe1e,
		a_coxa2e, a_canela2e, a_pe2e,
		a_coxa3e, a_canela3e, a_pe3e,
		a_coxa1d, a_canela1d, a_pe1d,
		a_coxa2d, a_canela2d, a_pe2d,
		a_coxa3d, a_canela3d, a_pe3d,
		a_asa_e, a_asa_posterior_e,
		a_asa_d, a_asa_posterior_d)

	union{
		sphere{
			< 0.0, 0.0, 0.0 >,
			3
			scale < 2.5, 0.0, 0.0 >
			texture { tx_fosca }
		}

		//pescoço
		object{
			pescoco_cabeca(a_cabeca)
			rotate a_pescoco*y
			translate < 5.5, 0.0, 2.25 >
		}

		//perna 1e
		object{
			coxa_canela_pe(a_canela1e, a_pe1e)
			rotate a_coxa1e*y
			translate < 4.5, 2.75, -1.5 >
		}

		//perna 2e
		object{
			coxa_canela_pe(a_canela2e, a_pe2e)
			rotate a_coxa2e*y
			translate < 0.0, 3.0, -1.5 >
		}

		//perna 3e
		object{
			coxa_canela_pe(a_canela3e, a_pe3e)
			rotate a_coxa3e*y
			translate < -4.5, 2.75, -1.5 >
		}

		//perna 1d
		object{
			coxa_canela_pe(a_canela1d, a_pe1d)
			rotate a_coxa1d*y
			translate < 4.5, -2.75, -1.5 >
		}

		//perna 2d
		object{
			coxa_canela_pe(a_canela2d, a_pe2d)
			rotate a_coxa2d*y
			translate < 0.0, -3.0, -1.5 >
		}

		//perna 3d
		object{
			coxa_canela_pe(a_canela3d, a_pe3d)
			rotate a_coxa3d*y
			translate < -4.5, -2.75, -1.5 >
		}

		//asa e
		object{
			asa(a_asa_posterior_e, 1)
			rotate < 0.0, a_asa_e, 15 >
			translate < -3.0, 2.75, 1.5 >
		}

		//asa d
		object{
			asa(a_asa_posterior_d, 0)
			rotate < 0.0, a_asa_d, -15 >
			translate < -3.0, -2.75, 1.5 >
		}
	}
#end
	
#macro pescoco_cabeca (a_cabeca)
	union{
		sphere{
			< 0.0, 0.0, 0.0 >,
			1
			texture { tx_fosca }
		}

		cylinder{
			< 0.0, 0.0, 0.0 >,
			< 5.0, 0.0, 0.0 >
			0.75
			texture { tx_fosca }
		}

		sphere{
			< 0.0, 0.0, 0.0 >,
			1
			translate 5.0*x
			texture { tx_fosca }
		}

		object{
			cabeca()
			rotate a_cabeca*y
			translate 7.5*x
		}
	}
#end


#macro cabeca ()
	union{
		sphere{
			< 0.0, 0.0, 0.0 >,
			1.75
			texture { tx_fosca }
		}
		cone{
			< 1.5, 0.0, 0.0 >,
			0.75,
			< 3.0, 0.0, 0.0 >,
			0.00
			translate < 0.0, 0.0, -0.25 >
			texture { tx_fosca }
		}
	}	
#end

//padrao do a_canela = -30
#macro coxa_canela_pe (a_canela, a_pe)
	union{
		sphere{
			< 0.0, 0.0, 0.0 >,
			1
			texture { tx_fosca }
		}

		cylinder{
			< 0.0, 0.0, 0.0 >,
			< 5.0, 0.0, 0.0 >
			0.75
			texture { tx_fosca }
		}

		object{
			canela_pe (a_pe)
			rotate a_canela*y
			translate < 5.0, 0.0, 0.0 >
		}
	}
#end

//padrão do a_pe = -90
#macro canela_pe (a_pe)
	union{
		sphere{
			< 0.0, 0.0, 0.0 >,
			1
			texture { tx_fosca }
		}

		cylinder{
			< 0.0, 0.0, 0.0 >,
			< 5.0, 0.0, 0.0 >
			0.75
			texture { tx_fosca }
		}

		object{
			pe ()
			rotate a_pe*y
			translate < 5.0, 0.0, 0.0 >
		}
	}
#end

#macro pe ()
	union{
		sphere{
			< 0.0, 0.0, 0.0 >,
			1
			texture { tx_fosca }
		}

		sphere{
			< 0.0, 0.0, 0.0 >,
			0.5
			scale < 2.0, 0.0, 0.0 >
			translate < -1.0, 0.0, 0.5 >
			texture { tx_fosca }
		}
	}
#end

#macro asa (a_asa_posterior, e)
	union{
		sphere{
			< 0.0, 0.0, 0.0 >,
			1
			texture { tx_fosca }
		}

		cylinder{
			< 0.0, 0.0, 0.0 >,
			< 5.0, 0.0, 0.0 >
			0.75
			texture { tx_fosca }
		}

		
		object{
			asa_posterior ()
			#if (e = 1)
				rotate < 0.0, a_asa_posterior, a_asa_posterior*2.4 >
			#else
				rotate < 0.0, a_asa_posterior, -a_asa_posterior*2.4 >
			#end
			translate < 5.0, 0.0, 0.0 >
		}
	}
#end

#macro asa_posterior ()
	union{
		sphere{
			< 0.0, 0.0, 0.0 >,
			1
			texture { tx_fosca }
		}
		
		cone{
			< 0.0, 0.0, 0.0 >,
			0.75
			< 10.0, 0.0, 0.0 >
			0.0
			texture { tx_fosca }
		}
	}
#end

// Cena:

union {

	object { galinha(	-60, 60,
				100, -30, 90,
				110, -30, 90,
				120, -30, 90,
				100, -30, 90,
				110, -30, 90,
				120, -30, 90,
				15, 140,
				15, 140 ) }

	object { galinha(	-30, 90,
				100, -90, 90,
				110, -30, 90,
				150, -150, 90,
				100, -90, 90,
				110, -30, 90,
				150, -150, 90,
				15, 140,
				15, 140 ) 
			rotate -60*y
			translate < 30.0, 0.0, 0.0 > }

	object { galinha(	-60, 60,
				100, -30, 90,
				110, -30, 90,
				120, -30, 90,
				100, -30, 90,
				110, -30, 90,
				120, -30, 90,
				15, 140,
				15, 140 ) 
			rotate -30*z
			translate < 15.0, 20.0, 0.0 > }
}