function mload(x, y) {
 _m.x=x;_m.y=y;_m.w=0;
 accux=x+1;
 for (i=0; i<_m.length; i++) {
	_m.w += _m[i][2]+ 1;
 	_m[i].subs.w = _m[i][2]+1;
  	_m[i].subs.x = accux;
	accux += _m[i].subs.w;
	for (j=0; j<_m[i].subs.length; j++) {
		if (_m[i].subs[j][2]>_m[i].subs.w) _m[i].subs.w = _m[i].subs[j][2];
	}
	if (i==_m.length-1 && _m[i].subs.w>_m[i][2]+1)
		_m.w+=_m[i].subs.w-_m[i][2];
	else
		_m.w++;
 }
 ss='';
 //ss='<DIV class="mbarend" style=";top:'+(_m.y+2)+'px;left:'+(_m.x-5)+'px;"></DIV>\n';
 if (isNN4)ss+='<LAYER class=absz0 width='+_m.w+' pageY='+_m.y+' pageX=:'+_m.x+'">\n';
 else ss+='<DIV class=absz0 style="width:'+_m.w+';top:'+_m.y+'px;left:'+_m.x+'px;">\n';
 ss+='<table class=mbar border=0 style="width:'+_m.w+';">';
 ss+='<tr bgcolor="#D0CCB6" class="mtr" nowrap>';
 for (i=0; i<_m.length; i++) {
	ss+='<td id=mB'+(i+1)+' class=mbartd ';
	if (isNN4) ss+='align=center width='+(_m[i][2] + 1)+' ';
	ss+='style="width:' + (_m[i][2] + 1)+';';
	if (i==_m.length-1) ss+='border-right:0px';
 	ss+='" onclick="return mBarItemClick(this);" onMouseOver="return mBarItemOver(this);" onMouseOut="return mBarItemOut(this);">';
	ss+= _m[i][0] + '</td'+'\n>';
 }
 ss+='</tr></table>';
 if (isNN4)ss+='</LAYER>\n';
 else ss+='</DIV>\n';
 //ss+='<DIV class="mbarend" style=";top:'+(_m.y+2)+'px;left:'+(_m.x+_m.w)+'px;"></DIV>\n';

//document.write(ss);

 for (i=0; i<_m.length; i++) {
	if (isNN4) ss+='<LAYER id=mB'+(i+1)+'s';
	else ss+='<DIV id=mB'+(i+1)+'s';
	if (_m[i].subs.length>0) {
		if (isNN4) ss+=' position=absolute z-index=1 width='+_m[i].subs.w+' pageX='+_m[i].subs.x+' pageY='+(_m.y+28);
		else ss+=' class=absz1 style="width:'+_m[i].subs.w+';top:'+(_m.y+28)+'px;left:'+_m[i].subs.x+'px;visibility:hidden;"';
		ss+=' onMouseOver="mSubmenuOver(this);" onMouseOut="mSubmenuOut(this);"';
	}
	ss+='>\n';
	if (_m[i].subs.length>0) {
		ss+='<table class=msb style="width:'+_m[i].subs.w+';">\n';
		for (j=0; j<_m[i].subs.length; j++) {
			ss+='<tr bgcolor="#D0CCB6" class="mtr">';
			ss+='<td class="mtd" style="width:'+_m[i].subs.w+';"'
			  + 'onclick="mItemClick(this,'+(i+1)+','+j+');" onMouseOver="mItemOver(this);" onMouseOut="mItemOut(this);">'
			  + _m[i].subs[j][0] +'</td>';
			ss+='</tr>\n';
		}
		ss+='</table>\n';
	}
	if (isNN4) ss+='</LAYER>\n';
	else ss+='</DIV>\n';
 }
 document.write(ss);
//alert(ss);
}

// declare
	var isDOM=0;
	var isNN4=0;
	var isIE4=0;
	var isOTH=1;
