var esIE;
var reqajax;
var posCurAntx;
var posCurAnty;
var arrastrando=false;
var numMov;
var formpopup=null;
var ratondentro=false;
var tempocierremenu=null;
var navegs=["analisis","anot","noticias","estudios","cultura"];
var eventoCursor=null;
var seccpisada=null;

function alerta(ale)
{
	alert(ale);
}

/**
 * Funciones de fechas
 */

function quitarCerosIzq(sn)
{
	var ret=sn;
	while (ret.substring(0,1)==" " || ret.substring(0,1)=="0")
	{
		ret=ret.substring(1);
	}
	return ret;
}

function darNombresMeses()
{
	return new Array("Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Septiembre","Octubre","Noviembre","Diciembre");
}

function darFechaLargadeSQL(f)
{
	var ret="";
	var i=f.indexOf("-");
	var anno=f.substring(0,i);
	var fx=f.substring(i+1);
	var j=fx.indexOf("-");
	var mes=quitarCerosIzq(fx.substring(0,j));
	var dia=quitarCerosIzq(fx.substring(j+1));
	var nmes=(isNaN(mes))?0:parseInt(mes);
	if (nmes>0)
		ret=dia+" de "+darNombresMeses()[nmes-1];
	else
		ret=dia;
	return ret;
}

/**
 * Valida una fecha en formato DD-MM-AAAA
 */
function validarFecha(f)
{
	var ret=false;
	var diasmes=[31,28,31,30,31,30,31,31,30,31,30,31];
	
	var i=f.indexOf("-");
	if (i>=0)
	{
		var dia=f.substring(0,i);
		if (!isNaN(dia))
		{
			var ndia=parseInt(dia);
			var fx=f.substring(i+1);
			var j=fx.indexOf("-");
			if (j>=0)
			{
				var mes=fx.substring(0,j);
				if (!isNaN(mes))
				{
					var nmes=parseInt(mes);
					var anno=fx.substring(j+1);
					if (!isNaN(anno))
					{
						nanno=parseInt(anno);
						if ((nanno%4==0 && nanno%100!=0) || (nanno%400==0))
							diasmes[1]=diasmes[1]+1;
						if (nmes>=1 && nmes<=12)
						{
							if (ndia>=1 && ndia<=diasmes[nmes-1])
								ret=true;
						}
					}
				}
			}
		}
	}

	return ret;
}

/**
 * ****************************
 * Funciones para Ajax
 * ****************************
 */
 
/**
 * Devuelve el motor Ajax
 */
function iniAjax()
{
	var ret=null;
	if (window.XMLHttpRequest)
	{
		esIE=false;
		ret=new XMLHttpRequest();
	}
	else
	{
		esIE=true;
		ret=new ActiveXObject("Microsoft.XMLHTTP");
	}
	return ret;
}

/**
 * Lanza una petición Ajax al servidor
 * Hay que especificar:
 * url: URL que se va a invocar en el servidor
 * metodo: GET / POST
 * funcion: función Javascript que se va a invocar al procesar la respuesta
 */
function lanzarPeticion(url,metodo,funcion)
{
	if (reqajax==null)
		reqajax=iniAjax();
	reqajax.onreadystatechange=funcion;
	reqajax.open(metodo,url,true);
	reqajax.send(null);
}

function lanzarPeticionPost(url,funcion,parametros)
{
	if (reqajax==null)
		reqajax=iniAjax();
	reqajax.onreadystatechange=funcion;
	reqajax.open("POST",url,true);
	reqajax.setRequestHeader("Content-type", "application/x-www-form-urlencoded");
	reqajax.setRequestHeader("Content-length", parametros.length);
	reqajax.setRequestHeader("Connection", "close");
	reqajax.send(parametros);
}

/**
 * Verifica que se ha recibido
 * la respuesta del servidor a una petición Ajax
 */
function verificarRespuesta()
{
	var ret=false;
	if (reqajax.readyState==4)
	{
		if (reqajax.status==200)
		{
			ret=true;
		}
	}
	return ret;
}

/**
 * ****************************
 * Funciones para manejo de DOM
 * ****************************
 */

function darDimSinpx(dim)
{
	var ret=0;
	
	if (dim)
	{
		dim=dim.replace("px","");
		ret=(isNaN(dim))?0:parseInt(dim);
	}
	return ret;	
} 

/**
 * Devuelve la posición de un elemento
 * en forma de array [borde izquierdo, borde superior]
 * sólo IE
 * en Mozilla se obtiene con cual.style.posLeft/cual.style.posTop
 */
function darPosElem(cual)
{
	var t=0,l=0;
		
	while (cual.offsetLeft)
	{
		l+=cual.offsetLeft;
		t+=cual.offsetTop;
		cual=cual.offsetParent;
	}
	return [l,t];
}

function darPosElemIE(elemento)
{
	var x,y;
	x=elemento.style.pixelLeft;
	y=elemento.style.pixelTop;
	return [x,y];
}

function darPosElemMz(elemento)
{
	var x,y;
	x=elemento.style.left;
	y=elemento.style.top;
	return [darDimSinpx(x),darDimSinpx(y)];
}

function darDondeCursorIE()
{
	var x,y;
	x=window.event.clientX;
	y=window.event.clientY;
	x+=document.body.scrollLeft;
	y+=document.body.scrollTop;
	return [x,y];
}

function darDondeCursorMz(evento)
{
	var x,y;
	x=evento.pageX;
	y=evento.pageY;
	return [x,y];
}

function posicionarElemIE(elemento, x, y)
{
	elemento.style.pixelTop=y;
	elemento.style.pixelLeft=x;
}

function posicionarElemMz(elemento, x, y)
{
	elemento.style.top=y;
	elemento.style.left=x;
	//elemento.offsetLeft=x+"px";
	//elemento.offsetTop=y+"px";
}

function posicionarElem(elemento, x, y)
{
	//alert(x+"/"+y);
	if (document.all)
	{
		posicionarElemIE(elemento,x,y);
	}	
	else
	{
		posicionarElemMz(elemento,x,y);
	}
}

function darPosRelativaMz(elemento)
{
	var x,y;
	x=elemento.offsetLeft;
	y=elemento.offsetTop;
	return [x,y];
}

