function getpos(ref) {
	obj = document.getElementById(ref);
	if (obj == null) obj = ref;
	var curleft = 0;
	var curtop = 0;
	if (obj.offsetParent) {
		curleft = obj.offsetLeft
		curtop = obj.offsetTop
		while (obj = obj.offsetParent) {
			curleft += obj.offsetLeft
			curtop += obj.offsetTop
		}
	}
	out = new Array();
	out['left'] = curleft;
	out['top'] = curtop;
	return out;
}

	
function setpos(ref, tgt, offX, offY) {
	pos = getpos(ref);
	document.getElementById(tgt).style.left = pos['left'] + offX;
	document.getElementById(tgt).style.top = pos['top'] + offY;
}


function setpopsize(w,h) {
	document.getElementById('popframe').style.width=w;
	document.getElementById('popframe').style.height=h;
	document.getElementById('popspan').style.width=w;
	document.getElementById('popspan').style.height=h;
}


var pop_top_off = 400;




function CenterPop(id, pw,ph) {
	var left_off = 0 - Math.floor(pw / 2);
	var top_off = 0 - Math.floor(ph / 2);

	elm = document.getElementById(id);	
	
if(document.all) {
	wintop = document.body.scrollTop;
//  if (confirm("leftoff:"+left_off+" topoff:"+top_off+" wintop:"+wintop)) clearInterval(CPTO);
	elm.style.pixelLeft = Math.floor(document.body.clientWidth / 2) + left_off;
	elm.style.pixelTop = Math.floor(document.body.clientHeight / 2) + top_off + wintop;
//	if (elm.style.pixelTop < 200) elm.style.pixelTop = 200;
	Type = 'A';
	}
else if(document.layers) {
  wintop = window.pageYOffset;
	elm.left = Math.floor(window.innerWidth / 2) + left_off;
	elm.top = Math.floor(window.innerHeight / 2) + top_off + wintop;
	if (elm.top < 200) elm.top = 200;
	Type = 'B';
	}
else if(document.getElementById) {
  wintop = window.pageYOffset;
	newval = (Math.floor(window.innerHeight / 2) + top_off-13 + wintop);
//  if (confirm("leftoff:"+left_off+" topoff:"+top_off+" wintop:"+wintop+" newval:"+newval)) clearInterval(CPTO);
	elm.style.left = (Math.floor(window.innerWidth / 2) + left_off-13) + 'px';
//	if (newval < 200) newval = 200;
	elm.style.top = newval+'px';
	Type = 'C';
	}
}


function ShowMask() {
	elm = document.getElementById('popspan');	

	if (document.width) {
		elm.style.width = (document.width)+'px';
		elm.style.height = ((window.innerHeight > document.height)? window.innerHeight : document.height)+'px';
	} else {
		elm.style.width = (document.body.scrollWidth);
		elm.style.height = (document.body.scrollHeight);
	}

	elm.style.visibility = "visible";
	elm.style.display = "";
}


var CPTO = null;
var POP_IS_ON = 0;
function StartPop(pw,ph,url) {
	if (CPTO != null) StopPop();
	setpopsize(pw,ph);
	popframe.location.replace(url);
	CPTO = setInterval("CenterPop('popframe', "+pw+", "+ph+")", 100);	
	POP_IS_ON = 1;

	ShowMask();
	document.getElementById('popframe').style.visibility = "visible";
}

function StopPop() {
	document.getElementById('popspan').style.visibility='hidden';
	document.getElementById('popspan').style.display='none';
	document.getElementById('popframe').style.visibility = "hidden";
	clearInterval(CPTO);
	CPTO = null;
	popframe.location.replace('about:blank');
	POP_IS_ON = 0;
}

function BlockPop(e) {
	if (!e) var e = window.event; var tg = (window.event) ? e.srcElement : e.target;
	if (tg.id != 'popspan' && POP_IS_ON == 1) return false;
}



function logon() {
	StartPop(340,310, '/LOGIN/login.php');
	return;
}

function poplogon(dest_url) {
	StartPop(340,300, '/LOGIN/login.php?dest_url='+dest_url);
	return;
}


var conf_url = '';
function confirma(msg,dest) {
	conf_url = dest;
	p = document.getElementById('confpop');
	s = p.style;
	o =  '<TABLE id=poptable class=poptab cellspacing=0><tr><td class=tl></td><td></td><td class=tr></td></tr>\n';
	o =o+'<tr><td></td><td class=m><div class=close><A href="javascript:void(0)" onclick="doConfirm(0)">cerrar [X]</A></div>\n';
	o =o+'<div style="height:80; margin-top:20; vertical-align:center">'+msg+'<br></div><center>\n';
	o =o+'<button onclick="doConfirm(1)">Confirmar</button>&nbsp;<button onclick="doConfirm(0)">Cancelar</button><br>\n';
	o =o+'</td><td></td></tr><tr><td class=bl></td><td></td><td class=br></td></tr></table>';

	p.innerHTML = o;
	ShowMask();
	CenterPop('confpop', 300, 200);
	CPTO = setInterval("CenterPop('confpop', 300, 200)", 100);
	s.visibility = 'visible';	
}

