function cc_ek(){restringirNumero(1000000000, 2);}
function cc_eb(obj){esNumeroEntre(obj, 1000000000, 2);}
function cc_tk(){restringirNumero(1000000, 3);}
function cc_tb(obj){esNumeroEntre(obj, 1000000, 3);}
function trim(s){return s.replace(/(^\s*)|(\s*$)/g, '');}
function restringirNumero(max, decimales, bSign, bThousand, bAllow_leading_zeros)
{// evento onKeyPress
	var objTxt = event.srcElement;
	var objValue = objTxt.value;
	var keyCode = event.keyCode;
	
	if (decimales == null) decimales = -2;
	if (bSign == null) bSign = false;
	if (bThousand == null) bThousand = true;
	if (bAllow_leading_zeros == null) bAllow_leading_zeros = false;


	if ((keyCode == 43 || keyCode == 45) && objValue.indexOf('+') == -1 && objValue.indexOf('-') == -1 && bSign)
	{
		// Se ponga donde se ponga un signo siempre aparece al principio y
		// después el cursor se va al final del objeto.
		event.returnValue = false;
		objTxt.value = String.fromCharCode(keyCode) + objTxt.value;
		return false;
	}
	if ((keyCode > 57 || keyCode < 43 || keyCode == 47) || (keyCode == 43 || keyCode == 45) && (objValue.indexOf('+') > -1 || objValue.indexOf('-') > -1 || !bSign) || ((keyCode == 44 || keyCode == 46) && (objValue.indexOf(',') > -1 || decimales == -2)))
	{
		event.returnValue = false;
		esNumeroEntre(objTxt, max, decimales, bSign, bThousand, bAllow_leading_zeros);
		return false;
	}
	if (keyCode == 46) // punto (.)
		event.keyCode = 44; // coma (,)
}
function formatNum(valor, decimales, bSign, bThousand, bAllow_leading_zeros)
{
	var val = stripSpaces(valor);

	if (decimales == null) decimales = -2;
	if (bThousand == null) bThousand = true;
	if (bSign == null) bSign = false;
	if (bAllow_leading_zeros == null) bAllow_leading_zeros = false;

	if (bSign)
		val = comprobarSigno(val); // en esta función ya se llama a stripLeadingZeros(val)
	else
	{
		val = val.replace(/[+-]/g , '');
		if (!(bAllow_leading_zeros && (decimales == -2 || decimales == 0) && !bThousand))
			val = stripLeadingZeros(val);
	}

	if (decimales > -2)
		val = limpiarDecimal(val, decimales);

	if (bThousand)
		val = ponerPuntos(val);
	
	if (isNaN(quitarFormatoNumero(val))) // en caso de que se hubiera pegado un valor erroneo.
		val = valor;
		
	return val;
}
function esNumeroEntre(objTxt, max, decimales, bSign, bThousand, bAllow_leading_zeros)
{
	if (decimales == null) decimales = -2;
	if (bThousand == null) bThousand = true;
	if (bSign == null) bSign = false;
	if (bAllow_leading_zeros == null) bAllow_leading_zeros = false;

	var num = objTxt.value;
	if (decimales == -2)
	{
		num = num.replace(/[,]/g , '');
		objTxt.value = num;
	}
	num = quitarFormatoNumero(num);
	if (trim(num) == '' || trim(num) == '.')
	{
		objTxt.value = '';
		return true;
	}

	var mensaje = 'Debe ser un número menor que ' + ponerPuntos(max) + '\n(el signo decimal debe ser la coma ",")';

	if (!bAllow_leading_zeros)
		num = (num == '')? num: parseFloat(num);

	if (num == '' || (esNumero(num) && num <= max))
	{
		num += '';
		num = num.replace(/[.]/g, ',');
		objTxt.value = formatNum(num, decimales, bSign, bThousand, bAllow_leading_zeros);
		return true;
	}

	alert(mensaje);
	objTxt.focus();
	objTxt.select();
	return false;
}
function esNumero(dato)
{
	dato = '' + dato;
	return (dato != '' && !isNaN(dato) && dato.indexOf('E') == -1 && dato.indexOf('e') == -1);
}
function ponerPuntos(num)
{
	num = '' + num;
	var aux_i = '';
	var aux_d = '';
	var numero = num.replace(/[.]/g, ''); // limpiar formato pero dejar la coma (,)
	var num_sin_dec;
	var decimales = '';
	var num_puntos = '';
	var signo = numero.charAt(0);
	if (signo == '-' || signo == '+')
		numero = numero.substr(1);
	else
		signo = '';
	if (numero.indexOf(',') != -1)
	{
		num_sin_dec = numero.substring(0, numero.indexOf(','));
		decimales = numero.substr(numero.indexOf(','));
	}
	else
		num_sin_dec = numero;

	if (num_sin_dec.length > 3)
	{
		aux_i = num_sin_dec;
		while (aux_i.length > 3)
		{
			aux_d = aux_i.substr(aux_i.length - 3);
			aux_i = aux_i.substr(0, aux_i.length - 3);
			num_puntos = '.' + aux_d + num_puntos;
		}
		num = signo + aux_i + num_puntos + decimales;
	}
	else
		num = signo + numero;
	return num;
}
function quitarFormatoNumero(dato)
{
	dato = '' + dato;
	dato = dato.replace(/[.]/g, '');
	dato = dato.replace(/\,/g, '.');
	return dato;
}
function stripSpaces(s)
{
	return s.replace(/\s/g, '');
}
function comprobarSigno(value)
{
	value = stripLeadingZeros(value);
	if (value == '-' || value == '+') return '';
	if (value.lastIndexOf('+') > 0)
		return value.replace(/[+]/g, '');
	if (value.lastIndexOf('-') > 0)
		return value.replace(/[-]/g, '');
	return value;
}
function stripLeadingZeros(s)
{
	var signo = s.charAt(0);
	if (signo == '-' || signo == '+')
		s = s.substr(1);
	else
		signo = '';

	for (var i = 0; i < s.length; ++i)
		if (s.charAt(i) != '0' || s.charAt(i+1) == ',' || s.charAt(i+1) == '')
			return signo + s.substr(i);
	return signo + s;
}
function redondear(numero, decimales)
{
	if (numero == null || numero == '-' || numero == '+')
		return '';
	if (numero > 99999999999) // los numeros grandes los aproxima como quiere...
		return numero;
	if (decimales == null) decimales = 0;
	var aux = Math.pow(10, decimales);
	return (Math.round(numero * aux)/aux);
}
function limpiarDecimal(numero, decimales)
{
	if (decimales == null) decimales = -2;
	numero = '' + numero;
	var signo = numero.charAt(0);
	if (signo == '-' || signo == '+')
		numero = numero.substr(1);
	else
		signo = '';

	if (decimales > -1)
	{
		numero = '' + redondear(quitarFormatoNumero(numero), decimales);
		numero = numero.replace(/[.]/g, ',');
	}

	var coma_index = numero.indexOf(',');
	if (coma_index == (numero.length - 1))
		numero = numero.substr(0, coma_index);
	else if (coma_index == 0)
		numero = '0' + numero;

	numero = signo + numero;

	return numero;
}

