var ma=new Array();
var mx=new Array();
var my=new Array();
var mc=new Array();
var mpos=new Array();
var mal=0;
var main=0;
var menuw=300;
//alert(+menuw);
var psrc=0;
var pname="";
var al="";
var gd=0;
var gx,gy;
var d=document;
var NS7=(!d.all&&d.getElementById);
var NS4=(!d.getElementById);
var IE5=(!NS4&&!NS7&&(navigator.userAgent.indexOf('MSIE 5.0')!=-1||navigator.userAgent.indexOf('MSIE 5.2')!=-1));
var IE5p5=(!NS4&&!NS7&&navigator.userAgent.indexOf('MSIE 5.5')!=-1);
var NS6=(NS7&&navigator.userAgent.indexOf('Netscape6')!=-1);
var SAF=navigator.userAgent.indexOf('Safari')!=-1;

p=navigator.userAgent.indexOf('Opera');

if(p>-1){
	p=navigator.userAgent.charAt(p+6);
	if(p>6)
		NS7=1;
	else 
		NS4=1;
	}
var ifr=(!NS7&&!NS4&&!IE5&&!IE5p5);
var quirk=(d.compatMode&&d.compatMode=="BackCompat")||IE5||IE5p5;
//alert("StartMainMenu");

//---------------------------------------------------------------------------------------------------------

function startMainMenu(file,h,w,dir,space,align){
//alert("StartMainMenu function " +w);
if(w>0)
	menuw=w;

main=dir;

if(main==1||main==2)

	d.write("<table border=\"0\" valign=center style='display:inline-block;' cellspacing=\""+space+"\" cellpadding=\"0\">");

if(file!=""){

	al="";

	if(align==1)
		al=" align=\"right\"";

	if(align==2)
		al=" align=\"center\"";

	if(main==1||main==2)
		d.write("<tr style=' line-height:1px'><td"+al+">");

	alert("IMG");

	d.write("<img src=\""+ImgSrc+file+"\" border=\"0\"");

	if(h>0)
		d.write(" height=\""+h+"\"");

	if(w>0)
		d.write(" width=\""+w+"\"");

	d.write(" />");

	if(main==1||main==2)
		d.write("</td>");

	if(main==1)
		d.write("</tr>");

	if(main==3)
		d.write("<br />");
	}
}

//---------------------------------------------------------------------------------------------------------

function endMainMenu(file,h,w){
//alert(ImgSrc+file);
var CssBOR = "<tr>";
var CssBOL = "<td"+al+">";
var CssHeight = " Height=\""+h+"\"";
var CssWidth = " Width=\""+w+"\"";
var CssImg = "<Img src=\""+ImgSrc+file+"\" border=\"0\"";
var CssEOL = " />";
var CssEOR = "</td></tr>";
var CssEOT = "</table>";

if(file!=""){
	if(main==1)
		d.write(CssBOR);

	if(main==1||main==2)
		d.write(CssBOL);

	d.write(CssImg);
	if(h>0)
		d.write(CssHeight);
	if(w>0)
		d.write(CssWidth);
	d.write(CssEOL);
	if(main==1||main==2)
		d.write(CssEOR);
	}

if(main==1||main==2)
	d.write(CssEOT);
main=0;

}

//---------------------------------------------------------------------------------------------------------

