var x="length",y="replace";
var sRuta = directorioRaiz();
var sIdioma = idioma();

function addLI(sRuta, sItemLI, sURL, sId)	 {
	var s = '<li><a href="';
	if (sURL == "")
		return s + 'javascript:BajoConstruccion(\'' + sItemLI + '\')"><span class=r>' + sItemLI + '</span></a>';
	else if (sURL.indexOf("http") != -1 || sURL.indexOf("www") != -1)
		s += sURL + sId;
	else {
		if (sURL.indexOf("javascript:") > -1) {
			sRuta = '';
			sId = '';
		}
		if (sItemLI.indexOf('#')==0) {
			sItemLI=sItemLI.substring(1,sItemLI[x]);
			sURL=sURL[y](/.htm/,sIdioma+'.htm');
		}
		s += sRuta + sURL + sId;
	}
	return  s + '">' + sItemLI + '</a>';
}

function addUL(sRuta, sItemUL, sBool, sURL, sIdioma)	{
	if (sBool == "no") {
		return addLI(sRuta, sItemUL, sURL, sIdioma);
	} else {
		var sIm='<img src="'+sRuta+'img/';
		if (sItemUL.indexOf('##')==0) {
			sItemUL=sItemUL.substring(2,sItemUL[x]);
			sIm+=sItemUL+'">';
		} else sIm+= 'icoDesplegar.gif" id="i' + sItemUL + '">' + sItemUL;
		var s = '<li><a href=\"javascript:Toggle(\'' + sItemUL + '\')\">'+sIm+'</a>';
				s +='<ul style="display:none" id="' + sItemUL + '" class=menuh2>';
		return s;
	}
}
function cambiarClase(sId, sClass) {
	var oAt=document.createAttribute('class');
	oAt.nodeValue=sClass;
	document.getElementById(sId).setAttributeNode(oAt);	
}
function construirMenu(oList,sId)	{

	var s = '<ul class=menu>';
	var iId = (sId=='i') ? 3 : (sId=='f') ? 4 : 0;
	var iId2 =(iId==0) ? 0 : iId-1;
	if (sId != '') sId = '?lang=' + sId;
	for (var i=0; i<oList[x]; i=i+5) {
		if (oList[i] != "") {
			if (i != 0 && oList[i-4] != "no") s += '</ul>';
			s += addUL(sRuta, oList[i+iId], oList[i+1], oList[i+2], sId);
		} else 
			s += addLI(sRuta, oList[i+1+iId2], oList[i+2], sId);
	}
	return s + '</ul></ul>';
}

function construirTOC()		{
	var i, oH2, s='', oH3, sH3='', j=0;
	var sItemUL = new Array ("En esta página:", "On this page:", "Sur cette page:")
	var oTOC  = addUL(sRuta, sItemUL[idiomaNum()], "", "");

	for (i=0; (oH2 = document.getElementsByTagName("h2")[i]); i++) {
		s = oH2.innerHTML;
		sH3='';
		oH3 = oH2;
		
		do {
			oH3 = oH3.nextSibling;
			if (oH3 && oH3.nodeName == 'H3') {
				sH3 += '<li><a href="#h3_' + (++j) + '">' + oH3.innerHTML + '</a></li>';
				oH3.innerHTML = '<a name="h3_' + j + '">' + oH3.innerHTML + '</a>';
			}
		}
		while (oH3 && oH3.nodeName != 'H2');
		if (sH3 != '') sH3 = '<ul>' + sH3 + '</ul>';
		
		if (s.indexOf('noH2') == -1) s = '<a href="#h2_' + i + '">' + s[y](/<\w+[^>]+>/g, '') + '</a>';
		oTOC += '<li>' + s + sH3 + '</li>';
		oH2.innerHTML = '<a name="h2_' + i + '">' + oH2.innerHTML + '</a>';
	}
	
	var oMenu = document.getElementById("IzqContenido").getElementsByTagName("ul");
	//La primera ul que pilla es siempre la padre
	oMenu[0].innerHTML = oTOC + '</ul></li>' + oMenu[0].innerHTML;
	Toggle(sItemUL[idiomaNum()]);
}
function crearXMLHttpRequest(){
  var xmlHttp=null;
  if (window.ActiveXObject) 
    xmlHttp = new ActiveXObject("Microsoft.XMLHTTP");
  else 
    if (window.XMLHttpRequest) 
      xmlHttp = new XMLHttpRequest();
  return xmlHttp;
}
function directorioRaiz()	{
	var sRuta='';
	var s=document.URL;
	s=s[y](/\\/g,"/");
	var i=s.indexOf("cont/");
	if(i==-1)i=s.indexOf("php/");
	if(i!=-1){
		s=s.substring(i);
		s=s.split("/");
		for(i=1;i<s[x];i++)sRuta+="../";
	}
	return sRuta;
}

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

