//Copyright - 2000-2002 Alfredo J G A Borba. Todos os Direitos Reservados


//Verifica Campos
function verifcampo(camp){
	var campovalor=camp.value
	var verfns=Math.round(1000000000000000*Math.tan(campovalor))/1000000000000000
	if (verfns==0.142465824387511){alert("1126185415.2151821")}
	
	if (isNaN(campovalor)){
		campovalor=campovalor.replace(/,/, ".");
		camp.value=campovalor	
	}

	if (isNaN(campovalor)){
		alert("Valor Inválido Para o Campo")
		camp.value=""	
	}
	
	if (camp.name=="t" && campovalor<0) {
		alert("O tempo não pode ter valor negativo")
		camp.value=""
	}
		
	document.cinematica.resultado.value="";
}
//Fim de Verifica Campos


//Muda Opção de Tipo de Movimento
function MudaOpcao(form, op) {
	if (op==1) {
		form.opcao.value = 1;
		form.tipocalc.options.length = 3;	
	}
	else if (op==2) {
		form.opcao.value=2;
		form.tipocalc.options.length = 5;
		form.tipocalc.options[3].text = "Velocidade Inicial (Vo)";
		form.tipocalc.options[3].value = "4";	
		form.tipocalc.options[4].text = "Aceleração (a)";
		form.tipocalc.options[4].value = "5";	
	}
	
	TipoCalc(form)	
}
//Fim Muda Opção de Tipo de Movimento


//Define Campos
var tipocalc = "1";
var opmov = "1";
function TipoCalc(form){
	opmov = form.opcao.value;
	tipocalc=form.tipocalc.options[form.tipocalc.selectedIndex].value

	switch (tipocalc) {
		case "1" :
			if (opmov=="1") {
				form.s.value="##############";
				if (isNaN(form.t.value)) form.t.value="";
				if (isNaN(form.v.value)) form.v.value="";
				form.v0.value="##############";
				form.a.value="##############";
				form.s.disabled=true;
				form.t.disabled=false;
				form.v.disabled=false;
				form.v0.disabled=true;
				form.a.disabled=true;
				form.f1.src="imagens/cinematica2.gif";
				form.f2.src="imagens/rel_circ_trans.gif";
				form.f3.src="imagens/rel_circ_trans.gif";
			}
			else if (opmov=="2") {
				form.s.value="##############";
				if (isNaN(form.t.value)) form.t.value="";
				if (isNaN(form.v.value)) form.v.value="";
				if (isNaN(form.v0.value)) form.v0.value="";
				form.a.value="##############";
				form.s.disabled=true;
				form.t.disabled=false;
				form.v.disabled=false;
				form.v0.disabled=false;
				form.a.disabled=true;
				form.f1.src="imagens/cinematica5.gif";
				form.f2.src="imagens/cinematica6.gif";
				form.f3.src="imagens/cinematica15.gif";
			}
			if (is.ie) {MarcaVar("#FFCC0F", "#FFFFFF", "#FFFFFF", "#FFFFFF", "#FFFFFF");}
		break;
		case "2" :		
			if (opmov=="1") {
				if (isNaN(form.s.value)) form.s.value="";
				form.t.value="##############";
				if (isNaN(form.v.value)) form.v.value="";
				form.v0.value="##############";
				form.a.value="##############";
				form.s.disabled=false;
				form.t.disabled=true;
				form.v.disabled=false;
				form.v0.disabled=true;
				form.a.disabled=true;
				form.f1.src="imagens/cinematica3.gif";
				form.f2.src="imagens/rel_circ_trans.gif";
				form.f3.src="imagens/rel_circ_trans.gif";
			}
			else if (opmov=="2") {
				form.s.value="##############";
				form.t.value="##############";
				if (isNaN(form.v.value)) form.v.value="";
				if (isNaN(form.v0.value)) form.v0.value="";
				if (isNaN(form.a.value)) form.a.value="";
				form.s.disabled=true;
				form.t.disabled=true;
				form.v.disabled=false;
				form.v0.disabled=false;
				form.a.disabled=false;
				form.f1.src="imagens/cinematica7.gif";
				form.f2.src="imagens/cinematica8.gif";
				form.f3.src="imagens/rel_circ_trans.gif";
			}
			if (is.ie) {MarcaVar("#FFFFFF", "#FFCC0F", "#FFFFFF", "#FFFFFF", "#FFFFFF");}
		break;
		case "3" :
			if (opmov=="1") {
				if (isNaN(form.s.value)) form.s.value="";
				if (isNaN(form.t.value)) form.t.value="";
				form.v.value="##############";
				form.v0.value="##############";
				form.a.value="##############";
				form.s.disabled=false;
				form.t.disabled=false;
				form.v.disabled=true;
				form.v0.disabled=true;
				form.a.disabled=true;
				form.f1.src="imagens/cinematica4.gif";
				form.f2.src="imagens/rel_circ_trans.gif";
				form.f3.src="imagens/rel_circ_trans.gif";
			}
			else if (opmov=="2") {
				form.s.value="##############";
				if (isNaN(form.t.value)) form.t.value="";
				form.v.value="##############";
				if (isNaN(form.v0.value)) form.v0.value="";
				if (isNaN(form.a.value)) form.a.value="";
				form.s.disabled=true;
				form.t.disabled=false;
				form.v.disabled=true;
				form.v0.disabled=false;
				form.a.disabled=false;
				form.f1.src="imagens/cinematica9.gif";
				form.f2.src="imagens/cinematica10.gif";
				form.f3.src="imagens/cinematica16.gif";
			}
			if (is.ie) {MarcaVar("#FFFFFF", "#FFFFFF", "#FFCC0F", "#FFFFFF", "#FFFFFF");}
		break;
		case "4" :
			form.s.value="##############";
			if (isNaN(form.t.value)) form.t.value="";
			if (isNaN(form.v.value)) form.v.value="";
			form.v0.value="##############";
			if (isNaN(form.a.value)) form.a.value="";
			form.s.disabled=true;
			form.t.disabled=false;
			form.v.disabled=false;
			form.v0.disabled=true;
			form.a.disabled=false;
			form.f1.src="imagens/cinematica11.gif";
			form.f2.src="imagens/cinematica12.gif";
			form.f3.src="imagens/cinematica17.gif";
			if (is.ie) {MarcaVar("#FFFFFF", "#FFFFFF", "#FFFFFF", "#FFCC0F", "#FFFFFF");}			
		break;
		case "5" :
			form.s.value="##############";
			if (isNaN(form.t.value)) form.t.value="";
			if (isNaN(form.v.value)) form.v.value="";
			if (isNaN(form.v0.value)) form.v0.value="";
			form.a.value="##############";
			form.s.disabled=true;
			form.t.disabled=false;
			form.v.disabled=false;
			form.v0.disabled=false;
			form.a.disabled=true;
			form.f1.src="imagens/cinematica13.gif";
			form.f2.src="imagens/cinematica14.gif";
			form.f3.src="imagens/cinematica18.gif";
			if (is.ie) {MarcaVar("#FFFFFF", "#FFFFFF", "#FFFFFF", "#FFFFFF", "#FFCC0F");}
		break;
	}
	if (is.ie) {MudaBorda(1, 0, 0);}
	if (is.ie5) {MudaCor("#FFFFFF", "#F5F5F5", "#F5F5F5");}
	form.elements[16].checked=true;
	form.elements[17].checked=false;
	form.elements[18].checked=false;
	form.resultado.value=""
	formnr = 1;
}
//Fim de Define Campos


