numMenus=20;
var natArr =  new Array("down","top","down","down","top","top","top","top","top","top","top","top","top","top","top","top","top","top","top","top");
var menu_selected=1;
var menuE="";
var centralLoaded=false;

for (mm=0;mm<(numMenus);mm++)
{
 	eval("var m"+mm+"_level0W=0;var m"+mm+"_level1H=0;");
	eval("m"+mm+"_maxElemLevel1=0;var m"+mm+"_startingPosLevel1=0");
	eval("var m"+mm+"_selected0=null;var m"+mm+"_selected1=null;");
	eval("var m"+mm+"_moving1=null;var m"+mm+"_l1Expanded=null;");
	eval("var m"+mm+"_movingUpLimit=0;var m"+mm+"_movingDownLimit=0;");
	eval("var m"+mm+"_int1=null;var m"+mm+"_int2=null;var m"+mm+"_int3=null;");
}
var intE=null;var movementPos=0;var sense=1;
var inside=false; var period=0; var nu=false;
var offColorArr =  new Array("#82A19A","#82A19A","#82A19A","#FFFFFF");
var onColorArr =  new Array("#004030","#004030","#004030","#82A19A");
var resColorArr =  new Array("#82A19A","#004030","#82A19A","#FFFFFF");

// preliminar settings
diff=2;
period=10;
if(NS4)
{   
    menuStyleWidth0=4.85;
    menuStyleWidth2=4.85;
    menuStyleWidth3=4.6;
	menuStyleWidthL=5.4;		
}
else if(NS6)
{
   diff=-2;
   period=2;   
}

/*************************/
/*	Positions functions	 */
/*************************/
	//calculo de widths
	for (menu=0;menu<4;menu++)
	{
		eval("m"+menu+"_level0W=0");
		eval("m"+menu+"_level1W=0");	
		for (ii=0;ii<eval("m"+menu+"_level_0.length");ii++)
		{
			eval("m"+menu+"_level0W=m"+menu+"_level0W+((m"+menu+"_level_0["+ii+"].length+2)*menuStyleWidth"+menu+")+1");
			for(jj=0;jj<eval("m"+menu+"_level_1"+ii+".length");jj++)
			{
			 	t1=eval("((m"+menu+"_level_1"+ii+"["+jj+"].length)+3)*menuStyleWidthL");
				if(eval("m"+menu+"_level1W")<t1) eval("m"+menu+"_level1W=t1");
			}
		}
		(eval("m"+menu+"_level1W")>eval("m"+menu+"_level0W"))?eval("m"+menu+"_level0W=m"+menu+"_level1W"):'';

	}		

	function changeDimensions()
	{		
		for (menu=0;menu<4;menu++)
		{		
			m.changeStyle("","","","m"+menu+"_selec1","width",eval("m"+menu+"_level0W"));
			for (ii=0;ii<eval("m"+menu+"_level_0.length");ii++)
			{
				m.changeStyle("","","","m"+menu+"_level1"+ii,"width",eval("m"+menu+"_level0W"));
				m.changeStyle("","","","m"+menu+"_level1"+ii,"height",eval("m"+menu+"_level1H")+2);
			}			
		}

	}
	
	function upDownLimits()
	{
		m1_movingUpLimit=m1_startingPosLevel1;
		m2_movingUpLimit=m2_startingPosLevel1-m2_level1H;
		m3_movingUpLimit=m3_startingPosLevel1-m3_level1H;
		m0_movingUpLimit=m0_startingPosLevel1-m0_level1H;		
		m1_movingDownLimit=0;
		m2_movingDownLimit=m2_level1Y;
		m3_movingDownLimit=m3_level1Y;
		m0_movingDownLimit=m0_level1Y;			
	}
	
	function startPositions()
	{
		m1_startingPosLevel1=-(m1_level1H)-menuStyleHeight;
		for(ii=0;ii<4;ii++)
		{
		    if(ii!=1)
			{
				if(IE)eval("m"+ii+"_startingPosLevel1=m"+ii+"_level1Y+1")
				else if(NS6)eval("m"+ii+"_startingPosLevel1=m"+ii+"_level1Y+1")
				else if(NS4)eval("m"+ii+"_startingPosLevel1=m"+ii+"_level1Y-1");
			}
		}
		upDownLimits();		
		for (ii=0;ii<4;ii++)
			for (jj=0;jj<eval("m"+ii+"_level_0.length");jj++)
				m.changeStyle("","","","m"+ii+"_level1"+jj,"top",eval("m"+ii+"_startingPosLevel1"));

		if(NS4)
		{
			m.changeStyle("","","","m2_selec1","top",m2_selec1Y-2);
			m.changeStyle("","","","m3_selec1","top",m3_selec1Y-2);
			m.changeStyle("","","","m0_selec1","top",m0_selec1Y-2);
		}		
	}

