//********************************************************
//*      Ce script a été réalisé par 'Wirberk'           *
//*              ainsi que par "Le Sparte"               *
//* L'illustration est de "XXXX" et a été tirée du livre *
//*            "XXXXXXX" du JDR Dark Earth               *
//*                                                      *
//* Vous êtes libre(s) de l'améliorer à condition de le  *
//*  rendre à nouveau disponible sur la scenariotheque.  *
//*                                                      *
//* Merci de nous faire part de vos ajouts en écrivant à *
//*   lesparte@yahoo.fr et à aureltravel@hotmail.com     *
//*														 *
//*                  Bons jets à tous!					 *
//*														 *
//********************************************************

//---------FONCTION FACTORIELLE----------
function fact(x){
	if (x <= 1) return 1;
    return x * arguments.callee(x - 1);
   }
//---------------------------------------

function calculerProba(n,m)
{

	//initialisation du compteur pour la probabilité minimale
	probaMin=0;
	//boucle pour le "au moins"
	for(j=n; j<=m*2; j++)
	{
		//initialisation du compteur pour la probabilité exacte
		proba=0;
		for(k=0; k<=Math.floor(j/2); k++)
		{
			if(k+m<j)
			{}

			else{

				//les diverses factorielles
				fact1=fact(m);
				fact2=fact(k);
				fact3=fact(j-(2*k));
				fact4=fact(m-(j-k));

				//les puissances
				puis1=Math.pow(1/6,k);
				puis2=Math.pow(1/3,j-(2*k));
				puis3=Math.pow(1/2,m-(j-k));

				proba+=(puis1*puis2*puis3*fact1)/(fact2*fact3*fact4);
				}

		}
		//augmentation de la probabilité minimale
				probaMin+=proba;
	}
	resultat=probaMin*100;
	document.monF.probaMinimale.value=resultat.toFixed(2)+"%";
}