function mainMenuItem(name,ext,h,w,url,tar,alt,dir,state,s,selected){
//alert( "name:" + name + " ext:" + ext + " h:" + h + " w:" + w + " url:" + url + " tar:" + tar + " alt:" + alt + " dir:" + dir + " state:" + state + " s:" + s + " selected:" + selected)
//	if (url.toUpperCase() == "JAVASCRIPT:;") {
//		alert( "name:" + name + " dir:" + dir + " state:" + state + " s:" + s + " selected:" + selected)
//		}
if(NS4&&main==0)
	return;

var isgraphic=ext.charAt(0)==".";

if(main==1)
	d.write("<tr>");

if(main==1||main==2)
	d.write("<td"+al+">");

d.write("<a ");

if((url!=""||!isgraphic) && (selected==1)) {
	if(typeof(clx)!="undefined"){
		url="?"+clx;
		tar="";
		alt="Click to edit";
		}

	if (url.toUpperCase() != "JAVASCRIPT:;") {
		d.write("href=\""+url+"\" ");
		}
	else	{
		if (state == "1") {
			d.write("href=\""+url+"\" ");
			}
		}
		
	}

if ((tar!="") && (selected==1))
	d.write("target=\""+tar+"\" ");

d.write("onmouseout=\"");

if(dir>0)
	d.write("tidyMenu(event);");

d.write("\" onmouseover=\"");

if(dir>0)
	d.write("openMenu(event, '"+name+"',"+dir+","+bc+","+fc+");");

if(state>1&&isgraphic){
//place Main Menus as per images
	d[name+"_over"]=new Image();
	d[name+"_over"].src=ImgSrc+name+"_over"+ext;
	d.write("setGraphic(event, '"+ImgSrc+name+"_over"+ext+"');");
	}

d.write("return false;\"");


if(!isgraphic)
	d.write(" class=\""+s+"\" style=\"width:"+(w>0?w:menuw)+"px\"");

d.write(">");

if(isgraphic){
//Width and Height of TAB MENUS
	w=153;
	h=37;
	d.write("<Img Src=\""+ImgSrc+name+ext+"\" Border=\"0\"");
	if(h>0)
		d.write(" Height=\""+h+"\"");
	if(w>0)
		d.write(" Width=\""+w+"\"");
	if(alt!="")
		d.write(" Alt=\""+alt+"\"");
	d.write(" />");
	}
else{
	d.write("&nbsp;"+ext+"&nbsp;");
	}

d.write("</a>");

if(main==1||main==2)
	d.write("</td>");
if(main==1)
	d.write("</tr>");
if(main==3)
	d.write("<br/>");
}

//---------------------------------------------------------------------------------------------------------

function startSubmenu(name,style,sw){
//alert("startSubmenu");
//Make Drop Down Menu as wide as the TAB Menus --- javascript
var depth=name.split("_").length+1000;
//alert(depth);
if(NS4)
	return;
if(sw>0)
	menuw=sw;

d.write("<Div Id=\""+name+"\" Class=\""+style+"\" Style=\"z-index:"+depth+"; Width:"+(menuw+(NS7?bd*2:0))+"px\">");
}


//---------------------------------------------------------------------------------------------------------

function endSubmenu(name){
if(NS4)
	return;
d.write("</div>");
if(!NS7)
	d.getElementById(name).onmouseout=tidyMenu;
}

//---------------------------------------------------------------------------------------------------------

function submenuItem(text,url,tar,s){
//alert("submenuItem url:" + url + "  ImgSrc:" + ImgSrc);

if(NS4)
	return;
if(text.charAt(0)=='<')
	d.write(text);
else if(text=="---")
	{
	d.write("<Div Class=\""+s+"\" Style=\"Width:"+menuw+"px\"><center><Img Src=\""+ImgSrc+"---.png\" Height=\"8\" Width=\""+(menuw-6-(2*bd))+"\" Border=0/></center></Div>");
	}
else{
	d.write("<a ");
	if(url!="")
		d.write("Href=\""+url+"\" ");
	if(tar!="")
		d.write("Target=\""+tar+"\" ");
	d.write("Class=\""+s+"\" Style=\"Width:"+menuw+"px\">&nbsp;"+text+"&nbsp;</a>");
	}
}

//---------------------------------------------------------------------------------------------------------

function setGraphic(event,name){
if(NS4)
	return;
psrc=(NS7)?event.target:event.srcElement;
pname=psrc.src;
if(NS7)
	event.target.src=name;
else 
	event.srcElement.src=name;
}


//---------------------------------------------------------------------------------------------------------