// initialize with real values
	UsrAgnt=navigator.userAgent.toLowerCase();
	isDOM=document.getElementById?1:0;
	if (!isDOM) {
		if (UsrAgnt.indexOf('mozilla')!=-1&&UsrAgnt.indexOf('compatible')==-1) {
			isNN4=document.layers?1:0;
			isOTH=!isNN4;
		} else if (UsrAgnt.indexOf('msie')!=-1) {
			isIE4=document.all?1:0;
			isOTH=!isIE4;
		} else {
			isOTH=1;
		}
	}
	var _HIDDEN =isNN4?'hide':'hidden';
	var _VISIBLE=isNN4?'show':'visible';
	var _currSubmenu=null;
	var _HLCOLOUR='E9F0F0';
	var _LLCOLOUR='transparent';
	var _toShowSubmenu=null;
	var _minterval="";

function freshSubmenu() {
	if (_toShowSubmenu==null)
		hideSubmenu();
	else
		showSubmenu();
	clearInterval(_minterval);
}

function showSubmenu() {
	if (_toShowSubmenu && _toShowSubmenu!=null) {
		if (_currSubmenu && _currSubmenu!=null && _currSubmenu!=_toShowSubmenu){
			_currSubmenu.style.visibility=_HIDDEN;
			_currSubmenu=_toShowSubmenu;
		}
		_toShowSubmenu.style.visibility=_VISIBLE;
		_currSubmenu=_toShowSubmenu;
	}
}

function hideSubmenu() {
	if (_currSubmenu && _currSubmenu!=null && _currSubmenu.style){
		_currSubmenu.style.visibility=_HIDDEN;
		_currSubmenu=null;
	}
	_toShowSubmenu=null;
}

function mBarItemClick(obj) {
	thisId = obj.id;
	mobj = eval(thisId+"A");
	if (mobj.length>1 && mobj[1] && mobj[1]!="") {
		_toShowSubmenu=null;
		hideSubmenu();
		//alert(mobj[1]); // execute link
		document.location.href=mobj[1]; 
	}
	if (mHasSubmenu(mobj)) {
		smnu = isDOM ? document.getElementById(thisId+"s") : eval(thisId+"s");
		if (smnu && smnu.style) {
			_toShowSubmenu=smnu;
			showSubmenu();
		}
		else {alert(smnu);}
	}
	return false;
}
function mBarItemOver(obj) {
	setBackground(obj, _HLCOLOUR);
	clearInterval(_minterval);
	thisId = obj.id;
	mobj = eval(thisId+"A");
	if (mHasSubmenu(mobj)) {
		smnu = isDOM ? document.getElementById(thisId+"s") : eval(thisId+"s");
		if (smnu && smnu.style) {
			_toShowSubmenu=smnu;
			showSubmenu();
			return false;
		}
	}
	_toShowSubmenu=null;
	hideSubmenu();
	return false;
}
function mBarItemOut(obj) {
	setBackground(obj, _LLCOLOUR);
	clearInterval(_minterval);
	_minterval=setInterval("freshSubmenu();",1000);
	_toShowSubmenu=null;
	return false;
}


function mSubmenuOver(obj) {
	clearInterval(_minterval);
	_toShowSubmenu=obj;
}
function mSubmenuOut(obj) {
	clearInterval(_minterval);
	_minterval=setInterval("freshSubmenu();",500);
	_toShowSubmenu=null;
	return false;
}


function mItemClick(obj, b, i) {
	hideSubmenu();
	mobj = eval("mB"+b+"A");
	if (mobj && mobj.subs && mobj.subs.length>i) {
		//alert(mobj.subs[i][1]);
		//eval(mobj.subs[i][1]);
		document.location.href=mobj.subs[i][1]; 
	}
	return false;
}
function mItemOver(obj) {
	setBackground(obj, _HLCOLOUR);
}
function mItemOut(obj) {
	//alert("??");
	setBackground(obj, _LLCOLOUR);
}


function setBackground(obj, aColor) {
	if (isDOM || isIE4) {
		obj.style.backgroundColor=aColor;
	}else if (isNN4) {
		//obj.object.document.bgColor=aColor;
		obj.bgColor=aColor;
	}
}

function mHasSubmenu(obj) {
	return (obj && obj.subs && obj.subs.length>0) ? 1 : 0;
}

mload(2,30); //mload(20,106);