|
|
Banks and Financials companies - Alaska
Aleutians West
Anchorage
Bethel
Bristol Bay
Dillingham
Frbnks N Star
Haines
Juneau
Kenai Pen
Ketchikan Gate
Kodiak Island
Matanuska
Nome
North Slope
Nw Arctic
Prince Wales
Se Fairbanks
Sitka
Skagway Angoon
Valdez Cordova
Wrangell Ptrbg
Yakutat
// All this junk written by Brook Heaton, 1999
// if you steal it, give me credit, capisce?
function computePayment__MODULE_ID__() {
var P=document.myform__MODULE_ID__.loanAmt__MODULE_ID__.value;
var i=document.myform__MODULE_ID__.intRate__MODULE_ID__.value;
var n=document.myform__MODULE_ID__.numYears__MODULE_ID__.value;
var F;
var A;
var num;
num=Math.pow((1+i/1200),(n*12));
F = P*num;
A = F*(i/1200);
A /= (num-1);
document.myform__MODULE_ID__.monPayment__MODULE_ID__.value = roundOff__MODULE_ID__(A,2);
}
function computePresValue__MODULE_ID__() {
var A=document.myform__MODULE_ID__.monPayment__MODULE_ID__.value;
var i=document.myform__MODULE_ID__.intRate__MODULE_ID__.value;
var n=document.myform__MODULE_ID__.numYears__MODULE_ID__.value;
var P;
var num;
num=Math.pow((1+i/1200),(n*12));
P = A*((num-1)/(i/1200))*(1/num);
document.myform__MODULE_ID__.loanAmt__MODULE_ID__.value = roundOff__MODULE_ID__(P,2);
}
function computeNumYears__MODULE_ID__() {
var A=document.myform__MODULE_ID__.monPayment__MODULE_ID__.value;
var i=document.myform__MODULE_ID__.intRate__MODULE_ID__.value;
var P=document.myform__MODULE_ID__.loanAmt__MODULE_ID__.value;
var n;
var num;
num = Math.log(1/(1-P*(i/1200)/A));
n = num/Math.log(1+i/1200);
document.myform__MODULE_ID__.numYears__MODULE_ID__.value = roundOff__MODULE_ID__(n/12,2);
}
function computeInterestRate__MODULE_ID__() {
var A=document.myform__MODULE_ID__.monPayment__MODULE_ID__.value;
var n=document.myform__MODULE_ID__.numYears__MODULE_ID__.value*12;
var P=document.myform__MODULE_ID__.loanAmt__MODULE_ID__.value;
var i=6/1200;
var FoverP;
var fprimex;
var fx;
var oldI;
var count = 0;
while (true) {
FoverP = Math.pow((1+i),n);
fx = (FoverP-1)/(FoverP*i) - P/A;
fprimex = -1/(i*i) + (n/i)*Math.pow((1+i),(-n-1)) + 1/(i*i)*Math.pow((1+i),(-n));
oldI = i;
i = i - fx/fprimex;
count++;
if (Math.abs(oldI-i) < 0.00000001)
break;
if (count > 1000)
break;
}
if (count>1000)
document.myform__MODULE_ID__.intRate__MODULE_ID__.value = "Max iter. exceeded";
else {
i*=1200;
document.myform__MODULE_ID__.intRate__MODULE_ID__.value = roundOff__MODULE_ID__(i,3);
}
}
function roundOff__MODULE_ID__(value, precision) {
value = "" + value;
precision = parseInt(precision);
var whole = "" + Math.round(value * Math.pow(10,precision));
var decPoint = whole.length-precision;
var result;
if (decPoint !=0) {
result=whole.substring(0,decPoint);
result+=".";
result+=whole.substring(decPoint, whole.length);
}
else {
result = "0." + whole;
}
return result;
}
]]>
Refinancing loan
Personal loan
Mortgage loan
|