function darTamaElem(elemento,quitandomargen)
{
	var ancho=elemento.offsetWidth;
	var alto=elemento.offsetHeight;
	
	if (quitandomargen)
	{
		var estilo;
		if (elemento.currentStyle)
		{
			estilo=elemento.currentStyle;
		}
		else
		if (window.getComputedStyle)
		{
			estilo=document.defaultView.getComputedStyle(elemento,null);
		}
		else
		{
			estilo=elemento.style;
		}
		var qancho=darDimSinpx(estilo.marginLeft)+darDimSinpx(estilo.marginRight)+darDimSinpx(estilo.borderLeftWidth)+darDimSinpx(estilo.borderRightWidth);
		var qalto=darDimSinpx(estilo.marginTop)+darDimSinpx(estilo.marginBottom)+darDimSinpx(estilo.borderTopWidth)+darDimSinpx(estilo.borderbottomWidth);
		ancho-=qancho;
		alto-=qalto;
	}
	return [ancho,alto];
}

function estaPuntoDentro(poscur,poselem,tam)
{
	var ox=poselem[0];
	var oy=poselem[1];
	var w=tam[0];
	var h=tam[1];
	var x=poscur[0];
	var y=poscur[1];
	return x>=ox && x<=(ox+w) && y>=oy && y<=(oy+h);
}

function calcularDespl(x,y)
{
	var x1=x-posCurAntx;
	var y1=y-posCurAnty;
	return [x1,y1];
}

function darTamPantalla()
{
	var w,h;
	if (document.all)
	{
		w=screen.width;
		h=screen.height;
	}
	else
	{
		var jToolkit = java.awt.Toolkit.getDefaultToolkit();
		var jScreenSize = jToolkit.getScreenSize();
		w = jScreenSize.width;
		h = jScreenSize.height;
	}
	return [w,h];
}

function darTamAreaNavegador()
{
	return [pageWidth(),pageHeight()];
}

// Browser Window Size and Position
// copyright Stephen Chapman, 3rd Jan 2005, 8th Dec 2005
// you may copy these functions but please keep the copyright notice as well
function pageWidth()
{
	return window.innerWidth != null? window.innerWidth : document.documentElement && document.documentElement.clientWidth ?       document.documentElement.clientWidth : document.body != null ? document.body.clientWidth : null;
}

function pageHeight()
{
	return  window.innerHeight != null? window.innerHeight : document.documentElement && document.documentElement.clientHeight ?  document.documentElement.clientHeight : document.body != null? document.body.clientHeight : null;
}

function posLeft()
{
	return typeof window.pageXOffset != 'undefined' ? window.pageXOffset :document.documentElement && document.documentElement.scrollLeft ? document.documentElement.scrollLeft : document.body.scrollLeft ? document.body.scrollLeft : 0;
}

function posTop()
{
	return typeof window.pageYOffset != 'undefined' ?  window.pageYOffset : document.documentElement && document.documentElement.scrollTop ? document.documentElement.scrollTop : document.body.scrollTop ? document.body.scrollTop : 0;
}

function posRight()
{
	return posLeft()+pageWidth();
}

function posBottom()
{
	return posTop()+pageHeight();
}
                    
function prueba()
{
	if (verificarRespuesta())
	{
		alert(reqajax.responseXML);
		/*var cont=reqajax.responseXML.getElementsByTagName("AB").nodeValue;
		var cont1=reqajax.responseXML.childNodes[0];
		alert(cont1.firstChild.nodeValue);*/
		reqajax=null;
	}
}

function rellenarCuerpo(cuerpo,subcuerpo)
{
  var href="index.php";
  if (cuerpo==null || cuerpo=="null" || cuerpo=="")
  { href="index.php";
  }
  else
  {
    if (subcuerpo==null || subcuerpo=="null" || subcuerpo=="")
    {
      href=href+"?cuerpo="+cuerpo;
    }
    else
    {
      href=href+"?cuerpo="+cuerpo+"&sc="+subcuerpo;
    }
  }
  location.href=href;
}

function isValidEmail(str)
{
   return (str.indexOf(".") > 2) && (str.indexOf("@") > 0);
}

function darEsIE()
{
	return navigator.appName=="Microsoft Internet Explorer";
}

function darXMLDoc(elxml)
{
	var xmlDoc=null;
	if (navigator.appName=="Microsoft Internet Explorer")
	{
		esIE=true;
		xmlDoc=new ActiveXObject("Microsoft.XMLDOM");
		xmlDoc.async=false;
		xmlDoc.loadXML(elxml);
	}
	else
	{
		esIE=false;
		//xmlDoc=document.implementation.createDocument("","",null);
		parser=new DOMParser();
		xmlDoc=parser.parseFromString(elxml,"text/xml");
	}
	return xmlDoc;
}

function cargarSelXML(elxml,procesadorFila)
{
	var xmlDoc=darXMLDoc(elxml);
	var bloqart = xmlDoc.childNodes[0];

	if(bloqart.hasChildNodes())
	{
		var cuerpo=document.getElementById("cuerpo");
		var tabla=document.createElement("table");
		var crptabla=document.createElement("tbody");
	
		var i = 0;
		while(bloqart.childNodes[i])
		{
			var filatabla=document.createElement("tr");
			var fila;
			fila = bloqart.childNodes[i];
			// check nodetype
			if(fila.nodeType != 3) // #text == 3
			{
				if (fila.hasChildNodes())
				{
					procesarFila(fila,filatabla,procesadorFila);
				}
			}
			crptabla.appendChild(filatabla);
			i++;
		}
		tabla.appendChild(crptabla);
		cuerpo.appendChild(tabla);
	}
}

function procesarFila(fila, filatabla, procesadorFila)
{
	var j=0;
	while (fila.childNodes[j])
	{
		var casilla=document.createElement("td");
		if (fila.childNodes[j].firstChild!=null)
		{
			procesadorFila.asignarCampo(j,fila.childNodes[j].firstChild.nodeValue);
		}
		else
		{
			procesadorFila.asignarCampo(j,"");
		}
		j++;
	}
	procesadorFila.darContenidoFila(filatabla);
}

