addEvent(window, "load", function()
  {
	  EntreeStop(document.form_MM.MM_E, document.form_MM.MM_STOP, document.form_MM.MM_PIP, document.form_MM.MM_SENS, document.form_MM.MM_PAIRE);
	  CalculTaillePosition(document.form_MM.MM_K, document.form_MM.MM_PERTEMAX, document.form_MM.MM_PIP, document.form_MM.MM_D, document.form_MM.MM_PAIRE);
  });
  

function convertir(Montant, Devise)
//convert the amount of currency in dollars
{
MM_CONVERT = ConvertDol[Devise];
return Montant * MM_CONVERT;
}
// ###############################################
function convertir_inverse(Montant, Devise)
//convert the dollar amount into currency
{
MM_CONVERT = ConvertDol[Devise];
return Montant / MM_CONVERT;
}
// ###############################################
function CalculTaillePosition(MM_K, MM_PERTEMAX, MM_PIP, MM_D, MM_PAIRE)
{
VP = MM_PERTEMAX.value/MM_PIP.value;
VPDollar = convertir(VP, MM_D.value);
TaillePosDollar = (VPDollar * 100000) / ValeurPip[MM_PAIRE.value] ;
Levier = TaillePosDollar / convertir(MM_K.value, MM_D.value) ;
TaillePos = convertir_inverse(TaillePosDollar, MM_D.value) ;

document.form_MM.MM_TAILLE.value = Math.round(TaillePos*100)/100+" "+MM_D.value;
document.form_MM.MM_TAILLEUSD.value = Math.round(convertir(TaillePos,MM_D.value))+" USD";

//**************
LeLot=10000;
TaillePosSup=Math.ceil(TaillePosDollar/LeLot);
TaillePosInf=Math.floor(TaillePosDollar/LeLot);
ValPipSup=convertir_inverse(TaillePosSup*ValeurPip[MM_PAIRE.value]/(100000/LeLot), MM_D.value);
ValPipInf=convertir_inverse(TaillePosInf*ValeurPip[MM_PAIRE.value]/(100000/LeLot), MM_D.value);
LevierSup=TaillePosSup*LeLot/convertir(MM_K.value, MM_D.value);
LevierInf=TaillePosInf*LeLot/convertir(MM_K.value, MM_D.value);
PMaxSup=ValPipSup*MM_PIP.value;
PMaxInf=ValPipInf*MM_PIP.value;
PcSup=PMaxSup/MM_K.value;
PcInf=PMaxInf/MM_K.value;

document.form_MM.MM_10KLOTSUP.value = TaillePosSup;
document.form_MM.MM_10KVPIPSUP.value = Math.round(ValPipSup*100)/100+" "+MM_D.value;
document.form_MM.MM_10KLEVIERSUP.value = Math.round(LevierSup*100)/100;
document.form_MM.MM_10KPMAXSUP.value = Math.round(PMaxSup*100)/100+" "+MM_D.value;
document.form_MM.MM_10KPCSUP.value = Math.round(PcSup*10000)/100+"%";

document.form_MM.MM_10KLOTINF.value = TaillePosInf;
document.form_MM.MM_10KVPIPINF.value = Math.round(ValPipInf*100)/100+" "+MM_D.value;
document.form_MM.MM_10KLEVIERINF.value = Math.round(LevierInf*100)/100;
document.form_MM.MM_10KPMAXINF.value = Math.round(PMaxInf*100)/100+" "+MM_D.value;
document.form_MM.MM_10KPCINF.value = Math.round(PcInf*10000)/100+"%";
//**************
LeLot=100000;
TaillePosSup=Math.ceil(TaillePosDollar/LeLot);
TaillePosInf=Math.floor(TaillePosDollar/LeLot);
ValPipSup=convertir_inverse(TaillePosSup*ValeurPip[MM_PAIRE.value]/(100000/LeLot), MM_D.value);
ValPipInf=convertir_inverse(TaillePosInf*ValeurPip[MM_PAIRE.value]/(100000/LeLot), MM_D.value);
LevierSup=TaillePosSup*LeLot/convertir(MM_K.value, MM_D.value);
LevierInf=TaillePosInf*LeLot/convertir(MM_K.value, MM_D.value);
PMaxSup=ValPipSup*MM_PIP.value;
PMaxInf=ValPipInf*MM_PIP.value;
PcSup=PMaxSup/MM_K.value;
PcInf=PMaxInf/MM_K.value;

document.form_MM.MM_100KLOTSUP.value = TaillePosSup;
document.form_MM.MM_100KVPIPSUP.value = Math.round(ValPipSup*100)/100+" "+MM_D.value;
document.form_MM.MM_100KLEVIERSUP.value = Math.round(LevierSup*100)/100;
document.form_MM.MM_100KPMAXSUP.value = Math.round(PMaxSup*100)/100+" "+MM_D.value;
document.form_MM.MM_100KPCSUP.value = Math.round(PcSup*10000)/100+"%";

document.form_MM.MM_100KLOTINF.value = TaillePosInf;
document.form_MM.MM_100KVPIPINF.value = Math.round(ValPipInf*100)/100+" "+MM_D.value;
document.form_MM.MM_100KLEVIERINF.value = Math.round(LevierInf*100)/100;
document.form_MM.MM_100KPMAXINF.value = Math.round(PMaxInf*100)/100+" "+MM_D.value;
document.form_MM.MM_100KPCINF.value = Math.round(PcInf*10000)/100+"%";

var expdate=new Date();
var LeCookie;
expdate.setTime(expdate.getTime()+(1000*60*60*24*365));
LeCookie="_"+MM_K.value;
LeCookie=LeCookie+"_"+document.form_MM.MM_PERTEPC.value;
LeCookie=LeCookie+"_";
setCookie('moneymanagement',LeCookie,expdate);
}
// ###############################################
function EntreeStop(MM_E, MM_STOP, MM_PIP, MM_SENS,MM_PAIRE)
{
if ((MM_E.value!="") && (MM_STOP.value!="")) {
	if (((MM_E.value-MM_STOP.value)*MM_SENS.value)<=0) {
		MM_SENS.value=-1*MM_SENS.value;
	}
	document.form_MM.MM_PIP.value = Math.round(Math.abs(MM_E.value-MM_STOP.value)*ValeurCoef[MM_PAIRE.value]);
	}
else { if ((MM_E.value!="") && (MM_STOP.value=="") && (MM_PIP.value!="")) {
		document.form_MM.MM_PIP.value = Math.abs(MM_PIP.value);
		document.form_MM.MM_STOP.value = Math.abs(MM_E.value - MM_SENS.value*MM_STOP.value/ValeurCoef[MM_PAIRE.value]);
		}
	 	else { if ((MM_E.value!="") && (MM_STOP.value!="") && (MM_PIP.value=="")) {
				document.form_MM.MM_PIP.value = Math.abs(MM_PIP.value);
				document.form_MM.MM_E.value = Math.abs(MM_STOP.value + MM_SENS.value*MM_STOP.value/ValeurCoef[MM_PAIRE.value]);
				}
		}
}
CalculTaillePosition(document.form_MM.MM_K, document.form_MM.MM_PERTEMAX, document.form_MM.MM_PIP, document.form_MM.MM_D, document.form_MM.MM_PAIRE);

}
// ###############################################
function EntreePip(MM_E, MM_STOP, MM_PIP, MM_SENS,MM_PAIRE)
{
if ((MM_E.value!="") && (MM_STOP.value!="") && (MM_PIP.value=="")) {
	document.form_MM.MM_PIP.value = Math.round(Math.abs(MM_E.value-MM_STOP.value)*ValeurCoef[MM_PAIRE.value]);
	}
else { if ((MM_E.value!="") && (MM_PIP.value!="")) {
		document.form_MM.MM_PIP.value = Math.abs(MM_PIP.value);
		document.form_MM.MM_STOP.value = Math.round(Math.abs(MM_E.value - MM_SENS.value*MM_PIP.value/ValeurCoef[MM_PAIRE.value])*ValeurCoef[MM_PAIRE.value])/ValeurCoef[MM_PAIRE.value];
		}
	 	else { if ((MM_STOP.value!="") && (MM_PIP.value=="")) {
				document.form_MM.MM_PIP.value = Math.abs(MM_PIP.value);
				document.form_MM.MM_E.value = Math.round(Math.abs(MM_STOP.value + MM_SENS.value*MM_PIP.value/ValeurCoef[MM_PAIRE.value])*ValeurCoef[MM_PAIRE.value])/ValeurCoef[MM_PAIRE.value];
				}
		}
}
CalculTaillePosition(document.form_MM.MM_K, document.form_MM.MM_PERTEMAX, document.form_MM.MM_PIP, document.form_MM.MM_D, document.form_MM.MM_PAIRE);

}
// ###############################################
function ModifDevise(MM_D)
{
document.form_MM.MM_DEVISEPERTE.value=MM_D.value;

CalculTaillePosition(document.form_MM.MM_K, document.form_MM.MM_PERTEMAX, document.form_MM.MM_PIP, document.form_MM.MM_D, document.form_MM.MM_PAIRE);

}

