//-------------------------------------------------	
function calcular_onclick() {

	// Pasamos todos los campos a nš antes de operar con ellos
  textbox_to_number(document.formu.importeh);

  valor1 = parseInt(document.formu.importeh.value);

  buscarvalor4(valor1);
	document.f_result.ajd.value = Math.round(parseInt(valor1) * 0.01125);

  textbox_to_euros(document.f_result.notario);
  textbox_to_euros(document.f_result.gestion);
  textbox_to_euros(document.f_result.registro);
  textbox_to_euros(document.f_result.ajd);
  textbox_to_euros(document.f_result.iva);
  
	// Pasamos todos los campos a nš antes de sumarlos
  textbox_to_number(document.f_result.notario);
  textbox_to_number(document.f_result.gestion);
  textbox_to_number(document.f_result.registro);
  textbox_to_number(document.f_result.ajd);
  textbox_to_number(document.f_result.iva);

  // Suma
  suma = 0;
  suma = suma + parseInt(document.f_result.notario.value);
  suma = suma + parseInt(document.f_result.gestion.value);
  suma = suma + parseInt(document.f_result.registro.value);
  suma = suma + parseInt(document.f_result.ajd.value);
  suma = suma + parseInt(document.f_result.iva.value);
  document.f_result.total.value = suma;

}

