/*Menu system version 2.1.6
* written by Andy Woolley
* Copyright 2001 Andy Woolley. All Rights Reserved.
*
* Please feel free to use this code on your own website free of charge.
* You can also distribute and modify this source code as long as this
* Copyright notice remains intact and you send me notice that you
* intend to use this code on your website. 
* I can only support this product if you let me know about these things.
* Send mail to dbmenu@milonic.com
*/

timer=0
d=document
ns4=(d.layers)?true:false
ns6=(navigator.userAgent.indexOf("Gecko")!=-1)?true:false
mac=(navigator.appVersion.indexOf("Mac")!=-1)?true:false
opera=(navigator.userAgent.indexOf("Opera")!=-1)?true:false
mp=(ns6)?"pointer":"hand"
atop=5
oatop=0
var a,am,oa,im,om,flta
var tempvar = "";
el=0
nshl=0;
var omv=0
im=0;
omnu=0
ac=11
m=1
var imar = new Array()
mr=","
while(eval("window.menu"+m)){mr+="menu"+m+",";tmenu=eval("menu"+m);m++}
mr=mr.split("\,")
menus=mr.length-1
//if (ns4){window.onresize=function (){window.history.go(0)}}
if (ns6||mac){window.onload=function(){sis()}}
function gmstyle(mtxt){if(d.getElementById){m=d.getElementById(mtxt).style}else if(d.all){m=d.all[mtxt].style} else if (d.layers){m=d.layers.eval(mtxt)}return m;}
function gmobj(mtxt){if(d.getElementById){m=d.getElementById(mtxt)}else if(d.all){m=d.all[mtxt]}else if(d.layers){m=d.layers.eval(mtxt)}return m;}
function closeallmenus(){for(a=1;a<menus;a++){menu=eval("menu"+a);mi=gmstyle("menu"+a);if (menu[6]!=1){mi.visibility='hidden';}else{am=""}sub=1;while(eval("window.sub"+a+"_"+sub)){mi=gmstyle("sub"+a+"_"+sub);mi.visibility='hidden';sub++}}}
function popdn(){timer=setTimeout("closeallmenus()",timegap)}
function dc(){location.href=nshl}
function sis(){for(a=1;a<imar.length;a++)
{
	tim=imar[a].split("_");
	if (tim[4]){tim[3]=tim[3]+"_"+tim[4]}
	if (ns4)
	{		
		mtl=d.layers.eval(tim[3]).document.layers.eval("el"+tim[2]);
		ht=(mtl.clip.height/2);
		wd=mtl.clip.width-mtl.clip.left-10;
		eln="";
		for(x=0;x<2;x++)
		{
			mtl=d.layers.eval(tim[3]).document.layers.eval(eln+"el"+tim[2]).document.layers.eval(imar[a]);
			mtl.left=wd;
			mtl.top=ht;
			eln="m"
		}
	}
	else
	{
		imo=gmstyle(imar[a]);
		im=gmobj("el"+tim[2]);
		imo.left=im.offsetWidth-ac;
		imo.left=im.offsetWidth-ac;		
		if(ns6)
		{
			imo=gmobj(imar[a])
			menu=eval(window.tim[3]);
			mt=menu[0]
			if (mt+" "=="undefined ") mt=30;
			imo.style.top=im.offsetTop-mt+(im.offsetHeight/2)-2
			}
		else
		{
			cr=0;if(mac)cr=6;imo.top=im.offsetTop+(im.offsetHeight/2)-3-cr;}}if(opera){imo.top=im.offsetTop+5;imo.left=im.style.pixelWidth-10}}}


function fixb(mnu)
{
	menu=eval(mnu);	
	el+=((menu.length-ac)/5);
	ml=gmobj("el"+(el-1));
	mn=gmobj(mnu);

	if (opera)
	{
		mn.style.pixelHeight=ml.offsetTop+ml.style.pixelHeight+(menu[3]*2);
		mn.style.pixelWidth=ml.style.pixelWidth+(menu[3]*2)
	}
	else if(ns6)
	{
		mn.style.width=parseInt(mn.style.width)-(menu[3]*2)
	}
	else if(mac)
	{
		mn.style.height=ml.offsetTop+ml.offsetHeight+(menu[3]*2);
		mn.style.height=mn.style.height-menu[5][9];
		if (!menu[2])
		{
			mn.style.pixelWidth=1;
			mn.style.width=mn.offsetWidth+menu[5][9]-(menu[3]*2);
		}
	}
	else
	{
		if (!menu[2])
		{
			mn.style.width=(menu[5][9]*2);
			mn.style.height=(menu[5][9]*2);
		}
	}
}

