function getStrElement(strList,numElement,separator) {
	var x=""+strList+"";
	firstSeparator=0;
	lastSeparator=x.length;
	retour="";

	if (lastSeparator!=0) {
		element_courant=1;
		for(i=0;i<lastSeparator;i++) {
			if (x.charAt(i)==separator) {
				element_courant++;
			} else {
				if (element_courant==numElement) {
					retour+=x.charAt(i);
				}
			}
		}

	} 
	return retour;
}

function findposx(s,level) {
	
	if (level == 0)	{ var cnt = 2; var idx = 0; }
	else { var cnt = 2; var idx = 0; }
	
	var curLeft = 0;
	if (s.offsetParent) {
		while (s.offsetParent && (idx < cnt)) {
			curLeft += s.offsetLeft;
			s = s.offsetParent;
			idx+=1;
		}
	}
	else if (s.x) { curLeft += s.x; }

	return curLeft;
}

function findposy(s,level) {
	if (level == 0) { var cnt = 2; var idx = 0;	}
	else { var cnt = 2; var idx = 0; }
	var curTop = 0;
	if (s.offsetParent) {
		while (s.offsetParent && (idx < cnt)) {
			curTop += s.offsetTop;
			s = s.offsetParent;
			idx +=1;
		}
	}
	else if (s.x) { curTop += s.x; }

	return curTop;
}

function setmenus(s) {
	curmenu = s;
}

function setsubmenus(s) {
	submenu = s;
	// var x = submenu.substring(0,3)
	// x = x + '0';
	var x = getStrElement(submenu,1,"_")+"_"+getStrElement(submenu,2,"_")+"_"+getStrElement(submenu,3,"_")+"_0";
	curmenu = x;
}


function expand(s) {
	curmenu = s.id;
	var x = s.id;
	tmp = parseInt(getStrElement(x,2,"_"),10)+1;
	x = getStrElement(x,1,"_")+"_"+tmp+"_"+getStrElement(x,3,"_")+"_"+getStrElement(x,4,"_");
	var td = document.getElementById(x);
	var posx = findposx(s,0);
	var posy = findposy(s,0) + menuheight;

	if (td != null)	{ 
		td.style.left = "" + posx + "px";
		td.style.top = "" + posy + "px";
		td.style.display = 'block';
	}
}

function checkpos(s) {
	stop = window.setTimeout("collapse('"+s+"')",005);
}

function checksubpos(s) {
	stopsub = window.setTimeout("collapsesub('"+s+"')",005);
}

function collapsesub(s) {

	if (s.substring(0,3) != submenu.substring(0,3)) {
		var td = document.getElementById(s);
		if (td != null)	{ 
			var x = s;
			tmp = parseInt(getStrElement(x,4,"_"),10)+1;
			x = getStrElement(x,1,"_")+"_"+getStrElement(x,2,"_")+"_"+getStrElement(x,3,"_")+"_"+tmp;
			td = document.getElementById(x);
			
			if (td != null)	{
				td.style.display = 'none';
			}
		}
	}

	if (s.substring(0,1) != curmenu.substring(0,1) || curmenu == '0') {

		var td = document.getElementById(s);
		if (td != null) { 
			var x = s;
			
			var y = getStrElement(x,1,"_")+"_"+getStrElement(x,2,"_")+"_0_0";
			td = document.getElementById(y);

			if (td != null)	{
				td.style.display = 'none';
			}
		}
	}
}

function collapse(s) {
	if (getStrElement(s,1,"_") != getStrElement(curmenu,1,"_")) {
		var td = document.getElementById(s);
		if (td != null) { 
			var x = s;
			tmp = parseInt(getStrElement(x,2,"_"),10)+1;
			x = getStrElement(x,1,"_")+"_"+tmp+"_"+getStrElement(x,3,"_")+"_"+getStrElement(x,4,"_");
			td = document.getElementById(x);
			if (td != null)	{ td.style.display = 'none';}
		}
	}
}

function expandsub(s,direction) {
	
	submenu = s.id;
	var x = s.id;
	var tmpTD;

	if (lastsubmenu!="") { 
		tmpTD = document.getElementById(lastsubmenu);
		tmpTD.style.display='none';
		lastsubmenu=="";
	}

	tmp = parseInt(getStrElement(x,4,"_"),10)+1;
	x = getStrElement(x,1,"_")+"_"+getStrElement(x,2,"_")+"_"+getStrElement(x,3,"_")+"_"+tmp;

	var td = document.getElementById(x);

	if (direction == 'right') {	
		var posx = findposx(s,1) + menuwidth;
	} else {
		var posx = findposx(s,1) - menuwidth;
	}

	var posy = findposy(s,1);
	if (td != null)	{ 
		td.style.left = "" + posx + "px";
		td.style.top = "" + posy + "px";
		td.style.display = 'block';
		lastsubmenu = x;
	}
}

function Menu() {
	this.addItem = addItem;
	this.addRolleverItem = addRolleverItem;
	this.addsubmenu = addsubmenu;
	this.addsubmenuitem = addsubmenuitem;
	this.addlevel2menu = addlevel2menu;
	this.addlevel2menuitem = addlevel2menuitem;

	this.showMenu = showMenu;
	ref_Niv1 = 0;
	ref_Niv2 = 0;
	ref_Niv3 = 0;
	ref_Niv4 = 0;
	lastsubmenu="";
	
	htmlstr="";
	htmlstr += "<!--GMENU Version 2.1-->";
	htmlstr += "<table cellpadding=0 cellspacing=0 border=0 class='gmenu'><tr><!--GMENUITEMS--></tr></table><!--SUBMENU-->";
	htmlstr += "<!--End of Gmenu-->";
}

