//Freeware DHTML transparent drop down menu system by Jerry Dean Baxter (http://www.jdb-full.org/dhtml/transpdrop/)
//If you do appreciate my work, please donate and help me facing the costs of being an independent developer!

//Parameters

TranspDrop.spacerImg = "/pdMenu/menu/x.gif";
TranspDrop.dingbatOn = "/pdMenu/menu/exp-0.gif";
TranspDrop.dingbatOff = "/pdMenu/menu/exp-0.gif";
TranspDrop.dingbatSize = 14;
TranspDrop.menuPadding = 1;
TranspDrop.itemPadding = 4;
TranspDrop.shadowSize = 2;
TranspDrop.shadowOffset = 3;
TranspDrop.shadowColor = "#727272";
TranspDrop.shadowPng = "/pdMenu/menu/grey-40.png";
TranspDrop.backgroundColor = "white";
TranspDrop.backgroundPng = "/pdMenu/menu/white-90.png";
TranspDrop.hideDelay = 1000;
TranspDrop.slideTime = 200;



//Aligments

TranspDrop.reference = {topLeft:1,topRight:2,bottomLeft:3,bottomRight:4};
TranspDrop.direction = {down:1,right:2};
TranspDrop.store = [];
TranspDrop.maxZ = 100;


function none () {
	}


TranspDrop.isSupported = function() {
	if (typeof TranspDrop.isSupported.r == "boolean") return TranspDrop.isSupported.r;
	var userAgent = navigator.userAgent.toLowerCase();
	var appName = navigator.appName;
	var r = false;
	if (userAgent.indexOf("gecko") > -1) r = true; else if (appName == "Microsoft Internet Explorer") {
		if (document.getElementById) r = true; 
		}
	if (userAgent.indexOf("opera") != -1) r = true;
	TranspDrop.isSupported.r = r;
	return r;
	}

TranspDrop.initialize = function() {
	for (var i = 0, menu = null; menu = this.store[i]; i++) {
		menu.initialize();
		}
	}

TranspDrop.renderAll = function() {
	var aMenuHtml = [];
	for (var i = 0, menu = null; menu = this.store[i]; i++) {
		aMenuHtml[i] = menu.toString();
		}
	document.write(aMenuHtml.join(""));
	}

