
function formatNmb(nNmb){ 
    var sRes = ""; 
    for (var j, i = nNmb.length - 1, j = 0; i >= 0; i--, j++) 
     sRes = nNmb.charAt(i) + ((j > 0) && (j % 3 == 0)? ",": "") + sRes; 
    return sRes; 
   } 

function LP_data(){ 
var key=window.event.keyCode;//codigo de tecla. 
if (key < 46 || key > 57) {
window.event.keyCode=0;//anula la entrada de texto. 
}}

function LP_data2(){ 
window.event.keyCode=0;
}

function calcula() {
var saldo, tasx, guardo, ctos;
var intt, int1, almes, infla, ultah;

saldo=finteres.inicial.value*1.0;
saldoi=saldo;
tasx=finteres.tasa.value*1.0;
if (tasx<=0) {
  alert('No ha indicado la tasa de interés');
  exit;
  }

guardo=0;
almes=finteres.mensual.value*1.0;

if (saldo<=0)
  {
  alert('Debe señalar el adeudo actual');
  exit;
  }
if (almes<=0)
  {
  alert('Debe señalar el pago mensual');
  exit;
  }

maxa=240;
mx=1;
while ((mx<=maxa ) && (saldo>0)) 
  {int1=saldo*tasx/100;
   saldo=saldo+int1-almes;
   guardo=guardo+almes;
   if (saldo<0) {guardo=guardo+saldo; saldo=0;}
   if (saldo>0) {  mx=mx+1;}
  }
if (mx>maxa)
  {
  alert('En un periodo de 20 años no terminas de pagar');
  }

primmx=mx;
  
var intanio = Math.floor(mx/12);
var intfrac = mx % 12;
  
finteres.anios.value='';  
if (intanio>0) { 
finteres.anios.value= intanio + ' años ';
}
finteres.anios.value= finteres.anios.value+' '+ intfrac+' meses';
finteres.ahorro.value=Math.round(guardo);
finteres.interes.value=Math.round((guardo-saldoi));
finteres.final.value=Math.round((guardo-saldoi)*10000/saldoi)/100 +'%';
primi=finteres.interes.value;

finteres.ahorro.value='$'+formatNmb(finteres.ahorro.value);
finteres.interes.value='$'+formatNmb(finteres.interes.value);


saldo=saldoi;
guardo=0;
almes=finteres.mensual.value*1.10;


mx=1;
while ((mx<=maxa ) && (saldo>0)) 
  {int1=saldo*tasx/100;
   saldo=saldo+int1-almes;
   guardo=guardo+almes;
   if (saldo<0) {guardo=guardo+saldo; saldo=0;}
   if (saldo>0) {  mx=mx+1;}
  }
  
intanio = Math.floor(mx/12);
intfrac = mx % 12;
  
finteres.anios2.value='';  
finteres.aniosh.value='';

if (intanio>0) { 
finteres.anios2.value= intanio + ' años ';
}
finteres.mensual2.value=Math.round(almes);
finteres.anios2.value= finteres.anios2.value+' '+ intfrac+' meses';
if (mx<primmx) {
   mx=primmx-mx;
   intanio = Math.floor(mx/12);
   intfrac = mx % 12;
   if (intanio>0) { 
    finteres.aniosh.value= intanio + ' años ';
    }
   finteres.aniosh.value= finteres.aniosh.value+' '+ intfrac+' meses';
}
finteres.ahorro2.value=Math.round(guardo);
finteres.interes2.value=Math.round((guardo-saldoi));
finteres.final2.value=Math.round((guardo-saldoi)*10000/saldoi)/100 +'%';
finteres.interesh.value=Math.round(primi-(guardo-saldoi));

finteres.mensual2.value='$'+formatNmb(finteres.mensual2.value);
finteres.ahorro2.value='$'+formatNmb(finteres.ahorro2.value);
finteres.interes2.value='$'+formatNmb(finteres.interes2.value);
finteres.interesh.value='$'+formatNmb(finteres.interesh.value);

};


