 <!--Hide JavaScript from older browsers
 var num=0;
 var amt=0;
 var per=0;
 var months=0;
 var nls="";
 var rr="\r";
 var b="                               ";
 var ba="-----------------------------"
 +"----------------------------------";
 var s="$";
 function iA(){
  this.length=iA.arguments.length;
  for (var i=0;i<this.length;i++){
   this[i]=iA.arguments[i];
   }
  }
 var pwr=new iA(10);
 var dec=new iA(16);
 pwr[0]=1;
 for (var i=0;i<9;i++){
  pwr[i+1]=pwr[i]*10;
 }
 dec[0]=.1;
 dec[1]=.01;
 dec[2]=.001;
 dec[3]=.0001;
 dec[4]=.00001;
 dec[5]=.000001;
 dec[6]=.0000001;
 dec[7]=.00000001;
 dec[8]=.000000001;
 dec[9]=.0000000001;
 dec[10]=.00000000001;
 dec[11]=.000000000001;
 dec[12]=.0000000000001;
 dec[13]=.00000000000001;
 dec[14]=.000000000000001;
 dec[15]=.0000000000000001;
    
 var ns="01234567890";
 var cr="";
 var str="";
 
 function stn(){
  num=0;
  pos=str.indexOf(".");
  sfx="";
  if (pos>-1){
   sfx=str.substring(pos+1,str.length);
   str=str.substring(0,pos);
   }
  strl=str.length;
  for (var i=strl-1;i>-1;i--){
   cr=str.substring(i,i+1);
   pos=ns.indexOf(cr);
   num+=pos*pwr[strl-i-1];
   }
   if (sfx!=""&&sfx.length>dp){
    pos=ns.indexOf(sfx.charAt(dp+1));
    if (pos>4){
     pos=ns.indexOf(sfx.charAt(dp));
     sfx=sfx.substring(0,dp-1)+(pos+1);
     }
    }
   if (sfx!=""){
    for (var i=0;i<dp;i++){
     cr=sfx.substring(i,i+1);
     pos=ns.indexOf(cr);
     num+=pos*dec[i];
     }
 /*    sfx="";
     sfx+=num;
     pos=sfx.indexOf(".");
     sfx=sfx.substring(pos+1,sfx.length);
     if (sfx.charAt(dp+1)=="9"){
      num+=dec[sfx.length-2];
      } */
   }
  }
 
 function testIt(form){
  str=document.amort.amt.value;
  fmtIt();
  bl=str.length+3;
  dp=2;
  stn();
  amt=num;
  str=document.amort.per.value;
  dp=4;
  stn();
  per=num;
  str=document.amort.months.value;
  dp=0;
  stn();
  months=num;
  if (months<1||months>999||per<.0001||per>99||amt<1||amt>pwr[9]){
   alrt();
   }
  else{
  computeForm();
  }
 }
 
 function computeForm(){
  ls="";
  amortnum=1;
  i=per/12/100;
  fpv=0;
  for (var j=0;j<months;j++)
   amortnum=amortnum*(1+i);
   tmp=(amt*amortnum*i)/(amortnum-1);
   fpv+=tmp;
   fcalc=((months*fpv)-amt);
   
  prtSched();
  }
  
 function prtSched(){
  fpv+=.01;
  str=""
  str+=fpv;
  fmtIt();
  dp=2;
  stn();
  fpv=num;
  pct=per/12/100;
  if (bl<14){
   bl=14;
   }
  ls="Payment Schedule:  "+s+document.amort.amt.value
  +" borrowed for "+document.amort.months.value
  +" months at "+document.amort.per.value+"% :"+rr+ba+rr
  +"Payment       Payment       Interest      Principal     Remaining"
  +rr
  +"Number                                    Reduction     Balance"
  +rr+ba+rr;
  for (var j=0;j<months;j++){
   ntr=(amt*pct);
   str="";
   str+=ntr;
   fmtIt();
   ntr1=s+str;
   prp=fpv-ntr;
   if (prp>amt){
    prp=amt;
    }
   str="";
   str+=prp;
   fmtIt();
   prp1=s+str;
   amt-=prp;
   str="";
   str+=amt;
   fmtIt();
   amt1=s+str;
   if (fpv>(ntr+prp)){
    fpv=ntr+prp;
    }
   str="";
   str+=fpv;
   fmtIt();
   fpv1=s+str;
   str="";
   str+=(j+1)+".";
   ls+=b.substring(0,2)+str+b.substring(0,12-str.length)
   +fpv1+b.substring(0,14-fpv1.length)+ntr1
   +b.substring(0,14-ntr1.length)+prp1
   +b.substring(0,14-prp1.length)+amt1
   +rr;
   }
   document.amort.sched.value=ls+ba+rr
   +"  Note: Interest is calculated at 1/12th of annual interest rate "
   +rr+"  on remaining principal amount. (Rounding errors are "
   +"possible)"+rr+ba+rr;
  }
 function fmtIt(){
  pos=str.indexOf(".");
  if (pos==0){
   str="0"+str;
   pos++;
   }
  if (pos<0){
   str+=".00";
   pos=str.indexOf(".");
   }
  str+="0000";
  str=str.substring(0,pos+4);
  cr=str.charAt(str.length-1);
  pos=ns.indexOf(cr);
  str=str.substring(0,str.length-1);
  if (pos>5){
   fmtIt1();
   }
  }
  function fmtIt1(){
   for (var k=str.length-1;k>-1;k--){
    cr=str.charAt(k);
    posn=ns.indexOf(cr);
    if (posn<0){
     k--;
    }
    else{
     str=str.substring(0,k)+ns.substring(posn+1,posn+2)
     +str.substring(k+1,str.length);
     if (posn!=9){
      k=-1;
     }
    }
   }
  }
 function alrt(){
  alert("Months must be from"
  +" 1 to 999, Loan amount from 1 to "+pwr[9]
  +" Interest from .001 to 99.");
 }
 //-->