function capital(cuota, interes_anual, anyos, periodos_anyo)
{
	interes_anual /= 100;
	var aux = 1.0 - Math.pow((1.0 + interes_anual / periodos_anyo), -(anyos * periodos_anyo));
	return(cuota * aux / (interes_anual / periodos_anyo));
}
function cuota(capital, interes_anual, anyos, periodos_anyo)
{
	interes_anual /= 100;
	var aux = 1.0 - Math.pow((1.0 + interes_anual / periodos_anyo), -(anyos * periodos_anyo));
	return(capital * (interes_anual / periodos_anyo) / aux);
}
function cuotacarencia2(form){

C=form.C.value;
C=C.replace(".","")
n=form.n.value*1;
var frecuencia;
var ajuste;
frecuencia=12;
ajuste=1;

I=form.I.value;
I=I.replace(",",".");
I=I/(100*frecuencia)
n=form.n.value*1*frecuencia;

//plazo1=form.plazo1.value/ajuste;
var intereses;
intereses=C*I;
intereses=Math.round(intereses);
form.cu.value=intereses;

var plazosin;
//plazosin=n-plazo1;

var pagomes;
pagomes=cuota(C,I,plazosin);
function cuota(C,I,plazosin){
potencia=1+I;
multiplicador=Math.pow(potencia,-plazosin);
multiplicador1=C*I;
pagomes=multiplicador1/(1-multiplicador);
pagomes=Math.round(pagomes);
return pagomes;
}
}
function cuotav(capital, interes_f, anyos_f, interes_v, anyos_v, periodos_anyo)
{
	var cuota_fija = cuota(capital, interes_f, anyos_f + anyos_v, periodos_anyo);
	
	if (anyos_v > 0)
	{
		var capital_restante, capital_amortizado, interes_amortizado, pagos_fijo, i;
		pagos_fijo = anyos_f * periodos_anyo;
		capital_restante = capital;
		for(i = 1; i <= pagos_fijo; i++)
		{
			interes_amortizado = capital_restante * interes_f / (periodos_anyo * 100.0);
			capital_amortizado = cuota_fija - interes_amortizado;
			capital_restante = capital_restante - capital_amortizado;
		}

		return cuota(capital_restante, interes_v, anyos_v, periodos_anyo);
	}
	return cuota_fija;
}
function tae(C, c, n, q)
{
	if (isNaN(c)) return NaN;
	
	var max_dif = 1; if (c < 2) max_dif = 0.2
	var I = 5.0;
	var increm = 1.0;
	var c_aux = cuota(C, I, n, q);
	var dif = c - c_aux;
	var dif_aux ,maxloops = 50;
	
	increm = Math.abs(increm) * (dif / Math.abs(dif)); // poner el signo correcto
	
	if (isNaN(c_aux)) return NaN;

	for (var counter = 0; Math.abs(dif) > max_dif && counter <= maxloops; ++counter)
	{
		I += increm;
		c_aux = cuota(C, I, n, q);
		dif_aux = dif;
		dif = c - c_aux;
		
		increm = dif * increm / (dif_aux - dif);
	//	increm = Math.abs(increm) * (dif / Math.abs(dif)); // poner el signo correcto (no hace falta)
	}

	return I;
}
function plazo(C, c, I, q)
{
	if (isNaN(c)) return NaN;

	var maxloops = 1000;
	var dif_aux = 0;
	var n = 25.0;
	var increm = 1.0;
	var c_aux = cuota(C, I, n, q);
	var dif = c_aux - c;

	if (isNaN(c_aux)) return NaN;

	for (var counter = 0; n > 0 && n <= 100 && counter < maxloops; counter++) // counter se añade para evitar un blucle infinito en caso de errores en el código
	{

		if (Math.abs(dif + dif_aux) < Math.max(dif, dif_aux)) // ((Math.abs(dif) + Math.abs(dif_aux))))
		{
			if (Math.abs(dif) < Math.abs(dif_aux))
				return n;
			else
				return n - increm;
		}
		increm = Math.abs(increm) * (dif / Math.abs(dif)); // poner el signo correcto
		n += increm;
		c_aux = cuota(C, I, n, q);
		dif_aux = dif;
		dif = c_aux - c;
	}
	return n;
}
//_________________________________________________________
function isEmpty(s){return ((s == null) || (s.length == 0));}
function redondear(numero, decimales)
{
	if (isEmpty(numero) || numero == '-' || numero == '+')
		return '';
	if (numero > 99999999999) // los numeros grandes los aproxima como quiere...
		return numero;
	if (isEmpty(decimales)) decimales = 0;
	var aux = Math.pow(10, decimales);
	return (Math.round(numero * aux)/aux);
}