function openMenu(event,id,pos,bc,fc){
//alert("openMenu");
if(NS4)
	return;

var el,x,y,dx,dy;
var bwidth;
//Offset to the Right Drop Down Menu wrt TAB Menu
var TabMenuToDropMenuXOffset=4;
var TabMenuToDropMenuYoffset=0;

if(gd==0||mal==0){
	var p=d.getElementById(id);
	gx=0;
	gy=0;
	while(!SAF&&p&&p.offsetParent){
		p=p.offsetParent;
		gx+=p.offsetLeft;
		gy+=p.offsetTop;
		}
	if(p)
		gd=1;
	}

if(mal>0){
	el=d.getElementById(ma[mal-1]);
	if(mx[mal-1]!=el.offsetLeft||my[mal-1]!=el.offsetTop){
		el.style.left=mx[mal-1]+"px";
		el.style.top=my[mal-1]+"px";
		}
	tidyMenu(event);
	}

if(mal>1)	{
	pos=mpos[mal-1];
	}


if(NS7){
	bwidth=window.innerWidth;
	var p=event.target;
	if(p.nodeName!="A"&&p.nodeName!="IMG"&&p.parentNode.nodeName=="A")
	p=p.parentNode;
	dx=p.offsetWidth;
	dy=p.offsetHeight;
	if(mal==0){
		x=p.x;
		y=p.y;
		if(typeof(p.x)=="undefined"||(!NS6&&!SAF)){
			x=p.offsetLeft;
			y=p.offsetTop;
			while(!NS6&&p.parentNode.nodeName!="BODY"){
				p=p.parentNode;
				if(p.nodeName=="TD"||p.nodeName=="TABLE"){
					x+=p.offsetLeft;
					y+=p.offsetTop;
					}
				}
			}
		}
	else{
		el=d.getElementById(ma[mal-1]);
		x=el.offsetLeft;
		y=el.offsetTop+p.offsetTop;
		}
	if(pos!=3)
		x-=bd;
	if(pos==3&&mal>0)
		x+=bd;
	}
else{
	bwidth=document.body.clientWidth;

	if(mal>0) {
		x=event.clientX-event.offsetX-d.body.clientLeft-gx;
		y=event.clientY-event.offsetY-d.body.clientTop-gy;
		}
	else	{
		x=event.clientX-event.offsetX-d.body.clientLeft-gx+TabMenuToDropMenuXOffset;
		y=event.clientY-event.offsetY-d.body.clientTop-gy+TabMenuToDropMenuYoffset;
		}

	dx=event.srcElement.offsetWidth;
	dy=event.srcElement.offsetHeight;
	if(!quirk){
		x+=d.documentElement.scrollLeft-2;
		y+=d.documentElement.scrollTop-2;
		}
	else{
		x+=d.body.scrollLeft;
		y+=d.body.scrollTop;
		}
//If Not Main Drop Down Menu Shif x,y coordinates
	if(mal>0){
		y-=bd;
		if(pos!=3)
			x-=2*bd;
		}
	}
el=d.getElementById(id);

if(el&&el.style.visibility!="visible"){
	if(pos==1){
		x+=dx;
		el.style.left=x-el.offsetWidth+"px";
		el.style.top=y+"px";
		nspeed=el.offsetWidth/frames;
		if(x+gx+el.offsetWidth>bwidth){
			x-=dx;
			pos=3;
			}
		}
	else if(pos==2){
		y+=dy;
		el.style.left=x+"px";
		el.style.top=y-el.offsetHeight+"px";nspeed=el.offsetHeight/frames;
		}
	if(pos==3){
		x-=el.offsetWidth;
		el.style.left=x+el.offsetWidth+"px";
		el.style.top=y+"px";
		nspeed=el.offsetWidth/frames;
		if(x+gx<0){
			x+=el.offsetWidth;
			pos=1;
			x+=dx;
			el.style.left=x-el.offsetWidth+"px";
			el.style.top=y+"px";
			nspeed=el.offsetWidth/frames;
			}
		}
	mx[mal]=x;
	my[mal]=y;
	if(NS7||IE5||frames==0){
		el.style.left=x+"px";
		el.style.top=y+"px";
		}
	if(!IE5)
		clipMenu(mal,el);
	el.style.visibility="visible";
	ma[mal]=id;
	mpos[mal]=pos;
	if(NS7){
		var p=event.target;
		if(p.nodeName!="A"&&p.parentNode.nodeName=="A")
			p=p.parentNode;
		mc[mal]=p.style;
		if(!NS6&&mal>0){
			mc[mal].backgroundColor="#"+bc.toString(16);
			mc[mal].color="#"+fc.toString(16);
			}
		el.onmouseout=tidyMenu;
		}
	else{
		mc[mal]=event.srcElement.style;
		if(mal>0){
			mc[mal].backgroundColor=bc;
			mc[mal].color=fc;
			}
		}
	mal++;
	}

if(ifr&&el&&frames==0&&(typeof(tr)=="undefined"||tr=="")){
	var p=d.getElementById(id+"i");
	if(p){
		p.style.top=y+"px";
		p.style.left=x+"px";
		p.style.width=el.style.width;
		p.style.height=el.offsetHeight+"px";
		p.style.display="block";
		}
	else{
		ifr="<Iframe Id=\""+id+"i\" Style=\"position:Absolute; left:"+x+"px; Width:"+el.style.width+"; Height:"+el.offsetHeight+"px; Top:"+y+"px;z-index:998; Display:block;\" scrolling=\"no\" Frameborder=\"0\"></Iframe>";el.insertAdjacentHTML('beforeBegin',ifr);
		}
	}
//alert("end of openMenu");

}



