///////////////////////////////////////////////////////
	function Mef(valeur)	// pour cadrage des valeurs //
	/////////////////////////////////////////////////////
	{ 	return valeur.toFixed(2);	}
	///////////////////////////////////////////////
	function Calcul()	// calcul des échéances //
	/////////////////////////////////////////////
	{	var Af=Number(document.Saisie.Montant.value);
		if ( Af<1 )
					alert ("montant du prêt erroné");
		else	{	var Y=Number(document.Saisie.Duree.value);
					if ( Y<1 || Y>240 )
							alert("Durée erronée");
					else	{	var Ir=Number(document.Saisie.Taux.value);
								if ( Ir<1 || Ir>72 )
										alert("Taux erroné");
								else	{	//var Nf = Y * 12;
								 
								            var Nf = Y;
								
											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 /><font class='formulaires'>Prêt de "+
														document.Saisie.Montant.value+
														"€ sur "+
														document.Saisie.Duree.value+
														" mois, au taux de "+
														document.Saisie.Taux.value+
														"% => Echéances <u>d'environ</u> " +
														Pf+
														"€ par mois</font><"+"br /><"+"br />";
											var Amort=new Array();
											Amort[0,1] = Af;
											var Cp=0;
											var Ci=0;
											impr+=("<"+"table border='0' cellpadding='5' cellspacing='5' class='emprunt'>");
											impr+=("<"+"tr><"+"th>Mois</"+"th><"+"th>Année</"+"th>");
											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 align=\"right\">"+I+"</"+"td>");
												impr+=("    <"+"td align=\"right\">"+T2+"</"+"td>");
												impr+=("    <"+"td align=\"right\">"+I+"</"+"td>");
												impr+=("    <"+"td align=\"right\">"+Mef(Pf - Amort[I, 2])+"</"+"td>");
												impr+=("    <"+"td align=\"right\">"+Mef(Amort[I,2])+"</"+"td>");
												impr+=("    <"+"td align=\"right\">"+Mef(Amort[I, 1])+"</"+"td>");
												impr+=("    <"+"td align=\"right\">"+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><"+"td></"+"td><"+"td></"+"td>");
											impr+=("    <"+"td align=\"right\">"+Mef(Cp)+"</"+"td>");
											impr+=("    <"+"td align=\"right\">"+Mef(Ci)+"</"+"td>");
											impr+=("    <"+"td></"+"td>");
											impr+=("    <"+"td align=\"right\">"+Mef(Cp+Ci)+"</"+"td></"+"tr>");
											impr+=("</"+"table>");
											document.getElementById("result").innerHTML=impr;

										}
							}
				}
	}