//*******************************************
//DO NOT REMOVE THIS COPYWRITE INFO!
//Loan Payment Calculator with Amortization Schedule V3
//1998 Daniel C. Peterson ALL RIGHTS RESERVED
//Created: 09/28/1998
//Last Modified: 05/25/2002
//This script may not be copied, edited, distributed or reproduced
//without express written permission from
//Daniel C. Peterson of Web Winder Website Services
//For commercial use rates, contact:
//Dan Peterson:
//Web Winder Website Services
//P.O. Box 11
//Bemidji, MN  56619
//dan@webwinder.com
//http://www.webwinder.com
//Commercial User Licence #:2631-605-37-590
//Commercial Licence Date:2005-05-10
//*******************************************



function stripNum(num) {

var iPercent
var iDollar
var iSpace
var iComma
var numLength = num.length

//lalalla Line #114

if(numLength > 0) {

   num=num.toString();

   iPercent = num.indexOf("%");
   if(iPercent >= 0) {
      num=num.substring(0,iPercent) + "" + num.substring(iPercent + 1,numLength);
      numLength=num.length;
      }
   iDollar = num.indexOf("$");
   if(iDollar >= 0) {
      num=num.substring(0,iDollar) + "" + num.substring(iDollar + 1,numLength);
      numLength=num.length;
      }
   iSpace = num.indexOf(" ");
   if(iSpace >= 0) {
      num=num.substring(0,iSpace) + "" + num.substring(iSpace + 1,numLength);
      numLength=num.length;
      }
   iComma = num.indexOf(",");
   if(iComma >= 0) {
      while(iComma >=1) {
         num=num.substring(0,iComma) + "" + num.substring(iComma + 1,numLength);
         numLength=num.length;
         iComma = num.indexOf(",");
      }
      }

      num = eval(num);


} else {

num = 0;

}

return num;

}




function formatCurrency(num) {

var isNeg=0;

    if(num < 0) {
       num=num*-1;
       isNeg=1;
    }

    
	onum=Math.round(num*100)/100;
		
	integer=Math.floor(onum);

	if (Math.ceil(onum) == integer) {
		decimal="00";
	} else{
		decimal=Math.round((onum-integer)*100)
	}
	decimal=decimal.toString();
	if (decimal.length<2) decimal="0"+decimal;

	integer=integer.toString();
	var tmpnum="";
	var tmpinteger="";
	var y=0;

	for (x=integer.length;x>0;x--) {
		tmpnum=tmpnum+integer.charAt(x-1);
		y=y+1;
		if (y==3 & x>1) {
			tmpnum=tmpnum+",";
			y=0;
		}
	}

	for (x=tmpnum.length;x>0;x--) {
		tmpinteger=tmpinteger+tmpnum.charAt(x-1);
	}
		
	finNum="$"+tmpinteger+"."+decimal;

    if(isNeg == 1) {
       finNum = "-" + finNum;
    }

	return finNum;
}




function computeMonthlyPayment(prin, numPmts, intRate) {

var pmtAmt = 0;

if(intRate == 0) {
   pmtAmt = prin / numPmts;
} else {
   
   if (intRate >= 1.0) {
     intRate = intRate / 100.0;
   }
   intRate /= 12;

   var pow = 1;
   for (var j = 0; j < numPmts; j++)
      pow = pow * (1 + intRate);

   pmtAmt = (prin * pow * intRate) / (pow - 1);

}

return pmtAmt;

}




function formatNumber(num) {

var isNeg=0;

    if(num < 0) {
       num=num*-1;
       isNeg=1;
    }

    
	onum=Math.round(num*100)/100;
		
	integer=Math.floor(onum);

	if (Math.ceil(onum) == integer) {
		decimal="00";
	} else{
		decimal=Math.round((onum-integer)*100)
	}
	decimal=decimal.toString();
	if (decimal.length<2) decimal="0"+decimal;

	integer=integer.toString();
	var tmpnum="";
	var tmpinteger="";
	var y=0;

	for (x=integer.length;x>0;x--) {
		tmpnum=tmpnum+integer.charAt(x-1);
		y=y+1;
		if (y==3 & x>1) {
			tmpnum=tmpnum+",";
			y=0;
		}
	}

	for (x=tmpnum.length;x>0;x--) {
		tmpinteger=tmpinteger+tmpnum.charAt(x-1);
	}
		
	finNum=tmpinteger+"."+decimal;

    if(isNeg == 1) {
       finNum = "-" + finNum;
    }

	return finNum;
}


