/* TIEMPO DEL ZIGURAT DE ZHARR-NAGGRUND v1.0 */
var tiempo_hoy = 6;
var lluvia = 25;
//LLUVIA EN EL ZIGURAT
if(tiempo_hoy==1)
{
	/* RAYOS EN EL ZIGURAT v1.0 */
	var czz = document.styleSheets[0];
	var rgb1 = czz.cssRules[5].style.backgroundColor;
	var rgb2 = czz.cssRules[0].style.color;
	document.body.setAttribute("onload", "rrrr()");
	var links = document.body.getElementsByTagName("a");
	for(var i = 0; i < links.length; i++)
	{
		if(Math.floor(Math.random()*100) <= lluvia) links[i].setAttribute("onmouseout", "rrr()");
	}
	//A RRR
	function rrr()
	{
		var r1 = Math.round(Math.random()*2000);
		var r2 = Math.round(Math.random()*500);
		var r3 = r1+r2;
		setTimeout("pos()", r1);
		setTimeout("neg()", r3);
	}
	//BODY RRRR
	function rrrr()
	{
		var r1 = Math.round(Math.random()*120000);
		var r2 = Math.round(Math.random()*1000);
		var r3 = r1+r2;
		setInterval("pos()", r1);
		setInterval("neg()", r3);
	}
	//POSITIVO
	function pos()
	{
		czz.cssRules[5].style.backgroundColor="#FFF";
		czz.cssRules[0].style.color="#000";
	}
	//NEGATIVO
	function neg()
	{
		if (czz.cssRules[5].style.backgroundColor!=rgb1) czz.cssRules[5].style.backgroundColor=rgb1;
		if (czz.cssRules[0].style.color!=rgb2) czz.cssRules[0].style.color=rgb2;
	}
}

/* FUNCIONES DEL ZIGURAT DE ZHARR-NAGGRUND v1.0 */
//COOKIES: GET INFO
function get(name)
{
	var cookie, offset, end;
	cookie = " "+document.cookie;
	offset = cookie.indexOf(" "+name+"=");
	if(offset == -1) return undefined;
	offset += name.length+2;
	end = cookie.indexOf(";", offset)
	if(end == -1) end = cookie.length;
	return unescape(cookie.substring(offset, end));
}

//COOKIES: SET INFO
function set(name, value)
{
	var dias = 30; var date = new Date();
	date.setTime(date.getTime()+(dias*24*60*60*1000));
	var tiempo = date.toGMTString();
	document.cookie = name+"="+escape(value)+"; expires="+tiempo+"; path=/;"
}

//COMENDADOR: LLAMARLO
function comabrir()
{
	if(confirm("Si hacer sonar la campanilla, un eficiente servidor de usté hará acto de presencia. ¿Desea llamar al comendador?") == true)
	{
		obj1.style.display= "inline";
		obj2.style.height= "65%";
		if(obj3) obj3.style.display= "none";
		set("znn", "S");
	}
}

//COMENDADOR: EXPULSARLO
function comcerrar()
{
	if(confirm("Si esa es su última palabra, el comendador será relegado (de inmediato) a su celda. Sepa que, para cualquier otra ayuda o información, deberá acudir en lo sucesivo al claustro (al pie de página). ¿Procedemos con los látigos?") == true)
	{
		obj1.style.display= "none";
		obj2.style.height= "72%";
		if(obj3) obj3.style.display= "inline";
		set("znn", "N");
	}
}

//COMENDADOR: TEXTO DE META DESCRIPTION
function meta(objeto)
{
	var meta = document.getElementsByTagName("meta");
	var objetivo = document.getElementById(objeto);
	for(var i in meta)
	{
		if(meta[i].name == "description")
		{
			objetivo.innerHTML = meta[i].content;
		}
	}
}

/* COMENDADOR DEL ZIGURAT v1.0 */
var obj1 = document.getElementById("comendador");
var obj2 = document.getElementById("cuerpo");
var obj3 = document.getElementById("com");
var obj4 = document.getElementById("comimg");
var obj5 = document.getElementById("comtxt");

//LLAMA AL COMENDADOR...
var r = (Math.random()*20000)+10000;
var st = setTimeout("comendador(); var s = setInterval(\"comendador()\", r)", (Math.random()*5000)+7000);

if(get("znn")=="N")
{
	obj1.style.display= "none";
	obj2.style.height= "72%";
	if(obj3) obj3.style.display= "inline";
}
else
{
	obj1.style.display= "inline";
	obj2.style.height= "65%";
	if(obj3) obj3.style.display= "none";
}

//COMENDADOR: CARGAR IMAGEN
var img = new Array("g01", "g02", "g03", "g04", "g05", "g06", "g07", "g08", "g09", "g10", "g11");
var num = Math.floor(Math.random()*11);
var zn = img[num];
obj4.innerHTML = "<img class=\"com\" src=\"zn/obj/cmd/"+zn+".jpg\" style=\"cursor: pointer;\" onmouseover=\"s=clearTimeout(s);\" onmouseout=\"s=setInterval('comendador()', r);\" onclick=\"comendador();\" title=\"¡Comendador!\">";

/* COOKIES: SALAS DEL ZIGURAT v1.0 */
if(location.href.search("#")==-1)
{
	var url = location.href.slice(location.href.indexOf('=')+1);
}
else
{
	var url = location.href.slice(location.href.indexOf('=')+1, location.href.lastIndexOf('#'));
}
var len = url.length;
if(len <= 3)
{
	if(get("sid"))
	{
		if(get("sid").search(url)==-1) set("sid", get("sid")+"-"+url);
	}
	else
	{
		set("sid", url);
	}
}

/* COMENDADOR: SALAS DEL ZIGURAT v1 */
if(url==15)
{
	var sid_cookie = get("sid");
	var sid_array = sid_cookie.split("-");
	var sid_vistas = sid_array.length;
	var porcentaje = (sid_vistas*100/total);
	obj5.innerHTML = "Ha visitado &#8213;si los escribas no yerran&#8213; el "+porcentaje+"% del zigurat de Zharr-Naggrund.";
}
else if(url==4)
{
	meta("comtxt");
	var enlaces = document.body.getElementsByTagName("a");
	for(var i = 0; i < enlaces.length; i++)
	{
		enlaces[i].setAttribute("id", "galeria_"+i);
		enlaces[i].setAttribute("onmouseover", "texto_title(\"galeria_"+i+"\")");
		enlaces[i].setAttribute("onmouseout", "comendador(); s = setInterval(\"comendador()\", (Math.random()*20000)+10000)");
	}
	//COMENDADOR: TEXTO DE TITLE
	function texto_title(objetivo)
	{
		clearTimeout(st);
		clearInterval(s);
		var texto_title = document.getElementById(objetivo);
		obj5.innerHTML = texto_title.title;
	}
}
else
{
	meta("comtxt")
}

