function verificar_numero(numero,formulario)
	{
		if (numero.value=='')
		{
		}
		var noes=0;
		var str = numero.value;
		for (var i = 0; i < str.length; i++)        
		{	var ch = str.substring(i, i + 1)
		        if ((ch < "0" || "9" < ch) && ch != '.') 
			{  numero.value=''
		           numero.focus()
		           numero.select()
			   noes=1
			}               
		}	  
		if (noes==1)
		{ alert('El valor introducido "' + str + '" no es un número.')
		  return 1
		}
		return 0;
	}

	function hay_cambio() {

	}

	function calculacuota() {
		// CALCULA LA CUOTA A PAGAR CONOCIENDO:
		// 	EL IMPORTE DEL PRESTAMO
		//	EL NUMERO DE PLAZOS A PAGAR
		//	EL TIPO DE INTERES QUE SE LE APLICA

		//if ( hay_cambio() == 0 ) { return }

		imp = parseInt(document.forms[0].c.value)
		plazo_meses = parseInt(document.forms[0].t.value)
		tipo_mensual = parseFloat(document.forms[0].i.value)
		medida = 12.0

		if ( isNaN(imp) || imp == 0 )
		{ alert("Debe rellenar el campo 'capital'")
		  return }
		if ( isNaN(plazo_meses) || plazo_meses == 0 )
		{ alert("Debe rellenar el campo 'años'")
		  return }
		if ( isNaN(tipo_mensual) || tipo_mensual == 0.0 ) 
		{ alert("Debe rellenar el campo 'interés'")
		  return }

		if ( tipo_mensual > 20.0 ) 
		{ alert("El Tipo Nominal es superior al 20% y no es aceptable para un préstamo hipotecario.")
		  return }

		plazo_meses = plazo_meses * medida

		// EL TIPO DE INTERES VIENE EN AÑOS Y LOS PASAMOS A TIPO INTERES MENSUAL
		tipo_mensual = tipo_mensual / 1200.0

		y  = 1.0 + tipo_mensual
		cuota = imp * tipo_mensual * Math.pow(y,plazo_meses) / ( Math.pow(y,plazo_meses) - 1.0 ) 
		cuota = Math.round(cuota*100)/100;
		//----------------document.forms[0].cuota.value = Math.round(cuota *100.00) / 100.00
		//----------------document.forms[0].cuota.value = Math.round(cuota)
		document.forms[0].q.value = cuota
	}




function calculaimporte() {
	// Importe de la operacion
	Importe	= document.forms[0].q.value;
	
	
	// Cambiamos la coma por un punto
	Posicion = Importe.indexOf(',');
	if (Posicion != -1)
	{
		Importe = Importe.substring(0, Posicion)+'.'+Importe.substring(Posicion+1);
	}

	// Interés tecleado
	IntTecleado = document.forms[0].i.value;
	// Cambiamos la coma por un punto
	Posicion = IntTecleado.indexOf(',');
	if (Posicion != -1)
	{
		IntTecleado = IntTecleado.substring(0, Posicion)+'.'+IntTecleado.substring(Posicion+1);
	}

	// Tiempo en años
	Tiempo			= document.forms[0].t.value;

	// Nº de pagos en un años
	PeriodoAnio = "12";
	PeriodoAnio = 12 / 1

	IntReal			= IntTecleado / (PeriodoAnio * 100);
	NCuotas			= PeriodoAnio * Tiempo;
	Temporal		= Math.pow((1 + IntReal), NCuotas);
	
	Total = (Importe * (Temporal - 1))/(IntReal * Temporal)
	
    Total = Math.round(Total*1)/1;
	document.forms[0].c.value = Total;
}


	function calculaplazo() {
		// CALCULA EL NUMERO DE PLAZOS NECESARIOS CONOCIENDO:
		// 	EL IMPORTE DEL PRESTAMO
		//	EL TIPO DE INTERES QUE SE LE APLICA
		//	LA CUOTA A PAGAR EN CADA PLAZO

		//if ( hay_cambio() == 0 ) { return }

		imp = parseInt(document.forms[0].c.value)
		cuota = parseInt(document.forms[0].q.value)
		tipo_mensual = parseFloat(document.forms[0].i.value)

		if ( isNaN(imp) || imp == 0 )
		{ alert("Debe rellenar el campo 'capital'")
		  return }
		if ( isNaN(tipo_mensual) || tipo_mensual == 0.0 ) 
		{ alert("Debe rellenar el campo 'interés'")
		  return }
		if ( isNaN(cuota) || cuota == 0 )
		{ alert("Debe rellenar el campo 'cuota'")
		  return }

		if ( tipo_mensual > 20.0 ) 
		{ alert("El interés no puede ser superior al 20%")
		  return }

		tipo_mensual = tipo_mensual / 1200.0

		y  = 1.0 + tipo_mensual

		plazo_meses = 12;
		cuota_actual = Math.round(imp * tipo_mensual * Math.pow(y,plazo_meses) / ( Math.pow(y,plazo_meses) - 1.0 ))

		while (cuota_actual > cuota)
		{	ultima_cuota = cuota_actual;
			cuota_actual = Math.round(imp * tipo_mensual * Math.pow(y,plazo_meses) / ( Math.pow(y,plazo_meses) - 1.0 ))
			plazo_meses++
			if (plazo_meses > 720)
			{	alert("El número de años no puede ser superior a 60")
				almacena()
				return;
			}
		}
		plazo_meses=plazo_meses/12;
		document.forms[0].t.value = Math.round(plazo_meses) 
		// document.forms[0].medida.selectedindex = 1
	}

	function nada ()
	{
	  return
	}
 
 
//
// -----------------
//


