function calcular_onclickk(){if (document.formu.valorh.value == ""){document.formu.valorh.value = 1;}
if (document.formu.mash.value == ""){document.formu.mash.value = 0;}
if (document.formu.importeh.value == ""){alert("Debe rellenar el capital pendiente de amortizar.");document.formu.importeh.focus();return;}
if (document.formu.valorh.value < 0){alert ("No introduzca intereses negativos");document.formu.valorh.value = 1;document.formu.valorh.focus();return;}
if (document.formu.valorh.value > 3){alert ("La comisión máxima es de un 3%");document.formu.valorh.value = 1;document.formu.valorh.focus();return;}
if (!EsNumerico(document.formu.valorh.value)){alert ("EL valor introducido no es un número");document.formu.valorh.focus();return;}
if (!EsNumerico(document.formu.anos.value)){alert ("EL valor introducido no es un número");document.formu.anos.focus();return;}
if (!EsNumerico(document.formu.interes.value)){alert ("EL valor introducido no es un número");document.formu.interes.focus();return;}
if (document.formu.anos.value < 0){alert ("Los años deben ser positivos!");document.formu.anos.focus();return;}
if (document.formu.anos.value > 35){alert ("El Banco de España no permite hipotecas de más de 35 años.");document.formu.anos.focus();return;}
if (document.formu.interes.value < 0){alert ("No introduzca intereses negativos");document.formu.interes.value = 5;document.formu.interes.focus();return;}
if (document.formu.interes.value > 20){alert ("El interés máximo es de un 20%");document.formu.interes.value = 5;document.formu.interes.focus();return;}
if ((document.formu.valorh.value == "") || (document.formu.importeh.value == "") || (document.formu.mash.value == "") || (document.formu.anos.value == "") || (document.formu.interes.value == "")){alert ("Rellene todos los campos de Tus Datos");return;}
valor1=Delete_miles(document.formu.importeh.value);valor2=document.formu.valorh.value;valor3=Delete_miles(document.formu.mash.value);var suma;var totalsuma;
if (isNaN(valor3) || valor3==""){totalsuma = parseInt(valor1);}else{totalsuma = parseInt(valor1) + parseInt(valor3);}
document.f_result.comision.value = valor1 * (valor2/100);
buscarvalor2(totalsuma);
CalculaCuota();
document.f_result.cuota.value = Formato_numero(document.f_result.cuota.value);
document.f_result.tasacion.value = 30000;
if (document.formu.radio[1].checked){
	document.f_result.tasacion.value = 180;
	document.f_result.notario.value = Math.round(document.f_result.notario.value/166);
	document.f_result.registro.value = Math.round(document.f_result.registro.value/166);}

suma = parseInt(document.f_result.comision.value) + parseInt(document.f_result.tasacion.value) +  parseInt(document.f_result.notario.value) + parseInt(document.f_result.gestion.value) + parseInt(document.f_result.registro.value) + parseInt(document.f_result.iva.value);
document.f_result.total.value = suma;		

//Formato en comisión
document.f_result.comision.value = Math.round(document.f_result.comision.value);
document.f_result.comision.value = Formato_numero(document.f_result.comision.value);

//Formato en Total
document.f_result.total.value = Formato_numero(document.f_result.total.value);

//Formato en comision, tasacion, notario, gestión, registro y iva.
document.f_result.comision.value = Formato_numero(document.f_result.comision.value);
document.f_result.tasacion.value = Formato_numero(document.f_result.tasacion.value);
document.f_result.notario.value = Formato_numero(document.f_result.notario.value);
document.f_result.gestion.value = Formato_numero(document.f_result.gestion.value);
document.f_result.registro.value = Formato_numero(document.f_result.registro.value);
}
//-------------------------------------------------
function pts2(){
if (!(document.formu.importeh.value == "" && document.formu.valorh.value == "" )){
var valor_actual;
var res;
valor1=Delete_miles(document.formu.importeh.value);
valor2=Delete_miles(document.formu.valorh.value);
valor3=Delete_miles(document.formu.mash.value);
valor_actual = valor1 * 166.386;
document.formu.importeh.value = Math.round(valor_actual);
document.formu.importeh.value = Formato_numero(document.formu.importeh.value);
valor_actual = 0;
if (!(isNaN(valor3)))
	{
	valor_actual = valor3 * 166.386;
	document.formu.mash.value = Math.round(valor_actual);
	document.formu.mash.value = Formato_numero(document.formu.mash.value);
	alert ("El valor en pesetas se reajusto!");
	}}}