function TranspDrop(oActuator, iDirection, iLeft, iTop, iReferencePoint, parentMenuSet) {

	this.addItem = addItem;
	this.addMenu = addMenu;
	this.toString = toString;
	this.initialize = initialize;
	this.isOpen = false;
	this.show = show;
	this.hide = hide;
	this.items = [];
	
	this.onactivate = new Function(); 
	this.ondeactivate = new Function(); 
	this.onmouseover = new Function(); 
	this.onqueue = new Function(); 
	this.onqueue1 = new Function(); 
	
	this.index = TranspDrop.store.length;
	TranspDrop.store[this.index] = this;
	var id = "TranspDrop" + this.index;
	var contentHeight = null;
	var contentWidth = null;
	var childMenuSet = null;
	var animating = false;
	var childMenus = [];
	var slideAccel = -1;
	var elmCache = null;
	var ready = false;
	var _this = this;
	var a = null;
	var pos = iDirection == TranspDrop.direction.down ? "top" : "left";
	var dim = null;
	
	function addItem(sText, sUrl) {
		var item = new TranspDropItem(sText, sUrl, this);
		item._index = this.items.length;
		this.items[item._index] = item;
		}


	function addMenu(oMenuItem) {
		if (!oMenuItem.parentMenu == this) throw new Error("Cannot add a menu here");
		if (childMenuSet == null) childMenuSet = new TranspDropSet(TranspDrop.direction.right, -5, 2, TranspDrop.reference.topRight);
		var m = childMenuSet.addMenu(oMenuItem);
		childMenus[oMenuItem._index] = m;
		m.onmouseover = child_mouseover;
		m.ondeactivate = child_deactivate;
		m.onqueue = child_queue;
		m.onqueue1 = child_queue1;
		return m;
		}


	function initialize() {
		initCache();
		initEvents();
		initSize();
		ready = true;
		}


	function show() {
		if (ready) {
			_this.isOpen = true;
			animating = true;
			setContainerPos();
			elmCache["clip"].style.visibility = "visible";
			elmCache["clip"].style.zIndex = TranspDrop.maxZ++;
			
			slideStart();
			_this.onactivate();
			}
		}


	function hide() {
		if (ready) {
			_this.isOpen = false;
			animating = true;
			for (var i = 0, item = null; item = elmCache.item[i]; i++) 
			dehighlight(item);
			if (childMenuSet) childMenuSet.hide();
			slideStart();
			_this.ondeactivate();
			}
		}


	function setContainerPos() {
		var sub = oActuator.constructor == TranspDropItem; 
		var act = sub ? oActuator.parentMenu.elmCache["item"][oActuator._index] : oActuator; 
		var el = act;
		var x = 0;
		var y = 0;
		var minX = 0;
		var maxX = (window.innerWidth ? window.innerWidth : document.body.clientWidth) - parseInt(elmCache["clip"].style.width);
		var minY = 0;
		var maxY = (window.innerHeight ? window.innerHeight : document.body.clientHeight) - parseInt(elmCache["clip"].style.height);
		
		while (sub ? el.parentNode.className.indexOf("TranspDropMenu") == -1 : el.offsetParent) {
			x += el.offsetLeft;
			y += el.offsetTop;
			//if (el.scrollLeft) x -= el.scrollLeft; //Opera support
			//if (el.scrollTop) y -= el.scrollTop;
			el = el.offsetParent;
			}
	
		if (oActuator.constructor == TranspDropItem) {
			x += parseInt(el.parentNode.style.left);
			y += parseInt(el.parentNode.style.top);
			}
	
		switch (iReferencePoint) {
			case TranspDrop.reference.topLeft:
			break;
			case TranspDrop.reference.topRight:
			x += act.offsetWidth;
			break;
			case TranspDrop.reference.bottomLeft:
			y += act.offsetHeight;
			break;
			case TranspDrop.reference.bottomRight:
			x += act.offsetWidth;
			y += act.offsetHeight;
			break;
			}
			
		x += iLeft;
		y += iTop;
		x = Math.max(Math.min(x, maxX), minX);
		y = Math.max(Math.min(y, maxY), minY);

		elmCache["clip"].style.left = x + "px";
		elmCache["clip"].style.top = y + "px";
	}
	
	
	function slideStart() {
		var x0 = parseInt(elmCache["content"].style[pos]);
		var x1 = _this.isOpen ? 0 : -dim;
		if (a != null) a.stop();
		a = new AnimLib(x0, x1, TranspDrop.slideTime, slideAccel);
		a.onframe = slideFrame;
		a.onend = slideEnd;
		a.start();
		}


	function slideFrame(x) {
		elmCache["content"].style[pos] = x + "px";
		}


	function slideEnd() {
		if (!_this.isOpen) elmCache["clip"].style.visibility = "hidden";
		animating = false;
		}


	function initSize() {
	
		var ow = elmCache["items"].offsetWidth;
		var oh = elmCache["items"].offsetHeight;
		var userAgent = navigator.userAgent.toLowerCase();
		
		elmCache["clip"].style.width = ow + TranspDrop.shadowSize + 2 + "px";
		elmCache["clip"].style.height = oh + TranspDrop.shadowSize + 2 + "px";
		
		elmCache["content"].style.width = ow + TranspDrop.shadowSize + "px";
		elmCache["content"].style.height = oh + TranspDrop.shadowSize + "px";
		contentHeight = oh + TranspDrop.shadowSize;
		contentWidth = ow + TranspDrop.shadowSize;
		dim = iDirection == TranspDrop.direction.down ? contentHeight : contentWidth;
		
		elmCache["content"].style[pos] = -dim - TranspDrop.shadowSize + "px";
		elmCache["clip"].style.visibility = "hidden";
		
		if (userAgent.indexOf("mac") == -1 || userAgent.indexOf("gecko") > -1) {
		
			elmCache["background"].style.width = ow + "px";
			elmCache["background"].style.height = oh + "px";
			elmCache["background"].style.backgroundColor = TranspDrop.backgroundColor;
			
			elmCache["shadowRight"].style.left = ow + "px";
			elmCache["shadowRight"].style.height = oh - (TranspDrop.shadowOffset - TranspDrop.shadowSize) + "px";
			elmCache["shadowRight"].style.backgroundColor = TranspDrop.shadowColor;
			
			elmCache["shadowBottom"].style.top = oh + "px";
			elmCache["shadowBottom"].style.width = ow - TranspDrop.shadowOffset + "px";
			elmCache["shadowBottom"].style.backgroundColor = TranspDrop.shadowColor;
			} else {
		
			elmCache["background"].firstChild.src = TranspDrop.backgroundPng;
			elmCache["background"].firstChild.width = ow;
			elmCache["background"].firstChild.height = oh;
			
			elmCache["shadowRight"].firstChild.src = TranspDrop.shadowPng;
			elmCache["shadowRight"].style.left = ow + "px";
			elmCache["shadowRight"].firstChild.width = TranspDrop.shadowSize;
			elmCache["shadowRight"].firstChild.height = oh - (TranspDrop.shadowOffset - TranspDrop.shadowSize);
			
			elmCache["shadowBottom"].firstChild.src = TranspDrop.shadowPng;
			elmCache["shadowBottom"].style.top = oh + "px";
			elmCache["shadowBottom"].firstChild.height = TranspDrop.shadowSize;
			elmCache["shadowBottom"].firstChild.width = ow - TranspDrop.shadowOffset;
			}
		}


	function initCache() {
		var menu = document.getElementById(id);
		var all = menu.all ? menu.all : menu.getElementsByTagName("*"); 
		elmCache = {};
		elmCache["clip"] = menu;
		elmCache["item"] = [];
		for (var i = 0, elm = null; elm = all[i]; i++) {
			switch (elm.className) {
				case "items":
				case "content":
				case "background":
				case "shadowRight":
				case "shadowBottom":
				elmCache[elm.className] = elm;
				break;
				case "item":
				elm._index = elmCache["item"].length;
				elmCache["item"][elm._index] = elm;
				break;
				}
			}

		_this.elmCache = elmCache;
		}


	function initEvents() {
		for (var i = 0, item = null; item = elmCache.item[i]; i++) {
			item.onmouseover = item_mouseover;
			item.onmouseout = item_mouseout;
			item.onclick = item_click;
			}

		if (typeof oActuator.tagName != "undefined") {
			oActuator.onmouseover = actuator_mouseover;
			oActuator.onmouseout = actuator_mouseout;
			}

		elmCache["content"].onmouseover = content_mouseover;
		elmCache["content"].onmouseout = content_mouseout;
		}


	function highlight(oRow) {
		oRow.className = "item hover";
		if (childMenus[oRow._index]) oRow.lastChild.firstChild.src = TranspDrop.dingbatOn;
		}


	function dehighlight(oRow) {
		oRow.className = "item";
		if (childMenus[oRow._index]) oRow.lastChild.firstChild.src = TranspDrop.dingbatOff;
		}


	function item_mouseover() {
		if (!animating) {
			highlight(this);
			if (childMenus[this._index]) childMenuSet.showMenu(childMenus[this._index]);
			else if (childMenuSet) childMenuSet.hide();
			}
		}


	function item_mouseout() {
		if (!animating) {
			if (childMenus[this._index]) childMenuSet.hideMenu(childMenus[this._index]);
			else dehighlight(this);
			}
		}


	function item_click() {
		if (!animating) {
			if (_this.items[this._index].url) location.href = _this.items[this._index].url;
			}
		}


	function actuator_mouseover() {
		parentMenuSet.showMenu(_this);
		}


	function actuator_mouseout() {
		parentMenuSet.hideMenu(_this);
		}


	function content_mouseover() {
		if (!animating) {
			parentMenuSet.showMenu(_this);
			_this.onmouseover();
			}
		}


	function content_mouseout() {
		if (!animating) {
			parentMenuSet.hideMenu(_this);
			}
		}


	function child_mouseover() {
		if (!animating) {
			parentMenuSet.showMenu(_this);
			}
		}


	function child_deactivate() {
		for (var i = 0; i < childMenus.length; i++) {
			if (childMenus[i] == this) {
				dehighlight(elmCache["item"][i]);
				break;
				}
			}
		}


	function child_queue() {
		parentMenuSet.hideMenu(_this);
		}

	function child_queue1() {
		parentMenuSet.showMenu(_this);
		}


	function toString() {
		var aHtml = [];
		var sClassName = "TranspDropMenu" + (oActuator.constructor != TranspDropItem ? " top" : "");
		for (var i = 0, item = null; item = this.items[i]; i++) {
			aHtml[i] = item.toString(childMenus[i]);
			}
			
		return '<div id="' + id + '" class="' + sClassName + '">' + 
		'<div class="content"><table class="items" cellpadding="0" cellspacing="0" border="0">' + 
		'<tr><td colspan="2"><img src="' + TranspDrop.spacerImg + '" width="1" height="' + TranspDrop.menuPadding + '"></td></tr>' + 
		aHtml.join('') + 
		'<tr><td colspan="2"><img src="' + TranspDrop.spacerImg + '" width="1" height="' + TranspDrop.menuPadding + '"></td></tr></table>' + 
		'<div class="shadowBottom"><img src="' + TranspDrop.spacerImg + '" width="1" height="1"></div>' + 
		'<div class="shadowRight"><img src="' + TranspDrop.spacerImg + '" width="1" height="1"></div>' + 
		'<div class="background"><img src="' + TranspDrop.spacerImg + '" width="1" height="1"></div>' + 
		'</div></div>';
		}
	}


