function createMenu()	{

	if (ns4)	{
	
		createNS4Menu();
	
	}
	
	else	{

		var lngMenu = menu.length;
		var lngSpace = lngMenuheight/lngMenu;

		for (i = 0; i < lngMenu; i++)	{
			var lngTop = lngMenustart + (lngSpace * i);
			if(menu[i].URL != "" && menu[i].URL != "#")	{
				var strTarget = " target='content' ";
			}
			else	{
				var strTarget = "";
			}	
			if (menu[i].submenu != "")	{
				document.write("<div id='menu" + i + "' name='menu" + i + "' class='menulink' style='position:absolute; left:10; top: " + lngTop + "'><a href='" + menu[i].URL + "'" + strTarget + " style='cursor:hand' class='menu' onclick='this.blur(); expand(" + i + ");' name='link" + i + "' id='link" + i + "'>" + menu[i].text + "</a></div>");
				createSubmenu(i);
			}
			else	{
				document.write("<div id='menu" + i + "' name='menu" + i + "' class='menulink' style='position:absolute; left:10; top: " + lngTop + "'><a href='" + menu[i].URL + "'" + strTarget + " class='menu' name='link" + i + "' onclick='this.blur(); contract(0, " + i + ");' id='link" + i + "'>" + menu[i].text + "</a></div>");
			}
		}
		//Make first menuitem selected as default
		markMenu('link0')		
	}
	

}

function createNS4MenuOld()	{
	var lngMenu = menu.length;
	var lngSpace = lngMenuheight/lngMenu;

	for (i = 0; i < lngMenu; i++)	{

		var lngTop = lngMenustart + (lngSpace * i);
		var strTarget = " target='content' ";

		document.write("<div id='menu" + i + "' name='menu" + i + "'><a class='menu' id='link" + i + "' href='" + menu[i].URL + "'" + strTarget + ">" + menu[i].text + "</a></div>");
	}
	
}

function createNS4Menu()	{
	var lngMenu = menu.length;
	var lngSpace = lngMenuheight/lngMenu;
	var lngSubMenu;
	document.write("<br><br><br><table border='0'>")
	for (i = 0; i < lngMenu; i++)	{

		var lngTop = lngMenustart + (lngSpace * i);
		var strTarget = " target='content' ";

		document.write("<tr><td colspan='2'><a class='menuNs4' id='link" + i + "' href='" + menu[i].URL + "'" + strTarget + ">" + menu[i].text + "</a></td></tr>");
		
		//Create SubMenu
		lngSubMenu = menu[i].submenu.length;

		for (j = 0; j < lngSubMenu; j++)	{
			document.write("<tr><td width='4'></td><td><a href='" + menu[i].submenu[j].URL + "' id='sublink" + i + "_" + j + "' class='menu'" + strTarget + ">" + menu[i].submenu[j].text + "</a></td></tr>");
		}	
		
		//End Create submenu
	}
	document.write("</table>")
}

function createSubmenu(lngNum)	{
	var lngSubMenu = menu[lngNum].submenu.length;
	var lngMenu = menu.length;
	var lngSpace = lngMenuheight/(lngMenu + lngSubMenu + 2);
	var lngTop = lngMenustart + (lngSpace * (lngNum+2));
	document.write("<div id='submenu" + lngNum + "' name='submenu" + lngNum + "' class='menulink' style='visibility:hidden; position:absolute; left:16; top: " + lngTop + "'>");
	for (j = 0; j < lngSubMenu; j++)	{
		if(menu[lngNum].submenu[j].URL != "" && menu[lngNum].submenu[j].URL != "#")	{
			var strTarget = " target='content' ";
		}
		else	{
			var strTarget = "";
		}		
		var lngTop = lngTop + (lngSpace*j);
		document.write("<a href='" + menu[lngNum].submenu[j].URL + "' id='sublink" + lngNum + "_" + j + "' name='sublink" + lngNum + "_" + j + "' class='menu'" + strTarget + " onclick=this.blur();markSubs('sublink" + lngNum + "_" + j + "');>" + menu[lngNum].submenu[j].text + "</a><br>");
	}	
	document.write("</div>");
}

function expand(lngNum)	{

	if (ie)	{
		var objSubmenu = eval("submenu" + lngNum);
		var strLink = eval("link" + lngNum);
		var strSubLink = eval("sublink" + lngNum + "_0");
	}
	if (ns6)	{
		var objSubmenu = document.getElementById("submenu" + lngNum);
		var strLink = document.getElementById("link" + lngNum);
	}	

	if (objSubmenu.style.visibility == "visible")	{
		contract(0,-1);
		markSubs();
		strLink.className = "menu";
	}
	else	{
		contract(lngNum,-1);
		markSubs();
		objSubmenu.style.visibility = "visible";
		strLink.className = "menuOn";
		strSubLink.className = "menuOn";
	}	
	
}

