function lectnb(si) {
 var result="";
 for (var pi=0;pi<si.length;pi++) {
  var ci=si.charAt(pi);
  if ((ci!="0")||(result!=""))
   if (ci>="0" && ci<="9")
    result+=ci
   else if ((ci==",")||(ci=="."))
    result+="."
   else if ((ci=="-")&&(result==""))
    result+="-";
 }
 if (result=="") result="0";
 return result;
}

function strtoint(si) {
 return parseInt(lectnb(si));
}

function strtofloat(sf) {
 return parseFloat(lectnb(sf));
}

function inttostr(i) {
 var result="";
 i=Math.round(parseFloat(i));
 si=i.toString();
 if (isNaN(si)) si="0";
 bi = 0;
 for (pi=si.length-1;pi>=0;pi--) {
  ci = si.charAt(pi);
  if ((bi==0)&&(pi!=si.length-1)&&(ci!="-")) {
   result=ci+" "+result;
  } else {
   result=ci+result;
  }
  bi=(bi+1)%3;
 }
 return result;
}

function floattostr(f) {
 f=Math.round(f*10000)/10000;
 var sf = f.toString();
 var result = "";
 for (pi=0;pi<sf.length;pi++) {
  cf = sf.charAt(pi);
  if (cf=='.')
   result += ','
  else
   result += cf;
 }
 return result;
}



function number_format(src,nv) {
	nv=parseInt(nv,10);
	if (nv<0||nv>9) nv=0; 
	cm = Math.pow(10,nv);
	s = src.value;
	
	if (cm>1) {	
		f= strtofloat(s);
		f2= parseFloat(Math.round(f*cm)) / cm;
		i2= Math.floor(f2);
		v2= Math.round(cm * (f2-i2));
		sv2= "0000000000"+v2;
		sv2d=sv2.length-nv;
		sv2f=sv2.length;
		sv2= sv2.substring(sv2d,sv2f);
		
		sf = inttostr(i2)+","+sv2;
	} else {
		i=strtoint(s);
		sf=inttostr(i);
	}
	src.value=sf;
}	


function calculer(choix_taux)
{ 
	//-- Initialisation
	var f=document.form_mens;
	var bien,apport,duree,rapport,ta,tm,mens,index;

	bien = strtoint(f.bien.value);
	apport = strtoint(f.apport.value);
	duree = parseInt(f.duree.options[f.duree.selectedIndex].text,10);
	tau = strtofloat(f.taux.value);
	
	
	//-- Tableau dynamique
	tauxDD = new Array(25);
	tauxVA = new Array(25);
	Diff = new Array(25);
	tauxDD[0]=7;
	tauxVA[0]=3.00;
	tauxDD[1]=10;
	tauxVA[1]=3.45;
	tauxDD[2]=15;
	tauxVA[2]=3.60;
	tauxDD[3]=20;
	tauxVA[3]=3.70;
	tauxDD[4]=25;
	tauxVA[4]=3.80;
	tauxDD[5]=30;
	tauxVA[5]=4.60;
	if(choix_taux==0 || tau==0) {
	  for (i=0;i<tauxVA.length;i++) Diff[i]= (tauxDD[i] - duree);
		i=0;
		while(Diff[i] < 0){i++;}
		index=i;
		ta = tauxVA[index] / 100;
		//tm = Math.pow(1+ta,(1/12)) - 1;
		tau = tauxVA[index];
		f.taux.value = tau;
		number_format(f.taux,2);

	} else {
		tau = strtofloat(f.taux.value);
		ta = tau / 100;
	}
	
	//-- verif
	if ( bien<=0 || bien>=9999999 ){
		alert("Le montant du bien est incorrect !");
		//f.bien.value="";
		f.bien.focus();
		return;
	}
	if ( tau<=0 || tau>=15 ){
		alert("Le taux indiqu&eacute; est incorrect !");
		//f.taux.value="";
		f.taux.focus();
		return;
	}
		
	tm = ta / 12;
	//alert(tm);
	mens = (bien-apport) * (tm) / (1 - Math.pow(1/(1+tm),12*duree));
	mens1 = (bien-apport) * (tm);
	mens2 = (1 - Math.pow(1/(1+tm),12*duree));
	//alert(mens1);
	//alert(mens2+' - '+(12*duree));
	mens = Math.round(mens);
	
	s_mens = inttostr(mens);
	s_emprunt = inttostr(bien-apport);
	s_cout = inttostr(mens*12*duree-bien+apport);
	
	//-- Affichage r&eacute;sultat
	if (tau>0){
		if(document.All) {
			idmens.innerHTML="<b>"+s_mens+"</b> &euro;/mois";
			idemprunt.innerHTML="<b>"+s_emprunt+"</b>&euro;";
			idcout.innerHTML="<b>"+s_cout+"</b> &euro;";
		}
		else {
			document.getElementById("idmens").innerHTML = "<b>"+s_mens+"&nbsp;&euro;</b>";
			document.getElementById("idemprunt").innerHTML = "<b>"+s_emprunt+"&nbsp;&euro;</b>";
			document.getElementById("idcout").innerHTML = "<b>"+s_cout+"&nbsp;&euro;</b>";

		}
	}
}