/*YADM - Yet another dynamic menu
	written by Chris Heilmann (http://icant.co.uk)
	Please refer to the yadm homepage for updates: http://www.onlinetools.org/tools/yadm/
	Free for non-commercial use. Changes welcome, but no distribution without
	the consent of the author.
*/
function yadm(){
	var parentClass='isParent';				//gets applied when the LI has a nested UL
	var activeParentClass='isActive';		//gets applied when the nested UL is visible
	var preventHoverClass='nohover';		//denotes a navigation that should not get any hover effects
	var preventTouchClass='notouch';		//denotes the sub element who needn't be touched
	var indicateJSClass='dhtml';			//gets applied to the main navigation when Javascript is available
	var toHideClass='hiddenChild';			//gets applied to hide the nested UL
	var toShowClass='shownChild';			//gets applied to show the nested UL
	var currentClass='current';				//denotes the current active sub element and prevents collapsing
	var dnav=document.getElementById('nav');	//denotes the navigation element
  var agt = navigator.userAgent.toLowerCase();
  var isIE=(document.all&&(agt.indexOf("msie") != -1)&&(agt.indexOf("opera") == -1)&&!window.opera);
// if DOM is not available stop right here.
	if(!document.getElementById && !document.createTextNode){return;}
// if the navigation element is available, apply the class denoting DHTML capabilities
	if(dnav){
		dnav.className+=dnav.className==''?indicateJSClass:' '+indicateJSClass;
		var lis,i,firstUL,j,apply;

// loop through all LIs and check which ones have a nested UL
		lis=dnav.getElementsByTagName('li');
		for(i=0;i<lis.length;i++){
			firstUL=lis[i].getElementsByTagName('ul')[0]
// if there is a nested UL, deactivate the first nested link and apply the class to show
// there is a nested list
			if(firstUL){
				if(new RegExp('\\b'+preventTouchClass+'\\b').test(lis[i].className)){lis[i].keepopen=1;continue}
//				lis[i].childNodes[0].onclick=function(){return false;}
				lis[i].className+=lis[i].className==''?parentClass:' '+parentClass;
// check if there is a "current" element
				apply=true;
				if(new RegExp('\\b'+currentClass+'\\b').test(lis[i].className)){apply=false;}
				if(apply){
					for(j=0;j<firstUL.getElementsByTagName('li').length;j++){
						if(new RegExp('\\b'+currentClass+'\\b').test(firstUL.getElementsByTagName('li')[j].className)){apply=false;break}
					}
				}
// if there is no current element, apply the class to hide the nested list
				if(apply) {
					firstUL.className+=firstUL.className==''?toHideClass:' '+toHideClass;
// check if there is a class to prevent hover effects and only apply the function
// onclick if that is the case, otherwise apply it onclick and onhover
					if(new RegExp('\\b'+preventHoverClass+'\\b').test(dnav.className)){
						lis[i].onclick=function(){doyadm(this);}
					} else {
//						lis[i].onclick=function(){doyadm(this);}
						lis[i].onmouseover=function(){doyadm(this);}
						lis[i].onmouseout=function(){doyadm(null);}
					}
// if there is a current element, define the list as being kept open and apply the
// classes to show the nested list and define the parent LI as an active one
				} else {
					lis[i].keepopen=1;
					firstUL.className+=firstUL.className==''?toShowClass:' '+toShowClass;
					lis[i].className=lis[i].className.replace(parentClass,activeParentClass);
				}
			}
		}
	}
// function to show and hide the nested lists and add the classes to the parent LIs
	function doyadm(o){
		var childUL,isobj,swapp;
// loop through all LIs of the navigation
		lis=dnav.getElementsByTagName('li');
    for(i=0;i<lis.length;i++){
			isobj=lis[i]==o;
// function to exchange class names in an object
			swapp=function(tmpobj,tmporg,tmprep){
				tmpobj.className=tmpobj.className.replace(tmporg,tmprep)
			}
// if the current LI does not have an indicator to be kept visible
			if(!lis[i].keepopen){
				childUL=lis[i].getElementsByTagName('ul')[0];
// check if there is a nested UL and if the current LI is not the one clicked on
// and exchange the classes accordingly (ie. hide all other nested lists and
// make the LIs parent rather than active.
				if(childUL){
					if(new RegExp('\\b'+preventHoverClass+'\\b').test(dnav.className)){
						if(new RegExp('\\b'+activeParentClass+'\\b').test(lis[i].className)){
							swapp(childUL,isobj?toShowClass:toHideClass,isobj?toHideClass:toShowClass);
							swapp(lis[i],isobj?activeParentClass:parentClass,isobj?parentClass:activeParentClass);
						} else {
							swapp(childUL,isobj?toHideClass:toShowClass,isobj?toShowClass:toHideClass);
							swapp(lis[i],isobj?parentClass:activeParentClass,isobj?activeParentClass:parentClass);
						}
					} else {
						swapp(childUL,isobj?toHideClass:toShowClass,isobj?toShowClass:toHideClass);
						swapp(lis[i],isobj?parentClass:activeParentClass,isobj?activeParentClass:parentClass);
						if(isIE && isobj){
							var myIFrame = document.getElementById('iFrameIEHack');
							myIFrame.style.visibility='visible';
							myIFrame.style.width=childUL.offsetWidth;
							myIFrame.style.height=childUL.offsetHeight;
							myIFrame.style.left=findPosX(childUL);
							myIFrame.style.top=findPosY(childUL);
						}
					}
				}
			}
			if(isIE && !o){
        document.getElementById('iFrameIEHack').style.visibility='hidden';
			}
		}
	}
}
function findPosX(obj){
var curleft = 0;
if (obj.offsetParent){
	while (obj.offsetParent){
		curleft += obj.offsetLeft
		obj = obj.offsetParent;
	}
}else if(obj.x)curleft += obj.x;
return curleft;
}
function findPosY(obj){
var curtop = 0;
if (obj.offsetParent){
	while (obj.offsetParent){
		curtop += obj.offsetTop
		obj = obj.offsetParent;
	}
}else if(obj.y)curtop += obj.y;
return curtop;
}