//-------------------------------------------------
function buscarvalor4(v1){
v1 = v1 * 166.386;
document.f_result.gestion.value = 15000;
document.f_result.iva.value = 2400;
if (v1 > "50000000"){document.f_result.notario.value = 83000;document.f_result.registro.value = 41000;for (i=50000000;i<v1;i+=5000000){document.f_result.notario.value = parseInt(document.f_result.notario.value) + 1000;document.f_result.registro.value = parseInt(document.f_result.registro.value) + 2000;}}
if (v1 > "45000000" && v1 <= "50000000"){document.f_result.notario.value = 83000;document.f_result.ajd.value = 250000;document.f_result.registro.value = 41000;}
if (v1 > "40000000" && v1 <= "45000000"){document.f_result.notario.value = 82000;document.f_result.ajd.value = 225000;document.f_result.registro.value = 39000;}
if (v1 > "35000000" && v1 <= "40000000"){document.f_result.notario.value = 79000;document.f_result.ajd.value = 200000;document.f_result.registro.value = 37000;}
if (v1 > "30000000" && v1 <= "35000000"){document.f_result.notario.value = 76000;document.f_result.ajd.value = 175000;document.f_result.registro.value = 37000;}
if (v1 > "29000000" && v1 <= "30000000"){document.f_result.notario.value = 75000;document.f_result.ajd.value = 150000;document.f_result.registro.value = 36000;}
if (v1 > "28000000" && v1 <= "29000000"){document.f_result.notario.value = 74000;document.f_result.ajd.value = 145000;document.f_result.registro.value = 36000;}
if (v1 > "27000000" && v1 <= "28000000"){document.f_result.notario.value = 73000;document.f_result.ajd.value = 140000;document.f_result.registro.value = 35000;}
if (v1 > "26000000" && v1 <= "27000000"){document.f_result.notario.value = 72000;document.f_result.ajd.value = 135000;document.f_result.registro.value = 35000;}
if (v1 > "25000000" && v1 <= "26000000"){document.f_result.notario.value = 71000;document.f_result.ajd.value = 130000;document.f_result.registro.value = 34000;}
if (v1 > "24000000" && v1 <= "25000000"){document.f_result.notario.value = 70000;document.f_result.ajd.value = 125000;document.f_result.registro.value = 34000;}
if (v1 > "23000000" && v1 <= "24000000"){document.f_result.notario.value = 69000;document.f_result.ajd.value = 120000;document.f_result.registro.value = 33000;}
if (v1 > "22000000" && v1 <= "23000000"){document.f_result.notario.value = 68000;document.f_result.ajd.value = 115000;document.f_result.registro.value = 33000;}
if (v1 > "21000000" && v1 <= "22000000"){document.f_result.notario.value = 67000;document.f_result.ajd.value = 110000;document.f_result.registro.value = 32000;}
if (v1 > "20000000" && v1 <= "21000000"){document.f_result.notario.value = 66000;document.f_result.ajd.value = 105000;document.f_result.registro.value = 31500;}
if (v1 > "19000000" && v1 <= "20000000"){document.f_result.notario.value = 65000;document.f_result.ajd.value = 100000;document.f_result.registro.value = 31500;}
if (v1 > "18000000" && v1 <= "19000000"){document.f_result.notario.value = 64000;document.f_result.ajd.value = 95000;document.f_result.registro.value = 30500;}
if (v1 > "17000000" && v1 <= "18000000"){document.f_result.notario.value = 63000;document.f_result.ajd.value = 90000;document.f_result.registro.value = 29500;}
if (v1 > "16000000" && v1 <= "17000000"){document.f_result.notario.value = 62000;document.f_result.ajd.value = 85000;document.f_result.registro.value = 28500;}
if (v1 > "15000000" && v1 <= "16000000"){document.f_result.notario.value = 61000;document.f_result.ajd.value = 80000;document.f_result.registro.value = 27500;}
if (v1 > "14000000" && v1 <= "15000000"){document.f_result.notario.value = 60000;document.f_result.ajd.value = 75000;document.f_result.registro.value = 26500;}
if (v1 > "13000000" && v1 <= "14000000"){document.f_result.notario.value = 59000;document.f_result.ajd.value = 70000;document.f_result.registro.value = 25500;}
if (v1 > "12000000" && v1 <= "13000000"){document.f_result.notario.value = 58000;document.f_result.ajd.value = 65000;document.f_result.registro.value = 24500;}
if (v1 > "11000000" && v1 <= "12000000"){document.f_result.notario.value = 57000;document.f_result.ajd.value = 60000;document.f_result.registro.value = 23500;}
if (v1 > "10000000" && v1 <= "11000000"){document.f_result.notario.value = 56000;document.f_result.ajd.value = 55000;document.f_result.registro.value = 22500;}
if (v1 > "9000000" && v1 <= "10000000"){document.f_result.notario.value = 55000;document.f_result.ajd.value = 50000;document.f_result.registro.value = 21500;}
if (v1 > "8000000" && v1 <= "9000000"){document.f_result.notario.value = 54000;document.f_result.ajd.value = 45000;document.f_result.registro.value = 20500;}
if (v1 > "7000000" && v1 <= "8000000"){document.f_result.notario.value = 52000;document.f_result.ajd.value = 40000;document.f_result.registro.value = 19500;}
if (v1 > "6000000" && v1 <= "7000000"){document.f_result.notario.value = 50000;document.f_result.ajd.value = 35000;document.f_result.registro.value = 18500;}
if (v1 > "5000000" && v1 <= "6000000"){document.f_result.notario.value = 48000;document.f_result.ajd.value = 30000;document.f_result.registro.value = 17500;}
if (v1 > "4000000" && v1 <= "5000000"){document.f_result.notario.value = 44000;document.f_result.ajd.value = 25000;document.f_result.registro.value = 16500;}
if (v1 > "3000000" && v1 <= "4000000"){document.f_result.notario.value = 41000;document.f_result.ajd.value = 20000;document.f_result.registro.value = 15000;}
if (v1 > "2000000" && v1 <= "3000000"){document.f_result.notario.value = 38000;document.f_result.ajd.value = 15000;document.f_result.registro.value = 13500;}
if (v1 > "1000000" && v1 <= "2000000"){document.f_result.notario.value = 35000;document.f_result.ajd.value = 10000;document.f_result.registro.value = 12500;}
if (v1 <= "1000000"){document.f_result.notario.value = 30000;document.f_result.ajd.value = 5000;document.f_result.registro.value = 11500;}
}