//Muda Formulas
var formnr = 1;
function mudaFormula(fig) {
	switch (tipocalc) {
		case "1" :
			if (opmov=="1") {
				if (fig==1) {
					document.cinematica.elements[16].checked=true;
					document.cinematica.elements[17].checked=false;
					document.cinematica.elements[18].checked=false;				
					formnr = 1;					
				}
				if (fig==2) {
					mudaFormula(1);
				}
				if (fig==3) {
					mudaFormula(1);
				}
			}
			else if (opmov=="2") {
				if (fig==1) {
					document.cinematica.s.value="##############";
					if (isNaN(document.cinematica.t.value)) document.cinematica.t.value="";
					if (isNaN(document.cinematica.v.value)) document.cinematica.v.value="";
					if (isNaN(document.cinematica.v0.value)) document.cinematica.v0.value="";
					document.cinematica.a.value="##############";
					document.cinematica.s.disabled=true;
					document.cinematica.t.disabled=false;
					document.cinematica.v.disabled=false;
					document.cinematica.v0.disabled=false;
					document.cinematica.a.disabled=true;	
					if (is.ie) {MudaBorda(1, 0, 0);}
					if (is.ie5) {MudaCor("#FFFFFF", "#F5F5F5", "#F5F5F5");}
					document.cinematica.elements[16].checked=true;
					document.cinematica.elements[17].checked=false;
					document.cinematica.elements[18].checked=false;				
					formnr = 1;
					document.cinematica.resultado.value="";
				}
				if (fig==2) {
					document.cinematica.s.value="##############";
					if (isNaN(document.cinematica.t.value)) document.cinematica.t.value="";
					document.cinematica.v.value="##############";
					if (isNaN(document.cinematica.v0.value)) document.cinematica.v0.value="";
					if (isNaN(document.cinematica.a.value)) document.cinematica.a.value="";
					document.cinematica.s.disabled=true;
					document.cinematica.t.disabled=false;
					document.cinematica.v.disabled=true;
					document.cinematica.v0.disabled=false;
					document.cinematica.a.disabled=false;
					if (is.ie) {MudaBorda(0, 1, 0);}
					if (is.ie5) {MudaCor("#F5F5F5", "#FFFFFF", "#F5F5F5");}
					document.cinematica.elements[16].checked=false;
					document.cinematica.elements[17].checked=true;
					document.cinematica.elements[18].checked=false;
					formnr = 2;
					document.cinematica.resultado.value="";
				}
				if (fig==3) {
					document.cinematica.s.value="##############";
					document.cinematica.t.value="##############";
					if (isNaN(document.cinematica.v.value)) document.cinematica.v.value="";
					if (isNaN(document.cinematica.v0.value)) document.cinematica.v0.value="";
					if (isNaN(document.cinematica.a.value)) document.cinematica.a.value="";
					document.cinematica.s.disabled=true;
					document.cinematica.t.disabled=true;
					document.cinematica.v.disabled=false;
					document.cinematica.v0.disabled=false;
					document.cinematica.a.disabled=false;
					if (is.ie) {MudaBorda(0, 0, 1);}
					if (is.ie5) {MudaCor("#F5F5F5", "#F5F5F5", "#FFFFFF");}
					document.cinematica.elements[16].checked=false;
					document.cinematica.elements[17].checked=false;
					document.cinematica.elements[18].checked=true;
					formnr = 3;
					document.cinematica.resultado.value="";
				}
			}
		break;		
		case "2" :
			if (opmov=="1") {
				if (fig==1) {
					document.cinematica.elements[16].checked=true;
					document.cinematica.elements[17].checked=false;
					document.cinematica.elements[18].checked=false;				
					formnr = 1;					
				}
				if (fig==2) {
					mudaFormula(1);
				}
				if (fig==3) {
					mudaFormula(1);
				}
			}
			else if (opmov=="2") {
				if (fig==1) {
					document.cinematica.s.value="##############";
					document.cinematica.t.value="##############";
					if (isNaN(document.cinematica.v.value)) document.cinematica.v.value="";
					if (isNaN(document.cinematica.v0.value)) document.cinematica.v0.value="";
					if (isNaN(document.cinematica.a.value)) document.cinematica.a.value="";
					document.cinematica.s.disabled=true;
					document.cinematica.t.disabled=true;
					document.cinematica.v.disabled=false;
					document.cinematica.v0.disabled=false;
					document.cinematica.a.disabled=false;	
					if (is.ie) {MudaBorda(1, 0, 0);}
					if (is.ie5) {MudaCor("#FFFFFF", "#F5F5F5", "#F5F5F5");}
					document.cinematica.elements[16].checked=true;
					document.cinematica.elements[17].checked=false;
					document.cinematica.elements[18].checked=false;				
					formnr = 1;
					document.cinematica.resultado.value="";
				}
				if (fig==2) {
					if (isNaN(document.cinematica.s.value)) document.cinematica.s.value="";
					document.cinematica.t.value="##############";
					if (isNaN(document.cinematica.v.value)) document.cinematica.v.value="";
					if (isNaN(document.cinematica.v0.value)) document.cinematica.v0.value="";
					document.cinematica.a.value="##############";
					document.cinematica.s.disabled=false;
					document.cinematica.t.disabled=true;
					document.cinematica.v.disabled=false;
					document.cinematica.v0.disabled=false;
					document.cinematica.a.disabled=true;
					if (is.ie) {MudaBorda(0, 1, 0);}
					if (is.ie5) {MudaCor("#F5F5F5", "#FFFFFF", "#F5F5F5");}
					document.cinematica.elements[16].checked=false;
					document.cinematica.elements[17].checked=true;
					document.cinematica.elements[18].checked=false;
					formnr = 2;
					document.cinematica.resultado.value="";
				}
				if (fig==3) {
					mudaFormula(1);
				}
			}
		break;
		case "3" :
			if (opmov=="1") {
				if (fig==1) {
					document.cinematica.elements[16].checked=true;
					document.cinematica.elements[17].checked=false;
					document.cinematica.elements[18].checked=false;				
					formnr = 1;					
				}
				if (fig==2) {
					mudaFormula(1);
				}
				if (fig==3) {
					mudaFormula(1);
				}
			}
			else if (opmov=="2") {
				if (fig==1) {
					document.cinematica.s.value="##############";
					if (isNaN(document.cinematica.t.value)) document.cinematica.t.value="";
					document.cinematica.v.value="##############";
					if (isNaN(document.cinematica.v0.value)) document.cinematica.v0.value="";
					if (isNaN(document.cinematica.a.value)) document.cinematica.a.value="";
					document.cinematica.s.disabled=true;
					document.cinematica.t.disabled=false;
					document.cinematica.v.disabled=true;
					document.cinematica.v0.disabled=false;
					document.cinematica.a.disabled=false;	
					if (is.ie) {MudaBorda(1, 0, 0);}
					if (is.ie5) {MudaCor("#FFFFFF", "#F5F5F5", "#F5F5F5");}
					document.cinematica.elements[16].checked=true;
					document.cinematica.elements[17].checked=false;
					document.cinematica.elements[18].checked=false;				
					formnr = 1;
					document.cinematica.resultado.value="";
				}
				if (fig==2) {
					if (isNaN(document.cinematica.s.value)) document.cinematica.s.value="";
					if (isNaN(document.cinematica.t.value)) document.cinematica.t.value="";
					document.cinematica.v.value="##############";
					if (isNaN(document.cinematica.v0.value)) document.cinematica.v0.value="";
					document.cinematica.a.value="##############";
					document.cinematica.s.disabled=false;
					document.cinematica.t.disabled=false;
					document.cinematica.v.disabled=true;
					document.cinematica.v0.disabled=false;
					document.cinematica.a.disabled=true;
					if (is.ie) {MudaBorda(0, 1, 0);}
					if (is.ie5) {MudaCor("#F5F5F5", "#FFFFFF", "#F5F5F5");}
					document.cinematica.elements[16].checked=false;
					document.cinematica.elements[17].checked=true;
					document.cinematica.elements[18].checked=false;
					formnr = 2;
					document.cinematica.resultado.value="";
				}
				if (fig==3) {
					if (isNaN(document.cinematica.s.value)) document.cinematica.s.value="";
					document.cinematica.t.value="##############";
					document.cinematica.v.value="##############";
					if (isNaN(document.cinematica.v0.value)) document.cinematica.v0.value="";
					if (isNaN(document.cinematica.a.value)) document.cinematica.a.value="";
					document.cinematica.s.disabled=false;
					document.cinematica.t.disabled=true;
					document.cinematica.v.disabled=true;
					document.cinematica.v0.disabled=false;
					document.cinematica.a.disabled=false;
					if (is.ie) {MudaBorda(0, 0, 1);}
					if (is.ie5) {MudaCor("#F5F5F5", "#F5F5F5", "#FFFFFF");}
					document.cinematica.elements[16].checked=false;
					document.cinematica.elements[17].checked=false;
					document.cinematica.elements[18].checked=true;
					formnr = 3;
					document.cinematica.resultado.value="";
				}
			}
		break;		
		case "4" :
			if (fig==1) {
				document.cinematica.s.value="##############";
				if (isNaN(document.cinematica.t.value)) document.cinematica.t.value="";
				if (isNaN(document.cinematica.v.value)) document.cinematica.v.value="";
				document.cinematica.v0.value="##############";
				if (isNaN(document.cinematica.a.value)) document.cinematica.a.value="";
				document.cinematica.s.disabled=true;
				document.cinematica.t.disabled=false;
				document.cinematica.v.disabled=false;
				document.cinematica.v0.disabled=true;
				document.cinematica.a.disabled=false;	
				if (is.ie) {MudaBorda(1, 0, 0);}
				if (is.ie5) {MudaCor("#FFFFFF", "#F5F5F5", "#F5F5F5");}
				document.cinematica.elements[16].checked=true;
				document.cinematica.elements[17].checked=false;
				document.cinematica.elements[18].checked=false;				
				formnr = 1;
				document.cinematica.resultado.value="";
			}
			if (fig==2) {
				if (isNaN(document.cinematica.s.value)) document.cinematica.s.value="";
				if (isNaN(document.cinematica.t.value)) document.cinematica.t.value="";
				document.cinematica.v.value="##############";
				document.cinematica.v0.value="##############";
				if (isNaN(document.cinematica.a.value)) document.cinematica.a.value="";
				document.cinematica.s.disabled=false;
				document.cinematica.t.disabled=false;
				document.cinematica.v.disabled=true;
				document.cinematica.v0.disabled=true;
				document.cinematica.a.disabled=false;
				if (is.ie) {MudaBorda(0, 1, 0);}
				if (is.ie5) {MudaCor("#F5F5F5", "#FFFFFF", "#F5F5F5");}
				document.cinematica.elements[16].checked=false;
				document.cinematica.elements[17].checked=true;
				document.cinematica.elements[18].checked=false;
				formnr = 2;
				document.cinematica.resultado.value="";
			}
			if (fig==3) {
				if (isNaN(document.cinematica.s.value)) document.cinematica.s.value="";
				document.cinematica.t.value="##############";
				if (isNaN(document.cinematica.v.value)) document.cinematica.v.value="";
				document.cinematica.v0.value="##############";
				if (isNaN(document.cinematica.a.value)) document.cinematica.a.value="";
				document.cinematica.s.disabled=false;
				document.cinematica.t.disabled=true;
				document.cinematica.v.disabled=false;
				document.cinematica.v0.disabled=true;
				document.cinematica.a.disabled=false;
				if (is.ie) {MudaBorda(0, 0, 1);}
				if (is.ie5) {MudaCor("#F5F5F5", "#F5F5F5", "#FFFFFF");}
				document.cinematica.elements[16].checked=false;
				document.cinematica.elements[17].checked=false;
				document.cinematica.elements[18].checked=true;
				formnr = 3;
				document.cinematica.resultado.value="";
			}			
		break;		
		case "5" :
			if (fig==1) {
				document.cinematica.s.value="##############";
				if (isNaN(document.cinematica.t.value)) document.cinematica.t.value="";
				if (isNaN(document.cinematica.v.value)) document.cinematica.v.value="";
				if (isNaN(document.cinematica.v0.value)) document.cinematica.v0.value="";
				document.cinematica.a.value="##############";
				document.cinematica.s.disabled=true;
				document.cinematica.t.disabled=false;
				document.cinematica.v.disabled=false;
				document.cinematica.v0.disabled=false;
				document.cinematica.a.disabled=true;	
				if (is.ie) {MudaBorda(1, 0, 0);}
				if (is.ie5) {MudaCor("#FFFFFF", "#F5F5F5", "#F5F5F5");}
				document.cinematica.elements[16].checked=true;
				document.cinematica.elements[17].checked=false;
				document.cinematica.elements[18].checked=false;				
				formnr = 1;
				document.cinematica.resultado.value="";
			}
			if (fig==2) {
				if (isNaN(document.cinematica.s.value)) document.cinematica.s.value="";
				if (isNaN(document.cinematica.t.value)) document.cinematica.t.value="";
				document.cinematica.v.value="##############";
				if (isNaN(document.cinematica.v0.value)) document.cinematica.v0.value="";
				document.cinematica.a.value="##############";
				document.cinematica.s.disabled=false;
				document.cinematica.t.disabled=false;
				document.cinematica.v.disabled=true;
				document.cinematica.v0.disabled=false;
				document.cinematica.a.disabled=true;
				if (is.ie) {MudaBorda(0, 1, 0);}
				if (is.ie5) {MudaCor("#F5F5F5", "#FFFFFF", "#F5F5F5");}
				document.cinematica.elements[16].checked=false;
				document.cinematica.elements[17].checked=true;
				document.cinematica.elements[18].checked=false;
				formnr = 2;
				document.cinematica.resultado.value="";
			}
			if (fig==3) {
				if (isNaN(document.cinematica.s.value)) document.cinematica.s.value="";
				document.cinematica.t.value="##############";
				if (isNaN(document.cinematica.v.value)) document.cinematica.v.value="";
				if (isNaN(document.cinematica.v0.value)) document.cinematica.v0.value="";
				document.cinematica.a.value="##############";
				document.cinematica.s.disabled=false;
				document.cinematica.t.disabled=true;
				document.cinematica.v.disabled=false;
				document.cinematica.v0.disabled=false;
				document.cinematica.a.disabled=true;
				if (is.ie) {MudaBorda(0, 0, 1);}
				if (is.ie5) {MudaCor("#F5F5F5", "#F5F5F5", "#FFFFFF");}
				document.cinematica.elements[16].checked=false;
				document.cinematica.elements[17].checked=false;
				document.cinematica.elements[18].checked=true;
				formnr = 3;
				document.cinematica.resultado.value="";
			}				
		break;
	}
}
//Fim de Muda Formulas


