var aListaTareas = new Array();
var ie4 = false;
var ns4 = false;
var ns6 = false;
var mac = false;
var ope = false;
if(navigator.userAgent.indexOf('Mac') != -1){
	mac = true;
}
if(navigator.userAgent.indexOf('Opera') != -1){
	ope = true;
}
if (navigator.appVersion >= '4') { 
	if (navigator.appName == 'Netscape') {
		ns4 = true;
		if (navigator.appVersion.charAt(0) == 5){ //Revisar, forma de saber si ns6
			ns4 = false;
			ns6 = true; 
		}
	}
	else { 
		ie4 = true; 
	} 
}
ie4= true;
ope=false;
if(ns4){ origWidth=innerWidth;origHeight=innerHeight;onresize=function(){if(innerWidth!=origWidth||innerHeight!=origHeight)location.reload()} }
function LimpiaArray(aLista)
{
	var aListaTemp = new Array(); 
	
	for (x=0;x<=aLista.length-1;x++) { if (aLista[x] != null) { aListaTemp[aListaTemp.length] = aLista[x]; }}
	return aListaTemp;
}	
function AniadirTarea(cTarea, cDesc, nPosicion)
{
	if (!isNaN(nPosicion)) {
	
		var aListaTemp = new Array(aListaTareas.length+1);
		var nSumando = 0;
		var nLength = 0
		aListaTemp[nPosicion] = new Array(); 
		aListaTemp[nPosicion][0] = cTarea;	
		aListaTemp[nPosicion][1] = cDesc;
		for (x=0;x<=(aListaTareas.length);x++) {
			if (x == nPosicion) {
				nSumando = 1;
				x++;
			}
			aListaTemp[x] = new Array();
			aListaTemp[x][0] = aListaTareas[x-nSumando][0];
			aListaTemp[x][1] = aListaTareas[x-nSumando][1];
		}
		aListaTareas = aListaTemp;
	}
	else {	
		nLength = aListaTareas.length
		aListaTareas[nLength] = new Array();
		aListaTareas[nLength][0] = cTarea;
		aListaTareas[nLength][1] = cDesc;
		nLength = aListaTareas.length
		aListaTareas = LimpiaArray(aListaTareas);
	}
}
function EliminarTarea(cDesc, nModo)
{
	for (x=0;x<(aListaTareas.length);x++) 
	{
		if (aListaTareas[x][1] == cDesc) 
		{ 
			aListaTareas[x] = null; 
			if (nModo == 0) { aListaTareas = LimpiaArray(aListaTareas); return true; }
		}
	}
	aListaTareas = LimpiaArray(aListaTareas);
	return false	
}
function EjecutarTareas() {	if (aListaTareas.length > 0) { eval(aListaTareas[0][0]); }}
function GetLayerRef(cLayer, lWithDoc)
{
	var nLyBucle;
	var GLayerRef = "";
	var templayer;
	if(isNaN(lWithDoc)){ lWithDoc=1;}
	if (ope==true) {
		if (lWithDoc == 0)	{ templayer = document.getElementById(cLayer); 	}	else { templayer = document.getElementById(cLayer).document; }
		return  templayer;
	}
	else if (ie4) {
		if (lWithDoc == 0)	{ templayer = document.all.item(cLayer); } else { templayer = document.all.item(cLayer).document; }
		return  templayer;
	}
	else if (ns4) {
		for (nLyBucle=0; nLyBucle < document.layers.length; nLyBucle++) {
			templayer = document.layers[nLyBucle];
			if ( templayer.id == cLayer ){
				if (lWithDoc == 0) { GLayerRef = templayer; } else { GLayerRef = templayer.document; }
			}
		}
		return GLayerRef;
	}
	else if (ns6) {
		if (lWithDoc == 0){templayer = document.getElementById(cLayer);}	
		else { 
			templayer = document.getElementById(cLayer).document; 
		}
		return templayer;
	}
}
function ExecuteFunction(cLayer, sFunctionName)
{
	var nLyBucle;
	var templayer;
	if (ope==true) {
		templayer = document.getElementById(cLayer); 
		return eval(sFunctionName+'()');
	}
	else if (ie4) {
		 return eval(sFunctionName+'()')
	}
	else if (ns4) {
		for (nLyBucle=0; nLyBucle < document.layers.length; nLyBucle++) {
			templayer = document.layers[nLyBucle];
			if ( templayer.id == cLayer ){ 
				eval('document.layers['+nLyBucle+'].'+sFunctionName+'()');
				break;
			}
		}
	}
	else if (ns6) {
		templayer = document.getElementById(cLayer)
		return eval(sFunctionName+'()')
	}
}
function ExecuteFunctionWithParam(cLayer, sFunctionName,sParameters)
{
	var nLyBucle;
	var templayer;
	var arrParameters;
	var sFormatParameters="";
	var i;
	arrParameters=sParameters.split (",");
	for (i=0;i<arrParameters.length-1;i++)
		{
		sFormatParameters+="\'"+arrParameters[i]+"\',";
		}
		sFormatParameters+="\'"+arrParameters[arrParameters.length-1]+"\'";
	if (ope==true) {
		templayer = document.getElementById(cLayer); 
		return eval(sFunctionName+'(\''+sParameters+'\')')
	}
	else if (ie4) {
		 return eval(sFunctionName+'('+sFormatParameters+')')
	}
	else if (ns4) {

		for (nLyBucle=0; nLyBucle < document.layers.length; nLyBucle++) {
			templayer = document.layers[nLyBucle];
			if ( templayer.id == cLayer ){ 
				eval('document.layers['+nLyBucle+'].'+sFunctionName+'('+sFormatParameters+')');
				break;
			}
		}
	}
	else if (ns6) {
		templayer = document.getElementById(cLayer)
		//return templayer;
		return eval(sFunctionName+'(\''+sParameters+'\')')
	}
}
function MoveLayer (cLayer, nPosx, nPosy)
{
	var  nLyBucle;
	if (ope==true) {
		document.getElementById(cLayer).style.left = nPosx;
		document.getElementById(cLayer).style.top = nPosy;
	}
	else if (ie4)
	{
		document.all.item(cLayer).style.pixelLeft = nPosx;
		document.all.item(cLayer).style.pixelTop = nPosy;
	}
	else if (ns4)
	{
		templayer = GetLayerRef(cLayer, 0)
		templayer.left = nPosx;
		templayer.top = nPosy;
	}
	else if (ns6) {
		document.getElementById(cLayer).style.left = nPosx;
		document.getElementById(cLayer).style.top = nPosy;
	}
}
function ResizeLayer ( cLayer, nWidth, nHeight)
{
	var  nLyBucle;
	if (ope==true) {
		document.getElementById(cLayer).style.pixelWidth = nWidth;
		document.getElementById(cLayer).style.pixelHeight = nHeight;
	}
	else if (ie4)
	{
		document.all.item(cLayer).style.pixelWidth = nWidth;
		document.all.item(cLayer).style.pixelHeight = nHeight;
	}
	else if (ns4)
	{
		templayer = GetLayerRef(cLayer, 0)
		templayer.resizeTo( nWidth, nHeight);
	}
	else if (ns6) {
		document.getElementById(cLayer).style.width = nWidth;
		document.getElementById(cLayer).style.height = nHeight;
	}
}
function SetzIndex (cLayer, nPos)
{
	var  nLyBucle;
	if (ope==true) {
		document.getElementById(cLayer).style.zIndex = nPos;
	}
	else if (ie4)
	{
		document.all.item(cLayer).style.zIndex = nPos;
	}
	else if (ns4)
	{
		templayer = GetLayerRef(cLayer, 0)
		templayer.zIndex = nPos;
	}
	else if (ns6) {
		document.getElementById(cLayer).style.zIndex = nPos;
	}
}
function SetTop (cLayer, nPos)
{
	var  nLyBucle;
	if (ope==true) {
		document.getElementById(cLayer).style.top = nPos;
	}
	else if (ie4)
	{
		document.all.item(cLayer).style.pixelTop = nPos;
	}
	else if (ns4)
	{
		templayer = GetLayerRef(cLayer, 0)
		templayer.top = nPos;
	}
	else if (ns6) {
		document.getElementById(cLayer).style.top = nPos;
	}
}
function SetLeft (cLayer, nPos)
{
	var  nLyBucle;
	if (ope==true) {
		document.getElementById(cLayer).style.left = nPos;
	}
	else if (ie4)
	{
		document.all.item(cLayer).style.pixelLeft = nPos;
	}
	else if (ns4)
	{
		templayer = GetLayerRef(cLayer, 0)
		templayer.left = nPos;
	}
	else if (ns6) {
		document.getElementById(cLayer).style.left = nPos;
	}
}
function SetWidth (cLayer, nPos)
{
	var  nLyBucle;
	if (ope==true) {
		document.getElementById(cLayer).style.pixelWidth = nPos;
	}
	else if (ie4)
	{
		document.all.item(cLayer).style.pixelWidth = nPos;
	}
	else if (ns4)
	{
		templayer = GetLayerRef(cLayer, 0)
		templayer.resizeTo(nPos, GetHeight(cLayer));
	}
	else if (ns6) {
		document.getElementById(cLayer).style.width = nPos;
	}
}
function SetHeight (cLayer, nPos)
{
	var  nLyBucle;
	if (ope==true) {
		document.getElementById(cLayer).style.pixelHeight = nPos;
	}
	else if (ie4)
	{
		document.all.item(cLayer).style.pixelHeight = nPos;
	}
	else if (ns4)
	{
		templayer = GetLayerRef(cLayer, 0);
		templayer.resizeTo(GetWidth(cLayer), nPos);
	}
	else if (ns6) {
		document.getElementById(cLayer).style.height = nPos;
	}
}
function GetWidth(cLayer) {
	var nLyBucle;
	var GWidth = 0;
	if (ope==true) {
		return parseInt(document.getElementById(cLayer).style.pixelWidth)
	}
	else if (ie4) { return document.all.item(cLayer).clientWidth; }
	else if (ns4) {
		templayer = GetLayerRef(cLayer, 0)
		GWidth = templayer.document.width;
		return GWidth;
	}
	else if (ns6) {
		return parseInt(document.getElementById(cLayer).style.width);
	}
}
function GetHeight(cLayer) {
	var nLyBucle;
	var GHeight = 0;
	if (ope==true) {
		return parseInt(document.getElementById(cLayer).style.pixelHeight)
	}
	else if (ie4) { return document.all.item(cLayer).clientHeight; }
	else if (ns4) {
		templayer = GetLayerRef(cLayer, 0)
		GHeight = templayer.document.height;
		return GHeight;
	}
	else if (ns6) {
		return parseInt(document.getElementById(cLayer).style.height);
	}
}
function GetLeft(cLayer)
{
	var nLyBucle;
	var GLeft = 0;
	if (ope==true) {
		return parseInt(document.getElementById(cLayer).style.left);
	}
	else if (ie4) { return document.all.item(cLayer).style.pixelLeft; }
	else if (ns4) {
		templayer = GetLayerRef(cLayer, 0)
		GLeft = templayer.left;
		return GLeft;
	}
	else if (ns6) {
		return parseInt(document.getElementById(cLayer).style.left);
	}
}
function GetzIndex(cLayer) {
	var nLyBucle;
	var GzIndex = 0;
	if (ope==true) {
		return parseInt(document.getElementById(cLayer).style.zIndex);
	}
	else if (ie4) { return document.all.item(cLayer).style.zIndex; }
	else if (ns4) {
		templayer = GetLayerRef(cLayer, 0)
		GzIndex = templayer.zIndex;
		return GzIndex;
	}
	else if (ns6) {
		return parseInt(document.getElementById(cLayer).style.zIndex);
	}
}
function GetTop(cLayer)
{
	var nLyBucle;
	var GTop = 0;
	if (ope==true) {
		return parseInt(document.getElementById(cLayer).style.top);
	}
	else if (ie4) { 
		return document.all.item(cLayer).style.pixelTop;
	}
	else if (ns4) {
		templayer = GetLayerRef(cLayer, 0)
		GTop = templayer.top;
		return GTop
	}
	else if (ns6) {
		return parseInt(document.getElementById(cLayer).style.top);
	}
}
function ChangeLayerContent(cLayer, cContent) {
	var  nLyBucle;
	if (ope==true) {
		// No funciona	
	}
	else if (ie4) { 
		document.all.item(cLayer).innerHTML = cContent; }
	else if (ns4)
	{
		templayer = GetLayerRef(cLayer, 0);
		templayer.document.write (cContent);
		templayer.document.close();
	}
	else if (ns6) {
			document.getElementById(cLayer).innerHTML = cContent;
	}
}
function ClipLayer (cLayer, nLeft, nTop, nRight, nBottom)
{
	var  nLyBucle;
	if (ope==true) {
		//No funciona
	}
	else if (ie4)
	{
	    document.all.item(cLayer).style.clip = "rect(" + nTop + "px " + nRight + "px " + nBottom + "px " + nLeft + "px)" ;
	}
	else if (ns4)
	{
		templayer = GetLayerRef(cLayer, 0)
	    templayer.clip.top = nTop 
	    templayer.clip.left = nLeft 
	    templayer.clip.bottom = nBottom 
	    templayer.clip.right = nRight 
	}
	else if (ns6) {
			document.getElementById(cLayer).style.clip = "rect(" + nTop + "px " + nRight + "px " + nBottom + "px " + nLeft + "px)";
	}
}
function ChangeVisibility(cLayer, nEstado){
	var  nLyBucle;
	if (ope==true) {
		if (nEstado == 1)
			document.getElementById(cLayer).style.visibility = "visible";
		else
			document.getElementById(cLayer).style.visibility = "hidden";
	}
	else if (ie4)
	{
		if (nEstado == 1)
			document.all.item(cLayer).style.visibility = "visible";
		else
			document.all.item(cLayer).style.visibility = "hidden"; 
	}
	else if (ns4)
	{
		templayer = GetLayerRef(cLayer, 0)
		if (nEstado == 1) { templayer.visibility = "show"; } else { templayer.visibility = "hidden"; }
	}
	else if (ns6) {
		if (nEstado == 1)
			document.getElementById(cLayer).style.visibility = "visible";
		else
			document.getElementById(cLayer).style.visibility = "hidden";
	}
}
function GetVisibility(cLayer){
	var  nLyBucle;
	var lEstado; 		// Estado de la capa 1 visible - 0 invisible - 3 ni se sabe
	if (ie4)
	{
		if (document.all.item(cLayer).style.visibility == "visible") {	lEstado = 1;}
		else if (document.all.item(cLayer).style.visibility == "hidden") {	lEstado = 0; }
		else	{lEstado = 3}		
	}	
	else if (ns4)
	{
		templayer = GetLayerRef(cLayer, 0)
		if (templayer.visibility == "show") { lEstado = 1; }
		else if (templayer.visibility == "hidden") { lEstado = 0; }
		else { lEstado = 3; }
	}
	else if (ns6) {
		if (document.getElementById(cLayer).style.visibility == "visible") {	lEstado = 1;}
		else if (document.getElementById(cLayer).style.visibility == "hidden") {	lEstado = 0;}
		else	{lEstado = 3}		
	}
	return lEstado;
}
function MouseX() { 
		return (event.clientX + document.body.scrollLeft);
}	
function MouseY() {
		return (event.clientY + document.body.scrollTop);
}
function abrirPopUp(link, width, height) 
{   
	var ventana = window.open (link, "_blank", "toolbar=no,scrollbars=no,menubar=no,location=no,directories=no,status=no,resizable=no,width="+width+",height="+height); 
}
function abrirPopUpCorner(link, width, height) 
{   
	var ventana = window.open (link, "_blank", "toolbar=no,scrollbars=no,menubar=no,location=no,directories=no,status=no,resizable=yes,title=no,width="+width+",height="+height+", top=0, left=0"); 
}
function abrirPopUpScrollBar(link, width, height) 
{   
	var ventana = window.open (link, "_blank", "toolbar=yes,scrollbars=yes,menubar=yes,location=no,directories=no,status=no,resizable=no,width="+width+",height="+height); 
}