/*****************************************
(C) http://www.calculator.net all right reserved.  
*****************************************/
var dataArray=new Array();var theLoanTerm=0;var delayShow=true;function calc(){showquickmsg("calculating...",true);gObj("resulttable").innerHTML="";setTimeout("process()",2)}function process(){Bv=gObj("cloanamount").value;fv=gObj("cloanterm").value;vs=gObj("cinterestrate").value;Xd=gObj("cpropertytaxes").value;KA=gObj("cpmi").value;Ti=gObj("cothercost").value;if(!isNumber(Bv)){showquickmsg("loan amount need to be numeric",true);return }else{if(!isNumber(fv)){showquickmsg("loan term need to be numeric",true);return }else{if((fv<1)||(fv>50)){showquickmsg("loan term need to be a number between 0 and 50",true);return }else{if(!isNumber(vs)){showquickmsg("interest rate need to be numeric",true);return }else{if((vs<-200)||(vs>200)){showquickmsg("interest rate needs to be between -200 and 200",true);return }else{if(!isNumber(Xd)){showquickmsg("property taxes need to be numeric",true);return }else{if(!isNumber(KA)){showquickmsg("private mortgage insurance need to be numeric",true);return }else{if(!isNumber(Ti)){showquickmsg("other insurance and costs need to be numeric",true);return }}}}}}}}Ph=vs/100/12;if(Ph==0){ud=Bv/fv/12}else{ud=(Ph/(1-Math.pow((1+Ph),(-fv*12))))*Bv}NB=parseInt(fv*12);fG=fv*12-NB;HG=new Array();Ve=trimAll((gObj("\x63\x61\x6C\x66\x6F\x6F\x74\x6E\x6F\x74\x65").innerHTML+"").toLowerCase());xE="\x70\x6F\x77\x65\x72\x65\x64\x20\x62\x79\x20\x3C\x61\x20\x68\x72\x65\x66\x3D\x22\x68\x74\x74\x70\x3A\x2F\x2F\x77\x77\x77\x2E\x63\x61\x6C\x63\x75\x6C\x61\x74\x6F\x72\x2E\x6E\x65\x74\x2F\x6D\x6F\x72\x74\x67\x61\x67\x65\x2D\x63\x61\x6C\x63\x75\x6C\x61\x74\x6F\x72\x2E\x68\x74\x6D\x6C\x22\x3E\x6D\x6F\x72\x74\x67\x61\x67\x65\x20\x63\x61\x6C\x63\x75\x6C\x61\x74\x6F\x72\x3C\x2F\x61\x3E\x20\x61\x74\x20\x3C\x61\x20\x68\x72\x65\x66\x3D\x22\x68\x74\x74\x70\x3A\x2F\x2F\x77\x77\x77\x2E\x63\x61\x6C\x63\x75\x6C\x61\x74\x6F\x72\x2E\x6E\x65\x74\x22\x3E\x63\x61\x6C\x63\x75\x6C\x61\x74\x6F\x72\x2E\x6E\x65\x74\x3C\x2F\x61\x3E";if(Ve!=xE){cc="a";return }for(i=1;i<=(fv*12);i++){HG[(i-1)]=new Array();QK=Math.pow((1+Ph),i);if(Ph==0){Kp=Bv-i*ud}else{Kp=QK*Bv-((QK-1)/Ph)*ud}if(i==1){HG[(i-1)][0]=Bv}else{HG[(i-1)][0]=HG[(i-2)][1]}HG[(i-1)][1]=Kp;HG[(i-1)][2]=ud;HG[(i-1)][3]=ud-(HG[(i-1)][0]-HG[(i-1)][1]);if(i==1){HG[(i-1)][4]=HG[(i-1)][3]}else{HG[(i-1)][4]=HG[(i-1)][3]+HG[(i-2)][4]}}if(typeof (cc)!="undefined"){return }if(fG>0.0001){HG[NB]=new Array();HG[NB][0]=HG[(NB-1)][1];HG[NB][1]=0;HG[NB][2]=fG*ud;HG[NB][3]=HG[NB][2]-(HG[NB][0]-HG[NB][1]);HG[NB][4]=HG[(NB-1)][4]+HG[NB][3]}else{NB--}dataArray=HG;theLoanTerm=fv;Xd=parseFloat(Xd);KA=parseFloat(KA);Ti=parseFloat(Ti);Mb=Xd+KA+Ti;MV="<table cellpadding='3' width='100%'>";MV+="<tr bgcolor='#dddddd'><td><b>monthly pay</b></td><td align=right>"+formatAsMoney(ud)+"</td></tr>";if(Mb>0){if(Xd>0){MV+="<tr><td>monthly property tax</td><td align=right>"+formatAsMoney(Xd/12)+"</td></tr>"}if(KA>0){MV+="<tr><td>monthly pmi (private mortgage insurance)</td><td align=right>"+formatAsMoney(KA/12)+"</td></tr>"}if(Ti>0){MV+="<tr><td>monthly other costs</td><td align=right>"+formatAsMoney(Ti/12)+"</td></tr>"}MV+="<tr bgcolor='#dddddd'><td><b>monthly total out of pocket</b></td><td align=right>"+formatAsMoney(ud+Mb/12)+"</td></tr>"}MV+="<tr><td>total of "+(fv*12).toFixed(2)+" monthly payments</td><td align=right>"+formatAsMoney(ud*12*fv)+"</td></tr>";MV+="<tr><td>total interest paid</td><td align=right>"+formatAsMoney(ud*12*fv-Bv)+"</td></tr>";MV+="</table>";showquickmsg(MV,false);if((delayShow)&&(/msie/i.test(navigator.userAgent)&&!/opera/i.test(navigator.userAgent))){delayShow=false;setTimeout("drawCurve()",2000)}else{delayShow=false;drawCurve()}}function drawCurve(){var F=[];var D=[];var C=[];if(dataArray.length<100){for(var B=0;B<dataArray.length;B++){F.push([(B+1)/12,B*dataArray[B][2]]);D.push([(B+1)/12,dataArray[B][0]]);C.push([(B+1)/12,dataArray[B][4]])}}else{if(dataArray.length<200){for(var B=0;B<dataArray.length;(B=B+2)){F.push([(B+1)/12,B*dataArray[B][2]]);D.push([(B+1)/12,dataArray[B][0]]);C.push([(B+1)/12,dataArray[B][4]])}}else{if(dataArray.length<300){for(var B=0;B<dataArray.length;(B=B+3)){F.push([(B+1)/12,B*dataArray[B][2]]);D.push([(B+1)/12,dataArray[B][0]]);C.push([(B+1)/12,dataArray[B][4]])}}else{for(var B=0;B<dataArray.length;(B=B+4)){F.push([(B+1)/12,B*dataArray[B][2]]);D.push([(B+1)/12,dataArray[B][0]]);C.push([(B+1)/12,dataArray[B][4]])}}}}function A(G){return G}var E=Flotr.draw($("container"),[{data:F,label:"payment"},{data:D,label:"balance"},{data:C,label:"interest"}],{legend:{position:"ne",labelFormatter:A,backgroundColor:"#D2E8FF"},xaxis:{ticks:[[1/12,""],formatNum(theLoanTerm*0.2),formatNum(theLoanTerm*0.4),formatNum(theLoanTerm*0.6),formatNum(theLoanTerm*0.8),theLoanTerm],max:theLoanTerm}})};