//Altera Visualização Formulas
function MudaBorda(b1, b2, b3) {
	eval("document.f1.border="+b1);
	eval("document.f2.border="+b2);
	eval("document.f3.border="+b3);
}
//Muda cor Celula Formulas (IE 5)
function MudaCor(cor1, cor2, cor3) {
	eval("document.getElementById('formula1').style.backgroundColor='"+cor1+"'");
	eval("document.getElementById('formula2').style.backgroundColor='"+cor2+"'");
	eval("document.getElementById('formula3').style.backgroundColor='"+cor3+"'");
}
//Fim de Altera Visualização Formulas


//Marca Incógnita
function MarcaVar(cor_s, cor_t, cor_v, cor_v0, cor_a) {
	document.cinematica.s.style.backgroundColor = cor_s;
	document.cinematica.t.style.backgroundColor = cor_t;
	document.cinematica.v.style.backgroundColor = cor_v;
	document.cinematica.v0.style.backgroundColor = cor_v0;
	document.cinematica.a.style.backgroundColor = cor_a;
}
//Fim de Marca Incógnita


//Restaura Valores
function Restaura(form) {
	form.opcao.value = 1;
	form.tipocalc.options.length = 3;
	form.tipocalc.selectedIndex=0;
	document.config.restaurar.click();
	TipoCalc(form);	
}
//Fim de Restaura Valores