function idioma() {
	var s = location.search.substring(1,location.search[x]);
	var sId = '';
	var sArr = s.split("&");
	for (i=0; i<sArr[x]; i++) {
		s = sArr[i].split("=");
		if (s[0]=='lang' && isNaN(parseFloat(s[1]))) 
			if (s[1]=='i' || s[1]=='f') sId = s[1];
	}
	return sId;
}
function idiomaNum() {return (sIdioma=='i') ? 1 : (sIdioma=='f') ? 2 : 0;}

function iniTraducir(sId) {
	var oT,s;
	if (sRuta.indexOf('..')==-1) {
		oT = document.getElementById('DerContenido');
		s = reformHTML(oT.innerHTML);
		if (s.indexOf('menu')!=-1) oT.innerHTML = s.substring(s.lastIndexOf('</ul>')+5,s[x]);
	}
	
	oT = document.getElementById('IzqContenido');
	s = reformHTML(oT.innerHTML);
	if (s.indexOf('menu')!=-1) oT.innerHTML = s.substring(s.lastIndexOf('</ul>')+5,s[x]);
	
	if (sRuta.indexOf('..')==-1) {
		oT.innerHTML = construirMenu(menuIzq(),sId) + oT.innerHTML;
		oT = document.getElementById('DerContenido');
		oT.innerHTML = construirMenu(menuDer(),sId) + oT.innerHTML;
	} else {
		oT.innerHTML = construirMenu(menuSec(),sId) + oT.innerHTML;
	}
} 

function init(sId)	{
	if (window.top !== window.self) window.top.location = window.self.location;
	if (sId!=null) sIdioma = sId;
	iniTraducir(sIdioma);
	menuHorizontal(sIdioma);
	var s = document.body.innerHTML;
	if (esIE) s = reformHTML(s);
	document.body.innerHTML = revisarAcronimos(s);
	piePagina();
	if (o =	document.getElementById('php1'));
		o.parentNode.removeChild(o);
}

function menuHorizontal(sId) {
	var oL = listaMenuHorizontal();
	var iId = (sId=='i') ? 4 : (sId=='f') ? 8 : 0;
	if (sId!='') sId='?lang='+sId;
	var oM = document.getElementById('menuh');
	var s = '<ul>';
	s += '	<li><a href="http://www.iesagustindebetancourt.org' + sId + '" id="primero">' + oL[iId] + '</a>';
	s += '	<li><a href="javascript:mostrarContacto()">' + oL[1+iId] + '</a>';
	s += '	<li><a href="">' + oL[2+iId] + '</a>';
	s += '	<li><a href="http://maps.google.es/maps?f=d&amp;source=s_d&amp;saddr=28.411187,-16.55327&amp;daddr=&amp;hl=es&amp;geocode=&amp;mra=mi&amp;mrsp=0&amp;sz=18&amp;sll=28.411148,-16.553607&amp;sspn=0.003492,0.004823&amp;ie=UTF8&amp;ll=28.411148,-16.553607&amp;spn=0.003492,0.004823&amp;output=embed">' + oL[3+iId] + '</a>';
	s += '</ul>';	
	oM.innerHTML = s;
}

function mostrarContacto()	{
	var s = '<h1 class=cont>Contacto</h1>' +
			'<div class=contact><p class=cont>Polígono El Tejar s/n</p>' +
			'<p class=cont>38400 Puerto de La Cruz</p>' +
			'<p class=cont><img src="' + sRuta + 'img/tfno.png" alt="Teléfono" title="Teléfono" class=p0>922 383912 / 49</p>' +
			'<p class=cont><img src="' + sRuta + 'img/fax.png" alt="Fax" title="Fax" class=p0>922 371115</p></div>' +
			'<div class=linkExterno>' +
			'<p><strong>Mail:</strong>  <a target="_blank" href="mailto:38003963@gobiernodecanarias.org">38003963@gobiernodecanarias.<wbr/>org</a></p></div>';
	mostrarInfo(s);
}

function mostrarInfo(s) {
	s = revisarAcronimos(s);
	if (document.getElementById('contenido')) {
		document.getElementById('contenido').innerHTML = s;
		mostrarContenido('contenido')
	}
	else document.getElementById('Central').innerHTML = s;
}

function pintarCabecera(sTitle)	{
	var s = '<img id="logoAB" src="' + sRuta + 'img/logo.gif" alt="Logotipo del Instituto">';
	s += '<img id="logoGC" src="' + sRuta + 'img/logoGC.gif" alt="Logotipo del Gobierno de Canarias">';
	if (sTitle == "") {
		var cNumeroImg = 8;
		document.getElementById('cabecera').style.backgroundImage="url('" + sRuta + "img/cabecera" + (new Date).getDate() % cNumeroImg + ".jpg')";
	} else { 
		s+='<h1><div class="cur bRojo"><div class="cur bVerde" id=h1_tit>';
		s+=(Object.prototype.toString.call(sTitle)==='[object Array]')?sTitle[idiomaNum()]:sTitle;
		s+='</div></div></h1>';
	}
	document.write(s);
}