// ###############################################
function ModifPerte(Quoi)
{
if (Quoi==2) {
document.form_MM.MM_PERTEMAX.value=Math.round(document.form_MM.MM_PERTEPC.value*document.form_MM.MM_K.value)/100;
}
else
{
document.form_MM.MM_PERTEPC.value=Math.round(document.form_MM.MM_PERTEMAX.value/document.form_MM.MM_K.value*10000)/100;
}
CalculTaillePosition(document.form_MM.MM_K, document.form_MM.MM_PERTEMAX, document.form_MM.MM_PIP, document.form_MM.MM_D, document.form_MM.MM_PAIRE);
}

// ###############################################
function ModifCapital()
{
ModifPerte(2);
}

// ###############################################
function getCookieVal (offset)
{
var endstr = document.cookie.indexOf(";",offset);
if (endstr == -1)
{ endstr = document.cookie.length;
}
return unescape (document.cookie.substring(offset, endstr));
}
// ###############################################
function getCookie (cookieName)
{
var arg=cookieName + "=";
var argLength=arg.length;
var cookieLength=document.cookie.length;
var i=0;

while (i<cookieLength)
	{ 	var j = i + argLength;
		if (document.cookie.substring(i,j) == arg) { return getCookieVal(j); }
		if (i==0) {break;}
	}
return null;
}
// ###############################################
function setCookie(name,value)
{
var argv=setCookie.arguments;
var argc=setCookie.arguments.length;
var expires=(argc>2)?argv[2]:null;
var path=(argc>3)?argv[3]:null;
var domain=(argc>4)?argv[4]:null;
var secure=(argc>5)?argv[5]:false;

document.cookie = name+"="+escape(value)+((expires==null)?"":("; expires="+expires.toGMTString()))+((path==null)?"":("; path=" + path))+((domain==null)?"":("; domain="+domain))+((secure==true)?"; secure":"");
}