function calculahip() 
{
campbuit=0;
c=""+document.forms[0].c.value+"";
i=""+document.forms[0].i.value+"";
t=""+document.forms[0].t.value+"";
q=""+document.forms[0].q.value+"";
if (c=="") { campbuit++; }
  else { canvi = /,/g; c = c.replace(canvi, "."); document.forms[0].c.value=c; }

if (i=="") { campbuit++; }
  else { canvi = /,/g; i = i.replace(canvi, "."); document.forms[0].i.value=i; }
if (t=="") { campbuit++; }
if (q=="") { campbuit++; }
if (campbuit==0) { alert("Aviso:\n Deje en blanco el valor que desee calcular\n (excepto el 'interés' que es de entrada obligada)"); }
if (campbuit>1) { alert("Aviso:\n Sólo puede dejar un campo vacío, que será el que se calcularà"); }
if (campbuit==1) { 
  if (c=="") { calculaimporte(); }
  if (i=="") { alert("Aviso:\n Debe indicar el valor del campo 'interés' para poder calcular la hipoteca"); }
  if (t=="") { calculaplazo(); }
  if (q=="") { calculacuota(); }
  }

}

//
//
//errada=0;
//c=document.forms[0].c.value; 
//i=document.forms[0].i.value;
//t=document.forms[0].t.value;
//if (isNaN(i))  { errada=1; }
//if (i.indexOf(',') != -1) {
//  canvi = /,/g; i = i.replace(canvi, "."); document.hipoteca.i.value=i;
//  if ((i>0.00 && i<30.00)) { errada=0; }
//  }
//  else {
//    if ((i<0 || i>30) || isNaN(i) || errada==1 )  { errada=1; }
//    }
//if (errada) { alert("Aviso:\nNo ha introducido un valor correcto para el interés\n(valores permitidos entre 0.00 y 30.00)");
//  }
//
//if (!errada) {
//  var c = c * 1;
//  i = (i*1) / (100 * 12);
//  t = t * 1 * 12;
//  valor1 = 1 + i;
//  valor2= Math.pow(valor1,-t);
//  valor3 = c*i;
//  totalCuota = valor3 / (1-valor2);
  // ---- sense decimals ---- totalCuota = Math.round(totalCuota);
//  totalCuota = Math.round(totalCuota*100)/100;
//
//  mmm="c="+c+" \n";
//  mmm=mmm+"i="+i+" \n";
//  mmm=mmm+"t="+t+" \n";
//  mmm=mmm+"valor1="+valor1+" \n";
//  mmm=mmm+"valor2="+valor2+" \n";
//  mmm=mmm+"valor3="+valor3+" \n";
//  mmm=mmm+"totalCuota="+totalCuota+" \n";
  //alert(mmm);
//  
//  if (!isNaN(totalCuota))
//  document.forms[0].cuota.value=totalCuota;
//  }
//  else {
//    document.forms[0].cuota.value="";
//    }
//}

function copiavalor1()
{
triaint=document.hipoteca.triaint.value*1
document.hipoteca.i.value=triaint;
}

function enviar() 
{
mssg='';
var correu=document.formulari1.email.value;
if (document.formulari1.nombre.value.length == 0) mssg=mssg + "No has indicado tu NOMBRE\n";
if (document.formulari1.telefono.value.length == 0) mssg=mssg+"No has indicado tu TELÉFONO\n";
//if (document.info.email.value.length == 0) mssg=mssg+"No ha indicado el E-mail\n";
//if (document.info.email.value.length != 0) {
//   if ((correu.indexOf('@') == -1) || (correu.indexOf('.')== -1)) mssg= mssg+"No ha indicado un E-mail válido\n"; }
if (mssg.length == 0) { 
  document.formulari1.submit();
  }
  else { alert(mssg); }
}

function enviar1() 
{
mssg='';
var nombreamigo=document.enviar.nombre.value;
var amigo_c=document.enviar.amigo_c.value;
var email=""+document.enviar.email.value+"";
if (document.enviar.email.value.length != 0) { email="("+email+")"; }
document.enviar.recipient.value=amigo_c;
var suamigo="Tu amigo/a "+nombreamigo+" "+email+" te recomienda un inmueble de inmotrading.com"
document.enviar._.value=suamigo;
if (document.enviar.email.value.length != 0) {
   if ((email.indexOf('@') == -1) || (email.indexOf('.')== -1)) mssg= mssg+"Tu e-mail no es válido\n"; }
//
if (document.enviar.amigo_c.value.length == 0) mssg=mssg+"No has indicado el E-mail del destinatario\n";
if (document.enviar.amigo_c.value.length != 0) {
   if ((amigo_c.indexOf('@') == -1) || (amigo_c.indexOf('.')== -1)) mssg= mssg+"El e-mail del destinatario no es válido\n"; }
if (mssg.length == 0) { 
  document.enviar.submit(); 
  }
  else { alert(mssg); }
}

function enviar2() 
{
mssg='';
var correu=document.formulari1.email.value;
var experiencia=""+document.formulari1.experiencia.value+"";
if (document.formulari1.nombre.value.length == 0) mssg=mssg + "No ha indicado su NOMBRE\n";
if (document.formulari1.telefono.value.length == 0) mssg=mssg+"No ha indicado su TELÉFONO\n";
if (experiencia == 0) mssg=mssg+"No ha indicado su EXPERIENCIA PROFESIONAL\n";
//if (document.info.email.value.length == 0) mssg=mssg+"No ha indicado el E-mail\n";
//if (document.info.email.value.length != 0) {
//   if ((correu.indexOf('@') == -1) || (correu.indexOf('.')== -1)) mssg= mssg+"No ha indicado un E-mail válido\n"; }
if (mssg.length == 0) { 
  document.formulari1.submit();
  }
  else { alert(mssg); }
}