Loan Amortization

<?xml version="1.0" encoding="utf-8"?>
<ztmstudio ztmview="on">
   <ztml>
     <lang>
       <fr>
         <json><![CDATA[{"fr": { "title":"Calcul amortissement prêt",
    "0":"montant",
    "1":"Durée" },
 "en":{ "title":"Loan",
    "0":"Amount",
    "1":"Period" },
}
]]>
</json>
         <title><![CDATA[Calcul.pret]]>
</title>
         <msg0><![CDATA[Montant]]>
</msg0>
         <msg1><![CDATA[Durée]]>
</msg1>
         <msg2><![CDATA[mois]]>
</msg2>
         <msg3><![CDATA[Taux]]>
</msg3>
         <msg4><![CDATA[pour cent]]>
</msg4>
         <msg5><![CDATA[Calcul]]>
</msg5>
         <msg6><![CDATA[Calcul]]>
</msg6>
         <msg7><![CDATA[Mensualité]]>
</msg7>
         <msg8><![CDATA[Coût]]>
</msg8>
         <srchlp><![CDATA[<DIV><b>Calcul pret</b></DIV>
<DIV>Mensualite = Montant*taux/(1- (1/(1+taux))**duree)</DIV>
<br>Calcul le cout et la mensualité
<br> Affiche le tableau d'amortissement]]>
</srchlp>
         <mybody><![CDATA[<div id=pret>
<DIV>Calcul Amortissement Prêt</DIV>
<TABLE>
<TR><TD class=rr>Montant</TD><TD><INPUT type=text size=12 value=15000 onfocus="this.value='';"></TD><TD> </TD></TR>
<TR><TD class=rr>Durée</TD><TD><INPUT type=text size=12 value=24  onfocus="this.value='';"></TD><TD>mois</TD></TR>
<TR><TD>Taux </TD><TD><INPUT type=text size=12 value=5.5 onfocus="this.value='';"></TD><TD>pour cent</TD></TR>
<TR><TD><INPUT type=button class=divcalc value='Calcul' title=run></TD><TD></TD><TD></TD></TR>
<TR><TD>Mensualité</TD><TD><INPUT type=text size=12  ></TD><TD> </TD></TR>
<TR><TD>Coût</TD><TD><INPUT type=inptext ut  size=12 ></TD><TD> </TD></TR>
</TBODY></TABLE>
<SPAN></SPAN></div>
	]]>
</mybody>
</fr>
       <en>
         <json><![CDATA[{"fr": { "title":"Calcul amortissement prêt",
    "0":"montant",
    "1":"Durée" },
 "en":{ "title":"Loan Amortization",
    "0":"Amount",
    "1":"Period" },
}
]]>
</json>
         <title><![CDATA[Loan]]>
</title>
         <msg0><![CDATA[Amount]]>
</msg0>
         <msg1><![CDATA[Period]]>
</msg1>
         <msg2><![CDATA[month]]>
</msg2>
         <msg3><![CDATA[Rate]]>
</msg3>
         <msg4><![CDATA[per cent]]>
</msg4>
         <msg5><![CDATA[per cent]]>
</msg5>
         <msg6><![CDATA[Rub]]>
</msg6>
         <msg7><![CDATA[Monthly]]>
</msg7>
         <msg8><![CDATA[Cost]]>
</msg8>
         <srchlp><![CDATA[<DIV><b>Calculation loan</b></DIV>
<DIV>Monthly = Amount*rate/(1- (1/(1+rate))**duration)</DIV>
<br>Calculate the cost and monthly payment
<br>Displays the depreciation table]]>
</srchlp>
         <mybody><![CDATA[<div id=pret>
<DIV>Loan Amortization</DIV>
<TABLE>
<TR><TD class=rr>Amount</TD><TD><INPUT type=text size=12 value=15000 onfocus="this.value='';"></TD><TD> </TD></TR>
<TR><TD class=rr>Period</TD><TD><INPUT type=text size=12 value=24  onfocus="this.value='';"></TD><TD>month</TD></TR>
<TR><TD>Taux </TD><TD><INPUT type=text size=12 value=5.5 onfocus="this.value='';"></TD><TD>Rate</TD></TR>
<TR><TD><INPUT type=button class=divcalc value='Run' title=run></TD><TD></TD><TD></TD></TR>
<TR><TD>Monthly</TD><TD><INPUT type=text size=12  ></TD><TD> </TD></TR>
<TR><TD>Cost</TD><TD><INPUT type=inptext ut  size=12 ></TD><TD> </TD></TR>
</TBODY></TABLE>
<SPAN></SPAN></div>
	]]>
</mybody>
</en>
</lang>
</ztml>
   <html>
     <head><![CDATA[<title>Loan Amortization </title>
  <meta charset="utf-8" />
  <meta name="viewport" id="viewport" content="width=device-width,  initial-scale=1"/>
  <meta name="description" content="Ztmstudio est l'environnement de développement intégré pour le développement d'applications Javascript.,Editeur Xml, Applications javascript "/>
<script type="text/javascript" src="jquery-3.7.1.min.js"></script>  
<link rel="stylesheet" href="https://ztmstudio.com/ZTmOs.css" type="text/css" media="screen"/>  
<script type="text/javascript" src="https://ztmstudio.com/ZTmStudio.js"></script>]]>
       <style><![CDATA[
.pret {
  max-width: 500px;
  padding: 0px;
  margin: auto;
}]]>
</style>
       <script><![CDATA[call = function (event)
{
var div=ZTmEvent(event).target;
	if (event.type=='click' && div.nodeName=='IMG' )  
	{  
	if(/window-x/.test(div.src)) {ZTmMain.ztmview.clear();}	
	}
	if (event.type=='click' && div.nodeName=='INPUT' )  
	{ 
		if (/run/.test(div.title)){
				var princ = sfInp.item(0).value;
				var term  = sfInp.item(1).value;
				var txan   = sfInp.item(2).value ;
				txan2= txan/1200;
				
				var mens = princ * txan2 / (1 - (Math.pow(1/(1 + txan2), term)));
	sfInp.item(4).value = Math.round(mens*100) / 100;
	sfInp.item(5).value = Math.round(mens*term - princ);
	 Calcul(term/12,txan,princ);
				}
	}
	if (div.nodeName=='TD'){if(/ztmtitle/.test(div.className)) {ZTmHlpRun();return;}}
}

function Calcul(Y,Ir,Af) 
{

//Due Date Principal Interest Remaining Paid
if ( Af<1 )
alert ("montant du pret erroné");
else { 
if ( Y<1 || Y>35 )
alert("Durée erronée");
if ( Ir<1 || Ir>20 )
alert("Taux erroné");
else { var Nf = Y * 12;
var Rf = (Ir / 1200);
var P1 = Af * ( Rf / ( 1 - ( 1 / ( Math.pow ( ( 1 + Rf ), Nf ) ) ) ) ) ;
var Pf = Math.floor ( ( P1 + 0.005 ) * 100) / 100;
var impr= "<"+"br>Prêt de "+
Af+
"€ sur "+
Y+
" ans, au taux de "+
Ir+
"%<br> => Echéances de " +
Pf+
"€ par mois<"+"br /><"+"br />";
var Amort=new Array();
Amort[0,1] = Af;
var Cp=0;
var Ci=0;
impr+=("<"+"table border='0' cellpadding='3'>");
impr+=(" <"+"th>Echéance</"+"th>");
impr+=(" <"+"th>Principal</"+"th><"+"th>Intérêts</"+"th>");
impr+=(" <"+"th>Reste</"+"th><"+"th>Payé</"+"th></"+"tr>");
for ( var I=1 ; I <= Nf ; I++ )
{ Amort[I, 2] = Amort[I - 1, 1] * Rf;
Amort[I, 2] = Math.floor((Amort[I, 2] + 0.005) * 100) / 100;
Amort[I, 1] = Amort[I - 1, 1] - Pf + Amort[I, 2];
Amort[I, 1] = Math.floor ( ( Amort[I, 1] + 0.005 ) * 100 ) / 100;
var T1 = I - Math.floor ( ( I - 1 ) / 12 ) * 12;
var T2 = 1 + Math.floor ( ( I - 1 ) / 12 );
impr+=("<"+"tr><"+"td>"+I+"</"+"td>");
impr+=(" <"+"td>"+Mef(Pf - Amort[I, 2])+"</"+"td>");
impr+=(" <"+"td>"+Mef(Amort[I,2])+"</"+"td>");
impr+=(" <"+"td>"+Mef(Amort[I, 1])+"</"+"td>");
impr+=(" <"+"td>"+Mef(Pf * I)+"</"+"td></"+"tr>");
Cp = Cp + Pf - Amort[I, 2];
Ci = Ci + Amort[I, 2];
}
Cp = Math.floor((Cp + 0.005) * 100) / 100;
Ci = Math.floor((Ci + 0.005) * 100) / 100;
impr+=("<"+"tr>"+"<"+"td></"+"td>");
impr+=(" <"+"td>"+Mef(Cp)+"</"+"td>");
impr+=(" <"+"td>"+Mef(Ci)+"</"+"td>");
impr+=(" <"+"td></"+"td>");
impr+=(" <"+"td>"+Mef(Cp+Ci)+"</"+"td></"+"tr>");
impr+=("</"+"table>");
}
}
sfSp.item(0).innerHTML =impr;
} 
  function Mef(valeur) 
 { return valeur.toFixed(2); } 
//http://coursgratuits.net/Rachat-de-credit.php

function ZTm(){
ZTmlInit();
ZTmView();
ZTmMain.ztmview = ZTmMain.create();
ZTmMain.ztmview.title=ZTmValueTag(ZTmlDoc,ZTmLang,'title');
ZTmMain.ztmview.srchlp=ZTmValueTag(ZTmlDoc,ZTmLang,'srchlp');
ZTmMain.ztmview.create(); 
ZTmMain.ztmview.icon='wx';ZTmicons.create();
ZTmMain.ztmview.icon='zt';ZTmicons.createbox1();
ZTmMain.ztmview.corps.innerHTML=ZTmValueTag(ZTmlDoc,ZTmLang,'mybody');

ZTmMain.ztmview.boite.onclick=call;

mai =document.getElementById('pret');

//alert(mai.innerHTML);
 mai.onclick=call;	
	sfInp   = mai.getElementsByTagName('INPUT');
//alert(sfInp.length);
	sfTd   = mai.getElementsByTagName('TD');
//alert(sfTd.length)

sfSp   = mai.getElementsByTagName('SPAN');
        inp = sfInp.item(0);

sfTd.item(0).innerHTML=ZTmValueMsg('msg0');
        sfTd.item(3).innerHTML=ZTmValueMsg('msg1');
        sfTd.item(5).innerHTML=ZTmValueMsg('msg2');
        sfTd.item(6).innerHTML=ZTmValueMsg('msg3');
        sfTd.item(8).innerHTML=ZTmValueMsg('msg4');
        sfTd.item(12).innerHTML=ZTmValueMsg('msg7');
       sfTd.item(15).innerHTML=ZTmValueMsg('msg8');
	
}]]>
</script>
</head>
     <body onload="ZTm();"><![CDATA[	]]>
</body>
</html>
</ztmstudio>