﻿/***********************************************
* AnyLink CSS Menu script- © Dynamic Drive DHTML code library (www.dynamicdrive.com)
* This notice MUST stay intact for legal use
* Visit Dynamic Drive at http://www.dynamicdrive.com/ for full source code
***********************************************/

var disappearDelay = 250  //menu disappear speed onMouseout (in miliseconds)
var enableAnchorLink = 0 //Enable or disable the anchor link when clicked on? (1=e, 0=d)
var hideMenuOnclick = 1 //hide menu when user clicks within menu? (1=yes, 0=no)
var horizontalOffset = 1 //horizontal offset of menu from default location. (0-5 is a good value)

/////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;
}

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 IECompatTest() {
    return (document.compatMode && document.compatMode != "BackCompat") ? document.documentElement : document.body
}

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 - obj.offsetWidth < dropmenuobj.contentmeasure)
            edgeoffset = dropmenuobj.contentmeasure + obj.offsetWidth + (horizontalOffset * 2) //no space to the right of page? Move menu over to the left
    }   
    else {
        var topedge = ie5 && !window.opera ? IECompatTest().scrollTop : window.pageYOffset
        var windowedge = ie5 && !window.opera ? IECompatTest().scrollTop + IECompatTest().clientHeight - 15 : window.pageYOffset + window.innerHeight - 18
        
        dropmenuobj.contentmeasure = dropmenuobj.offsetHeight
        if (windowedge - dropmenuobj.y < dropmenuobj.contentmeasure) { //move menu up?
            edgeoffset = dropmenuobj.contentmeasure - obj.offsetHeight
            
            if ((dropmenuobj.y - topedge) < dropmenuobj.contentmeasure) //up no good either? (position at top of viewable window then)
                edgeoffset = dropmenuobj.y
        }
    }

    return edgeoffset
}

function DropDownMenu(obj, e, dropmenuID) {
    if (window.event) 
        event.cancelBubble = true
    else if (e.stopPropagation) 
        e.stopPropagation()
        
    if (typeof dropmenuobj != "undefined") //hide previous menu
        dropmenuobj.style.visibility = "hidden"
    
    ClearHideMenu()
    
    if (ie5 || ns6) {
        obj.onmouseout = DelayHideMenu
        dropmenuobj = document.getElementById(dropmenuID)
        
        if (hideMenuOnclick) 
            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 - ClearBrowserEdge(obj, "rightedge") + obj.offsetWidth + horizontalOffset + "px"
        dropmenuobj.style.top = dropmenuobj.y - ClearBrowserEdge(obj, "bottomedge") + "px"
    }
    
    return ClickReturnValue()
}

function ClickReturnValue() {
    if ((ie5 || ns6) && !enableAnchorLink) 
        return false
    else 
        return true
}

function ContainsNS6(a, b) {
    while (b.parentNode)
        if ((b = b.parentNode) == a)
            return true;
            
    return false;
}

function DynamicHide(e) {
    if (ie5 && !dropmenuobj.contains(e.toElement))
        DelayHideMenu()
    else if (ns6 && e.currentTarget != e.relatedTarget && !ContainsNS6(e.currentTarget, e.relatedTarget))
        DelayHideMenu()
}

function DelayHideMenu(){
    delayhide = setTimeout("dropmenuobj.style.visibility = 'hidden'", disappearDelay)
}

function ClearHideMenu(){
    if (typeof delayhide != "undefined")
        clearTimeout(delayhide)
}
