var disappeardelay=750  //Menu disappear speed onMouseout (in miliseconds)

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

function dropdownmenu(obj, e, dropmenuID)
	{
	if (window.event) event.cancelBubble=true
	else if (e.stopPropagation) e.stopPropagation()
	if (typeof dropmenuobj!="undefined") //If there is any previous drop-menu visible, hide it.
		dropmenuobj.style.visibility="hidden"
	clearhidemenu()
	if (ie5||ns6) //Basically, if JavaScript is going to work
		{
		obj.onmouseout=delayhidemenu
		dropmenuobj=document.getElementById(dropmenuID)
		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")
		dropmenuobj.style.left=dropmenuobj.x+"px"
		dropmenuobj.style.top=dropmenuobj.y+obj.offsetHeight+"px"
		}
	return true
	}

function getposOffset(what, offsettype) //Add up the offsets of this element and all its parents
	{
	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;
	}

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
	}

function contains_ns6(a, b) //Some kind of compatability issue
	{
	while (b.parentNode)
	if ((b = b.parentNode) == a)
		return true;
	return false;
	}

function dynamichide(e) //Don't quite understand, some compatability thing
	{
	if (ie5&&!dropmenuobj.contains(e.toElement))
		delayhidemenu()
	else if (ns6&&e.currentTarget!= e.relatedTarget&& !contains_ns6(e.currentTarget, e.relatedTarget))
		delayhidemenu()
	}

function delayhidemenu() //Sets the menu to disappear after the specified delay
	{
	delayhide=setTimeout("dropmenuobj.style.visibility='hidden'",disappeardelay)
	}

function clearhidemenu() //Stops the menu from disappearing if it's currently set to do so
	{
	if (typeof delayhide!="undefined")
		clearTimeout(delayhide)
	}