TranspDropSet.store = [];

function TranspDropSet(iDirection, iLeft, iTop, iReferencePoint) {

	this.addMenu = addMenu;
	this.showMenu = showMenu;
	this.hideMenu = hideMenu;
	this.hide = hide;
	
	var menus = [];
	var _this = this;
	var current = null;
	this.index = TranspDropSet.store.length;
	TranspDropSet.store[this.index] = this;


	function addMenu(oActuator) {
		var m = new TranspDrop(oActuator, iDirection, iLeft, iTop, iReferencePoint, this);
		menus[menus.length] = m;
		return m;
		}


	function showMenu(oMenu) {
		if (oMenu != current) {
			if (current != null) hide(current); 
			current = oMenu;
			oMenu.show();
			} else {
			oMenu.onqueue1();
			cancelHide(oMenu);
			}
		}


	function hideMenu(oMenu) {
		if (current == oMenu && oMenu.isOpen) {
			if (!oMenu.hideTimer) {
				scheduleHide(oMenu);
				}
			}
		}


	function scheduleHide(oMenu) {
		oMenu.onqueue();
		oMenu.hideTimer = window.setTimeout("TranspDropSet.store[" + _this.index + "].hide(TranspDrop.store[" + oMenu.index + "])", TranspDrop.hideDelay);
		}


	function cancelHide(oMenu) {
		if (oMenu.hideTimer) {
			window.clearTimeout(oMenu.hideTimer);
			oMenu.hideTimer = null;
			}
		}


	function hide(oMenu) {
		if (!oMenu && current) {
			oMenu = current;
			}

		if (oMenu && current == oMenu && oMenu.isOpen) {
			cancelHide(oMenu);
			current = null;
			oMenu.hideTimer = null;
			oMenu.hide();
			}
		}

	}


