//--------------------------------------------------------------------------------------
// Calcular cuota sistema frances

function cuota(importe,interes,plazo)
{
potencia=1+interes;
multiplicador=Math.pow(potencia,-plazo);
multiplicador1=importe*interes;
pagomes=multiplicador1/(1-multiplicador);
return pagomes;
}

//-------------------------------------------------------------------------------------
// Calcula el principal de una operación

function principal(cuota,interes,plazo)
{
potencia=1+interes;
multiplicador=Math.pow(potencia,-plazo);
multiplicador1=(1-multiplicador)/interes;
cpendiente=cuota*multiplicador1;
return cpendiente;
}



//--------------------------------------------------------------------------------------
// Calcular el capital amortizado de la operación

function pagado(amortizacion,interes,revision)
{
potencia=1+interes;
multiplicador=Math.pow(potencia,revision);
multiplicador=multiplicador-1;
amortizado=(multiplicador/interes)*amortizacion;
return amortizado;
}


//--------------------------------------------------------------------------------------
// Tomar el valor del índice de referencia
// Mibor,Euribor, IRPH Cajas, IRPH Bancos, IRPH Conjunto de Entidades, CECA

function indice(posicion)
{
var vreferencia=new Array(2.279,2.279,3.548,3.381,3.470,5.00);
referencia=vreferencia[posicion];
return referencia;
}

//-----------------------------------------------------------------------
// genera el desplegable de las escala de gravamen irpf
function tgravamen(form)
{

var vvalue=new Array(0,0.15,0.24,0.28,0.37,0.45)
var vopcion=new Array("Seleccione la adecuada","15 %","24 %","28 %","37 %","45 %")


while (document.all.escala.options.length) document.all.escala.options.remove(0);
	for (i=0; i<=5; i++)
	{
			oOption = document.createElement("OPTION");
			oOption.text=vopcion[i];
			oOption.value=vvalue[i];
			document.all.escala.add(oOption);
			document.all.escala.disabled=false;
	}

}

//--------------------------------------------------------------------------------------
// Formato de números sin decimales
function formato(numero) {
	numero = String(Math.round(numero))
	contador = 1
	for (pos = (numero.length - 1); pos > 0; pos--) {
		contador++
		if (contador > 3) {
			numero = numero.substring(0,pos) + "." + numero.substr(pos)
			contador = 1
		}
	}
	return(numero)
}

//-------------------------------------------------------------------------------------
// Formato de número con decimales

function formatodec(numero,moneda) 
{
var entero;
var decimal;
var coma;
var final;

if(moneda==0){final=".- Ptas.";}else{final=".- Euros";}
numero=String(Math.round(numero*100)/100);
var pos=numero.indexOf(".");
if(pos==-1){decimal=0;coma="";}else{decimal=numero.substr(pos,3);coma=","+decimal.substr(1,2);};
if (pos==-1){entero=numero;}else{entero=numero.substring(0,pos);};

	contador = 1
	for (pos = (entero.length - 1); pos > 0; pos--) {
		contador++
		if (contador > 3) {
			entero = entero.substring(0,pos) + "." + entero.substr(pos)
			contador = 1
		}
	}
	if (moneda==0){numero=entero+final;}else{numero=entero+coma+final;}
	return (numero)
}

//---------------------------------------------------------------------------------------
// Cambia la moneda de la operación
<!--
function cambiar(form)
{
var importe;
var informa;
importe=form.importe.value*1;

if(form.moneda[0].checked){form.moneda[0].checked=0;informa=1;}
if(form.moneda[1].checked){form.moneda[1].checked=0;informa=0;}
if (informa==1){form.importe.value=Math.round((importe/166.386)*100)/100;form.moneda[1].checked=1;}
if (informa==0){form.importe.value=Math.round(importe*166.386);form.moneda[0].checked=1;}
calculos(form)
}
//-->
//---------------------------------------------------------------------------------------
// Cambia la moneda de la operación con tres campos, recálculos de cuota
<!--
function cambiartres(form)
{
var cpendiente;
var amortizacion;
var cuotainicial;
var informa;

cpendiente=form.cpendiente.value*1;
amortizacion=form.amortizacion.value*1;
cuotainicial=form.cuotainicial.value*1;

if(form.moneda[0].checked){form.moneda[0].checked=0;informa=1;}
if(form.moneda[1].checked){form.moneda[1].checked=0;informa=0;}

if (informa==1)
{
form.cpendiente.value=Math.round((cpendiente/166.386)*100)/100;
form.amortizacion.value=Math.round((amortizacion/166.386)*100)/100;
form.cuotainicial.value=Math.round((cuotainicial/166.386)*100)/100;
form.moneda[1].checked=1;
}
else
{
form.cpendiente.value=Math.round(cpendiente*166.386);
form.amortizacion.value=Math.round(amortizacion*166.386);
form.cuotainicial.value=Math.round(cuotainicial*166.386);
form.moneda[0].checked=1;
}
calculos(form)
}
//-->