function alerta(msg) {
	p = document.getElementById('confpop');
	s = p.style;
	o =  '<TABLE id=poptable class=poptab cellspacing=0><tr><td class=tl></td><td></td><td class=tr></td></tr>\n';
	o =o+'<tr><td></td><td class=m><div class=close><A href="javascript:void(0)" onclick="doConfirm(0)">cerrar [X]</A></div>\n';
	o =o+'<table style="height:80; margin-top:20; vertical-align:center"><tr><td width=40 valign=top><img src=/GIF/?alerta></td>\n';
	o =o+'<td valign=top><font style=\"font-size:12pt; color:#f00000\">Error:</font><br>'+msg+'</td></tr></table>\n';
	o =o+'<center><button onclick="doConfirm(0)">Aceptar</button><br>\n';
	o =o+'</td><td></td></tr><tr><td class=bl></td><td></td><td class=br></td></tr></table>';

	p.innerHTML = o;
	ShowMask();
	CenterPop('confpop', 300, 200);
	CPTO = setInterval("CenterPop('confpop', 300, 200)", 100);
	s.visibility = 'visible';	
}

function doConfirm(val) {
	clearInterval(CPTO);
	p = document.getElementById('confpop');
	p.innerHTML = '';
	p.style.visibility = 'hidden';
	document.getElementById('popspan').style.visibility = 'hidden';

	if (conf_url.substr(0,3) == 'js:') {
		act = conf_url.substr(3);
		act = act.replace('{val}', val);
		setTimeout(act, 1);
	}
	else {
		if (val == 1) window.location = conf_url;
		else return false;
	}
}


function SelectUpdate(ops,val) {
for (i = 0; i < ops.length; i++) {
	if (ops.options[i].value == val) {
    	ops.selectedIndex = i
        return
    }
}
}

function setIni(ini) {
	forma.ini.value = ini;
	forma.submit();
}

function noEnter(e){
	var evtobj=window.event? event : e;
  if(evtobj.keyCode == 13) return false;
}

function Salida(sid) {
	confirma('¿Terminar la Sesión?', '/LOGIN/logout.php?sid='+sid);
}



function SetFocus() {
	var newpos = 200;
	switch(Type) {
		case 'A': document.body.scrollTop = newpos; break;
		case 'B': 
		case 'C': window.pageYOffset = newpos; break;
	}
}


function page_sec(n,dest) {
	sectab = document.getElementById('mainsecs').rows[0];

	nsec = sectab.cells.length;
	for (i = 0; i < nsec; i++) {
		if (i == n) {
			sectab.cells[i].style.backgroundColor="#B42C00";
			sectab.cells[i].style.color='#ffffff';
		}
		else {
			sectab.cells[i].style.backgroundColor="";
			sectab.cells[i].style.color='#4F1600';
		}
	}

	dediv = document.getElementById('descdiv').style;
	frdiv = document.getElementById('framediv').style;
	cadiv = document.getElementById('cargadiv').style;
	document.getElementById('deraddon').style.display='none';	
	if (n == 0) {
		framewin.location.replace("about:blank");
		dediv.display = '';
		frdiv.display = 'none';
		cadiv.display = 'none';
	}
	else {
		cadiv.display = '';
		frdiv.display = 'none';
		dediv.display = 'none';
		framewin.location.replace("about:blank");
		frameHeight(0);
		framewin.location.replace("/show.php?tipo="+tipocta+"&sec="+n+"&dest="+dest);
	}
	sec_act = n;
	
}

function hideLoader() {
	if (framewin.location.href != 'about:blank') {
		document.getElementById('framediv').style.display='';
		document.getElementById('cargadiv').style.display='none';
	}
}


var old_fr_hei = 0;
function frameHeight(hei) {
	if (old_fr_hei == 0) old_fr_hei = document.getElementById('framediv').style.height;
	if (hei == 0) 
		document.getElementById('framediv').style.height=old_fr_hei;
	else 
		document.getElementById('framediv').style.height=hei;
}

function ev_hlite(n) { framewin.ev_hlite(n); }

function gotoPage(url) {
	if (esplay == 1) {
		esplay = 0;
		return;
	}
	window.top.location = url;
}

function gotoB(dest) {
	window.top.location = '/banda.php?dest='+dest;
}


function adapta() {
	fd = framewin.document;
	h = (typeof(fd.height) != "undefined") ? fd.height : fd.body.scrollHeight;
	if (h == 0) { setTimeout("adapta()", 100); return; }
	if (h > 540) frameHeight(h+10);
}


function setContent(id, data) { document.getElementById(id).innerHTML = data; }
function setStyle(id, elm, data) { document.getElementById(id).style[elm] = data; }


// *****************************************************
// MOSTRAR ENTRADA EN BLOG
function goBLOG(dest,num) {
	url = "/BLOGS/blogs_fullscreen.php?nohead=1&dest="+dest+"&num="+num;
	framewin.location.replace(url);
	window.scrollTo(0,0);
}


// *****************************************************
// LANZAR LECTOR ROLOTECA
function roloteca(apo) {
 	dest = apo.toLowerCase();
	wimpy_plist = '/MEDIA/'+dest.charAt(0)+'/'+dest+'/mylist.xml';
  n = 1;
  
	zoplayer = window.open('', 'zoplayer', 'width=520,height=350,scrolling=no');
	if (zoplayer == null || typeof(zoplayer.act_plist) == 'undefined') {
		zoplayer = window.open('/lector.php?mlist='+apo, 'zoplayer', 'width=520,height=350,scrolling=no');
    return;
  }

  if (zoplayer.shuffle == 0) {
    zoplayer.location = '/lector.php?mlist='+apo;
    return;
   }

	esp = zoplayer.changePlist(wimpy_plist);
	setTimeout('zoplayer.lectura('+n+')', 1000);
}