function darProcFila(cuerpo)
{
	var procFila=new Object();
	procFila.campos=[];
	procFila.asignarCampo=asigCampo;
	
	if (cuerpo=="noticias")
	{
		procFila.darContenidoFila=contFilaNot;	
	}
	else
	if (cuerpo=="docuf")
	{
		procFila.darContenidoFila=contFilaDoc;	
	}
	else
	if (cuerpo=="estudios")
	{
		procFila.darContenidoFila=contFilaEst;	
	}
	else
	if (cuerpo=="cultura")
	{
		procFila.darContenidoFila=contFilaCult;	
	}
	else
	if (cuerpo=="anot")
	{
		procFila.darContenidoFila=contFilaAnot;	
	}
	return procFila;
}

function asigCampo(i,v)
{
	this.campos[i]=v;
}

function contFilaNot(filatabla)
{
	var i=0;
	for (i=0;i<this.campos.length;i++)
	{
		var casilla=document.createElement("td");
		var textocasilla=document.createTextNode(this.campos[i]);
		casilla.appendChild(textocasilla);
		filatabla.appendChild(casilla);
	}
}

function contFilaDoc(filatabla)
{
	var i=0;
	for (i=0;i<this.campos.length;i++)
	{
		var casilla=document.createElement("td");
		var textocasilla=document.createTextNode(this.campos[i]);
		casilla.appendChild(textocasilla);
		filatabla.appendChild(casilla);
	}
}

function contFilaEst(filatabla)
{
	var i=0;
	for (i=0;i<this.campos.length;i++)
	{
		var casilla=document.createElement("td");
		var textocasilla=document.createTextNode(this.campos[i]);
		casilla.appendChild(textocasilla);
		filatabla.appendChild(casilla);
	}
}

function contFilaCult(filatabla)
{
/*
	var i=0;
	for (i=0;i<this.campos.length;i++)
	{
		var casilla=document.createElement("td");
		var textocasilla=document.createTextNode(this.campos[i]);
		casilla.appendChild(textocasilla);
		filatabla.appendChild(casilla);
	}
*/
var tablarefart=document.createElement("table");
var crptablarefart=document.createElement("tbody");
var ftrefart=document.createElement("tr");
var casilla=document.createElement("td");
var cont="<A HREF=index.php?art="+this.campos[0]+">"+this.campos[1]+"</A>";
var cont1="art="+this.campos[0]+">"+this.campos[1];
if (darEsIE())
{
	var textocasilla=document.createTextNode(cont1);
	casilla.appendChild(textocasilla);
	//casilla.firstChild.value=textocasilla;
	//casilla.firstChild.value=cont;
	//alert(cont);
}
else
{
	casilla.innerHTML=cont;
}
ftrefart.appendChild(casilla);
crptablarefart.appendChild(ftrefart);
tablarefart.appendChild(crptablarefart);
filatabla.appendChild(tablarefart);

}

function contFilaAnot(filatabla)
{
	var i=0;
	for (i=0;i<this.campos.length;i++)
	{
		var casilla=document.createElement("td");
		var textocasilla=document.createTextNode(this.campos[i]);
		casilla.appendChild(textocasilla);
		filatabla.appendChild(casilla);
	}
}

function funcionEnVariable()
{
	alert("Hola");
}

function pruebaJavascript()
{
	var f=funcionEnVariable;
	f();
}

function visualizarBlog(n)
{
	lanzarPeticion('dynamphp/extracc/exblog.php?blog='+n,'GET',visualizarBlog1);
}

function visualizarBlog1()
{
	if (verificarRespuesta())
	{
		var id=reqajax.responseXML.getElementsByTagName("ID");
		var titulo=reqajax.responseXML.getElementsByTagName("TITULO1");
		var fecha=reqajax.responseXML.getElementsByTagName("FECHA");
		var texto=reqajax.responseXML.getElementsByTagName("TEXTO");
		if (id && id[0] && texto && texto[0])
		{
			var id1=id[0].firstChild.nodeValue;
			var texto1=texto[0].firstChild.nodeValue;
			if (id1 && texto1)
			{
				var titx=darTituloAnot(titulo,fecha);
				var crp=document.getElementById("blog"+id1);
				mostrarPopup(crp,titx,texto1);
			}
		}
		else
			alert("Algo es nulo");
		reqajax=null;
	}
}

function mostrarPopup(padre,titx,texto1)
{
	var x,y,dx,dy,xy,tam;
	var midiv=document.getElementById("popup");
	if (midiv)
	{
		asignarTextoPopup(titx,texto1);
		midiv.onmousemove=fijarPosicionElem;
		midiv.onmousedown=iniciarArrastre;
		midiv.onmouseup=finalizarArrastre;
	}
	else
	{
		midiv=crearPopup(titx,texto1);
		midiv.id="popup";
		midiv.style.position="absolute";
		xy=darPosElem(padre);
		dx=50;
		dy=darTamaElem(padre,false)[1];
		x=xy[0]+dx;
		y=xy[1]+dy;
		if (document.all)
		{
			posicionarElemIE(midiv,x,y);
		}
		else
		{
			posicionarElemMz(midiv,x,y);
		}
		posCurAntx=xy[0];
		posCurAnty=xy[1];
		midiv.onmousemove=fijarPosicionElem;
		midiv.onmousedown=iniciarArrastre;
		midiv.onmouseup=finalizarArrastre;
		midiv.className="popup";
		padre.appendChild(midiv);
		midiv.style.visibility="visible";
	}
	return midiv;
}

function darTituloAnot(titulo,fecha)
{
	var ret="";
	if (titulo && titulo[0])
	{
		ret=titulo[0].firstChild.nodeValue;
		if (fecha && fecha[0])
		{
			ret=ret+" / "+fecha[0].firstChild.nodeValue;
		}
	}
	else
	if (fecha && fecha[0])
	{
		ret=fecha[0].firstChild.nodeValue;
	}
	return ret;
}