//---------------------------------------------------------------------------------------------------------

function overMenu(x,y){
x-=gx;
y-=gy;
for(i=mal-1;i>=0;i--){
	var el=d.getElementById(ma[i]);
	if(el.offsetLeft+el.offsetWidth>x&&el.offsetLeft<=x&&el.offsetTop+el.offsetHeight>y&&el.offsetTop<=y){
		return ma[i];
		}
	}
return "";
}

//---------------------------------------------------------------------------------------------------------

function tidyMenu(e){
if(NS4)
	return;
if(NS7){
	t=overMenu(e.pageX,e.pageY);
	if(t!=""&&(e.target.firstChild==e.relatedTarget||e.target==e.relatedTarget.firstChild))
		return;
	}
else{
	var x=event.clientX-d.body.clientLeft;
	var y=event.clientY-d.body.clientTop;
	if(!quirk){
		x+=d.documentElement.scrollLeft-2;y+=d.documentElement.scrollTop-2;
		}
	else{
		x+=d.body.scrollLeft;
		y+=d.body.scrollTop;
		}
	t=overMenu(x,y);
	}
om=0;
for(i=0;i<mal;i++){
	var mail=ma[i].length;
	if(mail>t.length||t.substring(0,mail)!=ma[i]){
		var el=d.getElementById(ma[i]);
		el.style.visibility="hidden";mc[i].backgroundColor="";mc[i].color="";
		if(ifr){
			var p=d.getElementById(ma[i]+"i");
			if(p)
				p.style.display="none";
			}
		}
	else{
		ma[om]=ma[i];
		mx[om]=mx[i];
		my[om]=my[i];
		om++;
		}
	}
mal=om;
if(mal==0&&psrc)
	psrc.src=pname;
}


//---------------------------------------------------------------------------------------------------------

function animate(){
for(i=0;i<mal;i++){
	var el=d.getElementById(ma[i]);
	if(el.style.visibility=="visible"){
		if(el.offsetLeft<mx[i])
			el.style.left=Math.min(el.offsetLeft+nspeed,mx[i])+"px";
		if(el.offsetLeft>mx[i])
			el.style.left=Math.max(el.offsetLeft-nspeed,mx[i])+"px";
		if(el.offsetTop<my[i])
			el.style.top=Math.min(el.offsetTop+nspeed,my[i])+"px";
		clipMenu(i,el);
		}
	}
if(mal!=0||frames!=0)
	setTimeout("animate()",50);
}


//---------------------------------------------------------------------------------------------------------

function clipMenu(i,el){
if(el.offsetLeft>mx[i])
	el.style.clip="rect("+(my[i]-el.offsetTop)+"px "+(el.offsetWidth+(mx[i]-el.offsetLeft))+"px "+el.offsetHeight+"px "+0+"px)";
else 
	el.style.clip="rect("+(my[i]-el.offsetTop)+"px "+el.offsetWidth+"px "+el.offsetHeight+"px "+(mx[i]-el.offsetLeft)+"px)";
}

//---------------------------------------------------------------------------------------------------------