if ((d.all&&d.getElementById)&&!mac) document.write("<script>function getflta(ap){try{if(ap.filters){flta=1}}catch(e){}}</script>");
function popup(mn){omv.visibility='hide';clearTimeout(timer);closeallmenus();mtxt='menu'+mn;mi=gmstyle(mtxt);
flta=0;
if ((d.all&&d.getElementById)&&!mac)
{
	ap=gmobj(mtxt);
	getflta(ap);
}
if (flta)
{
	ap=gmobj(mtxt);
	if (ap.filters[0]) ap.filters[0].Apply()
}
mi.visibility='visible';
if (flta)
{
	if (ap.filters[0]) ap.filters[0].Play()}am=mn;
	om=mtxt
}

function shl(lyr,el,s){clearTimeout(timer);mt=d.layers[lyr].document.layers.eval("el"+el);omv.visibility="hide";mt.visibility=s;omv=mt;omnu="";}
function popi(v1,lyr,el)
{
	clearTimeout(timer)		
	if (lyr.substr(0,4) == "menu") 
	{		
		am=lyr.substr(4,5)
		qs=om.split(",")		
		if (lyr!=qs[0])
		{
			closeallmenus()
			om=lyr;
		}
	}
	sam=""+am


	if (v1.substring(0,4+sam.length)=="sub"+am+"_")
	{
		arr=eval(v1);
		mo=gmobj(lyr);
		mi=gmstyle(v1);
		if (arr[0]||arr[1]){}else
		{
			if (ns4)
			{
				mtl=mo.document.layers.eval("el"+el)
				mi.left=mo.left+mtl.clip.width-20
				mi.top=mo.top+mtl.top+10
			}
			else
			{
				mic=gmobj("el"+el);
				fl=15
				ft=10
				if (mac){fl=0;ft=20;}
				if (opera){mi.left=mo.style.left + mic.style.pixelWidth-20}else{mi.left=mo.offsetLeft + mic.offsetWidth-fl;}
				if(ns6)nsos=0; else nsos=mo.offsetTop
				mi.top=nsos+mic.offsetTop+ft;
			}
		}
		if (flta){ap=gmobj(v1);if(ap.filters[0]) ap.filters[0].Apply()}
		mi.visibility='visible'
		if (flta){if (ap.filters[0])ap.filters[0].Play()}		
		om+=","+v1;
	}
	
	else 
	{
		v1 = lyr;
	}
	
	ta=om.split(",")
	strt=0;
	for(a=0;a<ta.length;a++)
	{
		if (ta[a]==v1)strt=0;
		if (strt) {if (ta[a]){mi=gmstyle(ta[a]);mi.visibility='hidden';}ta[a]=""}
		if (ta[a]==lyr)strt=1;
	}

	om=""
	disp=0
	for(a=0;a<ta.length;a++)
	{
		if(ta[a]==lyr)frs=a
		if(ta[a]==v1)fre=a
		if (disp||(a>frs&&a<fre))
		{
			if (ta[a]&&ta[a]!=v1)
			{
				mi=gmstyle(ta[a]);
				mi.visibility='hidden';
			}
		}
		else
		{
			if (ta[a])om+=ta[a]+",";
		}
		if (v1==ta[a])disp=1
	}	
	
}