//-------------------------------------------------
function euro2(){
if (!(document.formu.importeh.value == "" && document.formu.valorh.value == "" )){
var valor_actual;
var res;
valor1=Delete_miles(document.formu.importeh.value);
valor2=Delete_miles(document.formu.valorh.value);
valor3=Delete_miles(document.formu.mash.value);
valor_actual = valor1 / 166.386;
document.formu.importeh.value = Math.round(valor_actual);
document.formu.importeh.value = Formato_numero(document.formu.importeh.value);
valor_actual = 0;
if (!(isNaN(valor3))){
	valor_actual = valor3 / 166.386;
	document.formu.mash.value = Math.round(valor_actual);
	document.formu.mash.value = Formato_numero(document.formu.mash.value);}}}
//-------------------------------------------------
function CalculaCuota() {
if (isNaN(Delete_miles(document.formu.mash.value))){
document.formu.mash.value = 0;}
impor = parseInt(Delete_miles(document.formu.mash.value)) + parseInt(Delete_miles(document.formu.importeh.value));
entra = 0
if (entra == 0)
	imp = (impor * 1.1)
   else
   	imp= (impor) - entra
plazo_meses = parseInt(document.formu.anos.value)
plazo_meses = plazo_meses * 12
tipo_mensual = parseFloat(document.formu.interes.value)
if ( isNaN(impor) || impor == 0 ){alert("Debe rellenar el campo 'Capital pendiente de amortizar'");cuota = "Revisar";return 0;}
if ( isNaN(tipo_mensual) || tipo_mensual == 0.0 ){alert("Debe rellenar el campo 'Tipo de interés'");cuota = "Revisar";return 0;}
if ( isNaN(plazo_meses) || plazo_meses == 0 ){alert("Debe rellenar el campo 'Años a amortizar'");cuota = "Revisar";return 0;}
tipo_mensual = tipo_mensual / 1200.0
cuota = imp * tipo_mensual * Math.pow((tipo_mensual + 1.0),plazo_meses) / ( Math.pow((tipo_mensual + 1.0),plazo_meses) - 1.0 )
document.f_result.cuota.value = Math.round(cuota)
}
//-------------------------------------------------
function buscarvalor2(v1){
if (document.formu.radio[0].checked){document.f_result.gestion.value = 5000;document.f_result.iva.value = 800;}
else{v1 = v1 * 166.386;document.f_result.gestion.value = 30;document.f_result.iva.value = 4.8;}
if (v1 > "50000000"){document.f_result.notario.value = 51500;document.f_result.registro.value = 22000;
	for (i=50000000;i<v1;i+=1000000){document.f_result.notario.value = parseInt(document.f_result.notario.value) + 250;document.f_result.registro.value = parseInt(document.f_result.registro.value) + 250;}}
if (v1 > "45000000" && v1 <= "50000000"){document.f_result.notario.value = 51500;document.f_result.registro.value = 22000;}
if (v1 > "40000000" && v1 <= "45000000"){document.f_result.notario.value = 50500;document.f_result.registro.value = 21000;}
if (v1 > "39000000" && v1 <= "40000000"){document.f_result.notario.value = 50000;document.f_result.registro.value = 20000;}
if (v1 > "38000000" && v1 <= "39000000"){document.f_result.notario.value = 49750;document.f_result.registro.value = 19500;}
if (v1 > "37000000" && v1 <= "38000000"){document.f_result.notario.value = 49500;document.f_result.registro.value = 19500;}
if (v1 > "36000000" && v1 <= "37000000"){document.f_result.notario.value = 49250;document.f_result.registro.value = 19500;}
if (v1 > "35000000" && v1 <= "36000000"){document.f_result.notario.value = 49000;document.f_result.registro.value = 19500;}
if (v1 > "34000000" && v1 <= "35000000"){document.f_result.notario.value = 48750;document.f_result.registro.value = 19000;}
if (v1 > "33000000" && v1 <= "34000000"){document.f_result.notario.value = 48500;document.f_result.registro.value = 19000;}
if (v1 > "32000000" && v1 <= "33000000"){document.f_result.notario.value = 48250;document.f_result.registro.value = 19000;}
if (v1 > "31000000" && v1 <= "32000000"){document.f_result.notario.value = 48000;document.f_result.registro.value = 19000;}
if (v1 > "30000000" && v1 <= "31000000"){document.f_result.notario.value = 47750;document.f_result.registro.value = 19000;}
if (v1 > "29000000" && v1 <= "30000000"){document.f_result.notario.value = 47500;document.f_result.registro.value = 18400;}
if (v1 > "28000000" && v1 <= "29000000"){document.f_result.notario.value = 47250;document.f_result.registro.value = 18400;}
if (v1 > "27000000" && v1 <= "28000000"){document.f_result.notario.value = 47000;document.f_result.registro.value = 18400;}
if (v1 > "26000000" && v1 <= "27000000"){document.f_result.notario.value = 46500;document.f_result.registro.value = 18400;}
if (v1 > "25000000" && v1 <= "26000000"){document.f_result.notario.value = 46000;document.f_result.registro.value = 18000;}
if (v1 > "24000000" && v1 <= "25000000"){document.f_result.notario.value = 45500;document.f_result.registro.value = 17800;}
if (v1 > "23000000" && v1 <= "24000000"){document.f_result.notario.value = 45000;document.f_result.registro.value = 17600;}
if (v1 > "22000000" && v1 <= "23000000"){document.f_result.notario.value = 44750;document.f_result.registro.value = 17400;}
if (v1 > "21000000" && v1 <= "22000000"){document.f_result.notario.value = 44500;document.f_result.registro.value = 17200;}
if (v1 > "20000000" && v1 <= "21000000"){document.f_result.notario.value = 44250;document.f_result.registro.value = 17000;}
if (v1 > "19000000" && v1 <= "20000000"){document.f_result.notario.value = 44000;document.f_result.registro.value = 16600;}
if (v1 > "18000000" && v1 <= "19000000"){document.f_result.notario.value = 43500;document.f_result.registro.value = 16400;}
if (v1 > "17000000" && v1 <= "18000000"){document.f_result.notario.value = 43000;document.f_result.registro.value = 16200;}
if (v1 > "16000000" && v1 <= "17000000"){document.f_result.notario.value = 42500;document.f_result.registro.value = 16000;}
if (v1 > "15000000" && v1 <= "16000000"){document.f_result.notario.value = 42000;document.f_result.registro.value = 15800;}
if (v1 > "14000000" && v1 <= "15000000"){document.f_result.notario.value = 41500;document.f_result.registro.value = 15500;}
if (v1 > "13000000" && v1 <= "14000000"){document.f_result.notario.value = 41000;document.f_result.registro.value = 15200;}	
if (v1 > "12000000" && v1 <= "13000000"){document.f_result.notario.value = 40500;document.f_result.registro.value = 14900;}
if (v1 > "11000000" && v1 <= "12000000"){document.f_result.notario.value = 40000;document.f_result.registro.value = 14600;}
if (v1 > "10000000" && v1 <= "11000000"){document.f_result.notario.value = 39500;document.f_result.registro.value = 14300;}
if (v1 > "9000000" && v1 <= "10000000"){document.f_result.notario.value = 39000;document.f_result.registro.value = 14000;}
if (v1 > "8000000" && v1 <= "9000000"){document.f_result.notario.value = 38000;document.f_result.registro.value = 13500;}
if (v1 > "7000000" && v1 <= "8000000"){document.f_result.notario.value = 37500;document.f_result.registro.value = 13000;}
if (v1 > "6000000" && v1 <= "7000000"){document.f_result.notario.value = 37000;document.f_result.registro.value = 12500;}
if (v1 > "5000000" && v1 <= "6000000"){document.f_result.notario.value = 36000;document.f_result.registro.value = 12000;}
if (v1 > "4000000" && v1 <= "5000000"){document.f_result.notario.value = 35000;document.f_result.registro.value = 11500;}
if (v1 > "3000000" && v1 <= "4000000"){document.f_result.notario.value = 33000;document.f_result.registro.value = 10500;}
if (v1 > "2000000" && v1 <= "3000000"){document.f_result.notario.value = 30000;document.f_result.registro.value = 9500;}
if (v1 > "1000000" && v1 <= "2000000"){document.f_result.notario.value = 27000;document.f_result.registro.value = 8500;}
if (v1 <= "1000000"){document.f_result.notario.value = 25000;document.f_result.registro.value = 7500;}}