function computeForm(form) {

if(form.principal.value == "" || form.principal.value == 0) {
   alert("Please enter an amount in Line #1.");
   form.principal.focus();
   } else
      if(form.intRate.value == "" || form.intRate.value == 0) {
      alert("Please enter an amount in Line #2.");
      form.intRate.focus();
   } else
      if(form.numYears.value == "" || form.numYears.value == 0) {
      alert("Please enter an amount in Line #3.");
      form.numYears.focus();
   } else {

var Vprincipal = stripNum(form.principal.value);

var VintRate = stripNum(form.intRate.value);

var VnumYears = stripNum(form.numYears.value);
var  VnumPmts =  VnumYears * 12;

var pmtAmt = computeMonthlyPayment(Vprincipal, VnumPmts, VintRate);
 form.moPmt.value = "$" + formatNumber(pmtAmt);

//END VARIFICATION IF STATEMENT
   }
    
}


function createReport(form) {

if(form.principal.value == "" || form.principal.value == 0) {
   alert("Please enter an amount in Line #1.");
   form.principal.focus();
   } else
      if(form.intRate.value == "" || form.intRate.value == 0) {
      alert("Please enter an amount in Line #2.");
      form.intRate.focus();
   } else
      if(form.numYears.value == "" || form.numYears.value == 0) {
      alert("Please enter an amount in Line #3.");
      form.numYears.focus();
   } else {

var Vprincipal = stripNum(form.principal.value);
var VintRate = stripNum(form.intRate.value);

var VnumYears = stripNum(form.numYears.value);
var VnumPmts = VnumYears * 12;

var pmtAmt = computeMonthlyPayment(Vprincipal, VnumPmts, VintRate);

var prin = Vprincipal;
var Vint = VintRate;
if(Vint >= 1) {
   Vint /= 100;
   }
Vint /= 12;

var nPer = VnumPmts;

var intPort = 0;
var accumInt = 0;
var prinPort = 0;
var accumPrin = 0;
var count = 0;
var pmtRow = "";
var pmtNum = 0;


var Vmonth = eval(form.month.selectedIndex) + eval(1);
var Vday = eval(form.day.selectedIndex) + eval(1);
if(Vday > 28) {
   Vday = 28;
}
var Vyear = parseInt(form.year.value);
var loanDate = (Vmonth + "/" + Vday + "/" + Vyear);

var displayPmtAmt = 0;

var accumYearPrin = 0;
var accumYearInt = 0;

while(count < nPer) {

   if(count < (nPer - 1)) {

      intPort = prin * Vint;
      intPort *= 100;
      intPort = Math.round(intPort);
      intPort /= 100;

      accumInt = eval(accumInt) + eval(intPort);
      accumYearInt = eval(accumYearInt) + eval(intPort);

      prinPort = eval(pmtAmt) - eval(intPort);
      prinPort *= 100;
      prinPort = Math.round(prinPort);
      prinPort /= 100;

      accumPrin = eval(accumPrin) + eval(prinPort);
      accumYearPrin = eval(accumYearPrin) + eval(prinPort);

      prin = eval(prin) - eval(prinPort);

      displayPmtAmt = eval(prinPort) + eval(intPort);

   } else {

      intPort = prin * Vint;
      intPort *= 100;
      intPort = Math.round(intPort);
      intPort /= 100;

      accumInt = eval(accumInt) + eval(intPort);
      accumYearInt = eval(accumYearInt) + eval(intPort);

      prinPort = prin;

      accumPrin = eval(accumPrin) + eval(prinPort);
      accumYearPrin = eval(accumYearPrin) + eval(prinPort);

      prin = 0;

      //pmtAmt = eval(intPort) + eval(prinPort);
      displayPmtAmt = eval(prinPort) + eval(intPort);
   }

   count = eval(count) + eval(1);

   pmtNum = eval(pmtNum) + eval(1);

   Vmonth = Vmonth + 1;
   if(Vmonth == 13) {
      Vmonth = 1;
      Vyear = Vyear + 1;
      } else {
      Vmonth = Vmonth;
      Vyear = Vyear;
      }

   pmtString = (Vmonth + "/" + Vday + "/" + Vyear);

   pmtRow = ("" + pmtRow + "<tr><td align=right><font face='arial'><small>" + pmtNum + "</small></font></td><td align=right><font face='arial'><small>" + pmtString + "</small></font></td><td align=right><font face='arial'><small>" + formatCurrency(prinPort) + "</small></font></td><td align=right><font face='arial'><small>" + formatCurrency(intPort) + "</small></font></td><td align=right><font face='arial'><small>" + formatCurrency(displayPmtAmt) + "</small></font></td><td align=right><font face='arial'><small>" + formatCurrency(prin) + "</small></font></td></tr>");

   if(Vmonth == 12 || count == nPer) {

pmtRow = ("" + pmtRow + "<tr bgcolor='#dddddd'><td align=right><font face='arial'><small>Total</small></font></td><td align=left><font face='arial'><small>" + Vyear + "</small></font></td><td align=right><font face='arial'><small>" + formatCurrency(accumYearPrin) + "</small></font></td><td align=right><font face='arial'><small>" + formatCurrency(accumYearInt) + "</small></font></td><td align=right><font face='arial'><small> </small></font></td><td align=right><font face='arial'><small> </small></font></td></tr>");

   accumYearPrin = 0;
   accumYearInt = 0;

   }

      if(count > 600) {

         alert("Using your current entries you will never pay off this loan.");

         break;

         } else {

         continue;

         }

    }

var part1 = ("<head><title>Amortization Schedule</title></head>" + "<body bgcolor= '#FFFFFF'><br><br><center><font face='arial'><big><strong>Amortization Schedule</strong></big></font></center>");

var part2 = ("<center><table border=1 cellpadding=2 cellspacing=0><tr><td colspan=6><font face='arial'><small><b>Loan Date: " + loanDate + "<br>Principal: $" + formatNumber(Vprincipal) + "<br># of Payments: " + nPer + "<br>Interest Rate: " + formatNumber(VintRate) + "%<br>Payment: $" + formatNumber(pmtAmt) + "</b></small></font></td></tr><tr><td colspan=6><center><font face='arial'><b>Schedule of Payments</b></font><br><font face='arial'><small><small>Please allow for slight rounding differences.</small></small></font></center></td></tr><tr bgcolor='silver'><td align='center'><font face='arial'><small><b>Pmt #</b></small></font></td><td align='center'><font face='arial'><small><b>Date</b></small></font></td><td align='center'><font face='arial'><small><b>Principal</b></small></font></td><td align='center'><font face='arial'><small><b>Interest</b></small></font></td><td align='center'><font face='arial'><small><b>Payment</b></small></font></td><td align='center'><font face='arial'><small><b>Balance</b></small></font></td></tr>");

var part3 = ("" + pmtRow + "");

var part4 = ("<tr><td colspan='2'><font face='arial'><small><b>Grand Total</b></small></font></td><td align=right><font face='arial'><small><b>" + formatCurrency(accumPrin) + "</b></small></font></td><td align=right><font face='arial'><small><b>" + formatCurrency(accumInt) + "</b></small></font></td><td> </td><td> </td></tr></table><br><center><form method='post'><input type='button' value='Close Window' onClick='window.close()'></form></center></body></html>");

var schedule = (part1 + "" + part2 + "" + part3 + part4 + "");

  reportWin = window.open("","","width=500,height=400,toolbar=yes,menubar=yes,scrollbars=yes,resizable=yes");

  reportWin.document.write(schedule);

  reportWin.document.close();

   }

}