/*************************/
/*	Level 1 functions	 */
/*************************/
	function startPos(menuN,menuEE)
	{m.changeStyle("","",menuE,"m"+menuN+"_level1"+eval("m"+menuN+"_moving1"),"top",eval("m"+menuN+"_startingPosLevel1"));}

	function cli(m,i)
	{
		eval("clearInterval(m"+m+"_int"+i+")");
		eval("m"+m+"_int"+i+"=null");	
	}
							  
	function expandLevel1(menuN,lev,menuEE)
	{
	 	(menuEE==null)?menuE="":menuE=menuEE;

		if(eval("m"+menuN+"_selected0!=null"))
			m.hideLayer("","","","m"+menuN+"_selec1");
	
  		if(eval("m"+menuN+"_l1Expanded!=lev"))
		{
		 	//cambio peligroso//
		 	if (eval("m"+menuN+"_l1Expanded!=null"))
			   startPos(menuN,menuEE);

			iit=1;stp=false;
			while((iit<4)&&(stp==false))
			{
			 	if (eval("m"+menuN+"_int"+iit)!=null)
				{
					cli(menuN,iit);
					startPos(menuN,menuEE);				
					expandLevel1(menuN,lev,menuE);
					stp=true;
				}
				iit++;
			}
			if (stp==false)
			{

				eval("m"+menuN+"_moving1=lev");
				eval("m"+menuN+"_l1Expanded=lev");
				nu=false;

				if(natArr[menuN]=="top")
					eval("m"+menuN+"_int1 = setInterval('goD("+menuN+","+lev+")',5)")
				else
				{			
					eval("m"+menuN+"_int1 = setInterval('goU("+menuN+","+lev+")',5)");
				}				

				if (menuN==1)
					typeDescription(lev);
			}
		}
		else
		{
			clearTimeout(eval("m"+menuN+"_int2"));
			eval("m"+menuN+"_int2=null");
		}
	}

	function goD(menuN,lev)
	{
		if (m.getStyle("","",menuE,"m"+menuN+"_level1"+lev,"top")<eval("m"+menuN+"_movingDownLimit"))
			m.changeStyle("","",menuE,"m"+menuN+"_level1"+lev,"top",m.getStyle("","",menuE,"m"+menuN+"_level1"+lev,"top")+menuStyleHeight);

		if (m.getStyle("","",menuE,"m"+menuN+"_level1"+lev,"top")>=eval("m"+menuN+"_movingDownLimit"))
		{
		 cli(menuN,1);

		 if(natArr[menuN]=="top")
		 {
/*		    sense=1;movementPos=0;			
		 	eval("m"+menuN+"_int3 = setInterval('moveUpDown("+menuN+","+lev+")',period)");*/		 
		 }
		 else
		 {
 			eval("m"+menuN+"_l1Expanded=null");
			(!nu)?restoreColors(menuN):'';
		 }
			
		}
	}
	
	
	function moveUpDown(menuN,lev)
	{
       m.changeStyle("","",menuE,"m"+menuN+"_level1"+lev,"top",m.getStyle("","",menuE,"m"+menuN+"_level1"+lev,"top")+sense);
	   movementPos++;
	   (NS6)?movementPos++:'';

		if (movementPos==10) 
		   sense=-sense
		else if (movementPos==20) 
		{
			movementPos=0;
			cli(menuN,3);			
		}	
		
	}
	
	function contractLevel1(menuN,lev,menuEE)
	{
	 	(menuEE==null)?menuE="":menuE=menuEE;
		
		if(((inside==false)&&(!NS4))||(NS4))
			{
			 	eval("m"+menuN+"_int2=setTimeout('contractLyr1Now("+menuN+","+lev+")',500)")
			}
	}
	
	function contractLyr1Now(menuN,lev)
	{	
		if (menuN>3)m.upLevel(menuN);
	 	
		eval("m"+menuN+"_int2=null");
	 	if (eval("m"+menuN+"_int1!=null"))
		{	
			cli(menuN,1);		
			m.changeStyle("","",menuE,"m"+menuN+"_level1"+eval("m"+menuN+"_moving1"),"top",eval("m"+menuN+"_startingPosLevel1"));			
			contractLyr1Now(menuN,lev);
		}
		else
		{
			eval("m"+menuN+"_l1Expanded=null");		
			eval("m"+menuN+"_moving1=lev");

			typeDescription(null);

			if(natArr[menuN]=="top")
				eval("m"+menuN+"_int1 = setInterval('goU("+menuN+","+lev+")',2)")				
			else
			{		
				eval("m"+menuN+"_int1 = setInterval('goD("+menuN+","+lev+")',2)")
			}									

			if(eval("m"+menuN+"_selected0!=null"))
			{
				m.showLayer("","","","m"+menuN+"_selec1");
				changeColors(menu_selected,eval("m"+menu_selected+"_selected0"));
				if(menuN==menu_selected)nu=true;				

			}
		}
				
	}
	function goU(menuN,lev)
	{
		topLimit=eval("m"+menuN+"_movingUpLimit");
	 			
		if (m.getStyle("","",menuE,"m"+menuN+"_level1"+lev,"top")>topLimit)
			m.changeStyle("","",menuE,"m"+menuN+"_level1"+lev,"top",m.getStyle("","",menuE,"m"+menuN+"_level1"+lev,"top")-menuStyleHeight);	
			
		if (m.getStyle("","",menuE,"m"+menuN+"_level1"+lev,"top")<=topLimit)
		{
			cli(menuN,1);

			if(natArr[menuN]=="top")
			{			
				eval("m"+menuN+"_l1Expanded=null");
				(!nu)?restoreColors(menuN):'';
			}
		    else
			{
/*				sense=-1;
				movementPos=0;				
				eval("m"+menuN+"_int3 = setInterval('moveUpDown("+menuN+","+lev+")',period)");*/
			}				
		}
	}

	function contractExpandedLevel1(menuN,menuEE)
	{ 	
	 	(menuEE==null)?menuE="":menuE=menuEE;
		inside=false;	
		if (eval("m"+menuN+"_l1Expanded!=null"))
		 	eval("m"+menuN+"_int2=setTimeout('contractLyr1Now("+menuN+","+eval("m"+menuN+"_l1Expanded")+")',500)");
	}
	

	function stopContractLevel1(menuN)
	{
		inside=true;
	 	if (eval("m"+menuN+"_int2!=null"))
		{
		   eval("clearTimeout(m"+menuN+"_int2)");
		   eval("m"+menuN+"_int2=null");
		}
	}