function markMenu(strMenu)	{

var lngMenuNumber = menu.length;

		
	for (x = 0; x < lngMenuNumber; x++)	{

		if (ie)	{
			var strLink = eval('link' + x);
		}
		if (ns6)	{
			var strLink = document.getElementById('link' + x);
		}
		
		if (strMenu != 'link' + x)	{
			strLink.className = "menu";
		}
		else	{
			strLink.className = "menuOn";
		}
	}
	
}


function markSubs(strLink)	{

	
	if (ie)	{
		arrLinks = document.all.tags("A");
	}
	if (ns6)	{
		arrLinks = document.getElementsByTagName("A");
	}
	var lngLinks = arrLinks.length;
	for (y = 0; y < lngLinks; y++)	{
		if (arrLinks[y].id.substring(0,3) == "sub")	{
			if (strLink != arrLinks[y].id)	{
				arrLinks[y].className = "menu";
			}
			else	{
				arrLinks[y].className = "menuOn";
			}
		}		
	}

}



function openMenu(lngMenuNum)	{

	var lngMenu = menu.length;
	var lngSubMenu = menu[lngMenuNum].submenu.length;
	var lngSpace = lngMenuheight/(lngMenu+lngSubMenu+2);
	var lngOrigSpace = lngMenuheight/lngMenu;
	for (i = 0; i < lngMenu; i++)	{
	
		if (ie)	{
			var strCurrlink = eval('link' + i);
		}
		if (ns6)	{
			var strCurrlink = document.getElementById('link' + i);
		}
	
	
		if (i < lngMenuNum)	{
			var lngTop = lngMenustart + (lngSpace * i);
			var lngOldtop = lngMenustart + (lngOrigSpace * i);
			slideUp(('menu' + i), lngOldtop, lngTop);
			strCurrlink.className = "menu";
		}

		if (i == lngMenuNum)	{
			var lngTop = lngMenustart + (lngSpace * i) + lngSpace;
			if(ie)	{
				eval("menu" + i).style.top = lngTop;
				eval("submenu" + i).style.visibility = "visible";
			}
			if(ns6)	{
				document.getElementById("menu" + i).style.top = lngTop;
				document.getElementById("submenu" + i).style.visibility = "visible";;
			}	
			strCurrlink.className = "menu";
		}

		if (i > lngMenuNum)	{
			var lngTop = (lngMenustart + (lngOrigSpace * lngMenu)) - (lngSpace * (lngMenu-i));
			var lngOldtop = lngMenustart + (lngOrigSpace * i);
			slideDown(('menu' + i), lngOldtop, lngTop);
			strCurrlink.className = "menu";
		}
	}
}		



function contract(lngAction, lngLinkNum)	{
	var lngMenu = menu.length;
	var lngSpace = lngMenuheight/lngMenu;

	for (i = 0; i < lngMenu; i++)	{
		if (ie)	{
			var objCurrmenu = eval('menu' + i);
		}
		if (ns6)	{
			var objCurrmenu = document.getElementById('menu' + i);
		}
		var lngTop = lngMenustart + (lngSpace * i);	
		var lngOldTop = parseInt(objCurrmenu.style.top);
		if(lngOldTop > lngTop)	{
			slideUp('menu' + i, lngOldTop, lngTop, lngAction);
		}
		else	{
			slideDown('menu' + i, lngOldTop, lngTop, lngAction);
		}
			
	}	
	if (ie)	{
		arrDivs = document.all.tags("DIV");
	}
	if (ns6)	{
		arrDivs = document.getElementsByTagName("DIV");
	}
	var lngDiv = arrDivs.length;
	for (j = 0; j < lngDiv; j++)	{
		if (arrDivs[j].id.substring(0,3) == "sub")	{
			arrDivs[j].style.visibility = "hidden";
		}		
	}
	if(lngAction == 0)	{
		markMenu('link' + lngLinkNum);
	}	

}


function slideUp(strMenu, currPos, newPos, lngAction) {
	if(ie)	{
		var objMenu = eval(strMenu);
	}
	if(ns6)	{
		var objMenu = document.getElementById(strMenu);
	}
	var lngSpeed = 5;
	
	if (currPos > newPos) {
		if ((currPos - newPos) > lngSpeed)	{
			currPos = currPos - lngSpeed;
		}
		else	{
			currPos = currPos -(currPos - newPos);
		}	
		objMenu.style.top = currPos;
		setTimeout("slideUp('" + strMenu + "'," + currPos + "," + newPos + ")",30)
	}
	else	{
		if (lngAction > 0)	{
			openMenu(lngAction);
		}	
	}	
}

function slideDown(strMenu, currPos, newPos, lngAction) {
	if(ie)	{
		var objMenu = eval(strMenu);
	}
	if(ns6)	{
		var objMenu = document.getElementById(strMenu);
	}
	
	var lngSpeed = 5;
	if (currPos < newPos) {
		if ((newPos - currPos) > lngSpeed)	{
			currPos = currPos + lngSpeed;
		}
		else	{
			currPos = currPos +(newPos - currPos);
		}	
		objMenu.style.top = currPos;
		setTimeout("slideDown('" + strMenu + "'," + currPos + "," + newPos + ")",30)
	}
	else	{
		if (lngAction > 0)	{
			openMenu(lngAction);
		}
	}	
}