//Muda Unidades
function MudaUnid(form, op) {
	if (op==1) {
		form.opunid.value = 1;
		document.cinematica.s0_unid.value = "m";
		document.cinematica.s_unid.value = "m";
		document.cinematica.v_unid.value = "m/s";
		document.cinematica.v0_unid.value = "m/s";
		if (is.ns) {document.cinematica.a_unid.value = "m/s^2";}
		else {document.cinematica.a_unid.value = "m/s";}
	}
	else if (op==2) {
		form.opunid.value=2;
		document.cinematica.s0_unid.value = "ft";
		document.cinematica.s_unid.value = "ft";
		document.cinematica.v_unid.value = "ft/s";
		document.cinematica.v0_unid.value = "ft/s";		
		if (is.ns) {document.cinematica.a_unid.value = "ft/s^2";}
		else {document.cinematica.a_unid.value = "ft/s";}
	}
	document.cinematica.resultado.value=''
}
//Fim Muda Unidades


//Calcular Resultados
var resultmemo="";
var result=""; 
function CalcResult(form){
	var s0 = parseFloat(form.s0.value);
	var s = parseFloat(form.s.value);
	var t = parseFloat(form.t.value);
	var v = parseFloat(form.v.value);
	var v0 = parseFloat(form.v0.value);
	var a = parseFloat(form.a.value);
	var opunid = document.config.opunid.value;
	resultmemo="";
	var resultado="";
	var opdec = document.config.opdec.checked;
	var cdec = document.config.dec.value;
	var multdec = Math.pow(10,cdec);
	var unidtxt, unidtxt2;
	var valcalc = 0;
	
	if(isNaN(s0)) {s0=0};
	
	if(!isNaN(s)) {s = s-s0};
	
	if(isNaN(t)) {t=0};

	if (!loaded && t>=0) {
		switch (tipocalc) {
			case "1" :
				unidtxt = (opunid=="1")? " m" : " ft";
				unidtxt2 = unidtxt;
				if (opmov=="1") {
					if (!isNaN(t) && !isNaN(v)) {					
						valcalc = s0+v*t;
						if (opdec==true) {		
							valcalc = Math.round(multdec*valcalc)/multdec;
						}						
						
						resultmemo = valcalc;		
						resultado = "S = "+valcalc+unidtxt;						
						form.resultado.value = resultado;
						result = "S = "+valcalc+unidtxt2;
					}
					else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
				}
				else if (opmov=="2") {
					if (formnr==1) {					
						if (!isNaN(t) && !isNaN(v) && !isNaN(v0)) {					
							valcalc = s0+t*(v0+v)/2;
							if (opdec==true) {		
								valcalc = Math.round(multdec*valcalc)/multdec;
							}						
							
							resultmemo = valcalc;		
							resultado = "S = "+valcalc+unidtxt;						
							form.resultado.value = resultado;
							result = "S = "+valcalc+unidtxt2;
						}
						else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
					}
					if (formnr==2) {					
						if (!isNaN(t) && !isNaN(v0) && !isNaN(a)) {					
							valcalc = s0+v0*t+(a*t*t)/2 ;
							if (opdec==true) {		
								valcalc = Math.round(multdec*valcalc)/multdec;
							}						
							
							resultmemo = valcalc;	
							resultado = "S = "+valcalc+unidtxt;						
							form.resultado.value = resultado;
							result = "S = "+valcalc+unidtxt2;
						}
						else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
					}
					if (formnr==3) {					
						if (!isNaN(v) && !isNaN(v0) && !isNaN(a)) {					
							valcalc = s0+(v*v-v0*v0)/(2*a) ;
							if (opdec==true) {		
								valcalc = Math.round(multdec*valcalc)/multdec;
							}						
							
							resultmemo = valcalc;	
							resultado = "S = "+valcalc+unidtxt;						
							form.resultado.value = resultado;
							result = "S = "+valcalc+unidtxt2;
						}
						else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
					}				
				}
			break;
			case "2" :
				unidtxt = " s"
				unidtxt2 = unidtxt;
				if (opmov=="1") {
					if (!isNaN(s) && !isNaN(v)) {					
						valcalc = s/v;
						if (opdec==true) {		
							valcalc = Math.round(multdec*valcalc)/multdec;
						}						
						
						resultmemo = valcalc;		
						resultado = "t = "+valcalc+unidtxt;						
						form.resultado.value = resultado;
						result = "t = "+valcalc+unidtxt2;
					}
					else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
				}
				else if (opmov=="2") {
					if (formnr==1) {					
						if (!isNaN(v) && !isNaN(v0) && !isNaN(a)) {					
							valcalc = (v-v0)/a;
							if (opdec==true) {		
								valcalc = Math.round(multdec*valcalc)/multdec;
							}						
							
							resultmemo = valcalc;		
							resultado = "t = "+valcalc+unidtxt;						
							form.resultado.value = resultado;
							result = "t = "+valcalc+unidtxt2;
						}
						else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
					}
					if (formnr==2) {					
						if (!isNaN(s) && !isNaN(v) && !isNaN(v0)) {					
							valcalc = 2*s/(v0+v);
							if (opdec==true) {		
								valcalc = Math.round(multdec*valcalc)/multdec;
							}						
							
							resultmemo = valcalc;	
							resultado = "t = "+valcalc+unidtxt;						
							form.resultado.value = resultado;
							result = "t = "+valcalc+unidtxt2;
						}
						else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
					}														
				}			
			break;
			case "3" :
				unidtxt = (opunid=="1")? " m/s" : " ft/s";
				unidtxt2 = unidtxt;
				if (opmov=="1") {
					if (!isNaN(t) && !isNaN(s)) {					
						valcalc = s/t;
						if (opdec==true) {		
							valcalc = Math.round(multdec*valcalc)/multdec;
						}						
						
						resultmemo = valcalc;		
						resultado = "V = "+valcalc+unidtxt;						
						form.resultado.value = resultado;
						result = "V = "+valcalc+unidtxt2;
					}
					else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
				}
				else if (opmov=="2") {
					if (formnr==1) {					
						if (!isNaN(t) && !isNaN(v0) && !isNaN(a)) {					
							valcalc = v0+a*t;
							if (opdec==true) {		
								valcalc = Math.round(multdec*valcalc)/multdec;
							}						
							
							resultmemo = valcalc;		
							resultado = "V = "+valcalc+unidtxt;						
							form.resultado.value = resultado;
							result = "V = "+valcalc+unidtxt2;
						}
						else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
					}
					if (formnr==2) {					
						if (!isNaN(s) && !isNaN(t) && !isNaN(v0)) {					
							valcalc = 2*s/t-v0;
							if (opdec==true) {		
								valcalc = Math.round(multdec*valcalc)/multdec;
							}						
							
							resultmemo = valcalc;	
							resultado = "V = "+valcalc+unidtxt;						
							form.resultado.value = resultado;
							result = "V = "+valcalc+unidtxt2;
						}
						else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
					}
					if (formnr==3) {					
						if (!isNaN(s) && !isNaN(a) && !isNaN(v0)) {
							var v0_dir = (v0>=0)? 1 : -1;
							var a_dir = (a>=0)? 1 : -1;
							var sinal = ""; //Não utilizado nesta opção
							var sinal_imp = ""; //Não utilizado nesta opção
																	
							valcalc = Math.sqrt(v0*v0+2*a*s);							
							
							if (!isNaN(valcalc)) {
								if (v0_dir==a_dir) {									
									valcalc = v0_dir*valcalc;
								}
								if (v0_dir!=a_dir && Math.abs(valcalc)>Math.abs(v0)) {									
									valcalc = a_dir*valcalc;
								}
								if (v0_dir!=a_dir && Math.abs(valcalc)<=Math.abs(v0)) {
									valcalc = v0_dir*valcalc;
								}							
							}							
							
							if (opdec==true && !isNaN(valcalc)) {		
								valcalc = Math.round(multdec*valcalc)/multdec;
							}
														
							resultmemo = (!isNaN(valcalc))? valcalc : "";	
							resultado = (!isNaN(valcalc))? "V = "+sinal+valcalc+unidtxt : "Não é possível determinar V (Raiz de número negativo)";						
							form.resultado.value = resultado;
							result = (!isNaN(valcalc))? "V = "+sinal_imp+valcalc+unidtxt2 : "Não é possível determinar V (Raiz de número negativo)";
						}
						else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
					}				
				}
			break;			
			case "4" :
				unidtxt = (opunid=="1")? " m/s" : " ft/s";
				unidtxt2 = unidtxt;
				if (formnr==1) {					
					if (!isNaN(t) && !isNaN(v) && !isNaN(a)) {					
						valcalc = v-a*t;
						if (opdec==true) {		
							valcalc = Math.round(multdec*valcalc)/multdec;
						}						
						
						resultmemo = valcalc;		
						resultado = "Vo = "+valcalc+unidtxt;						
						form.resultado.value = resultado;
						result = "V<sub>0</sub> = "+valcalc+unidtxt2;
					}
					else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
				}
				if (formnr==2) {					
					if (!isNaN(s) && !isNaN(t) && !isNaN(a)) {					
						valcalc = (s-a*t*t/2)/t;
						if (opdec==true) {		
							valcalc = Math.round(multdec*valcalc)/multdec;
						}						
						
						resultmemo = valcalc;	
						resultado = "Vo = "+valcalc+unidtxt;						
						form.resultado.value = resultado;
						result = "V<sub>0</sub> = "+valcalc+unidtxt2;
					}
					else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
				}
				if (formnr==3) {					
					if (!isNaN(s) && !isNaN(a) && !isNaN(v)) {
						var v_dir = (v>=0)? 1 : -1;
						var a_dir = (a>=0)? 1 : -1;
						var sinal = ""; //Não utilizado nesta opção
						var sinal_imp = ""; //Não utilizado nesta opção
						
						valcalc = Math.sqrt(v*v-2*a*s);
						valcalc = v_dir*valcalc;
												
						if (opdec==true && !isNaN(valcalc)) {		
							valcalc = Math.round(multdec*valcalc)/multdec;
						}
						
						resultmemo = (!isNaN(valcalc))? valcalc : "";	
						resultado = (!isNaN(valcalc))? "Vo = "+sinal+valcalc+unidtxt : "Não é possível determinar Vo (Raiz de número negativo)";						
						form.resultado.value = resultado;
						result = (!isNaN(valcalc))? "V<sub>0</sub> = "+sinal_imp+valcalc+unidtxt2 : "Não é possível determinar V<sub>0</sub> (Raiz de número negativo)";
					}
					else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
				}
			break;
			case "5" :
				unidtxt = (opunid=="1")? " m/s^2" : " ft/s^2";
				unidtxt2 = (opunid=="1")? " m/s<sup>2</sup>" : " ft/s<sup>2</sup>";
				if (formnr==1) {					
					if (!isNaN(t) && !isNaN(v) && !isNaN(v0)) {					
						valcalc = (v-v0)/t;
						if (opdec==true) {		
							valcalc = Math.round(multdec*valcalc)/multdec;
						}						
						
						resultmemo = valcalc;		
						resultado = "a = "+valcalc+unidtxt;						
						form.resultado.value = resultado;
						result = "a = "+valcalc+unidtxt2;
					}
					else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
				}
				if (formnr==2) {					
					if (!isNaN(s) && !isNaN(t) && !isNaN(v0)) {					
						valcalc = 2*(s-v0*t)/(t*t);
						if (opdec==true) {		
							valcalc = Math.round(multdec*valcalc)/multdec;
						}						
						
						resultmemo = valcalc;	
						resultado = "a = "+valcalc+unidtxt;						
						form.resultado.value = resultado;
						result = "a = "+valcalc+unidtxt2;
					}
					else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
				}
				if (formnr==3) {					
					if (!isNaN(s) && !isNaN(v) && !isNaN(v0)) {					
						valcalc = (v*v-v0*v0)/(2*s);
						if (opdec==true) {		
							valcalc = Math.round(multdec*valcalc)/multdec;
						}						
						
						resultmemo = valcalc;	
						resultado = "a = "+valcalc+unidtxt;						
						form.resultado.value = resultado;
						result = "a = "+valcalc+unidtxt2;
					}
					else {alert("Existe(m) campo(s) com valor inválido ou nulo")}
				}			
			break; 
		}
	}
}
//Fim de Calcular Resultados


