var disappeardelay = 250  //menu disappear speed onMouseout (in miliseconds)
var enableanchorlink = 1 //Enable or disable the anchor link when clicked on? (1=e, 0=d)
var hidemenu_onclick = 1 //hide menu when user clicks within menu? (1=yes, 0=no)

/////No further editting needed

var ie5 = document.all
var ns6 = document.getElementById && !document.all

function getposOffset(what, offsettype)
{
	var totaloffset = (offsettype == "left") ? what.offsetLeft : what.offsetTop;
	var parentEl = what.offsetParent;
	while (parentEl != null)
	{
		totaloffset = (offsettype == "left") ? totaloffset + parentEl.offsetLeft : totaloffset + parentEl.offsetTop;
		parentEl = parentEl.offsetParent;
	}
	return totaloffset;
} // getposOffset

function showhide(obj, e, visible, hidden)
{
	if (ie5 || ns6) dropmenuobj.style.left = dropmenuobj.style.top = -500
	if (e.type == "click" && obj.visibility == hidden || e.type == "mouseover")
		obj.visibility = visible
	else if (e.type == "click")
		obj.visibility = hidden
} // showhide

function iecompattest()
{
	return (document.compatMode && document.compatMode != "BackCompat") ? document.documentElement : document.body
} // iecompattest

function clearbrowseredge(obj, whichedge)
{
	var edgeoffset = 0
	if (whichedge == "rightedge")
	{
		var windowedge = ie5 && !window.opera ? iecompattest().scrollLeft + iecompattest().clientWidth - 15 : window.pageXOffset + window.innerWidth - 15
		dropmenuobj.contentmeasure = dropmenuobj.offsetWidth
		if (windowedge - dropmenuobj.x < dropmenuobj.contentmeasure) 	edgeoffset = dropmenuobj.contentmeasure - obj.offsetWidth
	}
	else
	{
		var topedge = ie5 && !window.opera ? iecompattest().scrollTop : window.pageYOffset
		var windowedge = ie5 && !window.opera ? iecompattest().scrollTop + iecompattest().clientHeight - 15 : window.pageYOffset + window.innerHeight - 15
		dropmenuobj.contentmeasure = dropmenuobj.offsetHeight
		if (windowedge-dropmenuobj.y < dropmenuobj.contentmeasure)
		{ 
			// move up?
			edgeoffset = dropmenuobj.contentmeasure + obj.offsetHeight
			// up no good either?
			if ((dropmenuobj.y - topedge) < dropmenuobj.contentmeasure) edgeoffset = dropmenuobj.y + obj.offsetHeight - topedge
		}
	}
	
	return edgeoffset
	
} // clearbrowseredge

function dropdownmenu(obj, e, dropmenuID)
{
	if (window.event) event.cancelBubble = true
	else if (e.stopPropagation) e.stopPropagation()
	
	//hide previous menu
	if (typeof dropmenuobj != "undefined") dropmenuobj.style.visibility = "hidden"
	
	clearhidemenu()
	
	if (ie5 || ns6)
	{
		obj.onmouseout = delayhidemenu
		dropmenuobj = document.getElementById(dropmenuID)
		if (hidemenu_onclick) dropmenuobj.onclick = function() { dropmenuobj.style.visibility = "hidden" }
		dropmenuobj.onmouseover = clearhidemenu
		dropmenuobj.onmouseout = ie5? function() { dynamichide(event) } : function(event) { dynamichide(event) }
		showhide(dropmenuobj.style, e, "visible", "hidden")
		dropmenuobj.x = getposOffset(obj, "left")
		dropmenuobj.y = getposOffset(obj, "top") -8
		dropmenuobj.style.left = dropmenuobj.x - clearbrowseredge(obj, "rightedge") + "px"
		dropmenuobj.style.top = dropmenuobj.y - clearbrowseredge(obj, "bottomedge") + obj.offsetHeight + "px"
	}
	
	return clickreturnvalue()
	
} // dropdownmenu

function clickreturnvalue()
{
	if ((ie5 || ns6) && !enableanchorlink) return false
	else return true
} // clickreturnvalue

function contains_ns6(a, b) 
{
	while (b.parentNode) 
		if ((b = b.parentNode) == a)
		return true;

	return false;
	
} // contains_ns6

function dynamichide(e)
{
	if (ie5 && !dropmenuobj.contains(e.toElement)) delayhidemenu()
	else if (ns6 && e.currentTarget != e.relatedTarget&& !contains_ns6(e.currentTarget, e.relatedTarget))
	delayhidemenu()
} // dynamichide

function delayhidemenu()
{
	delayhide = setTimeout("dropmenuobj.style.visibility='hidden'", disappeardelay)
} // delayhidemenu

function clearhidemenu()
{
	if (typeof delayhide != "undefined") clearTimeout(delayhide)
} // clearhidemenu