//Copyright Gérard Lumbreras Breizh Credit
var lp_Taux=0;var lp_TxPer=0;var lp_TxAs=0;var lp_Assur=0;var lp_TEG1=0;var lp_TEG2=0;var lp_Capital=0;var lp_DifHA=0;var lp_DifAC=0;var lp_EchHA=0;var lp_EchAC=0;var lp_CoutAs=0;var lp_CoutInt=0;var lp_CoutTot=0;var lp_Calcul=0;var _DO_=null
var _PAGE_=null
function _ARR(v,d){v*=Math.pow(10,d);v=Math.round(v);return v/Math.pow(10,d)}
function EXE_NVC(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal,nBase){var szRes=Math.abs(Math.round(fVal)).toString(nBase);var nLgr=szRes.length;if(bSigne||(fVal<0))nLgr++;if(bMillier){var szRes2=""
for(var i=0;i<Math.ceil(szRes.length/3);i++){szRes2=szRes.substring(szRes.length-(3*(i+1)),szRes.length-(3*i))+" "+szRes2;nLgr++}szRes=szRes2.substring(0,szRes2.length-1);nLgr--}if(nLgr<eval(nTaille)){if(bCadrageGauche){while(nLgr<eval(nTaille)){
szRes+=" ";nLgr++}}else{if(bZero){while(nLgr<eval(nTaille)){if(bMillier&&(((nLgr)%4)==0))szRes=" "+szRes;else szRes="0"+szRes;nLgr++}}else{while(nLgr<eval(nTaille)){szRes=" "+szRes;nLgr++}}}}if(bSigne||(fVal<0)){var n=0
while((szRes.charAt(n)==" ")&&(n<nLgr))n++;var szSgn="+";if(fVal<0)szSgn="-";szRes=szRes.substring(0,n)+szSgn+szRes.substring(n,szRes.length)}return szRes}
function EXE_NVC_d(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal,10)}
function EXE_NVC_x(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal,16)}
function EXE_NVC_o(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal,8)}
function EXE_NVC_e(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){var nExp=Math.round(Math.log(Math.abs(fVal))/Math.LN10);var fPuiss=Math.pow(10,nExp);var szRes=EXE_NVC_f(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,(fVal/fPuiss))
while(szRes.charAt(szRes.length-1)==" ")szRes=szRes.substring(0,szRes.length-1);szRes+="e";if(nExp>=0)szRes+="+";else szRes+="-";if(nExp<10)szRes+="0";szRes+=Math.abs(nExp);while(szRes.length<nTaille)if(bCadrageGaucHe)szRes+=" ";else szRes=" "+szRes
return szRes}
function EXE_NVC_f(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){var fEnt=Math.floor(fVal);if(fVal<0)fEnt+=1;var szDec=""+(Math.round((Math.abs(fVal)-Math.floor(Math.abs(fVal)))*Math.pow(10,nPrec))/Math.pow(10,nPrec))
szDec=szDec.substring(2,szDec.length);var szRes=EXE_NVC_d(bCadrageGauche,bSigne,bZero,nTaille-(nPrec+1),nPrec,bMillier,fEnt);if(bCadrageGauche)while(szRes.charAt(szRes.length-1)==" ")szRes=szRes.substring(0,szRes.length-1)
while(szRes.charAt(0)==" ")szRes=szRes.substr(1);if(nPrec>0){szRes+=".";while(szDec.length<nPrec)szDec+="0";szRes+=szDec.substring(0,nPrec)}while(szRes.length<nTaille)if(bCadrageGauche)szRes+=" ";else szRes=" "+szRes;return szRes}
function EXE_NVC_D(bCadrageGauche,bSigne,bZero,nTaille,nPreC,bMillier,fVal){return EXE_NVC_d(bcadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal)}
function EXE_NVC_E(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC_e(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal)}
function EXE_NVC_O(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC_o(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal)}
function EXE_NVC_X(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){var szRes = EXE_NVC_x(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal);return szRes.toUpperCase()}
function EXE_NVC_F(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC_f(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal)}
function _NVC(fVal,szFormat){if(isNaN(fVal))return fVal;var bCadrageGauche=false;var bSigne=false;var bZero=false;var nTaille=0;var nPrec=0;var szType="f";var bMillier=false;if(szFormat.charAt(0)=="-"){bCadrageGauche=true
szFormat=szFormat.substring(1,szFormat.length)}if(szFormat.charAt(0)=="+"){bSigne=true;szFormat=szFormat.substring(1,szFormat.length)}if(szFormat.charAt(0)=="0"){bZero=true;szFormat=szFormat.substring(1,szFormat.length)}
if((szFormat.charAt(szFormat.length-1)=="s")||(szFormat.charAt(szFormat.length-1)=="S")){bMillier=true;szFormat=szFormat.substring(0,szFormat.length-1)}szType=szFormat.charAt(szFormat.length-1);szFormat=szFormat.substring(0,szFormat.length-1)
if((szType!="d")&&(szType!="e")&&(szType!="f")&&(szType!="o")&&(szType!="x")&&(szType!="D")&&(szType!="E")&&(szType!="F")&&(szType!="O")&&(szType!="X"))return"";nTaille=parseInt(szFormat)
if(szFormat.indexOf(".")!=-1)nPrec=parseInt(szFormat.substring(szFormat.indexOf(".")+1,szFormat.length));else{var szEnt=""+fVal;var szDec=""+fVal;var nPosPt=szDec.indexOf(".");if(nPosPt!=-1){szDec=szDec.substring(nPosPt+1)
szEnt=szEnt.substring(nPosPt-1);nPrec=nTaille-(szEnt.length+1)}}return eval("EXE_NVC_"+szType+"("+bCadrageGauche+","+bSigne+","+bZero+","+nTaille+","+nPrec+","+bMillier+","+fVal+")")}
function _MI(a,b){return a<b?a:b}
function _MA(a,b){return a>b?a:b}
function _EC(c,p,s,n){if (!(n == 1)){var d=-s.length;for(var i=0;i<p-1;i++){d=c.indexOf(s,d+s.length);if(d==-1)return(p==1?c:"\b")}var f=c.indexOf(s,d+s.length);if(f==-1)f=c.length;return c.substring(d+s.length,f)}else{var d = c.length
for(var i=0;i<p-1;i++){d = c.lastIndexOf(s, d - 1);if (d == -1)	return (p==1?c:"\b")}var f = c.lastIndexOf(s, d - 1);if (f == -1)f=0;return c.substr(f + 1, d - f - 1)}}
function _VAL(v){var r=parseFloat(v);return isNaN(r)?0:r}
function _JCX(v){r=v.toString(16);return r.length==1?"0"+r:r}
function _SAE(c,o){var d=0;var f=c.length-1;if(o&1)while(c.charAt(d)==" ")d++;if(o&2)while(c.charAt(f)==" ")f--;if (f < d) f= d;return c.substring(d,f+1)}
function _RMP(c,o,r){var p=0;var t=c.indexOf(o);var s=new String();while(t!=-1){s+=c.substring(p,t);s+=r;p=t+o.length;t=c.indexOf(o,p);		}s+=c.substring(p,c.length);return s}
function _JRW(s){for(var i=0;i<s.length;i++)if(s[i].checked)return i+1}
function TxPer(VFP_TAUX, VFP_PERIO, VFP_MODETX ){{if (VFP_PERIO==undefined) VFP_PERIO=12;if (VFP_MODETX==undefined) VFP_MODETX=1;{var VFP_X1=0
if((((((((((((VFP_PERIO!=1)&&(VFP_PERIO!=2))&&(VFP_PERIO!=3))&&(VFP_PERIO!=4))&&(VFP_PERIO!=6))&&(VFP_PERIO!=12))&&(VFP_PERIO!=24))&&(VFP_PERIO!=52))&&(VFP_PERIO!=360))&&(VFP_PERIO!=365))&&(VFP_PERIO!=366))){VFP_PERIO=12}
if(((VFP_MODETX!=1)&&(VFP_MODETX!=2))){VFP_MODETX=1}if((VFP_TAUX==0)){VFP_X1=0}if((VFP_TAUX!=0)){if((VFP_MODETX==1)){VFP_X1=(VFP_TAUX/VFP_PERIO)}if((VFP_MODETX==2)){VFP_X1=(Math.pow((1+VFP_TAUX),(1/VFP_PERIO))-1)}}return(VFP_X1)}}}
function TxAn(VFP_TAUX, VFP_PERIO, VFP_MODETX ){{if (VFP_PERIO==undefined) VFP_PERIO=12;if (VFP_MODETX==undefined) VFP_MODETX=1;{var VFP_X1=0
if((((((((((((VFP_PERIO!=1)&&(VFP_PERIO!=2))&&(VFP_PERIO!=3))&&(VFP_PERIO!=4))&&(VFP_PERIO!=6))&&(VFP_PERIO!=12))&&(VFP_PERIO!=24))&&(VFP_PERIO!=52))&&(VFP_PERIO!=360))&&(VFP_PERIO!=365))&&(VFP_PERIO!=366))){VFP_PERIO=12}
if(((VFP_MODETX!=1)&&(VFP_MODETX!=2))){VFP_MODETX=1}if(((VFP_TAUX*Math.pow(10,6))==0)){VFP_X1=0}else {;if((VFP_MODETX==1)){VFP_X1=(VFP_TAUX*VFP_PERIO)}if((VFP_MODETX!=1)){VFP_X1=(Math.pow((1+VFP_TAUX),VFP_PERIO)-1)}}return(VFP_X1)}}}
function Ech(VFP_TXPER, VFP_CAPITAL, VFP_NPM, VFP_PERIO, VFP_TERME ){{if (VFP_PERIO==undefined) VFP_PERIO=12;if (VFP_TERME==undefined) VFP_TERME=1;{var VRESULTAT=0;if((((VFP_CAPITAL==0)||(VFP_NPM==0))||(VFP_NPM>600))){return(0)}
if(((((((VFP_PERIO!=1)&&(VFP_PERIO!=2))&&(VFP_PERIO!=3))&&(VFP_PERIO!=4))&&(VFP_PERIO!=6))&&(VFP_PERIO!=12))){return(0)}if(((VFP_TERME!=1)&&(VFP_TERME!=2))){return(0)}if((VFP_TXPER>0)){if((VFP_TERME==1)){
VRESULTAT=((VFP_CAPITAL*VFP_TXPER)/(1-Math.pow((1+VFP_TXPER),(-VFP_NPM))))}else {;VRESULTAT=((VFP_CAPITAL*VFP_TXPER)/((1-Math.pow((1+VFP_TXPER),(-VFP_NPM)))*(1+VFP_TXPER)))}}else {;VRESULTAT=(VFP_CAPITAL/VFP_NPM)}return(VRESULTAT)}}}
function Rondir(VFP_NOMBRE, VFP_BORNE ){{var VFP_X1=0;var VFP_X2=0;if((VFP_BORNE>=0)){if((VFP_BORNE>16)){VFP_BORNE=16}VFP_X2=_ARR((VFP_NOMBRE*Math.pow(10,VFP_BORNE)),0);VFP_X1=(VFP_X2*Math.pow(10,(-VFP_BORNE)))}if((VFP_BORNE<0)){if((VFP_BORNE<-4)){
VFP_BORNE=-4}VFP_X2=_ARR((VFP_NOMBRE*Math.pow(10,VFP_BORNE)),0);VFP_X1=(VFP_X2*Math.pow(10,Math.abs(VFP_BORNE)))}return(VFP_X1)}}
function Suite(VFP_TAUX, VFP_TERME, VFP_NPM1, VFP_VPM1, VFP_NPM2, VFP_VPM2, VFP_NPM3, VFP_VPM3 ){{if (VFP_TERME==undefined) VFP_TERME=1;if (VFP_NPM1==undefined) VFP_NPM1=0;if (VFP_VPM1==undefined) VFP_VPM1=0;if (VFP_NPM2==undefined) VFP_NPM2=0
if (VFP_VPM2==undefined) VFP_VPM2=0;if (VFP_NPM3==undefined) VFP_NPM3=0;if (VFP_VPM3==undefined) VFP_VPM3=0;{var VFP_NPM=((VFP_NPM1+VFP_NPM2)+VFP_NPM3);var VFP_TEST=0;var VFP_X1=0;if(((VFP_NPM1<=0)||(((VFP_VPM1+VFP_VPM2)+VFP_VPM3)==0))){VFP_X1=0
return(VFP_X1)}if(((VFP_TAUX*10000000000)==VFP_TEST)){VFP_X1=(((VFP_NPM1*VFP_VPM1)+(VFP_NPM2*VFP_VPM2))+(VFP_NPM3*VFP_VPM3))}if(((VFP_TAUX*10000000000)!=VFP_TEST)){if((VFP_TERME==1)){
VFP_X1=(((VFP_VPM1*((1-(1/Math.pow((1+VFP_TAUX),VFP_NPM1)))/VFP_TAUX))+((VFP_VPM2*((1-(1/Math.pow((1+VFP_TAUX),VFP_NPM2)))/VFP_TAUX))*(1/Math.pow((1+VFP_TAUX),VFP_NPM1))))+((VFP_VPM3*((1-(1/Math.pow((1+VFP_TAUX),VFP_NPM3)))/VFP_TAUX))*(1/Math.pow((1+VFP_TAUX),(VFP_NPM1+VFP_NPM2)))))
}else {
VFP_X1=(((VFP_VPM1*(((1+VFP_TAUX)*(1-(1/Math.pow((1+VFP_TAUX),VFP_NPM1))))/VFP_TAUX))+((VFP_VPM2*((1-(1/Math.pow((1+VFP_TAUX),VFP_NPM2)))/VFP_TAUX))*(1/Math.pow((1+VFP_TAUX),(VFP_NPM1-1)))))+((VFP_VPM3*((1-(1/Math.pow((1+VFP_TAUX),VFP_NPM3)))/VFP_TAUX))*(1/Math.pow((1+VFP_TAUX),((VFP_NPM1+VFP_NPM2)-1)))))
}}return(VFP_X1)}}}
function Teg(VFP_CAPITAL, VFP_PERIO, VFP_TERME, VFP_MODETX, VFP_NPM01, VFP_VPM01, VFP_NPM02, VFP_VPM02, VFP_NPM03, VFP_VPM03 ){{if (VFP_PERIO==undefined) VFP_PERIO=12;if (VFP_TERME==undefined) VFP_TERME=1;if (VFP_MODETX==undefined) VFP_MODETX=1
if (VFP_NPM01==undefined) VFP_NPM01=0;if (VFP_VPM01==undefined) VFP_VPM01=0;if (VFP_NPM02==undefined) VFP_NPM02=0;if (VFP_VPM02==undefined) VFP_VPM02=0;if (VFP_NPM03==undefined) VFP_NPM03=0;if (VFP_VPM03==undefined) VFP_VPM03=0;{var VFP_X1=0
var VFP_NPM=0;var VFP_ERREUR=false;var VFP_COMPT1=0;var VFP_COMPT2=0;var VFP_LOUCHE=0;var VFP_PASDUTAUX=0;var VFP_TXMINPLUS=0.0000002;var VFP_TXMINMOINS=-0.0000002;var VFP_PRECISION=0.000001;var VFP_ARRONDI=6;var VFP_TXPER1=0;var VFP_TXPER2=0
var VFP_TXPER3=0;var VFP_TXPER4=0;var VFP_TXPER5=0;var VFP_COEFMINPLUS=0;var VFP_COEFMINMOINS=0;var VFP_COEFREF=0;var VFP_COEFBASE=0;var VFP_COEFX1=0;var VFP_COEFX2=0;var VFP_DX1=0;var VFP_DX2=0;var VFP_DX3=0;var VFP_DELTAUX=0;var VFP_TESTX=0
var VFP_RESULT="";var VFPARAM1="";var VFPARAM2="";var VFPARAM3="";var VFPARAM4="";var VFPARAM5="";if((VFP_NPM01==0)){VFPARAM1="Faux#";VFPARAM2="Npm01 manquant#";VFPARAM3="#";VFPARAM4="#";VFPARAM5="#"
VFP_RESULT=((((VFPARAM1+VFPARAM2)+VFPARAM3)+VFPARAM4)+VFPARAM5);return(VFP_RESULT)}
if((((((((((((VFP_PERIO!=1)&&(VFP_PERIO!=2))&&(VFP_PERIO!=3))&&(VFP_PERIO!=4))&&(VFP_PERIO!=6))&&(VFP_PERIO!=12))&&(VFP_PERIO!=24))&&(VFP_PERIO!=52))&&(VFP_PERIO!=360))&&(VFP_PERIO!=365))&&(VFP_PERIO!=366))){VFPARAM1="Faux#"
VFPARAM2=unescape("P%E9riodicit%E9 incoh%E9rente#");VFPARAM3="#";VFPARAM4="#";VFPARAM5="#";VFP_RESULT=((((VFPARAM1+VFPARAM2)+VFPARAM3)+VFPARAM4)+VFPARAM5);return(VFP_RESULT)}if((((VFP_TERME!=1)&&(VFP_TERME!=2))||((VFP_MODETX!=1)&&(VFP_MODETX!=2)))){
VFPARAM1="Faux#";VFPARAM2=unescape("Mode et Type incoh%E9rents#");VFPARAM3="#";VFPARAM4="#";VFPARAM5="#";VFP_RESULT=((((VFPARAM1+VFPARAM2)+VFPARAM3)+VFPARAM4)+VFPARAM5);return(VFP_RESULT)}
VFP_COEFMINPLUS=Suite(VFP_TXMINPLUS,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03);VFP_COEFMINMOINS=Suite(VFP_TXMINMOINS,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03);VFP_COMPT2=2
VFP_COEFREF=VFP_CAPITAL;VFP_COEFBASE=(((VFP_NPM01*VFP_VPM01)+(VFP_NPM02*VFP_VPM02))+(VFP_NPM03*VFP_VPM03));VFP_NPM=((VFP_NPM01+VFP_NPM02)+VFP_NPM03);if((VFP_CAPITAL==Rondir(VFP_COEFBASE,15))){VFP_TESTX=1}
if(((VFP_CAPITAL>VFP_COEFBASE)&&(VFP_COEFMINMOINS>VFP_COEFREF))){VFP_TESTX=2}if(((VFP_CAPITAL<VFP_COEFBASE)&&(VFP_COEFMINPLUS<VFP_COEFREF))){VFP_TESTX=3}if(((VFP_CAPITAL>VFP_COEFBASE)&&(VFP_COEFMINMOINS<VFP_COEFREF))){VFP_TESTX=4}
if(((VFP_CAPITAL<VFP_COEFBASE)&&(VFP_COEFMINPLUS>VFP_COEFREF))){VFP_TESTX=5}switch(VFP_TESTX){case 1:{VFP_X1=0;VFPARAM1="Vrai#";VFPARAM2=unescape("Taux %E0 0#");VFPARAM3=(_NVC(1,"4d")+"#");VFPARAM4="0#";VFPARAM5="0#"
VFP_RESULT=((((VFPARAM1+VFPARAM2)+VFPARAM3)+VFPARAM4)+VFPARAM5);return(VFP_RESULT)}break;case 2:{VFP_TXPER3=_MI(Rondir((((VFP_COEFBASE-VFP_COEFREF)/(VFP_COEFBASE-VFP_COEFMINMOINS))*VFP_TXMINMOINS),VFP_ARRONDI),VFP_TXMINMOINS)
VFP_DX3=Suite(VFP_TXPER3,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03);VFP_COMPT2=VFP_COMPT2+1}break;case 3:{
VFP_TXPER3=_MA(Rondir((((VFP_COEFBASE-VFP_COEFREF)/(VFP_COEFBASE-VFP_COEFMINPLUS))*VFP_TXMINPLUS),VFP_ARRONDI),VFP_TXMINPLUS);VFP_DX3=Suite(VFP_TXPER3,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03);VFP_COMPT2=VFP_COMPT2+1}
break;case 4:{VFP_LOUCHE=(((VFP_COEFBASE-VFP_CAPITAL)/VFP_CAPITAL)/VFP_NPM);VFP_TXPER1=VFP_LOUCHE;VFP_DX1=Suite(VFP_TXPER1,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03);VFP_COMPT1=1;VFP_COMPT2=VFP_COMPT2+1
if((VFP_DX1>VFP_CAPITAL)){while((VFP_DX1>VFP_CAPITAL)){VFP_COMPT1=VFP_COMPT1+1;VFP_COMPT2=VFP_COMPT2+1;if((VFP_COMPT1==21)){VFP_ERREUR=true;break}VFP_TXPER2=VFP_TXPER1;VFP_DX2=VFP_DX1;VFP_TXPER1=(VFP_TXPER1*(1-(VFP_COMPT1*0.1)))
VFP_DX1=Suite(VFP_TXPER1,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03)}}else {;VFP_TXPER2=VFP_TXPER1;VFP_DX2=VFP_DX1;while((VFP_DX2<VFP_CAPITAL)){VFP_COMPT1=VFP_COMPT1+1;VFP_COMPT2=VFP_COMPT2+1;if((VFP_COMPT1==21)){
VFP_ERREUR=true;break}VFP_TXPER1=VFP_TXPER2;VFP_DX1=VFP_DX2;VFP_TXPER2=(VFP_TXPER2*(1+(VFP_COMPT1*0.1)));VFP_DX2=Suite(VFP_TXPER2,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03)}}if((VFP_ERREUR==true)){VFPARAM1="Faux#"
VFPARAM2="Impossible de borner le taux#";VFPARAM3=(_NVC(VFP_COMPT2,"4d")+"#");VFPARAM4="#";VFPARAM5="#";VFP_RESULT=((((VFPARAM1+VFPARAM2)+VFPARAM3)+VFPARAM4)+VFPARAM5);return(VFP_RESULT)}VFP_DELTAUX=(VFP_TXPER1-VFP_TXPER2)
VFP_PASDUTAUX=Rondir((VFP_DELTAUX/5),6);if((Math.abs((VFP_CAPITAL-VFP_DX1))>Math.abs((VFP_CAPITAL-VFP_DX2)))){VFP_COMPT1=1;VFP_TXPER1=(VFP_TXPER1-VFP_PASDUTAUX)
VFP_DX1=Suite(VFP_TXPER1,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03);while((VFP_DX1<VFP_CAPITAL)){VFP_COMPT1=VFP_COMPT1+1;VFP_COMPT2=VFP_COMPT2+1;if((VFP_COMPT1==10)){VFP_ERREUR=true;break}VFP_TXPER3=VFP_TXPER1
VFP_DX3=VFP_DX1;VFP_TXPER1=(VFP_TXPER1-VFP_PASDUTAUX);VFP_DX1=Suite(VFP_TXPER1,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03)}if((VFP_ERREUR==true)){VFPARAM1="Faux#";VFPARAM2="Impossible de borner le taux#"
VFPARAM3=(_NVC(VFP_COMPT2,"4d")+"#");VFPARAM4="#";VFPARAM5="#";VFP_RESULT=((((VFPARAM1+VFPARAM2)+VFPARAM3)+VFPARAM4)+VFPARAM5);return(VFP_RESULT)}else {;if(((VFP_DX1>VFP_CAPITAL)&&(VFP_DX1<VFP_DX2))){VFP_TXPER2=VFP_TXPER1;VFP_DX2=VFP_DX1}
VFP_TXPER1=VFP_TXPER3;VFP_DX1=VFP_DX3;VFP_TXPER3=0;VFP_DX3=0}}else {;VFP_COMPT1=1;VFP_TXPER2=(VFP_TXPER2+VFP_PASDUTAUX);VFP_DX2=Suite(VFP_TXPER2,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03);while((VFP_DX2>VFP_CAPITAL)){
VFP_COMPT1=VFP_COMPT1+1;VFP_COMPT2=VFP_COMPT2+1;if((VFP_COMPT1==10)){VFP_ERREUR=true;break}VFP_TXPER3=VFP_TXPER2;VFP_DX3=VFP_DX2;VFP_TXPER2=(VFP_TXPER2+VFP_PASDUTAUX)
VFP_DX2=Suite(VFP_TXPER2,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03)}if((VFP_ERREUR==true)){VFPARAM1="Faux#";VFPARAM2="Impossible de borner le taux#";VFPARAM3=(_NVC(VFP_COMPT2,"4d")+"#");VFPARAM4="#";VFPARAM5="#"
VFP_RESULT=((((VFPARAM1+VFPARAM2)+VFPARAM3)+VFPARAM4)+VFPARAM5);return(VFP_RESULT)}else {;if(((VFP_DX2<VFP_CAPITAL)&&(VFP_DX2>VFP_DX1))){VFP_TXPER1=VFP_TXPER2;VFP_DX1=VFP_DX2}VFP_TXPER2=VFP_TXPER3;VFP_DX2=VFP_DX3;VFP_TXPER3=0;VFP_DX3=0}}
VFP_COMPT1=0;VFP_TXPER3=VFP_TXPER1;VFP_TXPER4=VFP_TXPER2;VFP_COEFX1=VFP_DX2;VFP_DX3=VFP_DX1;while((Math.abs((VFP_DX3-VFP_CAPITAL))>VFP_PRECISION)){VFP_COMPT1=VFP_COMPT1+1;VFP_COMPT2=VFP_COMPT2+1;VFP_COEFX2=VFP_DX3
VFP_TXPER5=(VFP_TXPER3-((VFP_TXPER3-VFP_TXPER4)*((VFP_COEFREF-VFP_COEFX2)/(VFP_COEFX1-VFP_COEFX2))));VFP_DX3=Suite(VFP_TXPER5,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03);VFP_TXPER3=VFP_TXPER5;if((VFP_COMPT1==10)){
VFP_PRECISION=0.0001}if((VFP_COMPT1==20)){VFP_PRECISION=0.001}if((VFP_COMPT1==30)){VFP_PRECISION=0.01}if((VFP_COMPT1==45)){VFP_ERREUR=true;break}}if((VFP_ERREUR==true)){VFPARAM1="Faux#";VFPARAM2=unescape("Impossible de d%E9terminer le taux#")
VFPARAM3=(_NVC(VFP_COMPT2,"4d")+"#");VFPARAM4="#";VFPARAM5="#";VFP_RESULT=((((VFPARAM1+VFPARAM2)+VFPARAM3)+VFPARAM4)+VFPARAM5);return(VFP_RESULT)}}break;case 5:{VFP_LOUCHE=(((VFP_COEFBASE-VFP_CAPITAL)/VFP_CAPITAL)/VFP_NPM);VFP_TXPER1=VFP_LOUCHE
VFP_DX1=Suite(VFP_TXPER1,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03);VFP_COMPT1=1;VFP_COMPT2=VFP_COMPT2+1;if((VFP_DX1>VFP_CAPITAL)){while((VFP_DX1>VFP_CAPITAL)){VFP_COMPT1=VFP_COMPT1+1;VFP_COMPT2=VFP_COMPT2+1
if((VFP_COMPT1==21)){VFP_ERREUR=true;break}VFP_TXPER2=VFP_TXPER1;VFP_DX2=VFP_DX1;VFP_TXPER1=(VFP_TXPER1*(1+(VFP_COMPT1*0.1)));VFP_DX1=Suite(VFP_TXPER1,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03)}}else {
VFP_TXPER2=VFP_TXPER1;VFP_DX2=VFP_DX1;while((VFP_DX2<VFP_CAPITAL)){VFP_COMPT1=VFP_COMPT1+1;VFP_COMPT2=VFP_COMPT2+1;if((VFP_COMPT1==21)){VFP_ERREUR=true;break}VFP_TXPER1=VFP_TXPER2;VFP_DX1=VFP_DX2;VFP_TXPER2=(VFP_TXPER2*(1-(VFP_COMPT1*0.1)))
VFP_DX2=Suite(VFP_TXPER2,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03)}}if((VFP_ERREUR==true)){VFPARAM1="Faux#";VFPARAM2="Impossible de borner le taux#";VFPARAM3=(_NVC(VFP_COMPT2,"4d")+"#");VFPARAM4="#";VFPARAM5="#"
VFP_RESULT=((((VFPARAM1+VFPARAM2)+VFPARAM3)+VFPARAM4)+VFPARAM5);return(VFP_RESULT)}VFP_DELTAUX=(VFP_TXPER1-VFP_TXPER2);VFP_PASDUTAUX=Rondir((VFP_DELTAUX/5),6);if((Math.abs((VFP_CAPITAL-VFP_DX1))>Math.abs((VFP_CAPITAL-VFP_DX2)))){VFP_COMPT1=1
VFP_TXPER1=(VFP_TXPER1-VFP_PASDUTAUX);VFP_DX1=Suite(VFP_TXPER1,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03);while((VFP_DX1<VFP_CAPITAL)){VFP_COMPT1=VFP_COMPT1+1;VFP_COMPT2=VFP_COMPT2+1;if((VFP_COMPT1==10)){VFP_ERREUR=true
break}VFP_TXPER3=VFP_TXPER1;VFP_DX3=VFP_DX1;VFP_TXPER1=(VFP_TXPER1-VFP_PASDUTAUX);VFP_DX1=Suite(VFP_TXPER1,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03)}if((VFP_ERREUR==true)){VFPARAM1="Faux#"
VFPARAM2="Impossible de borner le taux#";VFPARAM3=(_NVC(VFP_COMPT2,"4d")+"#");VFPARAM4="#";VFPARAM5="#";VFP_RESULT=((((VFPARAM1+VFPARAM2)+VFPARAM3)+VFPARAM4)+VFPARAM5);return(VFP_RESULT)}else {;if(((VFP_DX1>VFP_CAPITAL)&&(VFP_DX1<VFP_DX2))){
VFP_TXPER2=VFP_TXPER1;VFP_DX2=VFP_DX1}VFP_TXPER1=VFP_TXPER3;VFP_DX1=VFP_DX3;VFP_TXPER3=0;VFP_DX3=0}}else {;VFP_COMPT1=1;VFP_TXPER2=(VFP_TXPER2+VFP_PASDUTAUX)
VFP_DX2=Suite(VFP_TXPER2,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03);while((VFP_DX2>VFP_CAPITAL)){VFP_COMPT1=VFP_COMPT1+1;VFP_COMPT2=VFP_COMPT2+1;if((VFP_COMPT1==10)){VFP_ERREUR=true;break}VFP_TXPER3=VFP_TXPER2
VFP_DX3=VFP_DX2;VFP_TXPER2=(VFP_TXPER2+VFP_PASDUTAUX);VFP_DX2=Suite(VFP_TXPER2,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03)}if((VFP_ERREUR==true)){VFPARAM1="Faux#";VFPARAM2="Impossible de borner le taux#"
VFPARAM3=(_NVC(VFP_COMPT2,"4d")+"#");VFPARAM4="#";VFPARAM5="#";VFP_RESULT=((((VFPARAM1+VFPARAM2)+VFPARAM3)+VFPARAM4)+VFPARAM5);return(VFP_RESULT)}else {;if(((VFP_DX2<VFP_CAPITAL)&&(VFP_DX2>VFP_DX1))){VFP_TXPER1=VFP_TXPER2;VFP_DX1=VFP_DX2}
VFP_TXPER2=VFP_TXPER3;VFP_DX2=VFP_DX3;VFP_TXPER3=0;VFP_DX3=0}}VFP_COMPT1=0;VFP_TXPER3=VFP_TXPER1;VFP_TXPER4=VFP_TXPER2;VFP_COEFX1=VFP_DX2;VFP_DX3=VFP_DX1;while((Math.abs((VFP_DX3-VFP_CAPITAL))>VFP_PRECISION)){VFP_COMPT1=VFP_COMPT1+1
VFP_COMPT2=VFP_COMPT2+1;VFP_COEFX2=VFP_DX3;VFP_TXPER5=(VFP_TXPER3-((VFP_TXPER3-VFP_TXPER4)*((VFP_COEFREF-VFP_COEFX2)/(VFP_COEFX1-VFP_COEFX2))));VFP_DX3=Suite(VFP_TXPER5,VFP_TERME,VFP_NPM01,VFP_VPM01,VFP_NPM02,VFP_VPM02,VFP_NPM03,VFP_VPM03)
VFP_TXPER3=VFP_TXPER5;if((VFP_COMPT1==10)){VFP_PRECISION=0.0001}if((VFP_COMPT1==20)){VFP_PRECISION=0.001}if((VFP_COMPT1==30)){VFP_PRECISION=0.01}if((VFP_COMPT1==45)){VFP_ERREUR=true;break}}if((VFP_ERREUR==true)){VFPARAM1="Faux#"
VFPARAM2=unescape("Impossible de d%E9terminer le taux#");VFPARAM3=(_NVC(VFP_COMPT2,"4d")+"#");VFPARAM4="#";VFPARAM5="#";VFP_RESULT=((((VFPARAM1+VFPARAM2)+VFPARAM3)+VFPARAM4)+VFPARAM5);return(VFP_RESULT)}}break}
VFP_X1=TxAn(VFP_TXPER3,VFP_PERIO,VFP_MODETX);VFPARAM1="Vrai#";switch(VFP_TESTX){case 1:{VFPARAM2="Taux nul#"}break;case 2:{VFPARAM2=unescape("Taux n%E9gatif dans l'intervalle critique#")}break;case 3:{
VFPARAM2="Taux positif dans l'intervalle critique#"}break;case 4:{VFPARAM2=unescape("Taux n%E9gatif et inf%E9rieur %E0 taux critique#")}break;case 5:{VFPARAM2=unescape("Taux positif et sup%E9rieur %E0 taux critique#")}break;default:{
VFPARAM2="Erreur inconnue#"}break}VFPARAM3=(_NVC(VFP_COMPT2,"4d")+"#");VFPARAM4=(_NVC(VFP_X1,"18.9f")+"#");VFPARAM5=(_NVC(VFP_TXPER3,"18.9f")+"#");VFP_RESULT=((((VFPARAM1+VFPARAM2)+VFPARAM3)+VFPARAM4)+VFPARAM5);return(VFP_RESULT)}}}
function Tronque(VFP_NOMBRE, VFP_BORNE ){{var VFP_X1=0;var VFP_X2=0;if((VFP_BORNE==0)){VFP_X1=Math.floor(VFP_NOMBRE)}if((VFP_BORNE>0)){if((VFP_BORNE>12)){VFP_BORNE=12}
VFP_X2=Math.floor((Math.abs(VFP_NOMBRE)-Math.floor(Math.abs(VFP_NOMBRE))*Math.pow(10,VFP_BORNE)));VFP_X1=(Math.floor(VFP_NOMBRE)+(VFP_X2*Math.pow(10,(-VFP_BORNE))))}if((VFP_BORNE<0)){if((VFP_BORNE<-4)){VFP_BORNE=-4}
VFP_X2=Math.floor((VFP_NOMBRE*Math.pow(10,VFP_BORNE)));VFP_X1=(VFP_X2*Math.pow(10,Math.abs(VFP_BORNE)))}return(VFP_X1)}}
function Calc(VFP_CAPITAL, VFP_DUREE, VFP_DIFFERE, VFP_TAUX, VFP_MODETX, VFP_PERIO, VFP_TERME, VFP_TXAS, VFP_ASS, VFP_ECHAC ){{var VFP_NBREVAL=0;var VFP_NUMCAS=0;var VFP_NPM=0;var VFP_ERREUR=false;var VFP_LIBERREUR="";var VV1=0;var VV2=0;var VV3=0
var VV4=0;var VV5=0;var VE1=0;var VE2=0;var VE3=0;var VCH="";var VCH1="";var VFP_TAUXPERIODE=0;var VFP_ECHREFASSUR=0;var VFP_REFTXASS=0;var VFP_REFASS=0;var VFP_ECHHA=0;var VFP_DIFHA=0;var VFP_DIFAC=0;var VRESULTAT="";VCH="";if((VFP_DUREE>0)){
VFP_NBREVAL=VFP_NBREVAL+1}else {;VFP_NUMCAS=1}if((VFP_TAUX>0)){VFP_NBREVAL=VFP_NBREVAL+1}else {;VFP_NUMCAS=2}if((VFP_CAPITAL>0)){VFP_NBREVAL=VFP_NBREVAL+1}else {;VFP_NUMCAS=3}if((VFP_ECHAC>0)){VFP_NBREVAL=VFP_NBREVAL+1}else {;VFP_NUMCAS=4}
if((VFP_NBREVAL<3)){VFP_ERREUR=true;VFP_LIBERREUR=unescape("Il faut fournir au moins 3 donn%E9es de calcul")}else {;if((VFP_NBREVAL>3)){VFP_NUMCAS=4}VFP_ERREUR=false}if((VFP_ERREUR==false)){if(((VFP_MODETX!=1)&&(VFP_MODETX!=2))){VFP_MODETX=1}
if(((VFP_TERME!=1)&&(VFP_TERME!=2))){VFP_TERME=1}if(((((((VFP_PERIO!=1)&&(VFP_PERIO!=2))&&(VFP_PERIO!=3))&&(VFP_PERIO!=4))&&(VFP_PERIO!=6))&&(VFP_PERIO!=12))){VFP_PERIO=12}if((VFP_TAUX!=0)){VFP_TAUXPERIODE=TxPer((VFP_TAUX/100),VFP_PERIO,VFP_MODETX)}
else {;VFP_TAUXPERIODE=0}if((VFP_DUREE>0)){VFP_NPM=(VFP_DUREE-VFP_DIFFERE)}else {;VFP_NPM=0}if((VFP_NUMCAS!=3)){if(((VFP_TXAS>0)||(VFP_ASS>0))){if((VFP_TXAS>0)){VFP_ASS=((VFP_CAPITAL*VFP_TXAS)/(VFP_PERIO*100))}else {
VFP_TXAS=((VFP_ASS*(VFP_PERIO*100))/VFP_CAPITAL)}}}switch(VFP_NUMCAS){case 1:{VV1=(VFP_ECHAC-VFP_ASS);VV2=(-(((VFP_CAPITAL*VFP_TAUXPERIODE)/VV1)-1));VE1=Tronque((VFP_CAPITAL/VV1),0);if((VE1>600)){VFP_ERREUR=true
VFP_LIBERREUR=unescape("Pas de solution dans les limites d'une dur%E9e de 50 ans")}VV3=Math.pow((1+VFP_TAUXPERIODE),(-VE1));VV4=(VV2-VV3);VV5=VV4;while((VV4<0)){VE1=VE1+1;if((VE1>600)){VFP_ERREUR=true
VFP_LIBERREUR=unescape("Pas de solution dans les limites d'une dur%E9e de 50 ans")}VV3=Math.pow((1+VFP_TAUXPERIODE),(-VE1));VV4=(VV2-VV3);if((VV4>=0)){if((Math.abs(VV4)>Math.abs(VV5))){VE1=VE1-1;VFP_NPM=VE1}else {;VFP_NPM=VE1}
VFP_DUREE=(VFP_NPM+VFP_DIFFERE);VFP_ECHAC=(Ech(VFP_TAUXPERIODE,VFP_CAPITAL,VFP_NPM)+VFP_ASS);break}VV5=VV4}}break;case 2:{VV1=(VFP_ECHAC-VFP_ASS);VCH=Teg(VFP_CAPITAL,VFP_PERIO,VFP_TERME,VFP_MODETX,VFP_NPM,VV1);VCH1=_EC(VCH,4,"#",0)
VFP_TAUX=(Rondir(_VAL(VCH1),6)*100)}break;case 3:{if(((VFP_TXAS>0)||(VFP_ASS>0))){if((VFP_TXAS>0)){VFP_REFASS=((100000000*VFP_TXAS)/(VFP_PERIO*100))}else {;VFP_REFTXASS=((VFP_ASS*(VFP_PERIO*100))/100000000)}}
VFP_ECHREFASSUR=(Ech(VFP_TAUXPERIODE,100000000,VFP_NPM,VFP_PERIO,VFP_TERME)+VFP_REFASS);VV1=((VFP_ECHAC/VFP_ECHREFASSUR)*100000000);VFP_CAPITAL=VV1}break;case 4:{VFP_ECHAC=(Ech(VFP_TAUXPERIODE,VFP_CAPITAL,VFP_NPM,VFP_PERIO,VFP_TERME)+VFP_ASS)}break}
}else {;VCH=VFP_LIBERREUR}if((VFP_NUMCAS==2)){VRESULTAT=((((((((((VFP_CAPITAL+"\t")+VFP_DUREE)+"\t")+VFP_TAUX)+"\t")+VFP_ECHAC)+"\t")+VCH)+"\t")+VFP_NUMCAS)}else {
VRESULTAT=((((((((((VFP_CAPITAL+"\t")+VFP_DUREE)+"\t")+VFP_TAUX)+"\t")+VFP_ECHAC)+"\t")+VCH)+"\t")+VFP_NUMCAS)}return(VRESULTAT)}}
function _T0(){{lp_Taux=0;lp_ModeTx=0;lp_TxPer=0;lp_TxAs=0;lp_Assur=0;lp_TEG1=0;lp_TEG2=0;lp_Capital=0;lp_Duree=0;lp_Differe=0;lp_Npm=0;lp_Perio=0;lp_Terme=0;lp_DifHA=0;lp_DifAC=0;lp_EchHA=0;lp_EchAC=0;lp_CoutAs=0;lp_CoutInt=0;lp_CoutTot=0
lp_Calcul=0;_PAGE_.A19.style.color="000000";_PAGE_.A19.style.background="#FFFFFF"}}
function _T1(){{var VRESULTAT="";var VNBREVAL=0;var VV1=0;var VLB_DUREE=0;var VLB_CAPITAL=0;var VLB_TAUX=0;var VLB_ECHAC=0;_PAGE_.A5.style.color="#000000";_PAGE_.A5.style.background="#FFFFFF";_PAGE_.A4.style.color="#000000"
_PAGE_.A4.style.background="#FFFFFF";_PAGE_.A3.style.color="#000000";_PAGE_.A3.style.background="#FFFFFF";_PAGE_.A15.style.color="#000000";_PAGE_.A15.style.background="#FFFFFF";_PAGE_.A19.value="";_PAGE_.A18.value="";switch(lp_Calcul){case 1:{
_PAGE_.A5.value=""}break;case 2:{_PAGE_.A4.value=""}break;case 3:{_PAGE_.A3.value=""}break;case 4:{_PAGE_.A15.value=""}break}if((_PAGE_.A15.value=="")){VLB_DUREE=0}else {;VLB_DUREE=_VAL(_SAE(_PAGE_.A15.value,3))}if((_PAGE_.A3.value=="")){
VLB_CAPITAL=0}else {;VLB_CAPITAL=_VAL(_RMP(_RMP(_PAGE_.A3.value,",",".")," ",""))}if((_PAGE_.A4.value=="")){VLB_TAUX=0}else {;VLB_TAUX=_VAL(_RMP(_RMP(_PAGE_.A4.value,",",".")," ",""))}if((_PAGE_.A5.value=="")){VLB_ECHAC=0}else {
VLB_ECHAC=_VAL(_RMP(_RMP(_PAGE_.A5.value,",",".")," ",""))}if((VLB_DUREE>0)){VNBREVAL=VNBREVAL+1}if((VLB_TAUX>0)){VNBREVAL=VNBREVAL+1}if((VLB_CAPITAL>0)){VNBREVAL=VNBREVAL+1}if((VLB_ECHAC>0)){VNBREVAL=VNBREVAL+1}if((VNBREVAL<3)){
_PAGE_.A18.value="Vous devez fournir 3 valeurs pour le calcul";return}else {;switch(_JRW(_PAGE_.A14)){case 2:{if(((VLB_DUREE*VLB_ECHAC)<VLB_CAPITAL)){
_PAGE_.A18.value=unescape("Taux n%E9gatif :\r\nla somme des %E9ch%E9ances est inf%E9rieure au capital");return}}break;case 4:{VV1=(VLB_CAPITAL*TxPer((VLB_TAUX/100),12,1));if((VV1>VLB_ECHAC)){
_PAGE_.A18.value=unescape("Aucune solution :\r\nl'%E9ch%E9ance est inf%E9rieure aux int%E9r%EAts dus");return}else {;if((VV1==VLB_ECHAC)){_PAGE_.A18.value=unescape("Aucune solution :\r\nl'%E9ch%E9ance est %E9gale aux int%E9r%EAts dus");return}}
VV1=(((1-Math.pow((1+TxPer((VLB_TAUX/100),12,1)),-600))/TxPer((VLB_TAUX/100),12,1))*VLB_ECHAC);if((VV1<VLB_CAPITAL)){_PAGE_.A18.value="Aucune solution dans la limite de 50 ans";return}}break}}
VRESULTAT=Calc(VLB_CAPITAL,VLB_DUREE,0,VLB_TAUX,1,12,1,0,0,VLB_ECHAC);_PAGE_.A3.value=_NVC(_VAL(_EC(VRESULTAT,1,"\t",0)),"12.2fS");_PAGE_.A15.value=_EC(VRESULTAT,2,"\t",0);_PAGE_.A4.value=_EC(VRESULTAT,3,"\t",0)
_PAGE_.A5.value=_NVC(_VAL(_EC(VRESULTAT,4,"\t",0)),"12.2fS");_PAGE_.A19.value=_NVC(((_VAL(_EC(VRESULTAT,2,"\t",0))*_VAL(_EC(VRESULTAT,4,"\t",0)))-_VAL(_EC(VRESULTAT,1,"\t",0))),"12.2fS");switch(lp_Calcul){case 1:{_PAGE_.A5.style.color="#009966"
_PAGE_.A5.style.background="#FFFFFF"}break;case 2:{_PAGE_.A4.style.color="#009966";_PAGE_.A4.style.background="#FFFFFF"}break;case 3:{_PAGE_.A3.style.color="#009966";_PAGE_.A3.style.background="#FFFFFF"}break;case 4:{
_PAGE_.A15.style.color="#009966";_PAGE_.A15.style.background="#FFFFFF"}break}}}
function _T2(){{_PAGE_.A5.style.color="#FFFFFF";if((lp_Calcul==1)){_PAGE_.A5.value=0}else {;_PAGE_.A5.value=_RMP(_RMP(_SAE(_PAGE_.A5.value,3)," ",""),",",".");_PAGE_.A5.value=_NVC(_VAL(_PAGE_.A5.value),"12.2fS")}}}
function _T3(){{lp_Calcul=_JRW(_PAGE_.A14);_PAGE_.A5.style.color="#000000";_PAGE_.A5.style.background="#FFFFFF";_PAGE_.A4.style.color="#000000";_PAGE_.A4.style.background="#FFFFFF";_PAGE_.A3.style.color="#000000";_PAGE_.A3.style.background="#FFFFFF"
_PAGE_.A15.style.color="#000000";_PAGE_.A15.style.background="#FFFFFF";switch(lp_Calcul){case 1:{_PAGE_.A5.value="";_PAGE_.A15.focus();return}break;case 2:{_PAGE_.A4.value="";_PAGE_.A15.focus();return}break;case 3:{_PAGE_.A3.value=""
_PAGE_.A15.focus();return}break;case 4:{_PAGE_.A15.value="";_PAGE_.A3.focus();return}break}}}
function _T4(){{if(((((_JRW(_PAGE_.A14)!=1)&&(_JRW(_PAGE_.A14)!=2))&&(_JRW(_PAGE_.A14)!=3))&&(_JRW(_PAGE_.A14)!=4))){_PAGE_.A14[1-1].checked=true;lp_Calcul=_JRW(_PAGE_.A14)}}}
function _T5(){{_PAGE_.A4.style.color="#009966";if((lp_Calcul==2)){_PAGE_.A4.value=""}else {;_PAGE_.A4.value=_RMP(_SAE(_PAGE_.A4.value,3),",",".");_PAGE_.A4.value=_NVC(_VAL(_PAGE_.A4.value),"9.6fS")}}}
function _T6(){{_PAGE_.A3.style.color="#009966";if((lp_Calcul==3)){_PAGE_.A3.value=""}else {;_PAGE_.A3.value=_RMP(_RMP(_SAE(_PAGE_.A3.value,3)," ",""),",",".");_PAGE_.A3.value=_NVC(_VAL(_PAGE_.A3.value),"12.2fS")}}}
function _T7(){{_PAGE_.A15.style.color="#009966";if((lp_Calcul==4)){_PAGE_.A15.value=""}else {;if((Math.floor(_VAL(_SAE(_PAGE_.A15.value,3)))>600)){_PAGE_.A15.value="600"}else {;_PAGE_.A15.value=Math.floor(_VAL(_PAGE_.A15.value))}}}}
function _T8(){{_PAGE_.A5.style.color="#009966";if((lp_Calcul==1)){_PAGE_.A5.value=0}else {;_PAGE_.A5.value=_RMP(_RMP(_SAE(_PAGE_.A5.value,3)," ",""),",",".");_PAGE_.A5.value=_NVC(_VAL(_PAGE_.A5.value),"12.2fS");_PAGE_.A16.focus();return}}}