function crearPopup(titulo,texto)
{
	var div=document.createElement("DIV");
	var tabla=document.createElement("TABLE");
	tabla.setAttribute("cellpadding","3");
	var crptabla=document.createElement("TBODY");

	var fila1=document.createElement("TR");
	var celda1=document.createElement("TD");
	celda1.id="titulopopup";
	//var elemtitulo=document.createTextNode(titulo);
	var elemtitulo=document.createElement("div");
	elemtitulo.id="elemtitulo";
	elemtitulo.innerHTML=titulo;
	celda1.setAttribute("align","center");
	celda1.setAttribute("valign","top");
	//celda1.setAttribute("bgcolor","#1111ff");
	//celda1.setAttribute("color","#000000");
	celda1.className="titulopopup";
	celda1.style.cursor="move";
	celda1.appendChild(elemtitulo);
	
	var celdax=document.createElement("TD");
	var cruz=document.createTextNode("x");
	celdax.setAttribute("align","right");
	//celdax.setAttribute("bgcolor","#ff1111");
	celdax.className="cierrepopup";
	celdax.onmousedown=cerrarPopup;
	celdax.appendChild(cruz);
	fila1.appendChild(celda1);
	fila1.appendChild(celdax);

	var fila2=document.createElement("TR");
	var celda2=document.createElement("TD");
	celda2.setAttribute("colspan","2");
	celda2.style.cursor="move";
	var textocasilla=document.createElement("DIV");
	textocasilla.id="textopopup";
	texto=revertirBrackets(texto);
	textocasilla.innerHTML=texto;
	celda2.appendChild(textocasilla);
	fila2.appendChild(celda2);
	
	crptabla.appendChild(fila1);
	crptabla.appendChild(fila2);
	tabla.appendChild(crptabla);
	div.appendChild(tabla);
	return div;
}

function asignarTextoPopup(titulo,texto)
{
	//var celda1=document.getElementById("titulopopup");
	//celda1.firstChild.nodeValue=titulo;
	var elemtitulo=document.getElementById("elemtitulo");
	elemtitulo.innerHTML=titulo;
	var celda2=document.getElementById("textopopup");
	celda2.innerHTML=revertirBrackets(texto);
}

function cerrarPopup()
{
	var popup=document.getElementById("popup");
	if (popup)
	{
		var padre=popup.parentNode;
		padre.removeChild(popup);
	}
}

/**
 * Fija la posición de un elemento
 * a partir de un evento
 */
function fijarPosicionElem(event)
{
	fijarPosicion(event,this);
}

function iniciarArrastre(event)
{
	var poscur;
	var poselem;
	var tam;
	if (document.all)
	{
		poscur=darDondeCursorIE();
		poselem=darPosElem(this);
	}
	else
	{
		poscur=darDondeCursorMz(event);
		poselem=darPosElemMz(this);
	}
	tam=darTamaElem(this,false);
	
	if (estaPuntoDentro(poscur,poselem,tam))
	{
		posCurAntx=poscur[0];
		posCurAnty=poscur[1];
		numMov=0;
		arrastrando=true;
	}
	else
		arrastrando=false;
}

function finalizarArrastre(event)
{
	arrastrando=false;
}

function fijarPosicion(evento,elemento)
{
	if (arrastrando)
	{
		var x=0;
		var y=0;
		var xy;
		var pos;
		var despl;
		
		if (numMov==10)
		{
			var i=0;
		}
		if (document.all)
		{
			xy=darDondeCursorIE();
			pos=darPosElemIE(elemento);
			despl=calcularDespl(xy[0],xy[1]);
			x=pos[0]+despl[0];
			y=pos[1]+despl[1];
			window.status="x="+x+"/y="+y+"/evento="+window.event+"/numMov="+numMov;
			posicionarElemIE(elemento,x,y);
		}
		else
		{
			xy=darDondeCursorMz(evento);
			pos=darPosElemMz(elemento);
			despl=calcularDespl(xy[0],xy[1]);
			x=pos[0]+despl[0];
			y=pos[1]+despl[1];
			elemento.style.position="absolute";
			posicionarElemMz(elemento,x,y);
		}
		elemento.style.visibility="visible";
		posCurAntx=xy[0];
		posCurAnty=xy[1];
		numMov++;
	}
}

function visualizarAclaracion(n)
{
	lanzarPeticion('dynamphp/extracc/exblog.php?blog='+n,'GET',visualizarAclaracion1);
}

function visualizarAclaracion1()
{
	if (verificarRespuesta())
	{
		var id=reqajax.responseXML.getElementsByTagName("ID");
		var texto=reqajax.responseXML.getElementsByTagName("TEXTO");
		if (id && id[0] && texto && texto[0])
		{
			var id1=id[0].firstChild.nodeValue;
			var texto1=texto[0].firstChild.nodeValue;
			if (id1 && texto1)
			{
				var idpadre=darIdPadre(id1);
				var crp=document.getElementById(idpadre);
				var titx="";
				var popup=mostrarPopup(crp,titx,texto1);
			}
		}
		else
			alert("Algo es nulo");
		reqajax=null;
	}
}

function darIdPadre(n)
{
	var ret="";
	if (n==4)
		ret="presentacion";
	else
	if (n==5)
		ret="ideasbasicas";
	else
	if (n==6)
		ret="bolenhtml";
	else
		ret="cabecera";
		
	return ret;
}


function abrirRectangulo(evento,idRect)
{
	var el=document.getElementById(idRect);
	if (document.all)
	{
		el.style.pixelTop=event.clientY;
		el.style.pixelLeft=event.clientX;
		el.style.visibility="visible";
		darTamaElem(el,false);
	}
	else
	{
		x=evento.pageX;y=evento.pageY;
		el.style.position="absolute";
		el.style.top=y;el.style.left=x;
		el.style.visibility="visible";
	}
}

function abrirFormCentr(idRect)
{
	if (registrarFormu(idRect))
	{
		var el=document.getElementById(idRect);
		el.style.visibility="visible";
		centrarRectangulo(idRect);
	}
}

function cerrarRectangulo(idRect)
{
	var el=document.getElementById(idRect);
	el.style.visibility="hidden";
}

function centrarRectangulo(idRect)
{
	var elem=document.getElementById(idRect);
	var tampan1=darTamPantalla();
	var tampan=darTamAreaNavegador();
	var tamrect=darTamaElem(elem,false);
	var x=(tampan[0]-tamrect[0])/2;
	var y=(tampan[1]-tamrect[1])/2;
	posicionarElem(elem, x, y);
}

