// hide me <!--

function MonthlyAmort(principal, years, apr, amort) {
	msg=window.open("", "DisplayWindow","toolbar=no,scrollbars=yes,menubar=no,width=500,height=470");
	
	var payments = years * 12;
	var monthlyInterest = apr/12;
	pennies = apr * 10000;
	pennies = Math.round(pennies);
	strPennies = "" + pennies;
	len = strPennies.length;
	interestRate = strPennies.substring(0, len - 2) + "." + strPennies.substring((len - 2), len);
	
	var monthlyPayment = rounding(principal*monthlyInterest / (1 - (1 / Math.pow(1 + monthlyInterest, payments))));
	
	msg.document.write("<center><img src=images/la-empresa.jpg>");
	msg.document.write("<font color=#000080 face=Arial size=2><center><h3>Credi Asesoría - Tabla de Amortización</h3><font size=3><i>Los Resultados aparecerán en un momento...</i></font><P><BR><table border=1 cellspacing=0 cellpadding=5><TR>");
	msg.document.write("<tr><td colspan=6 align=right><a href= target=_blank></a></td></tr>");
	msg.document.write("<td bgcolor=#ED9B22 align=center colspan=6><font color=#FFFFFF size=+1 face=Arial>Préstamo de $" + principal + " con Tasa de " + interestRate + "% en un Plazo de " + years + " años.<p>Pago promedio Mensual de: $" + monthlyPayment + "</th></tr>");
	msg.document.write("<tr><th bgcolor=#5780D5><br></th><th bgcolor=#000070 colspan=2><font color=#FFFFFF face=Arial size=2>Pago Corriente</th><th bgcolor=#5780D5 colspan=3><br></th></tr><tr><th bgcolor=#E0E8F8><font face=Arial size=2>Número<br>de Pago</th><th bgcolor=#E0E8F8><font face=Arial size=2>Pago<br><i>a Intereses</i></th><th bgcolor=#E0E8F8><font face=Arial size=2>Pago<br><i>a Capital</i></th><th bgcolor=#E0E8F8><font face=Arial size=2>Intereses Pagados<br>a la Fecha</th><th bgcolor=#E0E8F8><font face=Arial size=2>Amortización Total<br>a Capital</th><th bgcolor=#E0E8F8><font face=Arial size=2>Saldo Insoluto<br>a la Fecha</th></tr>");
	
	principalPaid = 0;
	interestPaid = 0;

	
	//firstInt = monthlyInterest * principal;
	//avTotal = (firstInt + mthPmt)/principal * 1200
	
	avTotal = 0
	  for (var i = 1; i <= payments; i++) {
		var amortMod = i % amort;
		var interestPayment1 = principal * monthlyInterest;
		var intPay = (interestPayment1 + 12)/principal * 1200;
		avTotal = avTotal + intPay;
		pennies = interestPayment1 * 100;
		pennies = Math.round(pennies);
		strPennies = "" + pennies;
		len = strPennies.length;
		interestPayment =  strPennies.substring(0, len - 2) + "." + strPennies.substring((len - 2), len);
	
		var principalPayment1 = monthlyPayment - interestPayment;
	
		pennies = principalPayment1 * 100;
		pennies = Math.round(pennies);
		strPennies = "" + pennies;
		len = strPennies.length;
		principalPayment =  strPennies.substring(0, len - 2) + "." + strPennies.substring((len - 2), len);
	
		principal1 = principal - principalPayment;
	
		pennies = principal1 * 100;
		pennies = Math.round(pennies);
		strPennies = "" + pennies;
		len = strPennies.length;
		principal =  strPennies.substring(0, len - 2) + "." + strPennies.substring((len - 2), len);
	
		principalPaid1 = -(-principalPayment - principalPaid);
	
		pennies = principalPaid1 * 100;
		pennies = Math.round(pennies);
		strPennies = "" + pennies;
		len = strPennies.length;
		principalPaid =  strPennies.substring(0, len - 2) + "." + strPennies.substring((len - 2), len);
	
		interestPaid1 = -(-interestPayment - interestPaid);
	
		pennies = interestPaid1 * 100;
		pennies = Math.round(pennies);
		strPennies = "" + pennies;
		len = strPennies.length;
		interestPaid =  strPennies.substring(0, len - 2) + "." + strPennies.substring((len - 2), len);
	
		if (amortMod == 0) {
			msg.document.write("<tr><td><center><font face=Arial size=2>" + i + "</td>");
			msg.document.write("<td><font face=Arial size=2>$" + interestPayment + "</td><td><font face=Arial size=2>$" + principalPayment + "</td><td><font face=Arial size=2>$" + interestPaid + "</td><td><font face=Arial size=2>$" + principalPaid + "</td><td><font face=Arial size=2>$" + principal + "</td></tr>");
	    }
	  }
	  avTotal = avTotal / (payments);
	msg.document.write("<tr><td colspan=6 align=center bgcolor=#ED9B22><br>Nota: Los pagos mensuales no contemplan el costo proveniente de las Primas de Seguros<a href= target=_blank></a></td></tr>");
	msg.document.write("</table><td align=center><P><BR><i>Este simulador es Propiedad Intelectual de Gabriel Serna Sánchez Copyright 2004  Credi Asesoría S. A.  All Rights Reserved</i>");

}

function compute(form) {

  if ((form.principal.value.length != 0 ) && (form.apr.value.length != 0 ) && (form.years.value.length != 0 )) {
	principal = parseFloat(form.principal.value);
	apr = parseFloat(form.apr.value) / 100.0;
	years = parseFloat(form.years.value);
     var amort = get_selection(form.amort);
	MonthlyAmort(principal, years, apr, amort.value);

  }
  else {
	alert("Por favor llene todos los campos!");
  }
}
  function select_item(name, value) {
        this.name = name;
        this.value = value;
    }


    function get_selection(select_object) {
        contents = new select_item();
        for(var i=0;i<select_object.options.length;i++)
           if(select_object.options[i].selected == true) {
                contents.name = select_object.options[i].text;
                contents.value = select_object.options[i].value;
            }
        return contents;
    }
function rounding(n)
{
	pennies = n * 100;
	pennies = Math.round(pennies);
	strPennies = "" + pennies;
	len = strPennies.length;
	return strPennies.substring(0, len - 2) + "." + strPennies.substring((len - 2), len);
}

// stop hiding -->