					/* Llamada a las funciones */

if (navigator.userAgent.search(/msie/i) > 0) {
	funciones();
} else {
	document.addEventListener("DOMContentLoaded", funciones, false);
}

function funciones() {
	DatosIniciales();	
}

/* __________________________________________________ */


					/* Popups */
// Script para la apertura de ventanas de forma standard y compatible con WAI
//
// Autor: PatomaS
// Versió.3
// Fecha: 
//
// Sintaxis:
// Los vículos se escriben de forma normal:
//
// <a href="ampliacion_01.htm" id="popup1" rel="popup-200-100-no-no-no-no-yes">Este texto abre una ventana emergente nueva en forma estandar y compatible (popup)</a>
//
// <a href="ampliacion_01.htm" id="VentanaNueva1" rel="nueva-yes-yes-yes-yes-yes">Este texto abre una ventana nueva en forma estandar y compatible.</a>
//
// pero se agrega el atributo "rel" para pasar los valores al popup, el orden es el siguiente:
// popup - ancho - alto - statusbar - scrollbar - toolbar - menubar - resizable
//
// la primera palabra ha de ser "popup" a fin de que el script lo identifique como tal
//
// Funcionamiento:
// El script interpreta el víulo, abriendo una ventana emergente tal como se solicita siempre que el usuario asío permita
// por lo tanto, si tiene desactivado javascript, su navegador es muy viejo o tiene algúpo de problema, el popup no
// aparecerápero la informacióue debíaparecer en el popup aparecerán la ventana principal, tal como ucurrirí// con un víulo normal. De esta manera, el usuario no pierde la informació

function DatosIniciales() {
	var ListaVinculos = document.links;
	var TotalVinculos = ListaVinculos.length;
	var SubListaVinculos = new Array(); // Subgrupo de los víulos que nos interesan
	var z = 0;
	for (n = 0; n < TotalVinculos; n++) {
		if ((ListaVinculos[n].attributes.rel != null) && ((ListaVinculos[n].attributes.rel.value.search(/popup/i)>= 0) || (ListaVinculos[n].attributes.rel.value.search(/nueva/i)>= 0))) {
			SubListaVinculos[z] = ListaVinculos[n];
			z++;
		}
	}
	AsignarEscuchas(SubListaVinculos);
}

function AsignarEscuchas(x) { // Asigna las escuchas a los víulos que deseamos.
	var SubListaVinculos = x;
	var TotalSubListaVinculos = SubListaVinculos.length;
	for (n = 0; n < TotalSubListaVinculos; n++) {
		if (navigator.userAgent.search(/msie/i) >= 0) {
			SubListaVinculos[n].attachEvent("onclick", GeneradorDeVentanas); // Explorer
		} else {
			SubListaVinculos[n].addEventListener("click", GeneradorDeVentanas, false); // DOM
		}
	}
}

function GeneradorDeVentanas(evento) {
	if (this.getAttribute) {
		var pagina = this.getAttribute('href');
		var propiedades = this.getAttribute('rel').split("-");
		//alert (propiedades);
		evento.preventDefault();
	} else {
		var uri = evento.srcElement.getAttribute('href');
		var subpagina = evento.srcElement.getAttribute('href').split("/");
		var pagina = subpagina[subpagina.length-1];
		var propiedades = evento.srcElement.getAttribute('rel').split("-");
	}
	if (propiedades[0] == "popup") {
		var popup = window.open(pagina, "VentanaEmergente", "width="+propiedades[1]+", height="+propiedades[2]+",status="+propiedades[3]+",scrollbars="+propiedades[4]+",toolbar="+propiedades[5]+",menubar="+propiedades[6]+",resizable="+propiedades[7]+'"');
		//alert (popup);
		return false; // previene que se cargue la página en el explorer
	}
	if (propiedades[0] == "nueva") {
		var ancho = (screen.width / 1.2);
		var alto = (screen.height / 1.3);
		var PropiedadesVentanaNueva = "width="+ancho+",height="+alto+",status="+propiedades[1]+",scrollbars="+propiedades[2]+",toolbar="+propiedades[3]+",menubar="+propiedades[4]+",location="+propiedades[5]+",resizable="+propiedades[6];
		if (navigator.userAgent.search(/msie/i) > 0) {
			var NuevaVentana = window.open(uri, "VentanaNueva", PropiedadesVentanaNueva);
		} else {
			var NuevaVentana = window.open(pagina, "VentanaNueva", PropiedadesVentanaNueva);
		}		
		return false; // previene que se cargue la pána en el explorer
		NuevaVentana.moveTo(0,0);
	}
}

/* __________________________________________________*/