function actividadesDia()
{
	if (verificarRespuesta())
	{
		var select=reqajax.responseXML.getElementsByTagName("SELECT");
		var fecha=reqajax.responseXML.getElementsByTagName("FECHA");
		
		if (select && select[0] && fecha && fecha[0])
		{
			cerrarPopupActiv();
			var valfecha=fecha[0].firstChild.nodeValue;
			var smes=valfecha.substr(5,2);
			var mes=parseInt(smes,10);
			var nommes=darNombresMeses()[mes-1];
			var i=0,j=0;
			var textoHTML="<UL>";
			for (i=0;i<select[0].childNodes.length;i++)
			{
				var datosdia=select[0].childNodes[i];
				var elementos=[];
				for (j=0;j<datosdia.childNodes.length;j++)
				{
					var elemento=datosdia.childNodes[j];
					if (elemento.firstChild)
						elementos[j]=elemento.firstChild.nodeValue;
					else
						elementos[j]="";
				}
				var tipo=elementos[0];
				var titulo=elementos[1];
				var hora=elementos[2];
				var lugar=elementos[3];
				var comentario=elementos[4];
				var organiza=elementos[5];
				textoHTML=textoHTML+"<LI><B>"+tipo+"</B><P><U>Hora:</U>&nbsp;"+hora+"</P>"+"<P><B>"+titulo+"</B></P>"+"<P>"+lugar+"</P><P><U>Organizado por</U>:&nbsp;"+organiza+"</P>";
				if (comentario && comentario!="")
				{
					comentario=revertirBrackets(comentario);
					textoHTML=textoHTML+"<P>"+comentario+"</P>";
				}
			}
			textoHTML=textoHTML+"</UL>";			

			var midiv=crearPopupActiv("Actividades del día "+darFechaLargadeSQL(valfecha),textoHTML);

			midiv.id="popupactiv";
			midiv.className="popupactiv";
			midiv.style.position="absolute";
			midiv.style.visibility="visible";
			var padre=document.getElementById("mes_"+nommes);
			padre.appendChild(midiv);
					
			var pospadre=darPosElem(padre);
			var tampadre=darTamaElem(padre,false);
			var tamdiv=darTamaElem(midiv,false);
			
			//alert("pospadre="+pospadre[0]+","+pospadre[1]+"/tampadre="+tampadre[0]+","+tampadre[1]+"/tamdiv="+tamdiv[0]+","+tamdiv[1]);
			var posic=darPosicionSegunPadre("tltr",pospadre,tampadre,tamdiv);
			if (document.all)
				posic[0]=posic[0]-400;
			posicionarElem(midiv, posic[0], posic[1]);
		}
		reqajax=null;
	}	
}

function crearPopupActiv(titulo,texto)
{
	var div=document.createElement("DIV");
	var tabla=document.createElement("TABLE");
	tabla.setAttribute("cellpadding",3);
	tabla.setAttribute("width",400);
	var crptabla=document.createElement("TBODY");

	var fila1=document.createElement("TR");
	var celda1=document.createElement("TD");
	celda1.id="titulopopupactiv";
	var elemtitulo=document.createTextNode(titulo);
	celda1.setAttribute("align","center");
	celda1.setAttribute("valign","top");
	celda1.className="titulopopup";
	celda1.appendChild(elemtitulo);
	
	var celdax=document.createElement("TD");
	var cruz=document.createTextNode("x");
	celdax.style.cursor="crosshair";
	celdax.setAttribute("align","right");
	celdax.className="cierrepopup";
	celdax.onmousedown=cerrarPopupActiv;
	celdax.appendChild(cruz);
	fila1.appendChild(celda1);
	fila1.appendChild(celdax);
	crptabla.appendChild(fila1);

	var fila2=document.createElement("TR");
	var celda2=document.createElement("TD");
	celda2.setAttribute("colspan","2");
	var textocasilla=document.createElement("DIV");
	textocasilla.id="textopopupactiv";
	textocasilla.innerHTML=texto;
	celda2.appendChild(textocasilla);
	fila2.appendChild(celda2);
	
	crptabla.appendChild(fila2);
	tabla.appendChild(crptabla);
	div.appendChild(tabla);
	return div;
}

function cerrarPopupActiv()
{
	var popup=document.getElementById("popupactiv");
	if (popup)
	{
		var padre=popup.parentNode;
		padre.removeChild(popup);
	}
}

function submitir(form)
{
	form.submit();
}

function crearStringRectClip(arriba, derecha, abajo, izquierda)
{
	return "rect("+arriba+"px "+derecha+"px "+abajo+"px "+izquierda+"px)";
}

var agrandador=new Object();
/*
var qx;
var qy;
*/
var wagrand;
var hagrand;
var elemagrand;
var funcagrand;

function mostrarAgrandando(elem)
{
	elemagrand=elem;
	var tam=darTamaElem(elem,false);
	wagrand=tam[0];
	hagrand=tam[1];
	agrandador.qx=wagrand/2;
	agrandador.qy=hagrand/2;
	if (document.all)
	{
		var rr="rect("+Math.round(agrandador.qy)+"px "+(Math.round(wagrand-agrandador.qx))+"px "+(Math.round(hagrand-agrandador.qy))+"px "+Math.round(agrandador.qx)+"px)";
		elemagrand.style.clip=rr;
		funcagrand=window.setInterval("mostrarAgrandando1()",30);
	}
	else
	{
		var rr="rect("+Math.round(agrandador.qy)+"px "+(Math.round(wagrand-agrandador.qx))+"px "+(Math.round(hagrand-agrandador.qy))+"px "+Math.round(agrandador.qx)+"px)";
		elemagrand.style.clip=rr;
		funcagrand=window.setInterval("mostrarAgrandando1()",30);
	}
}

function mostrarAgrandando1()
{
	agrandador.qx-=7;
	agrandador.qy-=3;
	if (agrandador.qx >=0 || agrandador.qy >=0)
	{
		var rr=crearStringRectClip(agrandador.qy,window.wagrand-agrandador.qx,window.hagrand-agrandador.qy,agrandador.qx);
		elemagrand.style.clip=rr;
	}
	else
	{
		clearInterval(window.funcagrand);			
		elemagrand.style.clip=null;
	}
}