function TranspDropItem(sText, sUrl, oParent) {
	this.toString = toString;
	this.text = sText;
	this.url = sUrl;
	this.parentMenu = oParent;

	function toString(bDingbat) {
		var sDingbat = bDingbat ? TranspDrop.dingbatOff : TranspDrop.spacerImg;
		var iEdgePadding = TranspDrop.itemPadding + TranspDrop.menuPadding;
		var sPaddingLeft = "padding:" + TranspDrop.itemPadding + "px; padding-left:" + iEdgePadding + "px;"
		var sPaddingRight = "padding:" + TranspDrop.itemPadding + "px; padding-right:" + iEdgePadding + "px;"
		return '<tr class="item"><td nowrap style="' + sPaddingLeft + '">' + 
		sText + '</td><td width="14" style="' + sPaddingRight + '">' + 
		'<img src="' + sDingbat + '" width="14" height="14"></td></tr>';
		}
	}


function AnimLib(from, to, time, zip) {
	if (typeof zip == "undefined") zip = 0;
	if (typeof unit == "undefined") unit = "px";
	this.x0 = from;
	this.x1 = to;
	this.dt = time;
	this.zip = -zip;
	this.unit = unit;
	this.timer = null;
	this.onend = new Function();
	this.onframe = new Function();
	}


