var write_menu = categorias[categorias.length-1]["lugar"];

var dir_graf = "http://www.capitales.com/grafico/"; var align = "middle";
var hspace_men = 1; var vspace_men = 0; var hspace_sub = 4; var vspace_sub = 5;
//var propiedades = "hspace="+hspace_sub+" vspace="+vspace_sub+" align="+align+" border=0";

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.01
  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 && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function menu_call(id, pais) {
	var html_td = ""; var marcar = ""; var buscar_href = ""; var format_href = ""; var href = "";
	var color_on = "#CCCCCC"; var color_off = "#FFCC00";

	if (id != -1) {
		var arreglo = pais+"["+id+"]";
		var length = eval(arreglo+".length");
		for (var K = 0; K < length; K++) {
		    if (typeof(eval(arreglo+"["+K+"]")) != "undefined") {
			if (eval(arreglo+"["+K+"][\"descripcion\"]").search(/^\[NO\]/gi) == -1) {
				format_href = eval(arreglo+"["+K+"][\"href\"]").replace(/index|principal|\.mhtml|\.htm|\.html|\.php/gi,"");
				if (format_href.search("podcast") !== -1) format_href = format_href.replace("/costarica/", "");
				format_href = format_href.replace(/\//gi,"\\\/");
				format_href = format_href.replace(/[\w\W]+\?/gi,"");
				buscar_href = "/"+format_href+"/gi";

				if (buscar_href.length > 4) marcar = (eval("document.URL.search("+buscar_href+")") !== -1) ? color_on : color_off ;
				else marcar = color_off;
				href = eval(arreglo+"["+K+"][\"href\"]");
				html_td += "<td class='td_submenuprin' bgcolor='"+marcar+"' onMouseOver=\"this.style.backgroundColor='"+color_on+"'\" onMouseOut=\"this.style.backgroundColor='"+marcar+"'\" nowrap><a href='"+href+"' ";
				html_td += (eval(arreglo+"["+K+"][\"onClick\"]")) ? eval(arreglo+"["+K+"][\"str_onClick\"]") : "" ;
				html_td += " class='a_sudmenuprin'>"+eval(arreglo+"["+K+"][\"descripcion\"]")+"</a></td>";
			}
		    }
		}
	} else {
		html_td += "<img src='http://www.capitales.com"+dir_graf+"pixel-trans.gif' alt='Pixel' border='0' width='2' height='2'>";
	}

	return html_td;
}

function subMenus (pais) {
	if (eval("window."+write_menu)) return;
	for (var indx in categorias) {
		propiedades_menu (categorias[indx]["lugar"],indx,pais);
		formato_menu (categorias[indx]["lugar"]);
	}
	eval(write_menu+".writeMenus();");
}

function propiedades_menu (menu,id,pais) {
    var str_des = new String();
    var nombre = ""; var id_K = ""; var arreglo = pais+"["+id+"]"; var arreglo_sub1 = "";
    var length_sub1 = 0; var width = 0;
//alert (arreglo.length);
//    if (typeof(eval(arreglo+".length")) != "undefined") {
//	var length = eval(arreglo+".length");
	var length = arreglo.length;

	try {
	//Define Nivel 1 de Sub Menus
	for (var K = 0; K < length; K++) {
	    if (arreglo[K].length > 1) {
		if (eval(arreglo+"["+K+"][\"descripcion\"]").search(/^\[NO\]/gi) == -1) {
			if (eval(arreglo+"["+K+"][\"sub\"]")) {
				id_K = "menu"+id+""+K;
				nombre = eval(arreglo+"["+K+"][\"descripcion\"]").replace(/<br>/gi," ");
				arreglo_sub1 = pais+"_sub1["+id+"]["+K+"]";
				length_sub1 = eval(arreglo_sub1+".length");
				width = length_mayor (arreglo_sub1, length_sub1);
				addMenu (id_K, nombre, arreglo_sub1, length_sub1, id, width);
				formato_menu (id_K);
			}
		}
	    }
	}
	} catch (e) {}
	width = length_mayor (arreglo, length);
	// Menu Principal
	addMenu (menu, menu, arreglo, length, id, width);
//    }
}

function addMenu (menu, nombre, arreglo, length, id, width) {
	var nombre_menu = ""; var target = new String(); var href = "";
	eval ("window."+menu+" = new Menu(\""+nombre+"\","+width+",17,\"Arial, Helvetica, sans-serif\",11,\"#003399\",\"#FFFFFF\",\"#B0C5D9\",\"#B0C5D9\",\"left\",\"middle\",3,0,500,0,8,true,true,true,0,true,true);");

	try {
	// Listar Menu
	for (var K = 0; K < length; K++) {
	    if (arreglo[K].length > 1) {
		if (eval(arreglo+"["+K+"][\"descripcion\"]").search(/^\[NO\]/gi) == -1) {
			nombre_menu = (eval(arreglo+"["+K+"][\"sub\"]")) ? "menu"+id+""+K : "\""+eval(arreglo+"["+K+"][\"descripcion\"]").replace(/<br>/gi," ")+"\"";
			target = (eval(arreglo+"["+K+"][\"onClick\"]")) ? eval(arreglo+"["+K+"][\"str_onClick\"]").replace(/[a-z]+='|'[\w\W]+|'/gi,"") : "_top" ;
//			eval (menu+".addMenuItem("+nombre_menu+",\"window.open('"+eval(arreglo+"["+K+"][\"href\"]")+"', '_top');\");");
			href = eval(arreglo+"["+K+"][\"href\"]");
			str_link = (eval(arreglo+"["+K+"][\"href\"].length") != 0) ? ",\"window.open('"+href+"', '"+target+"');\"" : "" ;
			eval (menu+".addMenuItem("+nombre_menu+str_link+");");
		}
	    }
	}
	} catch (e) {}
}

function length_mayor (arreglo, length) {
	var width = 0;
	try {
	for (var K = 0; K < length; K++) {
	    if (arreglo[K].length > 1) {
		if (eval(arreglo+"["+K+"][\"descripcion\"]").search(/^\[NO\]/gi) == -1) {
			str_des = eval(arreglo+"["+K+"][\"descripcion\"]").replace(/\&|acute;|amp;|tilde;|\<br\>/gi,"");
			if (width < str_des.length) { width = str_des.length; }
		}
	    }
	}
	} catch (e) {}
	return width *= (width < 30) ? 7.5 : 6 ;
}

function formato_menu (menu) {
	eval (menu+".fontWeight=\"bold\";");
	eval (menu+".hideOnMouseOut=true;");
	eval (menu+".childMenuIcon=\""+dir_graf+"arrows.gif\"");
	eval (menu+".menuBorder=1;");
	eval (menu+".menuLiteBgColor='#FFFFFF';");
	eval (menu+".menuBorderBgColor='#557FAA';");
	eval (menu+".bgColor='#FFFFFF';");
}

function expandableMenu(category,id){
	isBlocked = eval("document.getElementById('"+category+"').style.display");
	if (id == 0) {
		for (var indx in paises) { eval ("document.getElementById('"+paises[indx]["lugar"]+"').style.display = \"none\";"); }
	} else {
		eval ("document.getElementById('"+category+"').style.display = \"none\";");
	}
	document.getElementById(category).style.display = (isBlocked == "block") ? "none" : "block" ;
}

function graf_principal () {
        fecha = new Date();
        url = "http://www.capitales.com/grafico/header_logo_";

	if (location.href.search(/redlacionados/gi) != -1) url += "redlacionados";
	else if (location.href.search(/capitales/gi) != -1) {
	    url += "capitales";
	    if (fecha.getMonth() == 11) url += "_navidad";
	}

//	if (location.href.search(/capitales/gi) != -1) url += "capitales";
        url += ".gif" ;

        document.images['GrafPrin'].src = url;
}