function alertaError(textoerr)
{
	var menserror=document.getElementById("menserror");
	menserror.innerHTML=textoerr;
	presentarMensajeError();
}

function presentarMensajeError()
{
	var error=document.getElementById("error");
	if (error)
	{
		error.style.visibility="visible";
		centrarRectangulo("error");
		mostrarAgrandando(error);
	}
}

function registrarFormu(idform)
{
	var ret=false;
	if (formpopup==null)
	{
		formpopup=document.getElementById(idform);
		ret=true;
	}
	return ret;
}

function desregistrarFormu()
{
	formpopup=null;
}

function limpiarFormuContacto()
{
	document.mensajecontacto.emailresp.value="";
	document.mensajecontacto.mensaje.value="";
}

function validarContacto()
{
	var ret=true;
	if (document.mensajecontacto.mensaje.value=="")
	{
		desregistrarFormu();
		var menserror=document.getElementById("menserror");
		menserror.innerHTML="El mensaje está vacío<BR>Vuelve a probar";
		presentarMensajeError();
		ret=false;
	}
	return ret;
}

function crearParamPostContacto(emailresp,mensaje)
{
//	return "emailresp="+escape(encodeURI(emailresp))+"&mensaje="+escape(encodeURIComponent(mensaje));
	return "emailresp="+escape(emailresp)+"&mensaje="+escape(mensaje);
}

function crearParamPost(ks,vars)
{
	var n=vars.length;
	var ret="";
	if (n==ks.length)
	{
		var primero=true;
		var i;
		for (i=0;i<n;i++)
		{
			if (!primero)
			{
				ret=ret+"&";
			}
			else
				primero=false;
			ret=ret+ks[i]+"="+escape(encodeURI(vars[i]));
		}
	}
	return ret;
}

function lanzarMensajeContacto()
{
	cerrarRectangulo("contacto");
	var emailresp=document.mensajecontacto.emailresp.value;
	var mensaje=document.mensajecontacto.mensaje.value;
	lanzarPeticionPost("formu/menscontacto.php",concluirContacto,crearParamPostContacto(emailresp,mensaje));
}

function concluirContacto()
{
	if (reqajax.readyState==4)
	{
		if (reqajax.status==200)
		{
			var resp=reqajax.responseXML.getElementsByTagName("MSJRESP");
			if (resp && resp[0])
				alertaError(resp[0].firstChild.nodeValue);
		}
		reqajax=null;
	}
}

function limpiarFormuBusqueda()
{
	document.formbusqueda.busqtodas.value="";
	document.formbusqueda.busqfrase.value="";
	document.formbusqueda.busqalguna.value="";
}

function validarBusqueda()
{
	var ret=true;
	if (document.formbusqueda.busqtodas.value=="" && document.formbusqueda.busqfrase.value=="" && document.formbusqueda.busqalguna.value=="")
	{
		cerrarRectangulo("busqueda");
		desregistrarFormu();
		var menserror=document.getElementById("menserror");
		menserror.innerHTML="No hay datos de búsqueda<BR>Vuelve a probar";
		presentarMensajeError();
		ret=false;
	}
	return ret;
}

function abrirBolPDF(fichpdf)
{
	//lanzarPeticion("espacios/boletin/abrirbolpdf.php?zip="+fichpdf,"get",recepPDF);
	window.open("http://www.afavordelcastellano.org/espacios/boletin/abrirbolpdf.php?zip="+fichpdf,"pdf","width=500,height=600,location=no,status=no,menubar=no")
}

function recepPDF()
{
	var ret=false;
	if (verificarRespuesta())
	{
		var resp=reqajax.responseXML.getElementsByTagName("RESPUESTA");
		var menserror=document.getElementById("menserror");
		menserror.innerHTML=resp[0].firstChild.nodeValue;
		presentarMensajeError();
		reqajax=null;
	}
	return ret;
}

function exBols(idPadre)
{
	lanzarPeticion("espacios/boletin/exbols.php?pad="+idPadre,"get",presentarMenuFlot);
}

function presentarMenuFlot()
{
	if (verificarRespuesta())
	{
		var fila=reqajax.responseXML.getElementsByTagName("FILA");
		var idpadre=reqajax.responseXML.getElementsByTagName("PADRE");
		var pos=reqajax.responseXML.getElementsByTagName("POSICION");
		
		if (fila && fila[0])
		{
			var div=document.createElement("DIV");
			var tabla=document.createElement("table");
			tabla.setAttribute("cellspacing",5);
			tabla.setAttribute("width",300);
			var crptabla=document.createElement("tbody");
			for (i=0;i<fila.length;i++)
			{
				var accion=fila[i].childNodes[0].firstChild.nodeValue;
				var opcion=fila[i].childNodes[1].firstChild.nodeValue;
				
				var enlace=document.createElement("DIV");
				enlace.innerHTML="<A HREF=\""+accion+"\">"+html_entity_decode(opcion)+"</A>";
				
				var tr=document.createElement("tr");
				var td=document.createElement("td");
				td.appendChild(enlace);
				td.className="popupmenuflotelem";
				tr.appendChild(td);
				crptabla.appendChild(tr);
			}
			tabla.appendChild(crptabla);
			div.appendChild(tabla);
			div.id="menuflot";
			div.className="popupmenuflot";
			div.style.position="absolute";
			div.style.visibility="visible";
			
			if (idpadre && idpadre[0])
			{
				padre=document.getElementById(idpadre[0].firstChild.nodeValue);
				padre.appendChild(div);
				var pospadre=darPosElem(padre);
				var tampadre=darTamaElem(padre,false);
				var tamdiv=darTamaElem(div,false);
				
			//alert("pospadre="+pospadre[0]+","+pospadre[1]+"/tampadre="+tampadre[0]+","+tampadre[1]+"/tamdiv="+tamdiv[0]+","+tamdiv[1]);
				if (pos && pos[0])
				{
					var posic=darPosicionSegunPadre(pos[0].firstChild.nodeValue,pospadre,tampadre,tamdiv);
					posicionarElem(div, posic[0], posic[1]);
				}
			}
			tempocierremenu=window.setTimeout("cerrarMenuFlot()",4000);
		}
		else
		{
			/*var menserror=document.getElementById("menserror");
			menserror.innerHTML="No hay datos de búsqueda<BR>Vuelve a probar";
			presentarMensajeError();*/
		}
		reqajax=null;
	}
}