function piePagina() {
	document.getElementById('Central').innerHTML += '<br>&nbsp<br>&nbsp<br>&nbsp';
	var s=(sIdioma=='')?'Aviso legal':(sIdioma=='f')?'Avis juridique':'Legal notice';
	document.body.innerHTML += '<div id=pie><a href="' + sRuta + 'cont/textos/AvisoLegal.htm">'+s+'</a></div>';
}

function revisarAcronimos(s)	{
	var o = listaAcron(), i=0;

	while(i<o[x]) {
		var regex = new RegExp('\\b' + o[i++] + '\\b', 'g');
		s = s[y](regex, '<acronym title="' + o[i++] + '" xml:lang=es>' + o[i-2] + '</acronym>')
	}
	o = listaAbrev();
	i=0;
	while(i<o[x]) {
		var regex = new RegExp('\\b' + o[i++] + '\\b', 'g');
		s = s[y](regex, '<abbr title="' + o[i++] + '" lang=es>' + o[i-2] + '</abbr>')
	}
	return s
}

function reformHTML(s){
	s= s[y](/>\s*< */g,'>\n<')[y](/\/ *>/g,'>');
	s= s[y](/< *\/?(\w+)/g,function(c){
		return c.toLowerCase()
	});
	s= s[y](/\n< *(head|\/?body|div|h\d|p|fieldset|form|blockquote|ul|ol|dl|table\/html)/g,'\n\n<$1');
	var Rx=/<\w+[^>]+>/g;
	var pat,tem='',temp= '',str= '',x= 0;
	while((pat= Rx.exec(s)) != null){
		tem+= s.substring(x,pat.index);
		temp=pat[0];
		if(/; *charset *=/i.test(temp)==false){
			temp= temp[y](/\= *([^"\s]+(?=[ >]))/g,'=\"$1\"');
		}
		temp= temp[y](/[\w-]+ *\= */g,function(c){
			return c.toLowerCase()
		});
		temp=temp[y](/style *\= *"[^"]+/g,function(c){
			return c.toLowerCase()
		});
		tem+= temp;
		x= Rx.lastIndex;
	}
	tem+= s.substring(x);
	return tem;
}

function trimTag(s) {
	return s.substring(s.indexOf("<"));
}
function Toggle( secid )	{
	if (secid.indexOf('¬') == -1) {	
		var sectionId = document.getElementById(secid);
		if (sectionId.style.display == '') {
			sectionId.style.display = 'none';
			document.images["i" + secid].src = sRuta + "img/icoDesplegar.gif";}
		else	{
			sectionId.style.display = '';
			document.images["i" + secid].src = sRuta + "img/icoReplegar.gif";}
	}
}
function listaAcron() {
	return new Array(
	"AE",		"Administración de Empresas",
	"AMPA",	"Asociación de Madres y Padres de Alumnos",
	"BACH",	"Bachillerato",
	"BOC",	"Boletín Oficial de Canarias", 
	"BPA",	"Bachillerato para Personas Adultas",
	"BUP",	"Bachillerato Unificado Polivalente",
	"CLIL",	"Content and Language Integrated Language",
	"CFGM",	"Ciclo Formativo de Grado Medio",
	"CFGS",	"Ciclo Formativo de Grado Superior",
	"CGM",	"Ciclo de Grado Medio",
	"CGS",	"Ciclo de Grado Superior",
	"COU",	"Curso de Orientación Universitaria",
	"DNI",	"Documento Nacional de Identidad",
	"ESO",	"Educación Secundaria Obligatoria",
	"FCT",	"Formación Centro Trabajo",
	"FP",		"Formación Profesional",
	"IES",	"Instituto de Educación Secundaria",
	"LOGSE",	"Ley Orgánica General del Sistema Educativo",
	"LOPD",	"Ley Orgánica de Protección de Datos de Carácter Personal de España",
	"MEC",	"Ministerio de Educación y Ciencia",
	"NOF",	"Normas de Organización y Funcionamiento",
	"PAU",	"Prueba Acceso a la Universidad",
	"PEC",	"Proyecto Educativo de Centro",
	"PCE",	"Programa de Cualificación Profesional Inicial Conducente a Título de Graduado en Educación Secundaria Obligatoria",
	"PCPI",	"Programa de Cualificación Profesional Inicial",
	"PGA",	"Procesos de Gestión Administrativa",
	"SP",		"Bachillerato SemiPresencial",
	"RD",		"Real Decreto",
	"TIC",	"Tecnologías de la Información y Comunicación",
	"ULL",	"Universidad de La Laguna")
}
function listaAbrev() {
	return new Array(
	"1º",		"Primero",
	"2º",		"Segundo",
	"Dist",	"Distancia")
}

function listaMenuHorizontal(){
	return new Array(
		"Inicio","Contacto","Web Map","Cómo llegar",
		"Home","Contact","Web Map","Directions",
		"Accueil","Contact","Plan du site","Itinéraire")
}