/*************************/
/*	Selection functions	 */
/*************************/
	function selecOp(menuN,level1,selection,source)
	{
		if (menuN.length==0)
		{
			menuN=menu_selected;
			if((eval("m"+menuN+"_selected0!=null"))&&(eval("m"+menuN+"_selected1!=null")))
			{
				level1=eval("m"+menuN+"_selected0");
				selection=eval("m"+menuN+"_selected1");
				if (isNumber(selection))
				{
					opTxt=eval("m"+menuN+"_level_1"+level1+"["+selection+"]");
					seleccionado="<font class='normal2'>&nbsp;&middot; "+opTxt+"</font>";
					changeColors(menuN,level1);
					nu=true;
				}
				else
					seleccionado=" ";
			}
			else
				seleccionado=" ";
			
			typeSelection((eval("m.tabla2_1_"+menuN)+seleccionado+m.tabla2_2),menuN);
		}
		else if(menuN<4) //menus de inicio
		{	
		 	contractLyr1Now(menuN,eval("m"+menuN+"_l1Expanded"));
			m.showLayer("","","","m"+menuN+"_selec1");
			seleccionado="<font class='normal2'>&nbsp;&middot; "+eval("m"+menuN+"_level_1"+level1+"["+selection+"]")+"</font>";
			typeSelection((eval("m.tabla2_1_"+menuN)+seleccionado+m.tabla2_2),menuN);
			setTimeout("goSelection("+menuN+","+level1+","+selection+")",500);
			restoreColors(menu_selected);
			menu_selected=menuN;									
		}
		else // combos
		{
		 	if(source==null)source=menuN;
			contractLyr1Now(menuN,eval("m"+menuN+"_l1Expanded"));
			seleccionado=eval("m.m"+source+"_level_1"+level1+"["+selection+"]");
			table4_ex2="</font></td><td width='10'><a href=# onClick=downLevel("+menuN+");parent.expandLevel1("+menuN+",0,'mod"+menuN+"C'); onMouseOut=parent.contractLevel1("+menuN+",0,'mod"+menuN+"C');>"+m.table4_jj;
			typeSelection(eval("m.table"+menuN+"_1")+seleccionado+table4_ex2,menuN);
			level1=null;
			selection=null;						
		}
		
		eval("m"+menuN+"_selected0=level1");
		eval("m"+menuN+"_selected1=selection");
	
	}
	
	function goSelection(menuN,level1,selection)
	{
		cli(menuN,1);
		if(eval("m"+menuN+"_seguro_1"+level1+"["+selection+"]")=="0")
		{m.location=eval("m"+menuN+"_link_1"+level1+"["+selection+"]")}
		else if(eval("m"+menuN+"_seguro_1"+level1+"["+selection+"]")=="1")
		{parent.top.location=eval("m"+menuN+"_link_1"+level1+"["+selection+"]")}		
		

		
	}
	
	function typeSelection(selecT,menuN)
	{
		   m.changeContent("","","","m"+menuN+"_selec1",selecT)
	}
	function typeDescription(selN)
	{	
		(selN==null)?descC="":descC=s.descript_level_0[selN];
		if(NS4)
			bannerMuestra=s.document.layers['topBanner1'].visibility
		else if (IE)
			bannerMuestra=s.topBanner1.style.visibility
		else if (NS6)
			bannerMuestra=s.document.getElementById("topBanner1").style.visibility;									

		if ((bannerMuestra=="hidden")||(bannerMuestra=="hide"))
		   s.changeContent("","","","descript1","<font class=pequeno>"+descC+"</font>")
	}

	
	function restoreColors(menuN)
	{
	 	if((!NS4)&&(menuN<4))
		{
		 	if (menuN==1) posF="s"
			else posF="i";
			
			for (ii=0;ii<eval("m"+menuN+"_level_0.length");ii++)
				eval(posF+".changeStyle('','','','xxx"+menuN+""+ii+"','backgroundColor',resColorArr["+menuN+"])");
		}
	}
	
	function changeColors(menuN,op)
	{
	 	if((!NS4)&&(menuN<4))
		{
		 	if (menuN==1) posF="s"
			else posF="i";
			
		 	restoreColors(menuN);			

			for (ii=0;ii<eval("m"+menuN+"_level_0.length");ii++)
			{
				if(ii!=op)
					eval(posF+".changeStyle('','','','xxx"+menuN+""+ii+"','backgroundColor',offColorArr["+menuN+"])")
				else
					eval(posF+".changeStyle('','','','xxx"+menuN+""+ii+"','backgroundColor',onColorArr["+menuN+"])");				
			}
		}
	}
	
function isNumber(s)
{ 
	if ((s == null) || (s.length == 0)) 
		return false; 
	else 
		return(!isNaN(s)); 
}