var isIE = (window.navigator.userAgent.indexOf("MSIE")> 0); 
if (! isIE){   
   HTMLElement.prototype.__defineGetter__("innerText",function () { return(this.textContent); });   
   HTMLElement.prototype.__defineSetter__("innerText",function (txt) { this.textContent = txt; });
      }



var vDensidad=new Array(6);
var vVolumen=new Array(6);
//Variables de Densidad
vDensidad[0]=0.83;
vDensidad[1]=0.4;
vDensidad[2]=1.015;
vDensidad[3]=0.675;
vDensidad[4]=0.73;
vDensidad[5]=0.45;
//Variables de Volumen
vVolumen[0]=1;
vVolumen[1]=0.7;
vVolumen[2]=0.5;
vVolumen[3]=0.8;
vVolumen[4]=0.5;
vVolumen[5]=0.4;

function CambioaAnios()
{
var iAnios;
var i;
var oDensidad;
var oVolumen;
var oPeso;
var oCarbono;
var oCO2;
var oCantidad;
var oCapturaCO2;
var fVolumen;
var fPeso;
var fCarbono;
var fCO2;
var fCapturaCO2;
var fCapturaTotal;
var iCantArbol;
var iCantidad;
if(document.fAnios.Anios[0].checked)
	iAnios=20;
else
	if(document.fAnios.Anios[1].checked)
		iAnios=10;
	else
		if(document.fAnios.Anios[2].checked)
			iAnios=5;		
		else
			iAnios=2;		
document.getElementById("lblAnios").innerText=iAnios;
document.getElementById("lblAniosBal").innerText=iAnios;						
oDensidad=document.getElementsByName("Densidad");
oVolumen=document.getElementsByName("Volumen");
oPeso=document.getElementsByName("Peso");
oCarbono=document.getElementsByName("Carbono");
oCO2=document.getElementsByName("CO2");
oCantidad=document.getElementsByName("Cantidad");
oCapturaCO2=document.getElementsByName("CapturaCO2");
fCapturaTotal=0;
iCantArbol=0;

for(i=0;i<6;i++)
	{
	oDensidad[i].innerText=Formatea(vDensidad[i],3);			
	fVolumen=(vVolumen[i]*iAnios)/20;
	oVolumen[i].innerText=Formatea(fVolumen,3);
	fPeso=vDensidad[i]*fVolumen;
	oPeso[i].innerText=Formatea(fPeso,5);
	fCarbono=fPeso*0.5*1.5;
	oCarbono[i].innerText=Formatea(fCarbono,5);
	fCO2=fCarbono*3.66;
	oCO2[i].innerText=Formatea(fCO2,2);
	iCantidad=parseInt(oCantidad[i].innerText);
	fCapturaCO2=iCantidad*fCO2;
	iCantArbol+=iCantidad;
	oCapturaCO2[i].innerText=Formatea(fCapturaCO2,2);
	fCapturaTotal+=fCapturaCO2;
	}
document.getElementById("CantidadTotal").innerText=iCantArbol;
document.getElementById("CapturaCO2Total").innerText=Formatea(fCapturaTotal,2);
document.getElementById("Balance").innerText=Formatea(parseFloat(document.fAnios.CarbonoLiberado.value)-fCapturaTotal,2);
}

function CambioCarbonoLiberado()
{
	var tCarbonoLib;
	tCarbonoLib=document.fAnios.CarbonoLiberado.value;
	tCarbonoLib=tCarbonoLib.replace(",",".");
	if(parseFloat(tCarbonoLib)!=tCarbonoLib)
		{
		alert("Debe ingresar un valor numérico");
		document.fAnios.CarbonoLiberado.focus();
		}
	CambioaAnios();
}

function Redondea(fValor,iDec)
{
var fAux;
fAux=fValor*Math.pow(10,iDec);
fAux=Math.round(fAux);
fAux=fAux/Math.pow(10,iDec);
return fAux;
}

function Formatea(fValor,iDec)
{
var fAux;
var vNum;
var iDec
fAux=Redondea(fValor,iDec)
vNum=fAux.toString().split(".")
if(iDec==0)
	return vNum[0] ;
else
	if(vNum.length>1)
		return vNum[0] + "." + (vNum[1] + "00000000").substr(0,iDec);  
	else
		return vNum[0] + "." + ( "00000000").substr(0,iDec);  
}

function MasCantidad(iEspecie,iInc)
{
var oCantidad;
var iValor;
oCantidad=document.getElementsByName("Cantidad");
iValor=parseInt(oCantidad[iEspecie].innerText) + iInc ;
if(iValor<0)
	iValor=0;
oCantidad[iEspecie].innerText=iValor;	
CambioaAnios();
}