AnimLib.prototype.start = function() {
	this.t0 = new Date().getTime();
	this.t1 = this.t0 + this.dt;
	var dx = this.x1 - this.x0;
	this.c1 = this.x0 + ((1 + this.zip) * dx / 3);
	this.c2 = this.x0 + ((2 + this.zip) * dx / 3);
	AnimLib._add(this);
	}


AnimLib.prototype.stop = function() {
	AnimLib._remove(this);
	}


AnimLib.prototype._paint = function(time) {
	if (time < this.t1) {
		var elapsed = time - this.t0;
		this.onframe(AnimLib._getBezier(elapsed/this.dt,this.x0,this.x1,this.c1,this.c2));
		} else this._end();
	}


AnimLib.prototype._end = function() {
	AnimLib._remove(this);
	this.onframe(this.x1);
	this.onend();
	}


AnimLib._add = function(o) {
	var index = this.instances.length;
	this.instances[index] = o;
	
	if (this.instances.length == 1) {
		this.timerID = window.setInterval("AnimLib._paintAll()", this.targetRes);
		}
	}


AnimLib._remove = function(o) {
	for (var i = 0; i < this.instances.length; i++) {
		if (o == this.instances[i]) {
		this.instances = this.instances.slice(0,i).concat( this.instances.slice(i+1) );
		break;
		}
	}

	if (this.instances.length == 0) {
		window.clearInterval(this.timerID);
		this.timerID = null;
		}
	}


AnimLib._paintAll = function() {
	var now = new Date().getTime();
	for (var i = 0; i < this.instances.length; i++) {
		this.instances[i]._paint(now);
		}
	}


AnimLib.base_1 = function(t) { return t*t*t }
AnimLib.base_2 = function(t) { return 3*t*t*(1-t) }
AnimLib.base_3 = function(t) { return 3*t*(1-t)*(1-t) }
AnimLib.base_4 = function(t) { return (1-t)*(1-t)*(1-t) }

AnimLib._getBezier = function(percent,startPos,endPos,control1,control2) {
	return endPos * this.base_1(percent) + control2 * this.base_2(percent) + control1 * this.base_3(percent) + startPos * this.base_4(percent);
	}


AnimLib.instances = [];
AnimLib.targetRes = 10;
AnimLib.timerID = null;