function stch(ms){window.status=ms; return true}
function hl()
{	
	arg=hl.arguments
	//arg[1]=arg[1].replace(/\"/gi, "&quot;")
	hlnk=arg[1]
	if (arg[7]+" "=="undefined ")arg[7]=hlnk;
	am=" "+a
	am=am.length-1
	subimg=""
	arg[0]+=""
	if (ns6){dwd=arg[2][9]*2}else{dwd=0}
	if (ns4){
	if (el==0)
		{st="<style type=\"text/css\">A.m{text-decoration:none;}</style>";d.write(st);oatop=atop;}
	else 
		{mtl=d.layers.eval(omnu).document.layers.eval("el"+(el-1));if (oatop==atop){atop+= mtl.clip.height}else{atop=menu[3];}oatop=atop}}
		

	if (hlnk.substring(0,4+am)=="sub"+a+"_") 
	{
		im++;
		ims="im"+im+"_"+a+"_"+el+"_"+arg[5];
		if (arg[7]==hlnk)arg[7]=""
		hlnk="#";
		if (arg[6]+" "!="undefined ")hlnk=arg[6];
		if (ns4){subimg="<layer id="+ims+" style=\"position:center;\"><img border=0 src="+arg[2][10]+"></layer>";}else{subimg="<img id="+ims+" border=0 style=\"position:absolute;\" src="+arg[2][10]+">"}
		imar[im]=ims;
	}
	if(ns4)
	{
		rsp=""
		tdwd=" width="+menu[2]
		if(!menu[7]||menu[7]=="left")tdwd=""
		if (menu[7]=="right") rsp="<td></td>"
		ls="<table><tr><td align="+menu[7]+tdwd+"><a href=\""+hlnk+"\" style='color:#"
		le=";text-decoration:none;font-size:"+arg[2][5]+"px;font-weight:"+arg[2][7]+";font-family:"+arg[2][8]+"' onmouseover=\";return stch('"+arg[7]+"');\">"+arg[0]+"</a>"+subimg+"</td>"+rsp+"</tr></table></layer>"
		lv=" left="+menu[3]+" width="+(menu[2]-(menu[3]*2))+" top="+atop
		mt="<layer id=mel"+el+lv+" bgColor="+arg[2][1]+" onmouseover=\"shl('"+arg[5]+"',"+el+",'show');popi('"+arg[1]+"','"+arg[5]+"',"+el+"); window.status='"+arg[7]+"';\">"+ls+arg[2][0]+le
		mt+="<layer id=el"+el+lv+" bgColor="+arg[2][3]+" onmouseover=\"nshl='"+hlnk+"'; this.captureEvents(Event.CLICK); this.onClick=dc;\" onmouseout=\"shl('"+arg[5]+"',"+el+",'hide');popdn();\" visibility=hidden >"+ls+arg[2][2]+le
	}
	else
	{
		mt=""
		if (menu[10])
		{
			
			menu[2]='a';
			mt+="<div nowrap style=\"position:absolute;top:0;left:"+dleft+";\">";
			dleft=dleft+80
		}
		
		if(!menu[7])menu[7]="left"
		rsp=0;if (menu[7]=="right") rsp=7;
		mt+="<a href=\""+hlnk+"\" style='text-decoration:none;'>"
		dw=(menu[2]-(2*menu[3]+dwd))
		if(dw+" "=="NaN "){dw=""}else{dw="width:"+dw}
		mt+="<div align="+menu[7]+" id=el"+el+" style=\""+dw+";padding-left:"+arg[2][9]+";padding-right:"+(arg[2][9]+rsp)+";padding-top:"+arg[2][9]+";padding-bottom:"+arg[2][9]+";font-weight:"+arg[2][7]+";font-style:"+arg[2][6]+";font-family:"+arg[2][8]+";font-size:"+arg[2][5]+"px;color:#"+arg[2][0]+";background-color:#"+arg[2][1]+";\""
		mt+=" onMouseOver=\"popi('"+arg[1]+"','"+arg[5]+"',"+el+");this.style.cursor='"+mp+"';this.style.backgroundColor='#"+arg[2][3]+"';this.style.color='#"+arg[2][2]+"';return stch('"+arg[7]+"');\""
		mt+=" onMouseOut=\"popdn();this.style.backgroundColor='#"+arg[2][1]+"'; this.style.color='#"+arg[2][0]+"';;return stch('');\">"
		mt+=arg[0]+subimg+"</div>"
		mt+="</a>"
		if (menu[10])
		{
			mt+="</div>";
		}
		
	}
	d.write(mt)	
	tempvar+=mt+"\n\n"
	el++
}

