// *********************************************
		// MINDREVOLUTION Medien Systemhaus
		//
		// Version 0.9.1
		// 30/SEP/2002
		// moliner@mindrevolution.de
		// stoecker@mindrevolution.de
		//
		// www.mindrevolution.de
		// *********************************************
		// REQUIRES mrdom_core.js LIBRARY !
		// *********************************************

		var mnuOpen = ''
		var mnuBusy = false
		var timerId
		
		function MenuClick(mnuName) {
			if (!mnuBusy) {
				mnuBusy = true
				if (mnuOpen!=mnuName) {
					MenuCloseCurrent()
					mnuOpen = mnuName
					moveObjTo(mnuName,findObjLeft(mnuName),(getObjHeight('head'))-(getObjHeight(mnuName)))
					showObj(mnuName);
					setObjHeight('mnuShadow',getObjHeight(mnuName))
					setObjWidth('mnuShadow',getObjWidth(mnuName))
					moveObjTo('mnuShadow',getObjLeft(mnuName),getObjTop(mnuName))
					showObj('mnuShadow')
					timerId = setInterval("MenuSlideTo('" + mnuName + "',getObjHeight('head'),0,20,'down')",10);
				} else {
					mnuOpen = ''
					timerId = setInterval("MenuSlideTo('" + mnuName + "',(getObjHeight('head'))-(getObjHeight('" + mnuName + "')),0,-20,'up')",10);
				}
			}
		}
		
		function MenuSlideTo(menuObject,slideYTo,slideXBy,slideYBy,slideDirection) {
			if (slideDirection=='down') {
				if (findObjTop(menuObject) < slideYTo) {
					moveObjBy(menuObject,slideXBy,slideYBy)
					moveObjTo('mnuShadow',findObjLeft(menuObject)+6,findObjTop(menuObject)+6)
					if ((findObjTop(menuObject) + slideYBy) > slideYTo) {
						moveObjTo(menuObject,findObjLeft(menuObject),slideYTo-1)
						moveObjTo('mnuShadow',findObjLeft(menuObject)+6,findObjTop(menuObject)+6)
						clearInterval(timerId);
						mnuBusy = false
					}
				} else {
					clearInterval(timerId);
					mnuBusy = false
				}
			} else {
				if (findObjTop(menuObject) > slideYTo) {
					moveObjBy(menuObject,slideXBy,slideYBy)
					moveObjTo('mnuShadow',findObjLeft(menuObject)+6,findObjTop(menuObject)+6)
				} else {
					clearInterval(timerId);
					hideObj(menuObject);
					hideObj('mnuShadow')
					mnuBusy = false
				}
			}
		}
		
		function MenuCloseCurrent() {
			if (mnuOpen!='') {
				hideObj(mnuOpen)
				hideObj('mnuShadow')
			}
		}