// Exemplo de arquivo de descricao de cena para POV-ray
// Last edited on 2009-03-09 18:44:03 by stolfi

// ======================================================================
// CÂMERA 

camera{
  location  < 14.00, 7.00, 3.50 >  // Posição do observador.
  right     -0.45*x                // Largura RELATIVA da imagem.
  up        0.6*y                 // Altura RELATIVA da imagem.      
  sky       z                      // Qual direção é "para cima"?
  look_at   <  0.00, 0.00, 0.00 >  // 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 corda 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 corda 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, 0.80, 0.10 > }
    finish{ diffuse 0.9 ambient 0.1 }
  }

#declare tx_parede = 
  texture{
    pigment{ color rgb < 0.9, 0.9, 0.9 > }
    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_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 larg = 4.5;
#declare alt = 3.6;
#declare tx_quadro =
	texture {
		pigment{ image_map { jpeg "eu.jpg" } scale <larg,alt,1> }
		//finish { ambient 1.0 } //janela
		finish { diffuse 0.8 ambient 0.2 } // quadro
	}*/

// ======================================================================
// DESCRIÇÃO DA CENA 

#declare raio = 2.000;

// Partes da cena:
  
// tp00
/*#declare bolinha = 
  sphere{ < 0,0,0 >, 0.60 }
 
#declare bolota = 
  sphere{ < 0,0,0 >, 1.50 }
 
#declare bola_grande =
  sphere{
    < 0.00, 0.00, 0.00 >, raio 
    texture{ tx_plastico }
  }
  
#declare pino = 
  cylinder{
    < -2.00, +2.00, -1.00 >,
    < +2.00, -2.00, +1.00 >,
    0.75
    texture{ tx_fosca }
  }
  
#declare furo = 
  cylinder{
    < -1.00, -2.00, -2.00 >,
    < +1.00, +2.00, +2.00 >,
    0.75*raio
    texture{ tx_fosca }
  }
*/

// sphere{ <cx,cy,cz>, raio	texture{tx_plastico}}
// cylinder{<ax,ay,az>,<bx,by,bz>,raio	"}
// cone{<ax,ay,az>,rA,<bx,by,bz>,rB	"}
// box{<ax,ay,az>,<bx,by,bz>	texture{tx_plastico}}

// tp01
/*#declare corpo =
	box
	{
		<-1, -1.00, -1.00 >,
		<1, +1.00, +1.00 >
		texture{tx_plastico}
	}

#declare topo_externo = 
	box { <-0.3,-0.3,-0.45>, <0.3,0.3,0.45> texture{tx_plastico} }

#declare topo_interno =
	box { <-0.2,-0.2,-0.55>, <0.2,0.2,0.55> texture{tx_plastico} }

#declare bico_externo =
	cylinder{ <0,0,0>,<1,0,0>, 0.2 texture{tx_fosca} }

#declare bico_interno =
	cylinder{ <0,0,0>,<2,0,0>, 0.1 texture{tx_fosca} }

#declare bola_manivela_1 =
	sphere{ <0,0,0>, 0.2 texture{tx_fosca}}

#declare bola_manivela_2 =
	sphere{ <0,0,0>, 0.065 texture{tx_plastico} }

#declare cano_manivela_1 =
	cylinder{ <0,0,0>,<0,-0.7,0>, 0.05 texture{tx_plastico} }

#declare cano_manivela_2 =
	cylinder{ <0,0,0>,<0,0,0.7>, 0.05 texture{tx_plastico} }

#declare cortador =
	box{ <0,0,0>, <10,10,10> texture{tx_fosca}}

#declare cena =

union{
	difference
	{
		union
		{
			object{ bico_externo translate <1,0,0>}
			difference
			{
				union { object{ topo_externo translate <-.7,0,1.45>} object{ corpo } }
				object{ topo_interno translate <-.7,0,1.55>}
			}
		}
		object{ bico_interno translate <1,0,0>}
	}

	union
	{
		object{ bola_manivela_1 translate <0,-1,0> }
		object{ cano_manivela_1 translate <0,-1.05,0> }
		object{ bola_manivela_2 translate <0,-1.75,0> }
		object{ cano_manivela_2 translate <0,-1.75,0> }
		object{ bola_manivela_2 translate <0,-1.75,.7> }
		object{ cano_manivela_1 translate <0,-1.75,.7> }
		object{ bola_manivela_1 translate <0,-2.45,.7> }
		object{ corpo }
	}
}

#declare corte =
	intersection{
		object{ cena }
		object{cortador translate <-4,0,-4>}
	}
*/

// tp01_2
//#declare roleta = seed(17);
//#declare numero = rand(roleta);

/*#declare cena =
union
{
	#declare i=0;
	#declare j=0;
	#declare linhas=12;
	#declare colunas=10;

	#declare incremento = .36;

	#while (i<linhas)
		#while (j<colunas)
			#if (i=2 & j=4)
			#else
			sphere { <0, j*incremento, i*incremento>, .2 texture{tx_fosca} }
			#end
			#declare j=j+1;
		#end
		#declare i=i+1;
		#declare j=0;
	#end
}*/


// tp02
/*#declare tamanho_mesa = 2.8;
#declare mesa_base =
	box { <0,0,0>, <1,tamanho_mesa,0.13> texture{tx_plastico} }

#declare mesa_perna =
	box { <0,0,0>, <0.05,0.05,1.4> texture{tx_plastico} }


#declare mesa =
	union
	{
		object{ mesa_base translate <0,0,1.35> }
		object{ mesa_perna }
		object{ mesa_perna translate <0,2.75,0> }
		object{ mesa_perna translate <.95,0,0> }
		object{ mesa_perna translate <.95,2.75,0> }
	}

#declare imac_borda_externa =
	box { <0,0,0>, <0.12,2,1> texture{tx_plastico} }

#declare imac_borda_interna =
	box { <-0.1,0.1,0.1>, <0.13,1.9,0.9> texture{tx_fosca} }

#declare imac_tela =
	box { <-0.1,0.1,0.1>, <0.09,1.9,0.9> texture{tx_fosca} }

#macro m_imac(falha)
	#if(falha)
		object{ imac_tela }
		box{ <0,0.8,-0.25>, <0.12,1.2,0.105> texture{tx_plastico} }
		text{ ttf "arial.ttf" "FALHA!" 0.15, 0 rotate 90*x rotate 90*z scale <0.5,0.5,0.5> translate <0.02,0.25,0.3>  }
	#else	
		object{ imac_tela }
		box{ <0,0.8,-0.25>, <0.12,1.2,0.105> texture{tx_plastico} }
		text{ ttf "arial.ttf" "3.1495" 0.15, 0 rotate 90*x rotate 90*z scale <0.5,0.5,0.5> translate <0.02,0.25,0.3>  }
	#end
#end

#macro imac(falha)
1	union
	{
		difference
		{
			object { imac_borda_externa }
			object { imac_borda_interna }
		}
		#if(falha)
		object{ imac_tela }
			box{ <0,0.8,-0.25>, <0.12,1.2,0.105> texture{tx_plastico} }
			text{ ttf "arial.ttf" "FALHA!" 0.15, 0 rotate 90*x rotate 90*z scale <0.5,0.5,0.5> translate <0.02,0.25,0.3>  }
		#else	
			object{ imac_tela }
			box{ <0,0.8,-0.25>, <0.12,1.2,0.105> texture{tx_plastico} }
			text{ ttf "arial.ttf" "3.1495" 0.15, 0 rotate 90*x rotate 90*z scale <0.5,0.5,0.5> translate <0.02,0.25,0.3>  }
		#end
	}
#end

#declare cadeira_base =
	box { <0,0,0>, <0.5,0.5,0.05> texture{tx_plastico} }
#declare cadeira_encosto = box { <0,0,0>, <0.07,0.5,0.6> texture{tx_plastico} }
#declare cadeira_perna = box { <0,0,0>, <0.05,0.05,0.5> texture{tx_plastico} }
#declare cadeira = 
	union
	{
		object{ cadeira_base translate <0,0,0.5>}
		object{ cadeira_encosto translate <0,0,0.5> }
		object{ cadeira_perna }
		object{ cadeira_perna translate <0.45,0.45,0> }
		object{ cadeira_perna translate <0.45,0,0> }
		object{ cadeira_perna translate <0,0.45,0> }
	}

#declare parede = box { <0,0,0>, <0.1, 15, 12> texture {tx_parede} }
#declare quadro = box { <0,0,0>, <4.5,3.6,0.05> texture {tx_quadro} }

#macro assento(falha)
union
{
	object { mesa }
	object { imac(falha) translate <0,0.4,1.65>}
	object { cadeira scale <2,2,2> rotate 180*z translate <1.8,1.5,0>}
}
#end

#macro assentos()

	#declare i=0;
	#declare j=0;
	#declare linhas=3;
	#declare colunas=4;

	#declare incremento_coluna = 4;
	#declare incremento_linha = 2;
	#declare altura_incremento = 1;

	union {
	#while (i<linhas)
		#while (j<colunas)
			#if( (j=0 & i=0 ) | (j=1 & i=2) | (j=2 & i=1) )
				object{ assento(1) translate <-i*incremento_linha, j*incremento_coluna, i*altura_incremento> }
			#else
				object{ assento(0) translate <-i*incremento_linha, j*incremento_coluna, i*altura_incremento> }
			#end

			#declare j=j+1;
		#end
		box { <0,0,0>, <incremento_linha,colunas*(tamanho_mesa)+(colunas-2)*tamanho_mesa,-i*altura_incremento-0.2> translate <-i*incremento_linha,0,i*altura_incremento> texture{tx_fosca} }
		#declare i=i+1;
		#declare j=0;
	#end

	union
	{
		object{ parede translate<-(incremento_linha)*(linhas-1)-0.1,0,-0.2>}
		object{ quadro rotate 90*x rotate 90*z translate<-(incremento_linha)*(linhas-1),2,5>}
	}
	
	}

#end
*/

	//
#macro corpo(p1,p2,p3,p4,p5,p6,p7,p8,p9,p10,p11,p12,p13,p14,p15,p16,p17,p18,c1,c2,a1,a2,a3,a4)
union
{
	sphere{ <0,0,0>, 1 texture{tx_fosca} scale <2,1,1> }
	object{ perna(p1,p2,p3) translate <-1,.8,-.5> }
	object{ perna(p4,p5,p6) scale <1,-1,1> translate <-1,-.8,-.5>  }

	object{ perna(p7,p8,p9) translate <0,.8,-.5> }
	object{ perna(p10,p11,p12) scale <1,-1,1> translate <0,-.8,-.5>  }

	object{ perna(p13,p14,p15) translate <1,.8,-.5> }
	object{ perna(p16,p17,p18) scale <1,-1,1> translate <1,-.8,-.5>  }

	object{ pescoco_e_cabeca(c1,c2) translate <1.9,0,.4> }

	object{ asa(a1,a2) translate <0,0,0> }
	object{ asa(a3,a4) scale <1,-1,1> }
}


#end

#macro pescoco_e_cabeca(alfa,beta)
union
{
	sphere{ <0,0,0>, .2 texture{tx_fosca} }
	cylinder{ <0,0,0>, <0,0,1.5> .1 texture{tx_fosca} }
	sphere{ <0,0,0>, .2 texture{tx_fosca} translate <0,0,1.5> }
	cone{ <0,0,0>, .1, <.2,0,0>, 0 texture{tx_fosca} translate <.13,0,1.5> rotate beta*y }
	rotate alfa*y
}
#end

#macro perna(alfa,beta,gama)
union
{
	sphere{ <0,0,0> .2 texture{tx_fosca} }
	cylinder{ <0,0,0>,<0,0,-1> .1  texture{tx_espelho} }
	object{ joelho_canela_pe(beta,gama) translate <0,0,-1> }
	rotate alfa*y
}
#end

#macro joelho_canela_pe(alfa, beta)
union
{
	sphere{ <0,0,0>, .2 texture{tx_fosca} }
	cylinder{ <0,0,0>,<0,0,-1> .1 texture{tx_espelho} }
	union
	{
		sphere{ <0,0,0>, .2 texture{tx_fosca} translate <0,0,-1> }
		box{ <0,0,0>, <.8,.6,.3> rotate -beta*y translate <-.25,-.3,-1.4> texture{tx_espelho} }
		
	}
	rotate alfa*y
}
#end

#macro asa(alfa, beta)
union
{
	sphere{ <0,0,0>, .2 texture{tx_fosca} }
	cylinder{ <0,0,0>, <0,0,1.5> .1 texture{tx_fosca} }
	sphere{ <0,0,0>, .2 texture{tx_fosca} translate <0,0,1.5> }
	cone{ <0,0,0>, .14, <1,0,0>, 0 texture{tx_fosca} rotate beta*y translate <0,0,1.5>}
	scale <-1,1,1>
	//rotate -90*x
	rotate alfa*y
	translate <.5,.8,.6>
}
#end

union
{
	//object{ eixos(3) }
	//tp01
	//object{ eixos(3.00) }
	//object{cena translate <0,0,3>}
	//object{corte translate <0,0,-2>}

	//tp02
	//object{ assentos() }
	//object{ cadeira }

	//tp03
	object{ corpo(50,-30,-20,50,-30,-20,50,-60,-20,50,-45,-20,50,-45,-30,50,-60,-30,40,1,-30,30,-55,15) scale<.7,.7,.7> translate <1,1,0> }
	object{ corpo(40,-40,-20,40,-40,-20,40,-40,-20,50,-45,-20,50,-45,-30,50,-60,-30,30,1,-20,10,-30,25) scale<.7,.7,.7> translate <-1,-2,-2> }
	object{ corpo(60,-45,-20,60,-55,-20,60,-40,-20,50,-45,-20,50,-45,-30,50,-60,-30,50,1,-10,20,-40,40) scale<.7,.7,.7> translate <0,3,3> }
	//object{ joelho_canela_pe(10,1) }

	//rotate -90*y
	//rotate -180*z
	rotate 90*z
}