function dmenu(mnu)
{
	menu=eval(mnu)
	atop=menu[3]
	hlp=menu[5]
	if(menu[10])menu[2]=0
	if(el)ns6c=3;else ns6c=2;
	ns6w=0;
	if(menu[7]=="right" &&  ns6)ns6w=7;	
	if (menu[2]<1)menu[2]="undefined"
	
	if(ns4)
	{
		bgc=hlp[4]
		if (hlp[11]){bgc=hlp[13]}		
		mt="<layer z-index=99 visibility=hidden bgcolor=#"+bgc+" id="+mnu+" top="+menu[0]+" left="+menu[1]+" width="+menu[2]+">"
		if (hlp[11]){mt+="<layer bgcolor=#"+hlp[12]+" top=0 left=0 height=2 width=100%></layer>"}mt+="<layer id="+mnu+"3d bgcolor=#"+hlp[12]+" top=0 left=0 height=1 width=2></layer>"}
	else
	{
		iedf="";
		if(!opera&&!mac&&d.all&&menu[8]){iedf="filter:progid:DXImageTransform.Microsoft."+menu[8]}
		if (hlp[11])
		{
			brd = "border:solid "+menu[3]+"px; border-left-color:#"+hlp[12]+";border-top-color:#"+hlp[12]+";border-bottom-color:#"+hlp[13]+";border-right-color:#"+hlp[13]+";"
		}
		else
		{
			brd = "border:solid "+menu[3]+"px; border-left-color:#"+hlp[4]+";border-top-color:#"+hlp[4]+";border-bottom-color:#"+hlp[4]+";border-right-color:#"+hlp[4]+";"
		}
		mt="<div id="+mnu+" style=\""+iedf+";z-index:99;visibility:hidden;"+brd+"position:absolute;background-Color:#999999;width:"+(menu[2]+ns6w)+";left:"+menu[1]+";top:"+menu[0]+";\">"
	}
	d.write(mt)
	tempvar+=mt+"\n\n";	
	x=0;
	dleft=0
	for(b=ac;b<menu.length;b++)
	{	b=b+4
		
		if(menu[b-3]==""){menu[b-3]="#"}
		menu[b-3] = menu[b-3].replace(/\"/gi, "&quot;")		
		hl(menu[b-4], menu[b-3], hlp, 100, 100, mnu, menu[b-2], menu[b-1])
		txt="";
		if(ns4)
		{
			if (menu[b]&&b<menu.length-1)
			{
				mt=d.layers[mnu].document.layers.eval("el"+(el-1))
				x=atop+mt.clip.height
				if (!hlp[11]) x++
				txt="<layer top="+(x-2)+" left="+menu[3]+" height=1 bgcolor=#"+bgc+" width="+mt.clip.width+"></layer>"
				if (hlp[11]) {txt+="<layer top="+(x-1)+" left="+menu[3]+" height=1 bgcolor=#"+hlp[12]+" width="+mt.clip.width+"></layer>"}
				
			}
		} 
		else	
		{
			bw=menu[b];	bc=hlp[4]
			if(opera&&bw==0){bw=1;bc=hlp[1]}
			if(bw>0)
			{
				if (hlp[11])
				{
					txt="<div style=\"position:relative\">"
					txt+="<div style=\"border-top:1px solid #"+hlp[13]+"; background-color:#"+hlp[12]+"; width:100%;position:absolute;clip:rect(0 100% 2 0);height:1;left:0\">"
					txt+="</div></div>"
				}
				else
				{
					txt+="<div style=\"position:relative;\">"
					txt+="<div onmouseover=\"clearTimeout(timer)\" style=\"background-color:#"+bc+";width:"+(menu[2]-(menu[3]*2))+";position:absolute;"
					txt+="clip:rect(0 100% "+bw+" 0);height:"+bw+";left:0\">"
					txt+="</div>"
					txt+="</div>"
				}
			}
		}
		d.write(txt);
		omnu=mnu;
		mt=""
	}
	oatop=-1;
	if (ns4){mt="</layer>"}else{mt+="</div></div>"}
	d.write(mt)
	tempvar+=mt+"\n\n";
	if (ns4)
	{
		ml = d.layers.eval(mnu)
		ml.clip.height += menu[3]
		ml3d = d.layers.eval(mnu).document.layers.eval(mnu+"3d")
		if (hlp[11])ml3d.clip.height=ml.clip.height
	}
}

d.write("<div>");
for(a=1;a<menus;a++){dmenu("menu"+a);sub=1;while (eval("window.sub"+a+"_"+sub)){dmenu("sub"+a+"_"+sub);sub++}}
d.write("</div>");


//hl("blah", "blah, hlp, 100, 100, "menu2", "blah", menu[b-1])