function cerrarMenuFlot()
{
	desresaltarTodos();
	var menuflot=document.getElementById("menuflot");
	if (menuflot)
	{
		var padre=menuflot.parentNode;
		padre.removeChild(menuflot);
	}
}

function darPosicionSegunPadre(prefpos,pospadre,tampadre,tamhijo)
{
	var ret;
	var pref1=prefpos.charAt(0);
	var pref2=prefpos.charAt(1);
	var pref3=prefpos.charAt(2);
	var pref4=prefpos.charAt(3);
	
	if (pref1=='t')
	{
		if (pref2=='l')
		{
			if (pref3=='t')
			{
				if (pref4=='l')
				{
					//tltl
					ret=[pospadre[0],pospadre[1]];
				}
				else //pref4=='r'
				{
					//tltr
					ret=[pospadre[0]-tamhijo[0],pospadre[1]];
				}
			}
			else //pref3=='b'
			{
				if (pref4=='l')
				{
					//tlbl
					ret=[pospadre[0],pospadre[1]-tamhijo[1]];
				}
				else //pref4=='r'
				{
					//tlbr
					ret=[pospadre[0]-tamhijo[0],pospadre[1]-tamhijo[1]];
				}
			}
		}
		else //pref2=='r'
		{
			if (pref3=='t')
			{
				if (pref4=='l')
				{
					//trtl
					ret=[pospadre[0]+tampadre[0],pospadre[1]];
				}
				else //pref4=='r'
				{
					//trtr
					ret=[pospadre[0]+tampadre[0]-tamhijo[0],pospadre[1]];
				}
			}
			else //pref3=='b'
			{
				if (pref4=='l')
				{
					//trbl
					ret=[pospadre[0]+tampadre[0],pospadre[1]-tamhijo[1]];
				}
				else //pref4=='r'
				{
					//trbr
					ret=[pospadre[0]+tampadre[0]-tamhijo[0],pospadre[1]-tamhijo[1]];
				}
			}
		}
	}
	else //pref1=='b'
	{
		if (pref2=='l')
		{
			if (pref3=='t')
			{
				if (pref4=='l')
				{
					//bltl
					ret=[pospadre[0],pospadre[1]+tampadre[1]];
				}
				else //pref4=='r'
				{
					//bltr
					ret=[pospadre[0]-tamhijo[0],pospadre[1]+tampadre[1]];
				}
			}
			else //pref3=='b'
			{
				if (pref4=='l')
				{
					//blbl
					ret=[pospadre[0],pospadre[1]+tampadre[1]-tamhijo[1]];
				}
				else //pref4=='r'
				{
					//blbr
					ret=[pospadre[0]-tamhijo[0],pospadre[1]+tampadre[1]-tamhijo[1]];
				}
			}
		}
		else //pref2=='r'
		{
			if (pref3=='t')
			{
				if (pref4=='l')
				{
					//brtl
					ret=[pospadre[0]+tampadre[0],pospadre[1]+tampadre[1]];
				}
				else //pref4=='r'
				{
					//brtr
					ret=[pospadre[0]+tampadre[0]-tamhijo[0],pospadre[1]+tampadre[1]];
				}
			}
			else //pref3=='b'
			{
				if (pref4=='l')
				{
					//brbl
					ret=[pospadre[0]+tampadre[0],pospadre[1]+tampadre[1]-tamhijo[1]];
				}
				else //pref4=='r'
				{
					//brbr
					ret=[pospadre[0]-tampadre[0]-tamhijo[0],pospadre[1]+tampadre[1]-tamhijo[1]];
				}
			}
		}
	}
	return ret;
}

function esNavegs(id)
{
	var ret=false;
	var i;
	
	for (i=0;!ret && i<navegs.length;i++)
	{
		ret = id==navegs[i];
	}
	
	return ret;
}

function encimaBotonNaveg(elem)
{
	desresaltarOtros(elem);
	if (esNavegs(elem))
	{ 
		lanzarPeticion("dynamphp/extracc/exanticip.php?secc="+elem+"&pad="+elem+"&pos=trtl","get",presentarMenuFlotEx);
	}
	etiq=document.getElementById(elem);
	etiq.className="naveg1";
	etiq1=document.getElementById("div"+elem);
	etiq1.className="navegext1";
}

function presentarMenuFlotEx()
{
	if (tempocierremenu)
	{
		window.clearTimeout(tempocierremenu);
		tempocierremenu=null;
	}
	cerrarMenuFlot();
	presentarMenuFlot();
}

function desresaltarNaveg(id)
{
	etiq=document.getElementById(id);
	etiq.className="naveg";
	etiq1=document.getElementById("div"+id);
	etiq1.className="navegext";
}

function desresaltarOtros(id)
{
	var i;
	for (i=0;i<navegs.length;i++)
	{
		if (navegs[i]!=id)
			desresaltarNaveg(navegs[i]);
	}
}

function desresaltarTodos()
{
	desresaltarOtros("");
}
  
function fueraBotonNaveg(elem)
{
	etiq=document.getElementById(elem);
	etiq.className="naveg";
	etiq1=document.getElementById("div"+elem);
	etiq1.className="navegext";
}

function html_entity_decode(str)
{
	return str.replace(/</g,"&lt;").replace(/>/g,"&gt;");
}

function isMouseLeaveOrEnter(e, handler)
{
	if (e.type != 'mouseout' && e.type != 'mouseover')
		return false;
	var reltg = e.relatedTarget ? e.relatedTarget : 
		e.type == 'mouseout' ? e.toElement : e.fromElement;
	while (reltg && reltg != handler)
		reltg = reltg.parentNode;
	return (reltg != handler);
}

function revertirBrackets(s)
{
	var s1=s.replace(/&lt;/g,"<");
	return s1.replace(/&gt;/g,">");
}