function addItem(menuname,lnk) {
	var id = "";
	ref_Niv2 = 0;
	ref_Niv3 = 0;
	ref_Niv4 = 0;
	id = "" + ref_Niv1 + "_" + ref_Niv2 + "_" + ref_Niv3 + "_" + ref_Niv4 + "";

	menustr = "";
	menustr+= "<td class=\"gmenu\" width=\""+menuwidth+"\" id=\""+id+"\" onmouseover=\"expand(this)\" onmouseout=\"setmenus('');checkpos('"+id+"')\"><a href='"+lnk+"' class=\"gmenu\">"+menuname+"</a></td>";
	menustr+="<!--GMENUITEMS-->";
	htmlstr = htmlstr.replace("<!--GMENUITEMS-->",menustr);
	ref_Niv1+=1;
}


function addRolleverItem(altvalue,name,picON,picOFF,lnk) {
	var id = "";
	ref_Niv2 = 0;
	ref_Niv3 = 0;
	ref_Niv4 = 0;
	id = "" + ref_Niv1 + "_" + ref_Niv2 + "_" + ref_Niv3 + "_" + ref_Niv4 + "";

	addsubmenu
	menustr = "";
	menustr+= "<td class=\"gmenu\" width=\""+menuwidth+"\" id=\""+id+"\" onmouseover=\"document.getElementById('"+name+"').src='"+picON+"';expand(this);return true;\" onmouseout=\"document.getElementById('"+name+"').src='"+picOFF+"';setmenus('');checkpos('"+id+"');return true;\"><a href='"+lnk+"' class=\"gmenu\"><img src=\""+picOFF+"\" alt=\""+altvalue+"\" name=\""+name+"\" width=\"123\" height=\"29\" border=\"0\" id=\""+name+"\" /></a></td>";
	menustr+="<!--GMENUITEMS-->";
	htmlstr = htmlstr.replace("<!--GMENUITEMS-->",menustr);
	ref_Niv1+=1;
}

function addsubmenu() {
	var id = "";
	ref_Niv2 = ref_Niv2 + 1;
	currentref_Niv1 = ref_Niv1 - 1;
	htmlstr = htmlstr.replace("<!--SUBMENUITEMS-->",'');	
	id = "" + currentref_Niv1 + "_" + ref_Niv2 + "_" + ref_Niv3 + "_" + ref_Niv4 + "";
	pid = "" + currentref_Niv1 + "_0_0_0";

	menustr = "";
	menustr+="<div id=\""+id+"\" class=\"submenu\" style=\"position:absolute;left:0;top:0;display:none;z-index:10\" onmouseover=\"setmenus('"+id+"')\" onmouseout=\"setmenus('');checkpos('"+pid+"')\"><!--SUBMENUITEMS--></div>";
	menustr+="<!--SUBMENU-->";
	htmlstr = htmlstr.replace("<!--SUBMENU-->",menustr);	
}

function addsubmenuitem(name,lnk,direction) {
	var id = "";
	ref_Niv3 = ref_Niv3 + 1;
	ref_Niv4 = 0;
	currentref_Niv1 = ref_Niv1 - 1;
	id = "" + currentref_Niv1 + "_" + ref_Niv2 + "_" + ref_Niv3 + "_" + ref_Niv4 + "";

	menustr = "";	
	if (direction == 'left')	{
		menustr+="<a id=\""+id+"\" href=\""+lnk+"\" onmouseover=\"setsubmenus('"+id+"');expandsub(this,'left')\" onmouseout=\"setsubmenus('');checksubpos('"+id+"')\"><img width='10' height='12' border='0' alt='' src='images/mpuce.gif'><div class='r_items'>"+name+"</div></a>";	}	else	{		menustr+="<a id=\""+id+"\" href=\""+lnk+"\" onmouseover=\"setsubmenus('"+id+"');expandsub(this,'right')\" onmouseout=\"setsubmenus('');checksubpos('"+id+"')\"><img width='10' height='12' border='0' alt='' src='images/mpuce.gif'><div class='r_items'>"+name+"</div></a>";	}
	menustr+="<!--SUBMENUITEMS-->";
	htmlstr = htmlstr.replace("<!--SUBMENUITEMS-->",menustr);
}

function addlevel2menu() {
	var id = "";
	currentref_Niv1 = ref_Niv1 - 1;
	ref_Niv4+=1;
	htmlstr = htmlstr.replace("<!--LEVEL2ITEMS-->",'');	
	id = "" + currentref_Niv1 + "_" + ref_Niv2 + "_" + ref_Niv3 + "_" + ref_Niv4 + "";
	pid = "" + currentref_Niv1 + "_" + ref_Niv2 + "_" + ref_Niv3 + "_0";

	menustr = "";
	menustr+="<div id=\""+id+"\" class=\"level2menu\" style=\"position:absolute;display:none;z-index:10\" onmouseover=\"setsubmenus('"+id+"')\" onmouseout=\"setsubmenus('');checksubpos('"+pid+"')\"><!--LEVEL2ITEMS--></div>";
	menustr+="<!--SUBMENU-->";
	htmlstr = htmlstr.replace("<!--SUBMENU-->",menustr);	
}

function addlevel2menuitem(name,lnk) {

	menustr = "";
	menustr+="<a href='"+lnk+"'><img width='10' height='12' border='0' alt='' src='images/mpuce.gif'><div class='r_items'>"+name+"</div></a>";
	menustr+="<!--LEVEL2ITEMS-->";

	htmlstr = htmlstr.replace("<!--LEVEL2ITEMS-->",menustr);
}


function showMenu() {
	document.writeln(htmlstr);
}