var browser function getBrowserName() { ver=(navigator.appVersion).substring(0,1) return ((navigator.appName).indexOf("Explorer")==-1?"N":"E") } function focusPField() { browser=getBrowserName() document.interest.p.focus() } function round2(nbr,digits) { nbr=nbr.toString() if (nbr.indexOf('.')==-1) { int_part=nbr decimal_part="" } else { int_part=nbr.substring(0,nbr.indexOf('.')) decimal_part=nbr.substring(1+nbr.indexOf('.'),2+nbr.indexOf('.')+digits) } while(decimal_part.lengthdigits+1) { int_part=(Number(int_part)+1).toString() decimal_part=decimal_part.substring(1,digits+1) } decimal_part=decimal_part.substring(0,digits) } if (int_part=="") int_part=0; if (Number(digits)>0) return int_part+'.'+decimal_part else return int_part } function getKeyCode(e) { if (browser=="N") chr=e.which else chr=e.keyCode if ((chr<48 || chr>57) &&chr!=58 && chr!=0 && chr!=46 & chr!=8) return false return true } function isValid2(theForm) { if (theForm.p.value<=0) { alert("Principal value should be a number >0") theForm.p.focus(); return false; } if (theForm.r.value<=0) { alert("Interest rate value should be >0") theForm.r.focus(); return false; } if (theForm.add.value<0) { alert("Additional principal should be a number > 0") theForm.add.focus(); return false; } if (theForm.newWin.checked==true) { var str = compute2(theForm.p.value,theForm.r.value,theForm.t.value,theForm.add.value,theForm.skd.checked); var str1 = ""; str1 = str1 + ""; str1 = str1 + ""; str1 = str1 + ""; str1 = str1 + ""; str2 = str2 + ""; str2 = str2 + ""; str2 = str2 + "
   
"; str1 = str1 + "


"; var str2 = "


close window


   
"; var str0 = " « Property-Online International » "; str0 = str0 + ""; str0 = str0 + ""; str0 = str0 + ""; str0 = str0 + ""; str0 = str0 + ""; newWindow = window.open("","newWindow","toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,width=517,height=400"); newWindow.document.write(str0); newWindow.document.write(str1); newWindow.document.write(str); newWindow.document.write(str2); } else { compute(theForm.p.value,theForm.r.value,theForm.t.value,theForm.add.value,theForm.skd.checked); } } function getYearsMonths(mon) { var months, years years=Math.floor(mon/12) months=mon-(years*12) if (months==0) months=null else if (months==1) months="1 month" else months=months+" months" if (years==0) years =null else if (years==1) years="1 year" else years=years+" years" if (years==null) return months else if (months==null) return years else return years+" and "+months } function compute(p,r,t,add,skd) { amFactor=getAmFactor(p,r,t) monthlyPayment=Number(add)+p/amFactor howLong(p,r,t,monthlyPayment,add,skd) } function compute2(p,r,t,add,skd) { amFactor=getAmFactor(p,r,t) monthlyPayment=Number(add)+p/amFactor return howLong2(p,r,t,monthlyPayment,add,skd) } function getAmFactor(p,r,t) { numerator=1-Math.pow(1+r/1200,-1*t*12) denominator=r/1200 return numerator/denominator } function howLong(p,r,t,monthlyPayment,add,skd) { html2=""+ "" html2+=""+ ""+ ""+ ""+ "" var months=0 monthlyRate=r/1200 pr=p mp=monthlyPayment ttlmp=0 ttlip=0 while (Number(pr)>0) { html2+="" months++ } html2+="" + "" + "" + "

Schedule of Payments

Month #

Beginning Principal

Monthly Payment

Interest Payment

Ending Principal

Totals

" html="


"+ ""+ "

Summary of Payments



" if (skd) html+="
"+html2 unhide() write_result("result",html) } function howLong2(p,r,t,monthlyPayment,add,skd) { html2=""+ "" html2+=""+ ""+ ""+ ""+ "" var months=0 monthlyRate=r/1200 pr=p mp=monthlyPayment ttlmp=0 ttlip=0 while (Number(pr)>0) { html2+="" months++ } html2+="" + "" + "" + "

Schedule of Payments

Month #

Beginning Principal

Monthly Payment

Interest Payment

Ending Principal

Totals

" html="


"+ ""+ "

Summary of Payments



" if (skd) html+="
"+html2 unhide() //write_result("result",html) return html; } function changeColor(str) { if (str.style.backgroundColor=="red") str.style.backgroundColor="black" else str.style.backgroundColor="red" } function hide() { //document.getElementById('result').style.visibility="hidden"; document.getElementById('result').innerHTML="

Enter details and press Compute.

"; } function unhide() { document.getElementById('result').style.visibility="visible" } function write_result(id,the_result) { d=document; re=d.all?d.all[id]:d.getElementById(id); re.innerHTML=the_result } function clearAll() { //d=document; //re=d.all?d.all["result"]:d.getElementById("result"); //re.style.visibility="visible"; //re1=d.all?d.all["temp"]:d.getElementById("temp"); //re1.style.visibility="hidden"; hide() } function showAll(transfer) { str0 = ""; str0 = str0 + ""; str0 = str0 + " « Property-Online International » "; str0 = str0 + ""; str0 = str0 + ""; str0 = str0 + ""; str0 = str0 + ""; str0 = str0 + ""; str0 = str0 + ""; str0 = str0 + ""; str0 = str0 + ""; str0 = str0 + ""; str0 = str0 + ""; str1 = str1 + ""; str1 = str1 + ""; str1 = str1 + ""; str1 = str1 + ""; str1 = str1 + "
   
"; str0 = str0 + "


"; str = "

Mortgage Bond & Transfer Cost

"; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + ""; str = str + "

Bond Costs

Transfer Costs

Bond Registration Costs (+ VAT)

Transfer Costs (+ VAT)

Stamp Duty on Bond

Transfer Duty

Deeds Office Levy

Deeds Office Levy

Sectional Title Insurance Cert.

Municipal Valuation Cert.

Post & Petties (+ VAT)

Levy Clearance Cert.

Assessment Fee

Post & Petties

Initiation Fee (+ VAT)

Total Bond Costs

Total Transfer Costs

Grand Total

"; str1 = "


"; str1 = str1 + "
   
"; str1 = str1 + ""; str1 = str1 + ""; if (transfer.chk.checked==true) { newWin1 = window.open("","newWin1","toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,width=517,height=315"); newWin1.document.write(str0); newWin1.document.write(str); newWin1.document.write(str1); //newWin1.document.close(); } else { write_result("result",str) } }