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();}
//-------------------------------------------------
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.formCalculo.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.formCalculo.importeh.value == "" && document.formCalculo.valorh.value == "" )){
var valor_actual;
var res;
valor1=Delete_miles(document.formCalculo.importeh.value);
valor2=Delete_miles(document.formCalculo.valorh.value);
if (!(document.formCalculo.importeh.value == "")){valor_actual = valor1 / 166.386;document.formCalculo.importeh.value = Math.round(valor_actual);document.formCalculo.importeh.value = Formato_numero(document.formCalculo.importeh.value);valor_actual = 0;}
if (!(document.formCalculo.valorh.value == "")){valor_actual = valor2 / 166.386;document.formCalculo.valorh.value = Math.round(valor_actual);document.formCalculo.valorh.value = Formato_numero(document.formCalculo.valorh.value);}}}
//-------------------------------------------------
function pts(){
if (!(document.formCalculo.importeh.value == "" && document.formCalculo.valorh.value == "" )){
var valor_actual;var res;valor1=Delete_miles(document.formCalculo.importeh.value);valor2=Delete_miles(document.formCalculo.valorh.value);
if (!(document.formCalculo.importeh.value == "")){valor_actual = valor1 * 166.386;document.formCalculo.importeh.value = Math.round(valor_actual);document.formCalculo.importeh.value = Formato_numero(document.formCalculo.importeh.value);valor_actual = 0;}
if (!(document.formCalculo.valorh.value == "")){valor_actual = valor2 * 166.386;document.formCalculo.valorh.value = Math.round(valor_actual);document.formCalculo.valorh.value = Formato_numero(document.formCalculo.valorh.value);alert ("El valor en pesetas se reajusto!");}}}
//-------------------------------------------------
function calcular_onclick() 
{
valor1=Delete_miles(document.formCalculo.importeh.value);
valor2=Delete_miles(document.formCalculo.valorh.value);
var provincia;
provincia = document.formCalculo.provin.value;
if (!(document.formCalculo.importeh.value == "") && !(document.formCalculo.valorh.value == "" ))
	{
	var suma;
	buscarvalor(valor1, valor2);

  if (document.formCalculo.radioviv[0].checked)
  {
	 	document.f_result.ivaviv.value = valor2 * 0.07;
	  	document.f_result.itp.value = "";

		if (document.formCalculo.provin.options[document.formCalculo.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.formCalculo.provin.options[document.formCalculo.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.formCalculo.radio[0].checked)
		{
		document.f_result.tasacion.value = 30000;
		document.f_result.seguro.value = 50000;
       		if (document.formCalculo.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);
 		    	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);
 		    	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);
 		    	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);
 		    	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.formCalculo.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.formCalculo.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);
  		    	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);
  		    	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);
  		    	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);
  		    	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.formCalculo.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.formCalculo.valorh.value == "")
{
	buscarvalor(valor1, valor2);
	if (document.formCalculo.provin.options[document.formCalculo.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.formCalculo.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);
		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);
		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.formCalculo.importeh.value == "")
		{
		var suma;
		valor1 = 0;
		document.f_result.seguro.value = "";
		buscarvalor(valor1, valor2);
		if (document.formCalculo.radioviv[0].checked)
 		{
			if (document.formCalculo.provin.options[document.formCalculo.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.formCalculo.radio[0].checked)
			{
       			if (document.formCalculo.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.formCalculo.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.formCalculo.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.formCalculo.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.formCalculo.importeh.value == "") && (document.formCalculo.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.formCalculo.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;}}



// ---------------------------------------------------------
function GetValue(sValue)
{
    var sRaw = "";
    var sChar = "";
    var i = 0;

    sValue += "";
    for (i=0; i <= sValue.length; i++) {

        sChar = sValue.substring(i, i+1);

	if ((sChar >= "0") && (sChar <= "9")){
            sRaw = sRaw + sChar;
        }
    }

    if (sRaw.length > 0) {
        return parseInt(sRaw);
    }
    else {
        return 0;
    }
}

// ---------------------------------------------------------
function GetValueRate(sValue)
{
    var sRaw = "";
    var sChar = "";
    var bHasDecimal = 0;
    var i = 0;

    sValue += "";
    for (i=0; i <= sValue.length; i++) {

        sChar = sValue.substring(i, i+1);

        if ((sChar >= "0") && (sChar <= "9")){
            sRaw = sRaw + sChar;
        }

        if ((sChar == ",") || (sChar == ".")){
            bHasDecimal = 1;
            sRaw = sRaw + ".";
        }

    }

    if (bHasDecimal) {
        return parseFloat(sRaw);
    }

    if (sRaw.length > 0) {
        return parseInt(sRaw);
    }
    else {
        return 0;
    }
}

// ---------------------------------------------------------
function FormatOutput(iValue, nDec) {
    var bIsNegative = 0;
    var iPos = 0;
    var sChar = "";
    var sTempNumber = "";
    var sNoChars = "";
    var sDollars = "";
    var sCents = "";
    var sDollarAmount = "";
    var sFormated = "";
    var x = 0;

    if (iValue != "") {

        sTempNumber = iValue + "";
        if (sTempNumber.charAt(0) == "-") {
            bIsNegative = 1;
            sTempNumber = sTempNumber.substring(1, sTempNumber.length);
        }

        sTempNumber
        IndexOfDec = sTempNumber.indexOf(".");

        if (IndexOfDec == -1) {
            sDollars = sTempNumber;
            sCents = "00";
        }
        else if (IndexOfDec == 0) {
            sDollars = "0";
            sCents = sTempNumber.substring(IndexOfDec + 1, sTempNumber.length);
        }
        else {
            sDollars = sTempNumber.substring(0, IndexOfDec);
            if (IndexOfDec == (sTempNumber.length - 1)) {
                sCents = "00";
            }
            else {
                sCents = sTempNumber.substring(IndexOfDec + 1, sTempNumber.length)
                sCents += "0";
                sCents = sCents.charAt(0) + sCents.charAt(1);
            }
        }

        sFormated = sDollars;
        x = sDollars.length;
        iPos = 0;
        while (x > 0) {
            x--;
            sChar = sDollars.charAt(x);
            rounded = Math.round(iPos/3);
            if ( (iPos/3 == rounded ) & (iPos != 0) ) {
                sDollarAmount = "." + sDollarAmount;
            }
            sDollarAmount = sChar +  sDollarAmount;
            iPos++;
        }

        if (nDec) {
          if (bIsNegative) {
              sFormated = "-" + sDollarAmount + "," + sCents + "";
          }
          else {
              sFormated = sDollarAmount + "," + sCents  + "";
          }
	}
        else {
          if (bIsNegative) {
              sFormated = "-" + sDollarAmount + "";
          }
          else {
              sFormated = sDollarAmount + "";
          }
	}

        return (sFormated);
    }
    else {

        return("0" + "");
    }
}

// ---------------------------------------------------------
function FormatOutputPercent(iValue, nOfDec) {
 return(iValue + " %")
}


// ---------------------------------------------------------
function GetMonthlyPayment(term, rate, loanAmount) {

    if (rate >= 1) {
        (rate = rate / 100);
    }
    rateMonthly = (rate / 12);

    totalPayments = (term * 12);

    if (rate == 0) {
        payment = (loanAmount / totalPayments);
    }

    else {
        payment = (loanAmount * rateMonthly) / (1 - Math.pow((1+rateMonthly), (-1*totalPayments)) );
    }

    return(payment);
}

// ---------------------------------------------------------
function ReCalculate() {


    // get user's data
    Fprice          = GetValue(document.form.txtPrice.value);
    Fdownpayment    = GetValue(document.form.txtDownpayment.value);
    Frate           = GetValueRate(document.form.txtRate.value);
    Fterm           = GetValue(document.form.cboTerm.options[document.form.cboTerm.selectedIndex].text);

    iLoanAmount     = Fprice - Fdownpayment;
    iMonPayment     = GetMonthlyPayment(Fterm, Frate, iLoanAmount);
    iMonPayment     = Math.round(iMonPayment * 100) / 100;
    iPaymentTotal   = ((iMonPayment * 12) * Fterm) + Fdownpayment;
    iPaymentTotal     = Math.round(iPaymentTotal * 100) / 100;


    //// FORMAT VARIABLES

    Fdownpayment    = FormatOutput(Fdownpayment,0);
    Fprice          = FormatOutput(Fprice,0);
    Frate           = FormatOutputPercent(Frate);

    iLoanAmount     = FormatOutput(iLoanAmount,0);
    iPaymentTotal   = FormatOutput(iPaymentTotal,0);


    iMonPayment     = FormatOutput(iMonPayment,0);



    //// SPIT OUT RESULTS

    document.form.txtPrice.value         = Fprice;
    document.form.txtDownpayment.value   = Fdownpayment;
    document.form.txtRate.value          = Frate;
    document.form.txtLoanAmount.value    = iLoanAmount;
    document.form.txtMonPayment.value    = iMonPayment;
    document.form.txtPaymentTotal.value    = iPaymentTotal;

}