function darTituloMates(area,tema,evento)
{
	eventoCursor=evento;
	lanzarPeticion("../espacios/mates/areas/dartitulo.php?area="+area+"&tema="+tema,"GET",recibirTituloMates);
}

function recibirTituloMates()
{
	if (tempocierremenu==null && verificarRespuesta())
	{
		var fila=reqajax.responseXML.getElementsByTagName("FILA");
		var titulo=reqajax.responseXML.getElementsByTagName("TITULO");
		if (fila && fila[0] && titulo && titulo[0])
		{
			var cursor;
			if (document.all)
			{
				//cursor=darDondeCursorIE();
				var x,y;
				x=window.event.clientX;
				y=window.event.clientY;
				x+=document.body.scrollLeft;
				y+=document.body.scrollTop;
				cursor=[x,y];
			}
			else
				cursor=darDondeCursorMz(eventoCursor);
			//alert(cursor[0]+"/"+cursor[1]);
			var div=document.createElement("DIV");
			div.innerHTML=titulo[0].firstChild.nodeValue;
			div.id="titulomates";
			div.className="popupmat";
			div.setAttribute("width",200);
			div.style.position="absolute";
			div.style.visibility="visible";
			var padre=document.getElementById("listaelementos");
			padre.appendChild(div);
			posicionarElem(div,cursor[0]+15,cursor[1]);
			tempocierremenu=window.setTimeout("cerrarTituloMates()",2000);
		}
		reqajax=null;
	}
}

function cerrarTituloMates()
{
	var menuflot=document.getElementById("titulomates");
	if (menuflot)
	{
		var padre=menuflot.parentNode;
		padre.removeChild(menuflot);
		window.clearTimeout(tempocierremenu);
		tempocierremenu=null;
	}
}

function encimaSeccPapel(secc,i,pos)
{
	if (seccpisada==null || seccpisada!=secc)
	{
		seccpisada=secc;
		var enlace=document.getElementById("pap_"+i);
		enlace.style.cursor="hand";
		lanzarPeticion("dynamphp/extracc/exanticippap.php?secc="+escape(secc)+"&ord="+i+"&pos="+pos, "get", presentarMenuFlotEx);
	}
}

function visualizarContBol()
{
	if (verificarRespuesta())
	{
		var id=reqajax.responseXML.getElementsByTagName("ID");
		var texto=reqajax.responseXML.getElementsByTagName("TEXTO");
		if (id && id[0] && texto && texto[0])
		{
			var id1=id[0].firstChild.nodeValue;
			var texto0=texto[0].firstChild.nodeValue;
			var texto1=texto[0].lastChild.nodeValue;
			if (id1 && texto0 && texto1)
			{
				var textoz=texto0+texto1;
				var idpadre=darIdPadre(id1);
				var crp=document.getElementById(idpadre);
				var titx="";
				var popup=mostrarPopupBol(crp,titx,texto0+texto1);
				posicionarElem(popup, 120, 0);
				/*textoz=revertirBrackets(textoz);
				var i=0;
				var n=textoz.length;
				for (i=0;i<n;)
				{
					var a;
					if (i+200 < n)
						a=textoz.substring(i,i+400);
					else
						a=textoz.substring(i);
					alert(a);
					i+=400;
				}*/
			}
		}
		else
			alert("Algo es nulo");
		reqajax=null;
	}
}

function mostrarPopupBol(padre,titx,texto1)
{
	var x,y,dx,dy,xy,tam;
	var midiv=crearPopupBol(titx,texto1);
	midiv.id="popupbol";
	midiv.style.position="absolute";
	xy=darPosElem(padre);
	dx=50;
	dy=darTamaElem(padre,false)[1];
	x=xy[0]+dx;
	y=xy[1]+dy;
	if (document.all)
	{
		posicionarElemIE(midiv,x,y);
	}
	else
	{
		posicionarElemMz(midiv,x,y);
	}
	posCurAntx=xy[0];
	posCurAnty=xy[1];
	midiv.onmousemove=fijarPosicionElem;
	midiv.onmousedown=iniciarArrastre;
	midiv.onmouseup=finalizarArrastre;
	midiv.className="popupbol";
	padre.appendChild(midiv);
	midiv.style.visibility="visible";
	
	return midiv;
}

function crearPopupBol(titulo,texto)
{
	var div=document.createElement("DIV");
	var tabla=document.createElement("TABLE");
	tabla.setAttribute("cellpadding","3");
	tabla.setAttribute("width","100%");
	var crptabla=document.createElement("TBODY");

	var fila1=document.createElement("TR");
	var celda1=document.createElement("TD");
	celda1.id="titulopopup";
	//var elemtitulo=document.createTextNode(titulo);
	var elemtitulo=document.createElement("div");
	elemtitulo.id="elemtitulo";
	elemtitulo.innerHTML=titulo;
	celda1.setAttribute("align","center");
	celda1.setAttribute("valign","top");
	//celda1.setAttribute("bgcolor","#1111ff");
	//celda1.setAttribute("color","#000000");
	celda1.className="titulopopup";
	celda1.style.cursor="move";
	celda1.appendChild(elemtitulo);
	
	var celdax=document.createElement("TD");
	var cruz=document.createTextNode("x");
	celdax.setAttribute("align","right");
	//celdax.setAttribute("bgcolor","#ff1111");
	celdax.className="cierrepopup";
	celdax.onmousedown=cerrarPopupBol;
	celdax.appendChild(cruz);
	fila1.appendChild(celda1);
	fila1.appendChild(celdax);

	var fila2=document.createElement("TR");
	var celda2=document.createElement("TD");
	celda2.setAttribute("colspan","2");
	celda2.style.cursor="move";
	var textocasilla=document.createElement("DIV");
	textocasilla.id="textopopup";
	texto=revertirBrackets(texto);
	textocasilla.innerHTML=texto;
	celda2.appendChild(textocasilla);
	fila2.appendChild(celda2);
	
	crptabla.appendChild(fila1);
	crptabla.appendChild(fila2);
	tabla.appendChild(crptabla);
	div.appendChild(tabla);
	return div;
}

function cerrarPopupBol()
{
	var popup=document.getElementById("popupbol");
	if (popup)
	{
		var padre=popup.parentNode;
		padre.removeChild(popup);
	}
}

function nada()
{
}