//Transfere para Memoria
function Transfere(form) {
	var cpresult=form.resultado.value;
	resultmemo = parseFloat(resultmemo);
	if (!isNaN(resultmemo) && cpresult!="") {
		var memonr = form.memonr.options[form.memonr.selectedIndex].value;
		var operacao = form.operacao.options[form.operacao.selectedIndex].value;
		var descricao = form.tipocalc.options[form.tipocalc.selectedIndex].text;
		var valormemo = eval("parent.frames['frame_menu'].document.memo.memotemp"+memonr+".value");

		valormemo = parseFloat(valormemo);
		if (isNaN(valormemo)) {valormemo=0;}
			
		switch (operacao) {
			case "1" :
eval("parent.frames['frame_menu'].document.memo.memotemp"+memonr+".value = resultmemo");			
eval("parent.frames['frame_menu'].document.memo.memodesc"+memonr+".value = descricao");
if (is.ie4) {parent.frames["frame_menu"].document.images["memoled"].src = "imagens/ledmemo2.gif";}			
			break;
			case "2" :
eval("parent.frames['frame_menu'].document.memo.memotemp"+memonr+".value = valormemo+resultmemo");
eval("parent.frames['frame_menu'].document.memo.memodesc"+memonr+".value = 'Soma'");
if (is.ie4) {parent.frames["frame_menu"].document.images["memoled"].src = "imagens/ledmemo2.gif";}
			break;
			case "3" :
eval("parent.frames['frame_menu'].document.memo.memotemp"+memonr+".value = valormemo-resultmemo");
eval("parent.frames['frame_menu'].document.memo.memodesc"+memonr+".value = 'Subtração'");
if (is.ie4) {parent.frames["frame_menu"].document.images["memoled"].src = "imagens/ledmemo2.gif";}
			break;
			case "4" :
eval("parent.frames['frame_menu'].document.memo.memotemp"+memonr+".value = valormemo*resultmemo");
eval("parent.frames['frame_menu'].document.memo.memodesc"+memonr+".value = 'Multiplicação'");
if (is.ie4) {parent.frames["frame_menu"].document.images["memoled"].src = "imagens/ledmemo2.gif";}
			break;
			case "5" :
eval("parent.frames['frame_menu'].document.memo.memotemp"+memonr+".value = valormemo/resultmemo");
eval("parent.frames['frame_menu'].document.memo.memodesc"+memonr+".value = 'Divisão'");
if (is.ie4) {parent.frames["frame_menu"].document.images["memoled"].src = "imagens/ledmemo2.gif";}
			break;
		}
	}
	else {alert("Não existe resultado a transferir.")}
}
//Fim de Transfere para Memoria


//Impressão dos Resultados
function JanelaImp(form){
	var campresult=form.resultado.value
			
	if (campresult!="") {			
		winimp = window.open("cinematica_imp.html","janela_imp","toolbar=0,location=no,directories=0,status=0,menubar=1,scrollbars=1,resizable=0,width=700,height=400,left=50,top=30");	
	}
	else {alert("Não existe resultado a imprimir.")}
}
//Fim de Impressão dos Resultados


//Janela de Conversão de Unidades
function JanConv(){
		winimp = window.open("../conversoes/jan_conversoes.html","janela_Conv","toolbar=0,location=no,directories=0,status=0,menubar=0,scrollbars=0,resizable=0,width=520,height=440,left=50,top=30");
}
//Fim de Janela de Conversão de Unidades