function draw_menu(op, mostrar, usuario, home){
	varusuario=usuario;
	while (varusuario.indexOf(' ') > -1){
		varusuario=varusuario.replace(" ","~");
     }

menu="<table border='0' cellpadding='0' cellspacing='0' height='100%' width='163'>"

if(home==1){
	menu=menu+"<tr><td height='18'>"
	menu=menu+"<table border='0' cellpadding='0' cellspacing='0' width='100%'>"
	menu=menu+"<tr><td height='1' colspan='3'></td></tr>"
	menu=menu+"<tr><td width='1'></td><td height='18' background='../imgs/barra2.jpg'>"
	menu=menu+"<table border='0' cellpadding='0' cellspacing='0' width='100%'><tr>"
	menu=menu+"<td width='18' height='18' align='center'><img src='../imgs/lg_peq.gif'></td>"
	menu=menu+"<td class='menu'>Página principal</td>"
	menu=menu+"<td width='15' align='center'  bgcolor='#C8C7C7'><a href='../ppal/intro.php'><img src='../imgs/men_off.gif' border='0'></a></td>";			
	menu=menu+"</tr></table>"
	menu=menu+"<td width='1'></td></tr>"
	menu=menu+"</table></td></tr>"
	menu=menu+"<tr><td height='4'></td></tr>"
}

for(f=1;f<=nivel;f++){
	if(op==f){
		color2="#DFDFDF";
		color1="545454";
	}else{
		color1="#DFDFDF";
		color2="#545454";
	}
	menu=menu+"<tr><td height='18'>"
	menu=menu+"<table border='0' cellpadding='0' cellspacing='0' width='100%'>"
	menu=menu+"<tr><td height='1' colspan='3'></td></tr>"
	menu=menu+"<tr><td width='1'></td><td height='18' background='../imgs/barra2.jpg'>"
	menu=menu+"<table border='0' cellpadding='0' cellspacing='0' width='100%'><tr>"
	menu=menu+"<td width='18' height='18' align='center'><img src='../imgs/lg_peq.gif'></td>"
	menu=menu+"<td class='menu'>"+arr_nivel[f]+"</td>"
	if(op==f){
		if(usuario==""){
			menu=menu+"<td width='15' align='center'  bgcolor='#C8C7C7'><a href='#' onclick=draw_menu('',"+mostrar+",'',"+home+")><img src='../imgs/men_on.gif' border='0'></a></td>"
		}else{
			menu=menu+"<td width='15' align='center'  bgcolor='#C8C7C7'><a href='#' onclick=draw_menu('',"+mostrar+",'"+varusuario+"',"+home+")><img src='../imgs/men_on.gif' border='0'></a></td>"
		}
	}else{
		if(usuario==""){
				menu=menu+"<td width='15' align='center'  bgcolor='#C8C7C7'><a href='#' onclick=draw_menu("+f+","+mostrar+",'',"+home+")><img src='../imgs/men_off.gif' border='0'></a></td>"
		}else{
				menu=menu+"<td width='15' align='center'  bgcolor='#C8C7C7'><a href='#' onclick=draw_menu("+f+","+mostrar+",'"+varusuario+"',"+home+")><img src='../imgs/men_off.gif' border='0'></a></td>"
		}
	}
	menu=menu+"</tr></table>"
	menu=menu+"<td width='1'></td></tr>"
	menu=menu+"</table></td></tr>"
			
	if(op==f){
			menu=menu+"<tr><td height='5'><table border='0' cellpadding='0' cellspacing='0' width='100%'><tr><td width='1'></td><td height='5' bgcolor='#3FC2A2' class='trans'><img src='../imgs/px.gif' width='1' height='1'></td><td width='1'></td></tr></table></td></tr>"
			lim_nivel=eval("nivel"+op)
			tit_array=eval("arr_nivel"+op+"a");
			lnk_array=eval("arr_nivel"+op+"b");
				for(j=1;j<=lim_nivel;j++){
				  menu=menu+"<tr><td height='10'><table border='0' cellpadding='0' cellspacing='0' width='100%'><tr>"
				  menu=menu+"<td width='1'></td><td height='18' onclick=location.href='"+lnk_array[j]+"' onMouseOver='enciende(this)' onMouseOut='apaga(this)' bgcolor='#3FC2A2' class='trans'>"

				  menu=menu+"<table border='0' cellpadding='0' cellspacing='0' width='100%' class='opaca'><tr> <td class='submenu' width='10'></td><td class='submenu'>"+tit_array[j]+"</td></tr></table>"
				  menu=menu+"<td width='1'></td></tr></table></td></tr>"
				  menu=menu+"<tr><td height='5'><table border='0' cellpadding='0' cellspacing='0' width='100%'><tr><td width='1'></td><td height='5' bgcolor='#3FC2A2' class='trans'><img src='../imgs/px.gif' width='1' height='1'></td><td width='1'></td></tr></table></td></tr>"
				}
				//menu=menu+"<tr><td height='1' bgcolor='#9FE1D1'></td></tr>"		
		}

	menu=menu+"<tr><td height='4'></td></tr>"
}

if (numrevista!=""){
	menu=menu+"<tr><td height='12'></td></tr>"
	menu=menu+"<tr><td height='5' valign='top' align='center'><a href='#' onclick=location.href='../ppal/acsocios.php?ras="+ras+"&destpage=../revista/revista.php&idrev="+idrevista+"&op=5&clas=rev' class='enlace'>REVISTA RADIOPROTECCIÓN</a></td></tr>"
	menu=menu+"<tr><td height='4'></td></tr>"
	menu=menu+"<tr><td height='5' valign='top' align='center'><a href='#' onclick=location.href='../ppal/acsocios.php?ras="+ras+"&destpage=../revista/revista.php&idrev="+idrevista+"&op=5&clas=rev'><img src='../recursos/revista/"+fotorev+"' border='0'></a></td></tr>"
	menu=menu+"<tr><td height='4'></td></tr>"
	menu=menu+"<tr><td height='5' valign='top' align='center'><a href='#' onclick=location.href='../ppal/acsocios.php?ras="+ras+"&destpage=../revista/revista.php&idrev="+idrevista+"&op=5&clas=rev' class='enlace'>Nº "+numrevista+" "+nombrevista+"</a></td></tr>"
}

if(mostrar==0){
		menu=menu+"<tr><td height='15'></td></tr><form name='acceso' method='post' action='../ppal/acceso.php'><tr><td background='../imgs/barra1.jpg'><table width='100%' border='0' cellspacing='0' cellpadding='0'><tr><td width='10'>&nbsp;</td><td class='texto'><font color='#FFFFFF'><b>Acceso socios</b></font></td></tr></table></td></tr>";
		menu=menu+"<tr><td><table width='100%' border='0' cellspacing='0' cellpadding='0'><tr> <td bgcolor='#007A4B' width='1'><img src='../imgs/px.gif' width='1' height='1'></td>";
		menu=menu+"<td bgcolor='C2E8D1' align='center'> <table width='90%' border='0' cellspacing='0' cellpadding='0'><tr><td class='texto' colspan='3' height='8'></td></tr>";
		menu=menu+"<tr> <td class='texto'><b>E-mail</b></td><td>&nbsp;</td><td><input type='text' name='email' size='12' class='campo'></td></tr>";
		menu=menu+"<tr><td colspan='3' height='5'></td></tr><tr><td class='texto'><b>Contrase&ntilde;a</b></td><td>&nbsp;</td><td>";
				 
		menu=menu+"<input type='password' name='pwd' size='12' class='campo'></td></tr>";
		menu=menu+"<tr><td class='texto' colspan='3' height='8'></td></tr>";
		menu=menu+"<tr align='center'><td class='texto' colspan='3' height='8'><a href='#' onclick='document.acceso.submit()' class='boton'>Acceder</a></td></tr>";
		menu=menu+"<tr><td class='texto' colspan='3' height='8'></td></tr></table>";
		menu=menu+"</td><td bgcolor='#007A4B' width='1'><img src='../imgs/px.gif' width='1' height='1'></td></tr>";
		menu=menu+"<tr><td colspan='3' bgcolor='#007A4B' height='1'><img src='../imgs/px.gif' width='1' height='1'></td></tr></table></td></tr></td></tr>"
		menu=menu+"<tr><td></td></tr></form></table>";
}else{
	visusuario=varusuario;
	while (visusuario.indexOf('~') > -1){
		visusuario=visusuario.replace("~"," ");
    }
	menu=menu+"<tr><td height='15'></td></tr><tr><td background='../imgs/barra1.jpg'><table width='100%' border='0' cellspacing='0' cellpadding='0'><tr><td width='10'>&nbsp;</td><td class='texto'><font color='#FFFFFF'><b>Usuario registrado</b></font></td></tr></table></td></tr>";
	menu=menu+"<tr><td><table width='100%' border='0' cellspacing='0' cellpadding='0'>";
	menu=menu+"<tr><td bgcolor='#007A4B' width='1'><img src='../imgs/px.gif' width='1' height='1'></td><td bgcolor='C2E8D1' align='center'><table width='90%' border='0' cellspacing='0' cellpadding='0'>";
	menu=menu+"<tr><td class='texto' height='8'></td></tr><tr><td class='texto'><b>Usuario:</b></td></tr>";
	menu=menu+"<tr><td height='3'></td></tr><tr><td class='texto'>"+visusuario+"</td></tr><tr><td height='8'></td></tr>";
	menu=menu+"<tr> <td align='center' class='texto' height='8'><a href='../ppal/datsocios.php' class='boton'>Modificar datos</a></td></tr>";
	menu=menu+"<tr><td class='texto' height='8'></td></tr>";
	menu=menu+"<tr><td align='center' class='texto' height='8'><a href='../ppal/closesion.php' class='boton'>&nbsp;Cerrar session&nbsp;</a></td></tr>";
	menu=menu+"<tr><td class='texto' height='8'></td></tr>";
	menu=menu+"</table></td><td bgcolor='#007A4B' width='1'><img src='../imgs/px.gif' width='1' height='1'></td></tr><tr>";
	menu=menu+"<td colspan='3' bgcolor='#007A4B' height='1'><img src='../imgs/px.gif' width='1' height='1'></td>";
	menu=menu+"</tr></table></td></tr>";

}
MM_setTextOfLayer('Layer1','',menu)
}

function MM_findObj(n, d){
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_setTextOfLayer(objName,x,newText) { //v3.0
  if ((obj=MM_findObj(objName))!=null) with (obj)
    if (navigator.appName=='Netscape') {
		document.write(unescape(newText)); document.close();
	}else{ 
		innerHTML = unescape(newText);
	}
}

function enciende(celda){
celda.style.filter = "alpha(opacity=100)";
}

function apaga(celda){
celda.style.filter = "alpha(opacity=50)";
}


function abreventana(page, an, al) {
	var iMyWidth;
	var iMyHeight;
	iMyWidth = (window.screen.width/2) - (an/2 + 10); 
	iMyHeight = (window.screen.height/2) - (al/2 + 40);
	var win2 = window.open(page,"printwindow","height="+al+",width="+an+",resizable=no,left=" + iMyWidth + ",top=" + iMyHeight + ",screenX=" + iMyWidth + ",screenY=" + iMyHeight + ",scrollbars=yes,resizable=no");
	win2.focus();
}