var q = 12;
function calcular()
{
	//alert(document.credito.C.value);
	document.credito.C.value = '';
	//alert(document.credito.C.value);
	var C = quitarFormatoNumero(document.credito.C.value);
	var n = quitarFormatoNumero(document.credito.n.value);
	var I = quitarFormatoNumero(document.credito.I.value);
	var cu = quitarFormatoNumero(document.credito.cu.value);

	if (C == '' && n != '' && I != '' && cu != '')
		calcularCapital(cu, I, n, q);
	else if (n == '' && C != '' && I != '' && cu != '')
		calcularPlazo(C, cu, I, q);
	else if (I == '' && n != '' && C != '' && cu != '')
		calcularInteres(C, cu, n, q);
	else if (cu == '' && n != '' && I != '' && C != '')
		calcularCuota(C, I, n ,q);
	else
		alert('Debe rellenar todos los valores necesarios.');
}
function calcular6()
{
	var C = quitarFormatoNumero(document.credito.C.value);
	var n = quitarFormatoNumero(document.credito.n.value);
	var I = quitarFormatoNumero(document.credito.I.value);
	var cu = quitarFormatoNumero(document.credito.cu.value);

	if (C == '' && n != '' && I != '' && cu != '')
		calcularCapital(cu, I, n, q);
	else if (n == '' && C != '' && I != '' && cu != '')
		calcularPlazo(C, cu, I, q);
	else if (I == '' && n != '' && C != '' && cu != '')
		calcularInteres(C, cu, n, q);
	else if (cu == '' && n != '' && I != '' && C != '')
		calcularCuota6(C, I, n ,q);
	else
		alert('Debe rellenar todos los valores necesarios.');
}
function calcularPlazo(C, cu, I, q)
{
	var p = plazo(C, cu, I, q);
	if (isNaN(p))
		alert('Los datos proporcionados no son coherentes.\nEl cálculo no se puede hacer.\n');
	else if (p <= 0)
		document.credito.n.value = '< 0';
	else if (p > 100)
		document.credito.n.value = '> 100';
	else
		document.credito.n.value = p;
}
function calcularCapital(cu, I, n, q)
{
	var c = capital(cu, I, n, q);
	if (isNaN(c))
		alert('Los datos proporcionados no son coherentes.\n\nEl cálculo no se puede hacer.\n');
	else
		document.credito.C.value = ponerPuntos(Math.round(c));
}
function calcularCuota(C, I, n ,q)
{
	var c = cuota(C, I, n ,q);
	if (isNaN(c))
		alert('Los datos proporcionados no son coherentes.\n\nEl cálculo no se puede hacer.\n');
	else
	{
		c = '' + redondear(c, 2);
		document.credito.cu.value = ponerPuntos(c.replace(/[.]/g, ','));
	}
}
function calcularCuota6(C, I, n ,q)
{
	var c = cuotacarencia2(document.credito);
	c=document.credito.cu.value
	if (isNaN(c))
		alert('Los datos proporcionados no son coherentes.\n\nEl cálculo no se puede hacer.\n');
	else
	{
		c = '' + redondear(c, 2);
		document.credito.cu.value = ponerPuntos(c.replace(/[.]/g, ','));
	}
}
function calcularInteres(C, cu, n, q)
{
	var i = tae(C, cu, n, q);
	if (isNaN(i))
		alert('Los datos proporcionados no son coherentes.\n');
	else if (i >= 0)
	{
		i = '' + redondear(i, 3);
		document.credito.I.value = i.replace(/[.]/g, ',');
	}
	else
		alert('El interés calculado es menor que cero. \n\nLa cuota y/o el plazo son demasido bajos.\n');
}
function Validacion(valor){
if (document.hipoteca.i1.value==""){Window.alert("Es obligatorio rellenar el campo Interés");}
else if(document.hipoteca.anos.value==""){Window.alert("Es obligatorio rellenar el campo años");}
else if(document.formu.importeh.value==""){Window.alert("Es obligatorio rellenar el campo dinero");}
else{
if (valor=="x"){
	if (document.hipoteca.MinApert.value==""){document.hipoteca.MinApert.value=0}
	if (document.hipoteca.Comision.value==""){document.hipoteca.Comision.value=0}
	document.hipoteca.result.value="resultados";
	}
document.hipoteca.submit();}}
//-------------------------------------------------
function euro(){
	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);
		if (!(document.formu.importeh.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 (!(document.formu.valorh.value == "")){
			valor_actual = valor2 / 166.386;
			document.formu.valorh.value = Math.round(valor_actual);
			document.formu.valorh.value = Formato_numero(document.formu.valorh.value);
		}
		document.f_result.comision_hg.value = 2495;
	}
}
//-------------------------------------------------
function pts(){
	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);
		if (!(document.formu.importeh.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 (!(document.formu.valorh.value == "")){
			valor_actual = valor2 * 166.386;
			document.formu.valorh.value = Math.round(valor_actual);
			document.formu.valorh.value = Formato_numero(document.formu.valorh.value);
			alert ("El valor en pesetas se reajusto!");
		}
		document.f_result.comision_hg.value = parseInt(document.f_result.comision_hg.value * 166.386);
	}
}
//-------------------------------------------------
function calcular_onclick() 
{
valor1=Delete_miles(document.formu.importeh.value);
valor2=Delete_miles(document.formu.valorh.value);
var provincia;
provincia = document.formu.provin.value;
if (!(document.formu.importeh.value == "") && !(document.formu.valorh.value == "" ))
	{
	var suma;
	buscarvalor(valor1, valor2);
	if (document.formu.radioviv[0].checked)
	{
	  	document.f_result.ivaviv.value = valor2 * 0.07;
	  	document.f_result.itp.value = "";

		if (document.formu.provin.options[document.formu.provin.selectedIndex].text.toLowerCase() == 'extremadura') // arreglo para extremadura solo. 22/01/2003
		{
			document.f_result.impuesto2.value = valor2 * 0.01;
	 	  	document.f_result.impuesto.value = valor1 * 0.01;
		}
		else
		{
			document.f_result.impuesto2.value = valor2 * 0.005;
	 	  	document.f_result.impuesto.value = valor1 * 0.005;
		}
	}
	else
	{
		if (document.formu.provin.options[document.formu.provin.selectedIndex].text.toLowerCase() == 'extremadura') // arreglo para extremadura solo. 22/01/2003
	 	  	document.f_result.impuesto.value = valor1 * 0.01;
		else
		  	document.f_result.impuesto.value = valor1 * 0.008;

	  	document.f_result.itp.value = valor2 * provincia;
 	  	document.f_result.impuesto2.value = "";
	  	document.f_result.ivaviv.value = "";
	}

	document.f_result.comision.value = valor1 * 0.01;
	if (document.formu.radio[0].checked)
		{
		document.f_result.tasacion.value = 30000;
		document.f_result.seguro.value = 50000;
       		if (document.formu.radioviv[0].checked)
       			{
 		    	suma = parseInt(document.f_result.impuesto2.value) + parseInt(document.f_result.seguro.value) + parseInt(document.f_result.comision.value) + parseInt(document.f_result.iva.value) + parseInt(document.f_result.tasacion.value) + parseInt(document.f_result.impuesto.value) + parseInt(document.f_result.notario.value) + parseInt(document.f_result.gestion.value) + parseInt(document.f_result.registro.value) + parseInt(document.f_result.notariocv.value) + parseInt(document.f_result.registrocv.value) + parseInt(document.f_result.gestioncv.value) + parseInt(document.f_result.ivacv.value) + parseInt(document.f_result.ivaviv.value) + parseInt(document.f_result.comision_hg.value);
 		    	suma_hipo = parseInt(document.f_result.seguro.value) + parseInt(document.f_result.comision.value) + parseInt(document.f_result.iva.value) + parseInt(document.f_result.tasacion.value) + parseInt(document.f_result.impuesto.value) + parseInt(document.f_result.notario.value) + parseInt(document.f_result.gestion.value) + parseInt(document.f_result.registro.value) + parseInt(document.f_result.comision_hg.value);
 		    	suma_compra = parseInt(document.f_result.notariocv.value) + parseInt(document.f_result.impuesto2.value) + parseInt(document.f_result.registrocv.value) + parseInt(document.f_result.gestioncv.value) + parseInt(document.f_result.ivacv.value) + parseInt(document.f_result.ivaviv.value);
       			}
       		else
       			{
 		    	suma = parseInt(document.f_result.seguro.value) + parseInt(document.f_result.comision.value) + parseInt(document.f_result.iva.value) + parseInt(document.f_result.tasacion.value) + parseInt(document.f_result.impuesto.value) + parseInt(document.f_result.notario.value) + parseInt(document.f_result.gestion.value) + parseInt(document.f_result.registro.value) + parseInt(document.f_result.notariocv.value) + parseInt(document.f_result.registrocv.value) + parseInt(document.f_result.gestioncv.value) + parseInt(document.f_result.ivacv.value) + parseInt(document.f_result.itp.value) + parseInt(document.f_result.comision_hg.value);
 		    	suma_hipo = parseInt(document.f_result.seguro.value) + parseInt(document.f_result.comision.value) + parseInt(document.f_result.iva.value) + parseInt(document.f_result.tasacion.value) + parseInt(document.f_result.impuesto.value) + parseInt(document.f_result.notario.value) + parseInt(document.f_result.gestion.value) + parseInt(document.f_result.registro.value) + parseInt(document.f_result.comision_hg.value);
 		    	suma_compra = parseInt(document.f_result.notariocv.value) + parseInt(document.f_result.registrocv.value) + parseInt(document.f_result.gestioncv.value) + parseInt(document.f_result.ivacv.value) + parseInt(document.f_result.itp.value);
       			}  
		document.f_result.seguro.value = Formato_numero(document.f_result.seguro.value);
		document.f_result.tasacion.value = Formato_numero(document.f_result.tasacion.value);
		document.f_result.total.value = Formato_numero(suma);
		document.f_result.comision.value = Formato_numero(Math.round(document.f_result.comision.value));
		document.f_result.iva.value = Formato_numero(document.f_result.iva.value);	
		document.f_result.tasacion.value = Formato_numero(document.f_result.tasacion.value);	
		document.f_result.impuesto.value = Formato_numero(Math.round(document.f_result.impuesto.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);	
		document.f_result.notariocv.value = Formato_numero(document.f_result.notariocv.value);	
		document.f_result.registrocv.value = Formato_numero(document.f_result.registrocv.value);	
		document.f_result.ivacv.value = Formato_numero(document.f_result.ivacv.value);	
		document.f_result.gestioncv.value = Formato_numero(document.f_result.gestioncv.value);
		document.f_result.total_compra.value = Formato_numero(suma_compra);
		document.f_result.total_hipo.value = Formato_numero(suma_hipo);
              	if (document.formu.radioviv[0].checked)
              		{
         		document.f_result.ivaviv.value = Formato_numero(Math.round(document.f_result.ivaviv.value));
	        	document.f_result.impuesto2.value = Formato_numero(Math.round(document.f_result.impuesto2.value));
	          	}
	    	else
          		{
	 		document.f_result.itp.value = Formato_numero(Math.round(document.f_result.itp.value));
	       		}
		}	
	else
		{
		document.f_result.seguro.value = 300;
		document.f_result.iva.value = document.f_result.iva.value / 166.386;
		document.f_result.tasacion.value = document.f_result.tasacion.value / 166.386;
		document.f_result.notario.value = document.f_result.notario.value / 166.386;
		document.f_result.gestion.value = document.f_result.gestion.value / 166.386;
		document.f_result.registro.value = document.f_result.registro.value / 166.386;
		document.f_result.notariocv.value = document.f_result.notariocv.value / 166.386;
		document.f_result.registrocv.value = document.f_result.registrocv.value / 166.386;
		document.f_result.ivacv.value = document.f_result.ivacv.value / 166.386;
		document.f_result.gestioncv.value = document.f_result.gestioncv.value / 166.386;
		document.f_result.tasacion.value = 180.3;
        	if (document.formu.radioviv[0].checked)
        		{
  		    	suma = parseInt(document.f_result.impuesto2.value) + parseInt(document.f_result.seguro.value) + parseInt(document.f_result.comision.value) + parseInt(document.f_result.iva.value) + parseInt(document.f_result.tasacion.value) + parseInt(document.f_result.impuesto.value) + parseInt(document.f_result.notario.value) + parseInt(document.f_result.gestion.value) + parseInt(document.f_result.registro.value) + parseInt(document.f_result.notariocv.value) + parseInt(document.f_result.registrocv.value) + parseInt(document.f_result.gestioncv.value) + parseInt(document.f_result.ivacv.value) + parseInt(document.f_result.ivaviv.value) + parseInt(document.f_result.comision_hg.value);
  		    	suma_hipo = parseInt(document.f_result.seguro.value) + parseInt(document.f_result.comision.value) + parseInt(document.f_result.iva.value) + parseInt(document.f_result.tasacion.value) + parseInt(document.f_result.impuesto.value) + parseInt(document.f_result.notario.value) + parseInt(document.f_result.gestion.value) + parseInt(document.f_result.registro.value) + parseInt(document.f_result.comision_hg.value);
  		    	suma_compra = parseInt(document.f_result.notariocv.value) + parseInt(document.f_result.impuesto2.value) + parseInt(document.f_result.registrocv.value) + parseInt(document.f_result.gestioncv.value) + parseInt(document.f_result.ivacv.value) + parseInt(document.f_result.ivaviv.value);
        		}
        	else
              		{
  		    	suma = parseInt(document.f_result.seguro.value) + parseInt(document.f_result.comision.value) + parseInt(document.f_result.iva.value) + parseInt(document.f_result.tasacion.value) + parseInt(document.f_result.impuesto.value) + parseInt(document.f_result.notario.value) + parseInt(document.f_result.gestion.value) + parseInt(document.f_result.registro.value) + parseInt(document.f_result.notariocv.value) + parseInt(document.f_result.registrocv.value) + parseInt(document.f_result.gestioncv.value) + parseInt(document.f_result.ivacv.value) + parseInt(document.f_result.itp.value) + parseInt(document.f_result.comision_hg.value);
  		    	suma_hipo = parseInt(document.f_result.seguro.value) + parseInt(document.f_result.comision.value) + parseInt(document.f_result.iva.value) + parseInt(document.f_result.tasacion.value) + parseInt(document.f_result.impuesto.value) + parseInt(document.f_result.notario.value) + parseInt(document.f_result.gestion.value) + parseInt(document.f_result.registro.value) + parseInt(document.f_result.comision_hg.value);
  		    	suma_compra = parseInt(document.f_result.notariocv.value) + parseInt(document.f_result.registrocv.value) + parseInt(document.f_result.gestioncv.value) + parseInt(document.f_result.ivacv.value) + parseInt(document.f_result.itp.value);
              		}  
		document.f_result.total.value = Formato_numero(Math.round(suma));
		document.f_result.comision.value = Formato_numero(Math.round(document.f_result.comision.value));
		document.f_result.iva.value = Formato_numero(Math.round(document.f_result.iva.value));	
		document.f_result.tasacion.value = Formato_numero(Math.round(document.f_result.tasacion.value));	
		document.f_result.impuesto.value = Formato_numero(Math.round(document.f_result.impuesto.value));	
	  	document.f_result.notario.value = Formato_numero(Math.round(document.f_result.notario.value));	
		document.f_result.gestion.value = Formato_numero(Math.round(document.f_result.gestion.value));	
		document.f_result.registro.value = Formato_numero(Math.round(document.f_result.registro.value));
		document.f_result.notariocv.value = Formato_numero(Math.round(document.f_result.notariocv.value));	
		document.f_result.registrocv.value = Formato_numero(Math.round(document.f_result.registrocv.value));
		document.f_result.ivacv.value = Formato_numero(Math.round(document.f_result.ivacv.value));	
		document.f_result.gestioncv.value = Formato_numero(Math.round(document.f_result.gestioncv.value));
		document.f_result.total_compra.value = Formato_numero(Math.round(suma_compra));
		document.f_result.total_hipo.value = Formato_numero(Math.round(suma_hipo));	
            	if (document.formu.radioviv[0].checked)
            		{
        		document.f_result.impuesto2.value = Formato_numero(Math.round(document.f_result.impuesto2.value));
    	    		document.f_result.ivaviv.value = Formato_numero(Math.round(document.f_result.ivaviv.value));
    	    		}
    	    	else
    	    		{
     	    		document.f_result.itp.value = Formato_numero(Math.round(document.f_result.itp.value));
    	    		}
		}
	}
if (document.formu.valorh.value == "")
{
	buscarvalor(valor1, valor2);

	if (document.formu.provin.options[document.formu.provin.selectedIndex].text.toLowerCase() == 'extremadura') // arreglo para extremadura solo. 22/01/2003
 	  	document.f_result.impuesto.value = valor1 * 0.01;
	else
    	document.f_result.impuesto.value = valor1 * 0.005;

	document.f_result.comision.value = valor1 * 0.01;
	if (document.formu.radio[0].checked)
		{
		document.f_result.tasacion.value = 30000;
		document.f_result.seguro.value = 50000;
       	    	suma_hipo = parseInt(document.f_result.seguro.value) + parseInt(document.f_result.comision.value) + parseInt(document.f_result.iva.value) + parseInt(document.f_result.tasacion.value) + parseInt(document.f_result.impuesto.value) + parseInt(document.f_result.notario.value) + parseInt(document.f_result.gestion.value) + parseInt(document.f_result.registro.value) + parseInt(document.f_result.comision_hg.value);
		suma_compra = "";
		suma = suma_hipo;
		document.f_result.seguro.value = Formato_numero(document.f_result.seguro.value);
		document.f_result.tasacion.value = Formato_numero(document.f_result.tasacion.value);
		document.f_result.total.value = Formato_numero(suma);
		document.f_result.comision.value = Formato_numero(Math.round(document.f_result.comision.value));
		document.f_result.iva.value = Formato_numero(document.f_result.iva.value);	
		document.f_result.tasacion.value = Formato_numero(document.f_result.tasacion.value);	
		document.f_result.impuesto.value = Formato_numero(Math.round(document.f_result.impuesto.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);	
		document.f_result.notariocv.value = "";	
		document.f_result.registrocv.value = "";	
		document.f_result.ivacv.value = "";	
		document.f_result.gestioncv.value = "";
		document.f_result.total_compra.value = "";
		document.f_result.total_hipo.value = Formato_numero(suma_hipo);
		}
	else
		{
		document.f_result.seguro.value = 300;
		document.f_result.iva.value = document.f_result.iva.value / 166.386;
		document.f_result.tasacion.value = document.f_result.tasacion.value / 166.386;
		document.f_result.notario.value = document.f_result.notario.value / 166.386;
		document.f_result.gestion.value = document.f_result.gestion.value / 166.386;
		document.f_result.registro.value = document.f_result.registro.value / 166.386;
		document.f_result.tasacion.value = 180.3;
      		suma_hipo = parseInt(document.f_result.seguro.value) + parseInt(document.f_result.comision.value) + parseInt(document.f_result.iva.value) + parseInt(document.f_result.tasacion.value) + parseInt(document.f_result.impuesto.value) + parseInt(document.f_result.notario.value) + parseInt(document.f_result.gestion.value) + parseInt(document.f_result.registro.value) + parseInt(document.f_result.comision_hg.value);
		suma_compra = "";
		suma = suma_hipo;
		document.f_result.total.value = Formato_numero(Math.round(suma));
		document.f_result.comision.value = Formato_numero(Math.round(document.f_result.comision.value));
		document.f_result.iva.value = Formato_numero(Math.round(document.f_result.iva.value));	
		document.f_result.tasacion.value = Formato_numero(Math.round(document.f_result.tasacion.value));	
		document.f_result.impuesto.value = Formato_numero(Math.round(document.f_result.impuesto.value));	
	  	document.f_result.notario.value = Formato_numero(Math.round(document.f_result.notario.value));	
		document.f_result.gestion.value = Formato_numero(Math.round(document.f_result.gestion.value));	
		document.f_result.registro.value = Formato_numero(Math.round(document.f_result.registro.value));
		document.f_result.total_hipo.value = Formato_numero(Math.round(suma_hipo));	
		}
	document.f_result.notariocv.value = "";	
	document.f_result.registrocv.value = "";	
	document.f_result.ivacv.value = "";	
	document.f_result.gestioncv.value = "";
	document.f_result.total_compra.value = "";
	document.f_result.impuesto2.value = "";
	document.f_result.ivaviv.value = "";
	document.f_result.itp.value = "";
	document.f_result.ivaviv.value = "";
	}
	if (document.formu.importeh.value == "")
		{
		var suma;
		valor1 = 0;
		document.f_result.seguro.value = "";
		buscarvalor(valor1, valor2);
		if (document.formu.radioviv[0].checked)
		{
			if (document.formu.provin.options[document.formu.provin.selectedIndex].text.toLowerCase == 'extremadura') // arreglo para extremadura solo. 22/01/2003
		 	  	document.f_result.impuesto2.value = valor1 * 0.01;
			else
		  		document.f_result.impuesto2.value = valor2 * 0.005;

	  		document.f_result.ivaviv.value = valor2 * 0.07;
	  		document.f_result.itp.value = "";
		}
		else
			{
	  		document.f_result.itp.value = valor2 * provincia;
	  		document.f_result.impuesto2.value = "";
	  		document.f_result.ivaviv.value = "";
			}
		if (document.formu.radio[0].checked)
			{
       			if (document.formu.radioviv[0].checked)
       				{
		    		suma_hipo = "";
		    		suma_compra = parseInt(document.f_result.impuesto2.value) + parseInt(document.f_result.notariocv.value) + parseInt(document.f_result.registrocv.value) + parseInt(document.f_result.gestioncv.value) + parseInt(document.f_result.ivacv.value) + parseInt(document.f_result.ivaviv.value);
		    		suma = suma_compra;
       				}
       			else
      				{
		    		suma_hipo = "";
		    		suma_compra = parseInt(document.f_result.notariocv.value) + parseInt(document.f_result.registrocv.value) + parseInt(document.f_result.gestioncv.value) + parseInt(document.f_result.ivacv.value) + parseInt(document.f_result.itp.value);
		    		suma = suma_compra;
       				}  
			document.f_result.notariocv.value = Formato_numero(document.f_result.notariocv.value);	
			document.f_result.registrocv.value = Formato_numero(document.f_result.registrocv.value);	
			document.f_result.ivacv.value = Formato_numero(document.f_result.ivacv.value);	
			document.f_result.gestioncv.value = Formato_numero(document.f_result.gestioncv.value);
			document.f_result.total_compra.value = Formato_numero(suma_compra);
			document.f_result.total_hipo.value = "";
       			if (document.formu.radioviv[0].checked)
      				{
      	  	  		document.f_result.impuesto2.value = Formato_numero(Math.round(document.f_result.impuesto2.value));
        	  		document.f_result.ivaviv.value = Formato_numero(Math.round(document.f_result.ivaviv.value));
          			}
          		else
          			{
    	  			document.f_result.itp.value = Formato_numero(Math.round(document.f_result.itp.value));
          			}
			}
		else
			{
			document.f_result.notariocv.value = document.f_result.notariocv.value / 166.386;
			document.f_result.registrocv.value = document.f_result.registrocv.value / 166.386;
			document.f_result.ivacv.value = document.f_result.ivacv.value / 166.386;
			document.f_result.gestioncv.value = document.f_result.gestioncv.value / 166.386;
			if (document.formu.radioviv[0].checked)
              			{
  			    	suma_hipo = "";
  			    	suma_compra = parseInt(document.f_result.impuesto2.value) + parseInt(document.f_result.notariocv.value) + parseInt(document.f_result.registrocv.value) + parseInt(document.f_result.gestioncv.value) + parseInt(document.f_result.ivacv.value) + parseInt(document.f_result.ivaviv.value);
  			    	suma = suma_compra;
              			}
              		else
              			{
  			    	suma_hipo = "";
  			    	suma_compra = parseInt(document.f_result.notariocv.value) + parseInt(document.f_result.registrocv.value) + parseInt(document.f_result.gestioncv.value) + parseInt(document.f_result.ivacv.value) + parseInt(document.f_result.itp.value);
  			    	suma = suma_compra;
             			}  
			document.f_result.total.value = Formato_numero(Math.round(suma));
			document.f_result.notariocv.value = Formato_numero(Math.round(document.f_result.notariocv.value));	
			document.f_result.registrocv.value = Formato_numero(Math.round(document.f_result.registrocv.value));
			document.f_result.ivacv.value = Formato_numero(Math.round(document.f_result.ivacv.value));	
			document.f_result.gestioncv.value = Formato_numero(Math.round(document.f_result.gestioncv.value));
			document.f_result.total_compra.value = Formato_numero(Math.round(suma_compra));
			document.f_result.total_hipo.value = "";	
            		if (document.formu.radioviv[0].checked)
            			{
        			document.f_result.impuesto2.value = Formato_numero(Math.round(document.f_result.impuesto2.value));
    	    			document.f_result.ivaviv.value = Formato_numero(Math.round(document.f_result.ivaviv.value));
    	    			}
    	    		else
    	    			{
     	    			document.f_result.itp.value = Formato_numero(Math.round(document.f_result.itp.value));
    	    			}
			}
			document.f_result.comision.value = "";
			document.f_result.iva.value = "";	
			document.f_result.tasacion.value = "";	
			document.f_result.impuesto.value = "";	
			document.f_result.notario.value = "";	
			document.f_result.gestion.value = "";	
			document.f_result.registro.value = "";
			document.f_result.total.value = document.f_result.total_compra.value;
		}
		if ((document.formu.importeh.value == "") && (document.formu.valorh.value == "" ))
		{
		document.f_result.seguro.value = "";
		document.f_result.tasacion.value = "";
		document.f_result.total.value = "";
		document.f_result.comision.value = "";
		document.f_result.iva.value = "";	
		document.f_result.tasacion.value = "";	
		document.f_result.impuesto.value = "";	
		document.f_result.notario.value = "";	
		document.f_result.gestion.value = "";	
		document.f_result.registro.value = "";	
		document.f_result.notariocv.value = "";	
		document.f_result.registrocv.value = "";	
		document.f_result.ivacv.value = "";	
		document.f_result.gestioncv.value = "";
		document.f_result.total_compra.value = "";
		document.f_result.total_hipo.value = "";
    	    	document.f_result.ivaviv.value = "";
    	    	document.f_result.impuesto2.value = "";
    	    	alert ("Por favor rellene alguno de los importes");
        	}
	}
//-------------------------------------------------	
function buscarvalor(v1, v2){
if (document.formu.radio[1].checked)
	{
	v2 = v2 * 166.386;
	v1 = v1 * 166.386;
	}
if (v1 > "95000000"){document.f_result.notario.value = 137000;document.f_result.registro.value = 87000;
	for (i=95000000;i<v1;i+=1000000){document.f_result.notario.value = parseInt(document.f_result.notario.value) + 500;document.f_result.registro.value = parseInt(document.f_result.registro.value) + 500;}
	document.f_result.gestion.value = 64500;
	document.f_result.iva.value = 10320;}
if (v1 > "90000000" && v1 <= "95000000"){document.f_result.notario.value = 134500;document.f_result.registro.value = 84500;document.f_result.gestion.value = 64500;document.f_result.iva.value = 10320;}
if (v1 > "85000000" && v1 <= "90000000"){document.f_result.notario.value = 132000;document.f_result.registro.value = 82000;document.f_result.gestion.value = 64500;document.f_result.iva.value = 10320;}
if (v1 > "80000000" && v1 <= "85000000"){document.f_result.notario.value = 129500;document.f_result.registro.value = 79500;document.f_result.gestion.value = 64500;document.f_result.iva.value = 10320;}
if (v1 > "75000000" && v1 <= "80000000"){document.f_result.notario.value = 127000;document.f_result.registro.value = 77000;document.f_result.gestion.value = 64500;document.f_result.iva.value = 10320;}
if (v1 > "70000000" && v1 <= "75000000"){document.f_result.notario.value = 124500;document.f_result.registro.value = 74500;document.f_result.gestion.value = 64500;document.f_result.iva.value = 10320;}
if (v1 > "65000000" && v1 <= "70000000"){document.f_result.notario.value = 122000;document.f_result.registro.value = 72000;document.f_result.gestion.value = 64500;document.f_result.iva.value = 10320;}
if (v1 > "60000000" && v1 <= "65000000"){document.f_result.notario.value = 119500;document.f_result.registro.value = 69500;document.f_result.gestion.value = 64500;document.f_result.iva.value = 10320;}
if (v1 > "55000000" && v1 <= "60000000"){document.f_result.notario.value = 117000;document.f_result.registro.value = 67000;document.f_result.gestion.value = 64500;document.f_result.iva.value = 10320;}
if (v1 > "50000000" && v1 <= "55000000"){document.f_result.notario.value = 114500;document.f_result.registro.value = 64500;document.f_result.gestion.value = 64500;document.f_result.iva.value = 10320;}
if (v1 > "45000000" && v1 <= "50000000"){document.f_result.notario.value = 112000;document.f_result.registro.value = 62000;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "40000000" && v1 <= "45000000"){document.f_result.notario.value = 109500;document.f_result.registro.value = 59500;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "35000000" && v1 <= "40000000"){document.f_result.notario.value = 107000;document.f_result.registro.value = 57000;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "30000000" && v1 <= "35000000"){document.f_result.notario.value = 104500;document.f_result.registro.value = 54500;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "29000000" && v1 <= "30000000"){document.f_result.notario.value = 102000;document.f_result.registro.value = 52000;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "28000000" && v1 <= "29000000"){document.f_result.notario.value = 100500;document.f_result.registro.value = 51000;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "27000000" && v1 <= "28000000"){document.f_result.notario.value = 99000;document.f_result.registro.value = 50000;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "26000000" && v1 <= "27000000"){document.f_result.notario.value = 97500;document.f_result.registro.value = 49000;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "25000000" && v1 <= "26000000"){document.f_result.notario.value = 96000;document.f_result.registro.value = 48000;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "24000000" && v1 <= "25000000"){document.f_result.notario.value = 94500;document.f_result.registro.value = 47000;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "23000000" && v1 <= "24000000"){document.f_result.notario.value = 93000;document.f_result.registro.value = 46000;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "22000000" && v1 <= "23000000"){document.f_result.notario.value = 91500;document.f_result.registro.value = 45000;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "21000000" && v1 <= "22000000"){document.f_result.notario.value = 90000;document.f_result.registro.value = 44000;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "20000000" && v1 <= "21000000"){document.f_result.notario.value = 88500;document.f_result.registro.value = 43000;document.f_result.gestion.value = 49500;document.f_result.iva.value = 7920;}
if (v1 > "19000000" && v1 <= "20000000"){document.f_result.notario.value = 87000;document.f_result.registro.value = 42500;document.f_result.gestion.value = 39500;document.f_result.iva.value = 6320;}
if (v1 > "18000000" && v1 <= "19000000"){document.f_result.notario.value = 85500;document.f_result.registro.value = 41000;document.f_result.gestion.value = 39500;document.f_result.iva.value = 6320;}
if (v1 > "17000000" && v1 <= "18000000"){document.f_result.notario.value = 84000;document.f_result.registro.value = 39500;document.f_result.gestion.value = 39500;document.f_result.iva.value = 6320;}
if (v1 > "16000000" && v1 <= "17000000"){document.f_result.notario.value = 82500;document.f_result.registro.value = 38000;document.f_result.gestion.value = 39500;document.f_result.iva.value = 6320;}
if (v1 > "15000000" && v1 <= "16000000"){document.f_result.notario.value = 81000;document.f_result.registro.value = 36500;document.f_result.gestion.value = 39500;document.f_result.iva.value = 6320;}
if (v1 > "14000000" && v1 <= "15000000"){document.f_result.notario.value = 79500;document.f_result.registro.value = 35000;document.f_result.gestion.value = 34500;document.f_result.iva.value = 5520;}
if (v1 > "13000000" && v1 <= "14000000"){document.f_result.notario.value = 78000;document.f_result.registro.value = 34500;document.f_result.gestion.value = 34500;document.f_result.iva.value = 5520;}
if (v1 > "12000000" && v1 <= "13000000"){document.f_result.notario.value = 76500;document.f_result.registro.value = 33000;document.f_result.gestion.value = 34500;document.f_result.iva.value = 5520;}
if (v1 > "11000000" && v1 <= "12000000"){document.f_result.notario.value = 75000;document.f_result.registro.value = 31500;document.f_result.gestion.value = 34500;document.f_result.iva.value = 5520;}
if (v1 > "10000000" && v1 <= "11000000"){document.f_result.notario.value = 73500;document.f_result.registro.value = 30000;document.f_result.gestion.value = 34500;document.f_result.iva.value = 5520;}
if (v1 > "9000000" && v1 <= "10000000"){document.f_result.notario.value = 72000;document.f_result.registro.value = 28500;document.f_result.gestion.value = 27000;document.f_result.iva.value = 4320;}
if (v1 > "8000000" && v1 <= "9000000"){document.f_result.notario.value = 71000;document.f_result.registro.value = 27000;document.f_result.gestion.value = 27000;document.f_result.iva.value = 4320;}
if (v1 > "7000000" && v1 <= "8000000"){document.f_result.notario.value = 67000;document.f_result.registro.value = 25500;document.f_result.gestion.value = 27000;document.f_result.iva.value = 4320;}
if (v1 > "6000000" && v1 <= "7000000"){document.f_result.notario.value = 63000;document.f_result.registro.value = 24000;document.f_result.gestion.value = 27000;document.f_result.iva.value = 4320;}
if (v1 > "5000000" && v1 <= "6000000"){document.f_result.notario.value = 59000;document.f_result.registro.value = 22500;document.f_result.gestion.value = 27000;document.f_result.iva.value = 4320;}
if (v1 > "4000000" && v1 <= "5000000"){document.f_result.notario.value = 55000;document.f_result.registro.value = 21000;document.f_result.gestion.value = 22000;document.f_result.iva.value = 3520;}
if (v1 > "3000000" && v1 <= "4000000"){document.f_result.notario.value = 51000;document.f_result.registro.value = 19500;document.f_result.gestion.value = 22000;document.f_result.iva.value = 3520;}
if (v1 > "2000000" && v1 <= "3000000"){document.f_result.notario.value = 47000;document.f_result.registro.value = 18000;document.f_result.gestion.value = 22000;document.f_result.iva.value = 3520;}
if (v1 > "1000000" && v1 <= "2000000"){document.f_result.notario.value = 43000;document.f_result.registro.value = 16500;document.f_result.gestion.value = 22000;document.f_result.iva.value = 3520;}
if (v1 <= "1000000"){document.f_result.notario.value = 35000;document.f_result.registro.value = 15000;document.f_result.gestion.value = 22000;document.f_result.iva.value = 3520;}
// fin calculo de gastos para hipoteca
if (v2 > "95000000"){document.f_result.notariocv.value = 150000;document.f_result.registrocv.value = 84000;
	for (i=95000000;i<v2;i+=1000000){document.f_result.notariocv.value = parseInt(document.f_result.notariocv.value) + 500;document.f_result.registrocv.value = parseInt(document.f_result.registrocv.value) + 500;}
		document.f_result.gestioncv.value = 50000;
		document.f_result.ivacv.value = 8000;}
if (v2 > "90000000" && v2 <= "95000000"){document.f_result.notariocv.value = 145000;document.f_result.registrocv.value = 82000;document.f_result.gestioncv.value = 50000;document.f_result.ivacv.value = 8000;}
if (v2 > "85000000" && v2 <= "90000000"){document.f_result.notariocv.value = 140000;document.f_result.registrocv.value = 80000;document.f_result.gestioncv.value = 50000;document.f_result.ivacv.value = 8000;}
if (v2 > "80000000" && v2 <= "85000000"){document.f_result.notariocv.value = 135000;document.f_result.registrocv.value = 78000;document.f_result.gestioncv.value = 50000;document.f_result.ivacv.value = 8000;}
if (v2 > "75000000" && v2 <= "80000000"){document.f_result.notariocv.value = 130000;document.f_result.registrocv.value = 76000;document.f_result.gestioncv.value = 50000;document.f_result.ivacv.value = 8000;}
if (v2 > "70000000" && v2 <= "75000000"){document.f_result.notariocv.value = 125000;document.f_result.registrocv.value = 74000;document.f_result.gestioncv.value = 50000;document.f_result.ivacv.value = 8000;}
if (v2 > "65000000" && v2 <= "70000000"){document.f_result.notariocv.value = 120000;document.f_result.registrocv.value = 72000;document.f_result.gestioncv.value = 50000;document.f_result.ivacv.value = 8000;}
if (v2 > "60000000" && v2 <= "65000000"){document.f_result.notariocv.value = 115000;document.f_result.registrocv.value = 70000;document.f_result.gestioncv.value = 45000;document.f_result.ivacv.value = 7200;}
if (v2 > "55000000" && v2 <= "60000000"){document.f_result.notariocv.value = 110000;document.f_result.registrocv.value = 68000;document.f_result.gestioncv.value = 45000;document.f_result.ivacv.value = 7200;}
if (v2 > "50000000" && v2 <= "55000000"){document.f_result.notariocv.value = 105000;document.f_result.registrocv.value = 66000;document.f_result.gestioncv.value = 45000;document.f_result.ivacv.value = 7200;}
if (v2 > "45000000" && v2 <= "50000000"){document.f_result.notariocv.value = 100000;document.f_result.registrocv.value = 64000;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "40000000" && v2 <= "45000000"){document.f_result.notariocv.value = 95000;document.f_result.registrocv.value = 62000;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "35000000" && v2 <= "40000000"){document.f_result.notariocv.value = 92500;document.f_result.registrocv.value = 60000;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "30000000" && v2 <= "35000000"){document.f_result.notariocv.value = 90000;document.f_result.registrocv.value = 58000;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "29000000" && v2 <= "30000000"){document.f_result.notariocv.value = 86000;document.f_result.registrocv.value = 54000;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "28000000" && v2 <= "29000000"){document.f_result.notariocv.value = 85000;document.f_result.registrocv.value = 52500;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "27000000" && v2 <= "28000000"){document.f_result.notariocv.value = 84000;document.f_result.registrocv.value = 51000;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "26000000" && v2 <= "27000000"){document.f_result.notariocv.value = 83000;document.f_result.registrocv.value = 49500;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "25000000" && v2 <= "26000000"){document.f_result.notariocv.value = 82000;document.f_result.registrocv.value = 48000;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "24000000" && v2 <= "25000000"){document.f_result.notariocv.value = 81000;document.f_result.registrocv.value = 46500;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "23000000" && v2 <= "24000000"){document.f_result.notariocv.value = 80000;document.f_result.registrocv.value = 45000;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "22000000" && v2 <= "23000000"){document.f_result.notariocv.value = 79000;document.f_result.registrocv.value = 43500;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "21000000" && v2 <= "22000000"){document.f_result.notariocv.value = 78000;document.f_result.registrocv.value = 42000;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "20000000" && v2 <= "21000000"){document.f_result.notariocv.value = 77000;document.f_result.registrocv.value = 40500;document.f_result.gestioncv.value = 40000;document.f_result.ivacv.value = 6400;}
if (v2 > "19000000" && v2 <= "20000000"){document.f_result.notariocv.value = 76000;document.f_result.registrocv.value = 39000;document.f_result.gestioncv.value = 35000;document.f_result.ivacv.value = 5600;}
if (v2 > "18000000" && v2 <= "19000000"){document.f_result.notariocv.value = 75000;document.f_result.registrocv.value = 37500;document.f_result.gestioncv.value = 35000;document.f_result.ivacv.value = 5600;}
if (v2 > "17000000" && v2 <= "18000000"){document.f_result.notariocv.value = 74000;document.f_result.registrocv.value = 36000;document.f_result.gestioncv.value = 35000;document.f_result.ivacv.value = 5600;}
if (v2 > "16000000" && v2 <= "17000000"){document.f_result.notariocv.value = 73000;document.f_result.registrocv.value = 34500;document.f_result.gestioncv.value = 35000;document.f_result.ivacv.value = 5600;}
if (v2 > "15000000" && v2 <= "16000000"){document.f_result.notariocv.value = 72000;document.f_result.registrocv.value = 33000;document.f_result.gestioncv.value = 35000;document.f_result.ivacv.value = 5600;}
if (v2 > "14000000" && v2 <= "15000000"){document.f_result.notariocv.value = 71000;document.f_result.registrocv.value = 31500;document.f_result.gestioncv.value = 30000;document.f_result.ivacv.value = 4800;}
if (v2 > "13000000" && v2 <= "14000000"){document.f_result.notariocv.value = 70000;document.f_result.registrocv.value = 30000;document.f_result.gestioncv.value = 30000;document.f_result.ivacv.value = 4800;}
if (v2 > "12000000" && v2 <= "13000000"){document.f_result.notariocv.value = 69000;document.f_result.registrocv.value = 28500;document.f_result.gestioncv.value = 30000;document.f_result.ivacv.value = 4800;}
if (v2 > "11000000" && v2 <= "12000000"){document.f_result.notariocv.value = 68000;document.f_result.registrocv.value = 27000;document.f_result.gestioncv.value = 30000;document.f_result.ivacv.value = 4800;}
if (v2 > "10000000" && v2 <= "11000000"){document.f_result.notariocv.value = 67000;document.f_result.registrocv.value = 25500;document.f_result.gestioncv.value = 30000;document.f_result.ivacv.value = 4800;}
if (v2 > "9000000" && v2 <= "10000000"){document.f_result.notariocv.value = 66000;document.f_result.registrocv.value = 24000;document.f_result.gestioncv.value = 22500;document.f_result.ivacv.value = 3600;}
if (v2 > "8000000" && v2 <= "9000000"){document.f_result.notariocv.value = 64500;document.f_result.registrocv.value = 25500;document.f_result.gestioncv.value = 22500;document.f_result.ivacv.value = 3600;}
if (v2 > "7000000" && v2 <= "8000000"){document.f_result.notariocv.value = 63000;document.f_result.registrocv.value = 21000;document.f_result.gestioncv.value = 22500;document.f_result.ivacv.value = 3600;}
if (v2 > "6000000" && v2 <= "7000000"){document.f_result.notariocv.value = 61500;document.f_result.registrocv.value = 19500;document.f_result.gestioncv.value = 22500;document.f_result.ivacv.value = 3600;}
if (v2 > "5000000" && v2 <= "6000000"){document.f_result.notariocv.value = 60000;document.f_result.registrocv.value = 18000;document.f_result.gestioncv.value = 22500;document.f_result.ivacv.value = 3600;}
if (v2 > "4000000" && v2 <= "5000000"){document.f_result.notariocv.value = 56000;document.f_result.registrocv.value = 16500;document.f_result.gestioncv.value = 17500;document.f_result.ivacv.value = 2800;}
if (v2 > "3000000" && v2 <= "4000000"){document.f_result.notariocv.value = 48000;document.f_result.registrocv.value = 15000;document.f_result.gestioncv.value = 17500;document.f_result.ivacv.value = 2800;}
if (v2 > "2000000" && v2 <= "3000000"){document.f_result.notariocv.value = 43000;document.f_result.registrocv.value = 13500;document.f_result.gestioncv.value = 17500;document.f_result.ivacv.value = 2800;}
if (v2 > "1000000" && v2 <= "2000000"){document.f_result.notariocv.value = 38500;document.f_result.registrocv.value = 12000;document.f_result.gestioncv.value = 17500;document.f_result.ivacv.value = 2800;}
if (v2 <= "1000000"){document.f_result.notariocv.value = 34000;document.f_result.registrocv.value = 10500;document.f_result.gestioncv.value = 17500;document.f_result.ivacv.value = 2800;}}

// C&T Productos y Servicios
// (C) Copyright 1996-2001 - Hipotecagratis.com
// Cualquier modificación, copia parcial o total de este programa
// se deberá notificar previamente para su autorización a:
// info@cyt.com - C/Islas Aleutianas 4 1 izq
function Formato_numero(numero){
var nombre = "";
var num = numero;
if (num != ""){
var str = "";
while (num > 999){
	n1 = Math.floor(num/1000);
	n2 = num - 1000 * n1;
	if (n2 < 10){n2 = "00" + n2;}   
	else{if (n2 < 100)
       	      	n2 = "0" + n2;}
	str = "." + n2 + str;
	num = n1;}
	str = num + str;}
return (str);}
//-------------------------------------------------
function Delete_miles(numero_puntos){
var num_p;
num_p = numero_puntos;longitud = 0;
longitud = num_p.length;n = 0;
var num_sp = "";
while (n<longitud){
     	var car = ' ';
      	var car = num_p.charAt(n);
      	if (car != '.')
		num_sp += num_p.charAt(n);
       	n++;}
var sin_puntos = parseInt(num_sp,10);
return sin_puntos;
}
//-------------------------------------------------	
function isEmpty(s){return ((s == null) || (s.length == 0))}
//-------------------------------------------------
function CleanThis(Tipo){
if (Tipo=="dinero")
	document.formu.importeh.value="";
else if(Tipo=="Apertura")
	document.hipoteca.MinApert.value="";}

//-------------------------------------------------
function PonPuntos(obj, sign, imaxlength)
{
var snumero; 
snumero = obj.value + 1; 
 
if (snumero.length > imaxlength)
	{  
	event.returnValue = false;
     	return false;  
   	}
if (isEmpty(obj.value) && (event.keyCode == 48)) 
  	{
     	Event.returnValue = false;
}
else
	if (sign == "positive")
  		{	
    		if ((event.keyCode < 48) || (event.keyCode > 57))
    			{
      			event.returnValue = false;
    			}
    		else 
    			{
      			var s_pre = obj.value;
      			var s_inter = "";
      			var s_post = "";
      			var single_character = "";
      			var poner_punto = 1;
      			for (var i = 0; i < s_pre.length; i++)
      				{
        			single_character = s_pre.substring(i,i+1);
        			if (single_character != ".")
        				{
          				s_inter = s_inter + single_character;
        				}
      				}
			s_inter = s_inter + String.fromCharCode(event.keyCode);
			for (var j = s_inter.length; j > 0; j--, poner_punto++)
      				{
        			s_post = s_inter.substring(j-1,j) + s_post;
        			if ((poner_punto == 3) && (j != 1))
        				{
          				poner_punto = 0;
          				s_post = "." + s_post;
        				}
      				}
      			obj.value = s_post;
      			event.returnValue = false;
    			}
  		}
  	else
  		{
    		if ((isEmpty(obj.value) && ((event.keyCode < 48) || (event.keyCode > 57)) && (event.keyCode != 43) && (event.keyCode != 45)) || ((obj.value.length > 0) && ((event.keyCode < 48) || (event.keyCode > 57))))
    			{
    			event.returnValue = false;
    			}
    		else if (obj.value != "+" && obj.value != "-")
    			{
      			var s_pre = obj.value;
      			var s_inter = "";
      			var s_post = "";
      			var single_character = "";
      			var poner_punto = 1;
      			var sign_character = "";
			if ((s_pre.substring(0, 1) == "+") || (s_pre.substring(0, 1) == "-"))
      				{
        			sign_character = s_pre.substring(0, 1);
        			s_pre = s_pre.substring(1, s_pre.length);
      				}
			for (var i = 0; i < s_pre.length; i++)
      				{
        			single_character = s_pre.substring(i,i+1);
			        if (single_character != ".")
        				{
          				s_inter = s_inter + single_character;
        				}
      				}
			s_inter = s_inter + String.fromCharCode(event.keyCode);
			for (var j = s_inter.length; j > 0; j--, poner_punto++)
      				{
        			s_post = s_inter.substring(j-1,j) + s_post;
			        if ((poner_punto == 3) && (j != 1))
        				{
          				poner_punto = 0;
          				s_post = "." + s_post;
        				}
      				}
				obj.value = sign_character + s_post;
				event.returnValue = false;
    			}
  		}
	}
//-------------------------------------------------	
function EsNumerico(dato){
var i;var longitud;var caracter;var sumo = 0;longitud = dato.length;valido = "0123456789.";
for ( i=0; i <= longitud; i++){
	caracter = dato.substring(i,i+1)
	if (valido.indexOf(caracter) == -1)
		return false;}return true;}
//-------------------------------------------------
function borrar(obj){obj.value = "";}
//-------------------------------------------------
function cerrar(){Window.close();}
//-------------------------------------------------