

var _cmIDCount = 0;
var _cmIDName = 'cmSubMenuID';
var _cmTimeOut = null;
var _cmCurrentItem = null;
var _cmNoAction = new Object ();
var _cmNoClick = new Object ();
var _cmSplit = new Object ();
var _cmItemList = new Array ();
var _cmNodeProperties = { mainFolderLeft: '', mainFolderRight: '', mainItemLeft: '', mainItemRight: '', folderLeft: '', folderRight: '', itemLeft: '', itemRight: '', mainSpacing: 0, subSpacing: 0, delay: 500, clickOpen: 1
};
function cmNewID () {
	return _cmIDName + (++_cmIDCount);
}
function cmActionItem (item, prefix, isMain, idSub, orient, nodeProperties) {
	var clickOpen = _cmNodeProperties.clickOpen; 
	if (nodeProperties.clickOpen)
		clickOpen = nodeProperties.clickOpen;
	_cmItemList[_cmItemList.length] = item;
	var index = _cmItemList.length - 1;
	idSub = (!idSub) ? 'null' : ('\'' + idSub + '\'');
	orient = '\'' + orient + '\'';
	prefix = '\'' + prefix + '\'';
	var onClick = (clickOpen == 3) || (clickOpen == 2 && isMain);
	var returnStr;
	if (onClick)
		returnStr = ' onmouseover="cmItemMouseOver (this,' + prefix + ',' + isMain + ',' + idSub + ',' + index + ')" onmousedown="cmItemMouseDownOpenSub (this,' + index + ',' + prefix + ',' + orient + ',' + idSub + ')"';
	else
		returnStr = ' onmouseover="cmItemMouseOverOpenSub (this,' + prefix + ',' + isMain + ',' + idSub + ',' + orient + ',' + index + ')" onmousedown="cmItemMouseDown (this,' + index + ')"'; return returnStr + ' onmouseout="cmItemMouseOut (this,' + nodeProperties.delay + ')" onmouseup="cmItemMouseUp (this,' + index + ')"';
}
function cmNoClickItem (item, prefix, isMain, idSub, orient, nodeProperties) {
	_cmItemList[_cmItemList.length] = item;
	var index = _cmItemList.length - 1;
	idSub = (!idSub) ? 'null' : ('\'' + idSub + '\'');
	orient = '\'' + orient + '\''; prefix = '\'' + prefix + '\'';
	return ' onmouseover="cmItemMouseOver (this,' + prefix + ',' + isMain + ',' + idSub + ',' + index + ')" onmouseout="cmItemMouseOut (this,' + nodeProperties.delay + ')"';
}
function cmNoActionItem (item, prefix){
	return item[1];
}
function cmSplitItem (prefix, isMain, vertical) {
	var classStr = 'cm' + prefix;
	if (isMain) {
		classStr += 'Main';
		if (vertical)
			classStr += 'HSplit';
		else
			classStr += 'VSplit';
	}
	else
		classStr += 'HSplit';
	return eval (classStr);
}
function cmDrawSubMenu (subMenu, prefix, id, orient, nodeProperties) {
	var str = '<div class="' + prefix + 'SubMenu" id="' + id + '"><table summary="sub menu" cellspacing="' + nodeProperties.subSpacing + '" class="' + prefix + 'SubMenuTable" cellpadding="0" border="0">';
	var strSub = '';
	var item;
	var idSub;
	var hasChild;
	var i;
	var classStr;
	for (i = 5; i < subMenu.length; ++i) {
		item = subMenu[i];
		if (!item) continue;
		hasChild = (item.length > 5);
		idSub = hasChild ? cmNewID () : null;
		if (item == _cmSplit)
			item = cmSplitItem (prefix, 0, true);
		str += '<tr class="' + prefix + 'MenuItem"';
		if (item[3] == '1') {
			str += ' id="activeitem"';
			item[3]=null;
		}
		if (item[0] != _cmNoClick)
			str += cmActionItem (item, prefix, 0, idSub, orient, nodeProperties);
		else
			str += cmNoClickItem (item, prefix, 0, idSub, orient, nodeProperties);
		str += '>';
		if (item[0] == _cmNoAction || item[0] == _cmNoClick) {
			str += cmNoActionItem (item, prefix);
			str += '</tr>';
			continue;
		}
		classStr = prefix + 'Menu';
		classStr += hasChild ? 'Folder' : 'Item';
		str += '<td class="' + classStr + 'Left">';
		if (item[0] != null)
			str += item[0];
		else
			str += hasChild ? nodeProperties.folderLeft : nodeProperties.itemLeft;
		str += '</td><td class="' + classStr + 'Text">' + item[1]; str += '</td><td class="' + classStr + 'Right">';
		if (hasChild) {
			str += nodeProperties.folderRight;
			strSub += cmDrawSubMenu (item, prefix, idSub, orient, nodeProperties);
		}
		else
			str += nodeProperties.itemRight;
		str += '</td></tr>';
	}
	str += '</table></div>' + strSub;
	return str;
}
function cmDraw (id, menu, orient, nodeProperties, prefix) {
	var obj = cmGetObject (id);
	if (!nodeProperties)
		nodeProperties = _cmNodeProperties;
	if (!prefix)
		prefix = '';
	var str = '<table summary="main menu" class="' + prefix + 'Menu" cellspacing="' + nodeProperties.mainSpacing + '" cellpadding="0">';
	var strSub = '';
	if (!orient)
		orient = 'hbr';
	var orientStr = String (orient);
	var orientSub;
	var vertical;
	if (orientStr.charAt (0) == 'h') {
		orientSub = 'v' + orientStr.substr (1, 2);
		str += '<tr>';
		vertical = false;
	}
	else {
		orientSub = 'v' + orientStr.substr (1, 2);
		
		vertical = true;
	}
	var i;
	var item;
	var idSub;
	var hasChild;
	var classStr;
	for (i = 0; i < menu.length; ++i) {
		item = menu[i];
		if (!item)
			continue;
			
//		str += vertical ? '<tr' : '<td';
		str += vertical ? '<tr' : '<td><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr';
		
		str += ' class="' + prefix + 'MainItem"';
		if (item[3] == '1') {
			str += ' id="activeitem"';
			item[3]=null;
		}
		hasChild = (item.length > 5);
		idSub = hasChild ? cmNewID () : null;
		str += cmActionItem (item, prefix, 1, idSub, orient, nodeProperties) + '>';
		if (item == _cmSplit)
			item = cmSplitItem (prefix, 1, vertical);
		if (item[0] == _cmNoAction || item[0] == _cmNoClick) {
			str += cmNoActionItem (item, prefix);
			
//			str += vertical? '</tr>' : '</td>';
			str += vertical? '</tr>' : '</td>';
			
			continue;
		}
		classStr = prefix + 'Main' + (hasChild ? 'Folder' : 'Item');
		
//		str += vertical ? '<td' : '<span';
		str += vertical ? '<td' : '<td';
		
		str += ' class="' + classStr + 'Left">';
		str += (item[0] == null) ? (hasChild ? nodeProperties.mainFolderLeft : nodeProperties.mainItemLeft) : item[0];
		//if (i>0) {
//			str += '<img src="images/menutop_right.jpg" />';
//		}
		
//		str += vertical ? '</td>' : '</span>';
		str += vertical ? '</td>' : '</td>';
		
//		str += vertical ? '<td' : '<span';
		str += vertical ? '<td' : '<td';
		
		str += ' class="' + classStr + 'Text">';
		str += item[1];
		
//		str += vertical ? '</td>' : '</span>';
		str += vertical ? '</td>' : '</td>';
		
//		str += vertical ? '<td' : '<span';
		str += vertical ? '<td' : '<td';
		
		str += ' class="' + classStr + 'Right">';
		str += hasChild ? nodeProperties.mainFolderRight : nodeProperties.mainItemRight;
		
//		str += vertical ? '</td>' : '</span>';
		str += vertical ? '</td>' : '</td>';
		
//		str += vertical ? '</tr>' : '</td>';
		str += vertical ? '</tr>' : '</tr></table></td>';
		
		if (hasChild)
			strSub += cmDrawSubMenu (item, prefix, idSub, orientSub, nodeProperties);
	}
	if (!vertical)
		str += '</tr>';
	str += '</table>' + strSub;
	obj.innerHTML = str;
}
function cmDrawFromText (id, orient, nodeProperties, prefix)
{ var domMenu = cmGetObject (id); var menu = null; for (var currentDomItem = domMenu.firstChild; currentDomItem; currentDomItem = currentDomItem.nextSibling)
{ if (!currentDomItem.tagName || currentDomItem.tagName.toLowerCase () != 'ul')
continue; menu = cmDrawFromTextSubMenu (currentDomItem); break;}
if (menu)
cmDraw (id, menu, orient, nodeProperties, prefix);}
function cmDrawFromTextSubMenu (domMenu)
{ var items = new Array (); for (var currentDomItem = domMenu.firstChild; currentDomItem; currentDomItem = currentDomItem.nextSibling)
{ if (!currentDomItem.tagName || currentDomItem.tagName.toLowerCase () != 'li')
continue; if (currentDomItem.firstChild == null)
{ items[items.length] = _cmSplit; continue;}
var item = new Array (); var currentItem = currentDomItem.firstChild; for (; currentItem; currentItem = currentItem.nextSibling)
{ if (!currentItem.tagName || currentItem.tagName.toLowerCase () != 'span')
continue; if (!currentItem.firstChild)
item[0] = null; else
item[0] = currentItem.innerHTML; break;}
if (!currentItem)
continue; for (; currentItem; currentItem = currentItem.nextSibling)
{ if (!currentItem.tagName || currentItem.tagName.toLowerCase () != 'a')
continue; item[1] = currentItem.innerHTML; item[2] = currentItem.href; item[3] = currentItem.target; item[4] = currentItem.title; if (item[4] == '')
item[4] = null; break;}
for (; currentItem; currentItem = currentItem.nextSibling)
{ if (!currentItem.tagName || currentItem.tagName.toLowerCase () != 'ul')
continue; var subMenuItems = cmDrawFromTextSubMenu (currentItem); for (i = 0; i < subMenuItems.length; ++i)
item[i + 5] = subMenuItems[i]; break;}
items[items.length] = item;}
return items;}
function cmItemMouseOver (obj, prefix, isMain, idSub, index) {
	clearTimeout (_cmTimeOut);
	if (!obj.cmPrefix) {
		obj.cmPrefix = prefix;
		obj.cmIsMain = isMain;
	}
	var thisMenu = cmGetThisMenu (obj, prefix);
	if (!thisMenu.cmItems)
		thisMenu.cmItems = new Array ();
	var i;
	for (i = 0; i < thisMenu.cmItems.length; ++i) {
		if (thisMenu.cmItems[i] == obj)
			break;
	}
	if (i == thisMenu.cmItems.length) {
		thisMenu.cmItems[i] = obj;
	}
	if (_cmCurrentItem) {
		if (_cmCurrentItem == obj || _cmCurrentItem == thisMenu) {
			var item = _cmItemList[index];
			cmSetStatus (item);
		return;
	}
	var thatPrefix = _cmCurrentItem.cmPrefix;
	var thatMenu = cmGetThisMenu (_cmCurrentItem, thatPrefix);
	if (thatMenu != thisMenu.cmParentMenu) {
		if (_cmCurrentItem.cmIsMain)
			_cmCurrentItem.className = thatPrefix + 'MainItem';
		else
			_cmCurrentItem.className = thatPrefix + 'MenuItem';
		if (thatMenu.id != idSub)
			cmHideMenu (thatMenu, thisMenu, thatPrefix);
	}
}
_cmCurrentItem = obj; cmResetMenu (thisMenu, prefix); var item = _cmItemList[index]; var isDefaultItem = cmIsDefaultItem (item); if (isDefaultItem)
{ if (isMain)
obj.className = prefix + 'MainItemHover'; else
obj.className = prefix + 'MenuItemHover';}
cmSetStatus (item);}
function cmItemMouseOverOpenSub (obj, prefix, isMain, idSub, orient, index)
{ cmItemMouseOver (obj, prefix, isMain, idSub, index); if (idSub)
{ var subMenu = cmGetObject (idSub); cmShowSubMenu (obj, prefix, subMenu, orient);}
}
function cmItemMouseOut (obj, delayTime)
{ if (!delayTime)
delayTime = _cmNodeProperties.delay; _cmTimeOut = window.setTimeout ('cmHideMenuTime ()', delayTime); window.defaultStatus = '';}
function cmItemMouseDown (obj, index)
{ if (cmIsDefaultItem (_cmItemList[index]))
{ if (obj.cmIsMain)
obj.className = obj.cmPrefix + 'MainItemActive'; else
obj.className = obj.cmPrefix + 'MenuItemActive';}
}
function cmItemMouseDownOpenSub (obj, index, prefix, orient, idSub)
{ cmItemMouseDown (obj, index); if (idSub)
{ var subMenu = cmGetObject (idSub); cmShowSubMenu (obj, prefix, subMenu, orient);}
}
function cmItemMouseUp (obj, index)
{ var item = _cmItemList[index]; var link = null, target = '_self'; if (item.length > 2)
link = item[2]; if (item.length > 3 && item[3])
target = item[3]; if (link != null)
{ window.open (link, target);}
var prefix = obj.cmPrefix; var thisMenu = cmGetThisMenu (obj, prefix); var hasChild = (item.length > 5); if (!hasChild)
{ if (cmIsDefaultItem (item))
{ if (obj.cmIsMain)
obj.className = prefix + 'MainItem'; else
obj.className = prefix + 'MenuItem';}
cmHideMenu (thisMenu, null, prefix);}
else
{ if (cmIsDefaultItem (item))
{ if (obj.cmIsMain)
obj.className = prefix + 'MainItemHover'; else
obj.className = prefix + 'MenuItemHover';}
}
}
function cmMoveSubMenu (obj, subMenu, orient)
{ var mode = String (orient); var p = subMenu.offsetParent; var subMenuWidth = cmGetWidth (subMenu); var horiz = cmGetHorizontalAlign (obj, mode, p, subMenuWidth); if (mode.charAt (0) == 'h')
{ if (mode.charAt (1) == 'b')
subMenu.style.top = (cmGetYAt (obj, p) + cmGetHeight (obj)) + 'px'; else
subMenu.style.top = (cmGetYAt (obj, p) - cmGetHeight (subMenu)) + 'px'; if (horiz == 'r')
subMenu.style.left = (cmGetXAt (obj, p)) + 'px'; else
subMenu.style.left = (cmGetXAt (obj, p) + cmGetWidth (obj) - subMenuWidth) + 'px';}
else
{ if (horiz == 'r')
subMenu.style.left = (cmGetXAt (obj, p) + cmGetWidth (obj)) + 'px'; else
subMenu.style.left = (cmGetXAt (obj, p) - subMenuWidth) + 'px'; if (mode.charAt (1) == 'b')
subMenu.style.top = (cmGetYAt (obj, p)) + 'px'; else
subMenu.style.top = (cmGetYAt (obj, p) + cmGetHeight (obj) - cmGetHeight (subMenu)) + 'px';}
}
function cmGetHorizontalAlign (obj, mode, p, subMenuWidth)
{ var horiz = mode.charAt (2); if (!(document.body))
return horiz; var body = document.body; var browserLeft; var browserRight; if (window.innerWidth)
{ browserLeft = window.pageXOffset; browserRight = window.innerWidth + browserLeft;}
else if (body.clientWidth)
{ browserLeft = body.clientLeft; browserRight = body.clientWidth + browserLeft;}
else
return horiz; if (mode.charAt (0) == 'h')
{ if (horiz == 'r' && (cmGetXAt (obj) + subMenuWidth) > browserRight)
horiz = 'l'; if (horiz == 'l' && (cmGetXAt (obj) + cmGetWidth (obj) - subMenuWidth) < browserLeft)
horiz = 'r'; return horiz;}
else
{ if (horiz == 'r' && (cmGetXAt (obj, p) + cmGetWidth (obj) + subMenuWidth) > browserRight)
horiz = 'l'; if (horiz == 'l' && (cmGetXAt (obj, p) - subMenuWidth) < browserLeft)
horiz = 'r'; return horiz;}
}
function cmShowSubMenu (obj, prefix, subMenu, orient)
{ if (!subMenu.cmParentMenu)
{ var thisMenu = cmGetThisMenu (obj, prefix); subMenu.cmParentMenu = thisMenu; if (!thisMenu.cmSubMenu)
thisMenu.cmSubMenu = new Array (); thisMenu.cmSubMenu[thisMenu.cmSubMenu.length] = subMenu;}
cmMoveSubMenu (obj, subMenu, orient); subMenu.style.visibility = 'visible'; if (document.all)
{ if (!subMenu.cmOverlap)
subMenu.cmOverlap = new Array (); cmHideControl ("IFRAME", subMenu); cmHideControl ("SELECT", subMenu); /*cmHideControl ("OBJECT", subMenu);*/}
}
function cmResetMenu (thisMenu, prefix)
{ if (thisMenu.cmItems)
{ var i; var str; var items = thisMenu.cmItems; for (i = 0; i < items.length; ++i)
{ if (items[i].cmIsMain)
str = prefix + 'MainItem'; else
str = prefix + 'MenuItem'; if (items[i].className != str)
items[i].className = str;}
}
}
function cmHideMenuTime ()
{ if (_cmCurrentItem)
{ var prefix = _cmCurrentItem.cmPrefix; cmHideMenu (cmGetThisMenu (_cmCurrentItem, prefix), null, prefix); _cmCurrentItem = null;}
}
function cmHideMenu (thisMenu, currentMenu, prefix)
{ var str = prefix + 'SubMenu'; if (thisMenu.cmSubMenu)
{ var i; for (i = 0; i < thisMenu.cmSubMenu.length; ++i)
{ cmHideSubMenu (thisMenu.cmSubMenu[i], prefix);}
}
while (thisMenu && thisMenu != currentMenu)
{ cmResetMenu (thisMenu, prefix); if (thisMenu.className == str)
{ thisMenu.style.visibility = 'hidden'; cmShowControl (thisMenu);}
else
break; thisMenu = cmGetThisMenu (thisMenu.cmParentMenu, prefix);}
}
function cmHideSubMenu (thisMenu, prefix)
{ if (thisMenu.style.visibility == 'hidden')
return; if (thisMenu.cmSubMenu)
{ var i; for (i = 0; i < thisMenu.cmSubMenu.length; ++i)
{ cmHideSubMenu (thisMenu.cmSubMenu[i], prefix);}
}
cmResetMenu (thisMenu, prefix); thisMenu.style.visibility = 'hidden'; cmShowControl (thisMenu);}
function cmHideControl (tagName, subMenu)
{ var x = cmGetX (subMenu); var y = cmGetY (subMenu); var w = subMenu.offsetWidth; var h = subMenu.offsetHeight; var i; for (i = 0; i < document.all.tags(tagName).length; ++i)
{ var obj = document.all.tags(tagName)[i]; if (!obj || !obj.offsetParent)
continue; var ox = cmGetX (obj); var oy = cmGetY (obj); var ow = obj.offsetWidth; var oh = obj.offsetHeight; if (ox > (x + w) || (ox + ow) < x)
continue; if (oy > (y + h) || (oy + oh) < y)
continue; if(obj.style.visibility == "hidden")
continue; subMenu.cmOverlap[subMenu.cmOverlap.length] = obj; obj.style.visibility = "hidden";}
}
function cmShowControl (subMenu)
{ if (subMenu.cmOverlap)
{ var i; for (i = 0; i < subMenu.cmOverlap.length; ++i)
subMenu.cmOverlap[i].style.visibility = "";}
subMenu.cmOverlap = null;}
function cmGetThisMenu (obj, prefix)
{ var str1 = prefix + 'SubMenu'; var str2 = prefix + 'Menu'; while (obj)
{ if (obj.className == str1 || obj.className == str2)
return obj; obj = obj.parentNode;}
return null;}
function cmIsDefaultItem (item)
{ if (item == _cmSplit || item[0] == _cmNoAction || item[0] == _cmNoClick)
return false; return true;}
function cmGetObject (id)
{ if (document.all)
return document.all[id]; return document.getElementById (id);}
function cmGetWidth (obj)
{ var width = obj.offsetWidth; if (width > 0 || !cmIsTRNode (obj))
return width; if (!obj.firstChild)
return 0; return obj.lastChild.offsetLeft - obj.firstChild.offsetLeft + cmGetWidth (obj.lastChild);}
function cmGetHeight (obj)
{ var height = obj.offsetHeight; if (height > 0 || !cmIsTRNode (obj))
return height; if (!obj.firstChild)
return 0; return obj.firstChild.offsetHeight;}
function cmGetX (obj)
{ var x = 0; do
{ x += obj.offsetLeft; obj = obj.offsetParent;}
while (obj); return x;}
function cmGetXAt (obj, elm)
{ var x = 0; while (obj && obj != elm)
{ x += obj.offsetLeft; obj = obj.offsetParent;}
if (obj == elm)
return x; return x - cmGetX (elm);}
function cmGetY (obj)
{ var y = 0; do
{ y += obj.offsetTop; obj = obj.offsetParent;}
while (obj); return y;}
function cmIsTRNode (obj)
{ var tagName = obj.tagName; return tagName == "TR" || tagName == "tr" || tagName == "Tr" || tagName == "tR";}
function cmGetYAt (obj, elm)
{ var y = 0; if (!obj.offsetHeight && cmIsTRNode (obj))
{ var firstTR = obj.parentNode.firstChild; obj = obj.firstChild; y -= firstTR.firstChild.offsetTop;}
while (obj && obj != elm)
{ y += obj.offsetTop; obj = obj.offsetParent;}
if (obj == elm)
return y; return y - cmGetY (elm);}
function cmSetStatus (item)
{ var descript = ''; if (item.length > 4)
descript = (item[4] != null) ? item[4] : (item[2] ? item[2] : descript); else if (item.length > 2)
descript = (item[2] ? item[2] : descript); window.defaultStatus = descript;}
function cmGetProperties (obj)
{ if (obj == undefined)
return 'undefined'; if (obj == null)
return 'null'; var msg = obj + ':\n'; var i; for (i in obj)
msg += i + ' = ' + obj[i] + '; '; return msg;}
