// JavaScript Document

/////////////////////////// zone tabs

var AJAX= new oAJAX("serv10.php",llegada,infoerror);
var appver='1.2.0';
var init=now(); 
var myses=null; // my session
var oln=-1; // online
var me=null,dest='*',lspn=null;
var zt=null;
var lt=null;
var moreifo=Array();
var lns=1;



var thef=Array();
var thes=Array();

var stts= Array('no grato','sin voz','no-registrado','registrado','special-user','mini-estrella','estrella','super-estrella','mega-estrella','disk jockey','crown-user','CIBOR','SEMI-OP','HALF-OP','OPERADOR','HALF-ADMIN','ADMIN','SUPER-ADMIN','RESERV-ERIKA','RESERV-ANGIE','ADMIN-REBELDE','MEGA-ROBOT','ROBOT-KILLER','OWNER');

createzonetabs('ctn_halls','hzclick');

var slph=Array('ph/page01.jpg','ph/page02.jpg','ph/page03.jpg');
var sltx=Array('Comunidad InFoTeLe, Tu puedes unirte con nosotros hoy mismo...','Contamos con una gran comunidad de casi todas las partes del mundo... unidos todos en la comunidad de Fans de Facebook...','Ya no estas solo, Nuestra Comunidad ha llegado para alegrarte la vida... Cuentale de nosotros a tus amigos tambien...');
	
function createzonetabs(pa,cl){ //name, onclick
	zt=create_zone(pa,'hallzone');
	_sa(zt,'oclick',cl);
	addtab(zt,'tbwel','#InFoTeLe');
	tabclick(_go('tbwel'));
}

function addtab(w,i,t,c){
	w=_ob(w); if (c==null) c='tab';
	var to=0, tbo=_chl(w,0,0,0,0,0); if (t==null) t=i;
	var nw=_ce('td'); nw.innerHTML=t; 

	
	_sa(nw,'tab',c);
	nw.onclick=function(){tabclick(this)};
	nw.ondblclick=function(){closetab(this)};
	nw.id=i; _cn(nw,c+'2'); _ac(tbo,nw);
	return nw;
}

function closetab(w){
	var pa=_p1(w,6).id;
	if (w.id=='tbwel') return; 
	var n=_ns(w); if (n==null) n=_ps(w);
	if (n!=null){ tabclick(n);	_rm(w); lookspl(pa)}
}


function tabclick(w){
	var add='';
	var pa=_p1(w,6); var cl=_ga(pa,'oclick');
	var tb=_ga(w,'tab');
	
	if (lt!=null) _cn(lt,tb+'0'); 
	_cn(w,tb+'1');
	
	lt=w; //lspn=spn;
	if (cl!=null) try {	eval(cl+'(w);'); } catch(e){}
	
}

function hzclick(w){
	if (lspn!=null) lspn.innerHTML=_go('wrimain').innerHTML;
	dest=(w.id=='tbwel')?'*':w.id.substr(1);
	var mtr=(dest=='*')?_chl(_go('tbusers'),0,0):_go(dest+"_");
	var spn=_chl(mtr,0,1); 
	_go('wrimain').innerHTML = spn.innerHTML;
	lspn=spn;
	maxscroll();
	_go('txMess').focus(); 
	checkinout();
	putstyle();
}

function create_zone(w,n){ //where , id
	w=_ob(w); //alert(w.id)
	var add='<div id="'+n+'" class="dvzone0"><div class="dvzone1"><div class="dvzone2"><table height="100%" border="0" cellpadding="0" cellspacing="0"><tr></tr></table></div></div><div class="dvle" onclick="leclick(this)" style="display:none"></div><div class="dvri" onclick="riclick(this)" style="display:none"></div></div>';
	w.innerHTML=add;
	return _go(n);
}
	
function riclick(w){ // click a la derecha;
	var dvzh=_p1(w);
	relocate(dvzh,1);	
} 

function leclick(w){ // click a la Izq
	var dvzh=_p1(w);
	relocate(dvzh,-1);
} 
	
function relocate(dvzh,di){ // accion scroll
	var to=0, tr=_chl(dvzh,0,0,0,0,0); //alert(tr.tagName)
	var gz=_chl(dvzh),cc=Array(),gg=0; cc[0]=0;
	for( var cn=0; cn<tr.childNodes.length; ++cn){
		to+=_wi(tr.childNodes[cn]);	cc[cn]=to;
		if ((to-20)>gz.scrollLeft){
			if (di==1){	gg=cn; break;
			}  else { gg=cn-2; break;}
	}}
	gz.scrollLeft=cc[gg]-20;
	lookspl(dvzh);
}

function lookspl(dvzh){ // mirar si necesita scroll
	dvzh=_ob(dvzh);	var gz=_chl(dvzh);
	if ((_wi(gz)+gz.scrollLeft)>=_ws(gz)) _dp('none',_chl(dvzh,2));
	else _dp('',_chl(dvzh,2));
	
	if (gz.scrollLeft<=0) _dp('none',_chl(dvzh,1)); else 
	_dp('',_chl(dvzh,1));
}	


////////////////////////////////////////////////////////////////////////////////////////////

/*for (t=1; t<40; t++){
	insertuser('user=user'+t);
}*/

 function clinkk(tx) {  
 	var aa="http://"+tx
	
	switch(tx){
	case "qvanos.net":	
	return stdimg('q.png',14,14);
	break;
	/*case "PrecioCubano.com":	
	return ', web amiga: <a href="'+aa+'" target="_blank">www.'+aa+'</a>';
	break;*/
	}
 }  


function enteruser(w,frn){
	
	//alert(w);
	//alert(clinkk(frm));
	var i=_sp(w);	
	var nu=insertuser(w);
	_dp('',nu);
	var us=formate(i,3);
	if (i.stt==0) us="USERBAN"+i.id+" ----> ("+us+")";
	if (frn.trim()!='') us+=" "+clinkk(frn)+"";
	//alert(moreifo[i.user])
	if (moreifo[i.user]){
		us+=" ["+moreifo[i.user]+"]";
		delete(moreifo[i.user]);
	}
	
	var cls='<a class="enter">*** ENTRA: </a>'; if (i.stt<2) cls='<a class="system">*** <b>VER:</b> </a>';
	
	if (i.stt>1 || (i.stt<2 && me.priv&64==64)){
		var tx=cls+us+'<br>';
		writetxt('*',tx);
	}

	checkinout();
	
}

function listuser(w){
	var iu=insertuser(w);
	_dp('',iu);
}

function now(){
	return new Date().getTime()	
}

function changepriv(w){
	var i=_sp(w);
	
	var ni=i.user+"_";
	
	if(nu=_go(ni)){
		var oi=_sp(_ga(nu,'data'));
		insertuser(w);
		var ad=(oi['stt']!=i['stt'])?"cambia estado ["+stts[i.stt]+"] ":"modifica privilegios";
		var tx='<a class="system">*** <b>'+i.oper+'</b> '+ad+' a <b>'+i.user+"</b>...";
		
		tx+="<br>";
		if (i.user==me.user) retock(i);
		writetxt('*',tx);
	}
}


function reloaduser(w){
	var i=_sp(w);	
	var ni=i.user+"_";
	if(nu=_go(ni)){
		insertuser(w);
		var tx='<a class="system">*** <b>'+i.oper+'</b> Modifica perfil de <b>'+i.user+"</b>...<br>";
		if (i.user==me.user) retock(i);
		writetxt('*',tx);
	}
}

function formate(i,c){
	var re='<a class="lnkblue" onclick="putnick(\''+i.user+'\');">'+i.user+'</a>';
	if ((c&4)==4) re='<span class="us01 stt'+i.stt+'" onclick="putnick(\''+i.user+'\');">'+i.user+'</span>';
	if ((c&1)==1) re=stdimg('s'+i.sex.toLowerCase()+'.gif',14,14)+re;
	var co=i.cou.split(":");
	if ((c&2)==2) re+=" ["+stts[i.stt]+"] ";
	if ((c&2)==2) re+='desde: '+stdimg('fl/'+co[1].toLowerCase()+'.png',16,11)+' '+co[0]+', con: '+stdimg(i.nav+'.gif',14,14)+" "+navType[i.nav]+"";
	return re;
}

function putnick(w){
	if (oln==1){
		if (_gv('txMess')!='') w=" "+w
		_go('txMess').value+=w+" ";	
		_go('txMess').focus();
	}
}

function info(i){
	var re=' <a class="stt'+i.stt+' lev'+i.lev+'"><b>'+i.user+'</b></a> [ ';
	re=stdimg('s'+i.sex.toLowerCase()+'.gif',14,14)+re;
	var co=i.cou.split(":");
	re+= stdimg('fl/'+co[1].toLowerCase()+'.png',16,11)+ co[0]+' ] <i>nav:</i> ' + stdimg(i.nav+'.gif',14,14);
	return re;
}

function stdimg(s,w,h){
	return '<img src="im/'+s+'" align="absmiddle" width="'+w+'" height="'+h+'" /> ';
}

	function insertuser(w){
		
		//alert(w)
		var i=_sp(w);
		if (i.lnk==null) i.lnk=0;
		var co=i.cou.split(":");
		var ni=i.user+"_";
		var nu=null;
		nu=_go(ni);
		//alert(ni + " " +nu)
		var tu=_chl(_go('tbusers'),0,0);
		if (nu==null){
			
			nu=tu.cloneNode(T);
			_chl(nu,0,1).innerHTML='';
			
		}
		
		
		
		nu.id=ni; //_sa(nu,'id',ni)
		_sa(nu,'lki',now());
		nu.onmousedown=function(e){submenu(e,nu)}
		_sa(nu,'data',w);
		for (it in i) if (it!='id') _sa(nu,it,i[it]);
				
		//_dp('',nu);
		
		var ii='<img src="im/stt'+i.lnk+'.gif" width="16" height="16" align="absmiddle">';
		var tus=(i.stt==0)?('USERBAN'+i.id):i.user
		_ih(_chl(nu,1),ii+tus); //caption
		
		_chl(nu,0,0).src='im/fl/'+co[1].toLowerCase()+".png"; // bandera
		_chl(nu,2,0).src='im/s'+i.sex.toLowerCase()+".gif"; // sexo
		_chl(nu,3,0).src='im/'+i.nav+".gif"; // navigator
		_cn(_chl(nu,1),"us01 star"+i.lev+" stt"+i.stt); // estrellas
		
		
		var bef=reu(_p1(tu),i); // reubicar
		if (bef==null) _ac(_p1(tu),nu);
		else _ib(_p1(tu),nu,bef);
		
		seethetotal();
		return nu;
		
	}	
	
	function seethetotal(){
		var tu=_chl(_go('tbusers'),0,0);
		var c=0;
		do {
			if (_gdp(tu)!='none') c++;
			tu=_ns(tu);
		} while(tu!=null)
		_ih('maxconn',c);
	}
	
	function reu(p,u){
		var un=u.user.toLowerCase();
		var su=parseInt(u.stt);
		var be=_chl(p,0);
		be=_ns(be);
		while (be!=null){
			var us=_ga(be,'user').toLowerCase();
			if (us!=un){	
				var st=parseInt(_ga(be,'stt'));
				if (st<su) break;
				else if (st==su) if (us>un) break;			
			}
			be=_ns(be);
		} return be;
	}
	

////////////////////////////////////////////////////////////////////////////////////////////

function serverinuse(){
	if (confirm('La session esta abierta, si termina esta session puede que desconecte algun otro usuario en la pc, desea terminar la session?')){
		//alert(1);
		addinfo('a=endsession&q=1',1,0)
	}	
}

var glak=0;
function server_conected(lak){
	glak=lak;
	//alert('conectado');
	if(ss=_gcv('val')){}else{_scv('val',myses); _scv("lns",'0');}
	_di(F,'txUs','txPw','txSx','btLg')
	oln=0; // 0 es conectado al menos
	
	lns=_gcv('lns');
	if (lns==null){	lns=1;_scv("lns",'1')}
	
	facebook();
	//radio()
	
}

function radioped(){
	_ih('showDET','<br><table width="100%" border="0" cellspacing="3" cellpadding="0"><tr><td align="right" valign="top">T&iacute;tulo/Tema:</td><td><textarea name="pwrant" cols="15" id="pwrant"></textarea></td></tr><tr><td align="right">Dedicado a:</td><td><input name="pwrnew" type="password" id="pwrnew" size="20" maxlength="20" ></td></tr><tr><td height="37" align="right">&nbsp;</td><td><input type="submit" name="pwrbut" id="pwrbut" value="Enviar peticion"  onClick="sendpet();"></td></tr><tr><td colspan="2" align="right" id="profmess">&nbsp;</td></tr></table>');
	_ih('ShowTIT','Petici&oacute;n de M&uacute;sica:');	_dp('','dvMenu2');
}

function sendpet(){
	_dp('none','dvMenu2');
}

function radio(w){
	var s1 = new SWFObject("player.swf","ply","328","20","9","#FFFFFF");
	s1.addParam("allowfullscreen","true");
	s1.addParam("allowscriptaccess","always");
	s1.addParam("flashvars","file=http://"+w+"/;stream.nsv&type=mp3&volume=50&autostart=false");
	s1.write("dvradio");
	//alert(w);
}

function usrLogin(){ // evn: btLg_click
	var us=_gv('txUs');
	if (us.length<19){
		if (isv(us)==true){
			var tx=_pv('txUs','txPw','txSx','myses','lns','txMono');
			//alert(tx)
			addinfo("a=login&"+tx,1);
			_di(T,'txUs','txPw','txSx','btLg');
			_vi('visible','tracc');
		} else alert('El nombre de usuario no es válido');
	} else alert('El usuario debe tener al menos 4 letras y menos de 19...');
}

var lki=0, da=null;

function loginok(w,w1,vri){
	

	//alert("welcome: "+w1);
	me=_sp(w); oln=1;
	da=_sp(w1);
	lki=now();
	
	if (vri==0 && me.stt>1) _scv("lns",parseInt(lns)+1);
	//alert(lki);

	_dp('','usersbar','toolbar','messbar');
	_dp('none','presstb');
	opacto(_go('wrilogin'),9,0, function(){_dp('none','wrilogin');});
	_vi('hidden','tracc');
	_scv('luser',me.user);
	retock(me);
	
	
}


function loginerror(){
	alert('Error en contrasena de usuario...');
	_di(F,'txUs','txPw','txSx','btLg')	
	_vi('hidden','tracc');
	
		
}
//////////////////////////////////////////////// ********************************

function privuser(o){
	var us=_ga(o,'user');
	if (us==me.user) return;
	var ex=_go("_"+us);
	if (ex==null) ex=addtab(zt,"_"+us,us);
	tabclick(ex);
	_go('txMess').focus();
	//alert(_ga(o,'user'));
}


///////////////////////////////////////////////

function credits(cr){
	cr='<a class="system">*** '+cr+'</a>';
	writetxt('*',cr);
}

function topic(tp){

	tp='<a class="system">*** <b> </b>'+tp+'</a>';
	writetxt('*',tp);
}

function isv(w){
	//return T;
	if (w.match(/^([A-Za-z0-9_]{4,20})+$/)){
	 try{
		eval("var "+w+"=1;");
		return T;
	}catch(e){}
	} return F;
		
}

function show_usst(){
	_dp('','us_stt');
}

function unkw(q){// desconozco
	//if (q!='') alert('Comando desconocido: '+q);
}

function otheru(){
	
	_dp('','txUs');
	_ih('luser','');
	_vi('hidden','troth');	
}

//////////////////////////////////////////////////////

var txb=0, txi=0, txu=0, txc=0,txg='0000';
function textt(o,w){
	
	var q=_ga(o,'check');
	q=(q==1)?0:1; _sa(o,'check',q);
	if (q==1) _cn(o,'seltoolbut'); else _cn(o,'toolbut');
	switch(w){
		case 0: txb=q; break;
		case 1:	txi=q; break;
		case 2:	txu=q; break;
	}
	_go('txMess').focus();
	putstyle();
}

function putstyle(){
	
	var cn='', w='';
	if (dest!='*')	w=_ga("_"+dest,'write');
	if (txb==1) cn='tb ';if (txi==1) cn+='ti ';if (txu==1) cn+='tu ';
	if (txc!=0) cn+='tx'+txc;
	if (w=='1') cn+=" write";
	_cn('txMess',cn)	
	txg=txb+''+txi+''+txu+''+txc;
}

function gift(w){
	var i=_sp(w)
	 var tx='<table width="100%" class="tbtgt"><tr><td><img src="im/gt/'+gifts[i.nro][0]+'"></td><td><b>'+i.to+"</b>: "+gifts[i.nro][1]+' firma: <b>'+i.from +'</b></td></tr></table>';
	 writetxt(i.dest,tx); 
	 me['ttim']=parseInt(me['ttim'])-parseInt(i.price);

}

var seldv=null;
var selim=null;
var seldvf=null;
var selimf=null;


//var selim=null;

var fsi=0;

function showemot(o){
	
	selim=o;
	seldv=_go('dvicons')
	var emo=_chl(seldv);
	if (fsi==0) { _ih(emo,createemot()); fsi=1; }
	_cn(o,'emosel');
	_dp('',seldv);
}

function showfiles(o,f){
	
	if (selimf==o && f!=T) return;
	selimf=o;
	seldvf=_go('dvfiles');
	var emo=_chl(seldvf);
	//alert(emo.tagName)
	 _ih(emo,createfiles()); 
	_cn(o,'emosel');
	_dp('',seldvf);
}


function createemot(){
	var wr='<table cellspacing="8"><tr>';
	for (var t=65;t<65+26;++t){
		if ((t-1)%12==0)wr+="</tr><tr>"
		var r=String.fromCharCode(t).toLowerCase();
		wr+='<td><img style="cursor:pointer;" onclick="selemot(\''+r+'\')" src="im/em/i'+r+'.gif" width="40" heigth="70" /></td>'
	} wr+="</tr></table>";	
	return wr;
}

function createfiles(){
	var t=0;
	var wr='<form id="sendf" name="sendf" action="upload.php" enctype="multipart/form-data" method="post"><table cellspacing="1" width="98%"><tr><td colspan="2" height="25"><span class="attach1" ><b class="adjunt">adjuntar...</b><img src="im/files.gif" width="22" height="22" align="absmiddle"></span><input fil="1" class="attach0" type="file" name="asfiles" fil="1" id="asfiles" onchange="lookthef(this);">&nbsp;</td></tr>';
	var tt=0;
	for ( t=0;t<thef.length;++t){
		if (parseInt(thes[t])>-1){
			//alert(thes[t])
			var del=thes[t]==0?'im/wait5.gif':'im/del.gif';
			var href=thes[t]==0?'':'class="myblue" href="javascript:sendtfile(\''+thef[t]+'\')"';
			wr+='<tr><td> &nbsp;<img width="14" height="14" src="im/efil.gif" align="absmiddle"> <a '+href+'>'+thef[t]+'</a></td><td width="1"><img width="12" heigth="12" src="'+del+'" fil="1" onclick="delfile(\''+thef[t]+'\')"></td></tr>'
			tt++;
		}
	}
	var inte=(tt!=0)?'':'<tr><td> &nbsp; &nbsp;<i class="grey">(vacio)</i></td></tr>'
	wr+=inte+"</table></form>";	
	return wr;
}

function delfile(w){
	if(confirm("Seguro que desea eliminar el fichero "+w+"?") == true){
		var otx="a=delfile&f="+w;
		addinfo(otx);         
    }
}

var fu=0;
function lookthef(w){
	
	//alert(1)
	/* if (w.files)
    src = w.files.item(0).getAsText("").length;//src = w.files.item(0).getAsDataURL();*/
	if (me==null || oln==0) return;	 
	var tf=w.value.split("\\");
	var fi=tf[tf.length-1];
	
	
	for(var t=0; t<thef.length;++t){
		if (thef[t].toLowerCase()==fi.toLowerCase())	return;
	}
	
	thef.unshift(fi)
	thes.unshift('0');
		
	//
	//alert(w.value)
	sendfile();
	
}

function sendfile(){
	
	
	fu++;
	var md='fupload'+fu;
	var fr=null;
	try{
	fr=_ce('<IFRAME name="'+md+'">');	
	} catch(e){
	fr=_ce('IFRAME');
	}
	
	fr.id=md;
	fr.name=md;
	_dp('none',fr);
	_ac(document,fr);
	var frm=_go('sendf');
	frm.target=md;
	frm.submit();	
	//
	//setTimeout('sfiles()',200);
	sfiles();
	
	}
	
	function sfiles(){
		showfiles(_go('q1111'),T);
	}

var filcc=0;
function sendtfile(w){ // enviar en file

	if (me.stt>1){ ///////// **** AAQQUUII se manda el file
		_dp('none',seldvf,'dvcontmnu'); selimf=null;
		var don=(dest=="*")?"(SALA)":dest;
		filcc++;
		var tx='<div class="systembox" id="file'+filcc+'" file="'+w+'"> &nbsp; Enviando el fichero <b class="myblue">'+w+'</b> al usuario <b>'+don+'</b> &nbsp; <a class="lnk" onclick="confirm_file(\'file'+filcc+'\');">confirmar...</a></div>';
	} else { tx='<a class="system">*** No se pudo enviar el fichero...</a>';}
	//tx+="<br>";
	writetxt(dest,tx);
	
}

function confirm_file(w){
	var fi=_ga(w,'file');
	var madd="";
	if ((me.priv & 64) != 64 && dest=='*') madd+="<br><a class=\"fontmin\">no tiene privilegios para enviar ficheros a la sala, debe esperar a que un operador lo apruebe para que se haga visible a todos...)</a>";
	_ih(w,'<a class="system">Se ha enviado el fichero <a class="myblue">'+fi+ '</a> <b>satisfactoriamente...</b>'+madd+'</a>');
	var otx="a=sendfile&f="+fi+"&dest="+dest;
	addinfo(otx);
}

function filesendto(w){
	var i=_sp(w);
	//alert(w)
	
	
	var al=null, madd="", ms=null;
	
	if (al=_go(i.fr+"_")){
		var di=_sp(_ga(al,'data'));
		if (i.dest=='*'){
			
			//alert('aqui ' + me.priv +" "+ di.priv)
			if ((me.priv & 64) == 64 ) {
				madd='<br><a class="fontmin"> (el contenido de este fichero puede ser no deseado, verifiquelo antes de aprobar para que se haga publico) </a> <b onclick="fileaprobe(\''+w+'\')" class="myblue">(aprobar)</b>';
				ms='<div class="systembox"><img style="position: absolute; left:90%; border: 1px solid #cccccc;" width="50" height="50" src="tmp/'+i.prev+'"><b>'+i.fr+'</b> envia el fichero <a href="download.php?au='+i.au+'" target="_blank" class="myblue">'+stdimg('fil.png',13,14)+i.f+'</a>'+madd+'</div>';
			}
			
		} else {
			ms='<div class="systembox"><img style="position: absolute; left:90%; border: 1px solid #cccccc;" width="50" height="50" src="tmp/'+i.prev+'"><b>'+i.fr+'</b> envia el fichero <a href="download.php?au='+i.au+'" target="_blank" class="myblue">'+stdimg('fil.png',13,14)+i.f+'</a>'+madd+'</div>';
		}
		
		
		
		
		if (ms!=null){
		 needtab(i);
		 writetxt(i.dest,ms,i.fr);
		}
	}
	
}

function fileaprobe(w){
	//alert('aprobando: '+w)	;
	
	if(confirm("Seguro que desea aprobar el fichero?") == true){
		var i=_sp(w);
		var otx="a=aprobfile&f="+i.f+"&dest=*&u="+i.fr+"&au="+i.au;
		addinfo(otx);  
	}
}

function fileaprobed(w){
	var i=_sp(w);
	
	var al=null;
	//alert(w)
	if (al=_go(i.ap+"_")){
		var ii=_sp(_ga(al,'data'));
		if (ii.priv&64 == 64){
			
			//var op=_sp(_ga(_go(i.u+"_"),'data'));
			
		var ms='<div class="systembox"><b>'+i.u+'</b> envia el fichero  <a href="download.php?au='+i.au+'" target="_blank" class="myblue">'+stdimg('fil.png',13,14)+i.f+'</a> aprobado por: <b>'+i.ap+'</b></div>';
		//var ms='<b>'+i.u+'</b> envia el fichero  <a href="elchatcubano/download.php?au='+i.au+'" target="_blank" class="myblue">'+stdimg('fil.png',13,14)+i.f+'</a> aprobado por: <b>'+i.ap+'</b>';	
			 var tx=''+ms+'<br>';
		
		 	writetxt('*',tx);
		}
	}
}

function filerecived(n,s){ 

	for(var t=0; t<thef.length;++t){
		if (thef[t].toLowerCase()==n.toLowerCase()){
			thes[t]=s; 
			sfiles();
			break;
		}
	}
	
}

function selemot(w){
	_go('txMess').value=_gv('txMess')+"{"+w+"}";
	//alert(w)	
}




function showpalete(){
	_dp('','tbcolor');
}


//////////////////////////////////////////////////////

var msg='';

function sendtxt(){
	wo=F;
	if (me==null) return false;
	
	var tm=_gv('txMess').trim();
	var gf=contchar(tm,'{');
	
	if (gf>3){
		alert('no mas de 3 emoticones');
		return false;
	}
	
	if (tm!='' && (me.stt>1 || tm.substr(0,3)=='Sho')){
		msg=encodeURI(tm.encodeHTML())
		_go('txMess').value='';
		if (dest!='*') {
			playsound(1);
			
		}
		var tx=_pv('msg','txg','dest');
		var otx="a=themess&fr="+me.user+"&"+tx+"&itv="+intval();
		addinfo(otx);
		createtxt(otx);
	}
	
	//putstyle();
	return false;
	
}

function stat_one(){
	
}

function intval(){return parseInt((now()-init)/100);}

function force_disconect(){ // sesion cerrada;
//alert('wooooooooooowwwww');
	discall();
}

function noanswer(){
	var ad='', nr='';
	var tt=noanswer.arguments.length;
	 for (var i=0; i<tt; i++){	
	 	var us=noanswer.arguments[i];
	 		nr+=(nr=='')?'':', ';
			nr+=us;
			_dp('none',us+"_");
	 } 
	 if (tt>1) ad="n";
	 var tx='<a class="gray">*** SALE'+ad.toUpperCase()+" <b>"+nr+"</b> (<i>no responde"+ad+"</i>)</a><br>";
	 seethetotal();
	 writetxt('*',tx);
	 checkinout();
	 
}

function checkinout(){ // para los tabs
	
	 var ssbn=_chl(zt,0,0,0,0,0).cells;
	
	
	for (var t=1; t<ssbn.length; ++t){
		var cl='tab0';
		 var ust=ssbn[t];
		 if (lt==ust) cl="tab1";
		 var mi=_go(ust.id.substr(1)+"_");
		 
		 if (mi!=null){ if (_gdp(mi)!='') cl+=" gray";} else cl+=" gray";
		 if (_gcn(ust)!=cl && _gcn(ust)!='tab2') _cn(ust,cl);
		 
	 }
}

function updateuser(w){
	var i=_sp(w);
	var ni=i.user+"_";
	insertuser(w);
	if (i.user==me.user) retock(i);
}

//*** ERROR: exituser('oper=Radio_Reloj&tag=0&user=Radio_Reloj&motiv=termina sesion');
function exituser(us){
	
	var i=_sp(us), ms='';
	us=i.user;
	switch(i.tag){
		case '1':	ms='expulsa'; break;
		case '2':	ms='banea'; break;
		
	}
	var mo=decodeURI(i.motiv.decodeHTML());
	var add=(me.priv==255)?'['+i.ip+']':'';
	if (i.tag!='0')
	 var tx='<a class="system">*** <b>'+i.oper+'</b> '+ms+' a '+us+' [motivo: <i>'+mo+'</i> ]<br>';
	else 
	 var tx='<a class="gray">*** SALE <b>'+us+'</b> (<i>'+mo+'</i>) '+add+'</a><br>';
	var us_ = _go(us+"_");
	
	if (_gdp(us_)==''){
		if (parseInt(_ga(us_,'stt'))>0)	writetxt('*',tx);
	 	_dp('none',us+"_");
		
		//alert(us+"<->"+me.user)
		 if (us==me.user){
			 alert(i.oper+' te ' +ms+ ' del chat ['+mo+']');
			 lns=0;_scv("lns",'0') ;discall();
		 }
		 checkinout();
	 	seethetotal();
	}

}

function discall(){ 
	ifo='';
	oln=0;
	me=null;
	deleteallu();
	_dp('','wrilogin');
	opacto(_go('wrilogin'),1,10);
	_di(F,'txUs','txPw','txSx','btLg')	
}

function deleteallu(){
	var tu=_chl(_go('tbusers'),0,0);
	var nw=_ns(tu), ns=null;
	do {
		ns=_ns(nw);	
		_rm(nw);
	} while (nw=ns);
}

function textarrived(tx){
	var i=_sp(tx);
	needtab(i)
	if (i.fr!=me.user){
		createtxt(tx);
	}
}

function needtab(i){
	if (i.dest==me.user) {	
		var pv=null;
		pv=_go("_"+i.fr);
		if (pv==null) {
			var ufr=_go(i.fr+"_");
			var da=_ga(ufr,'data');
			var q=_sp(da);
			if (varnopv=='1' && (q.priv&64)!=64) addinfo('a=nopriv&dest='+i.fr);							
			else {
				playsound(3);
				pv=addtab(zt,"_"+i.fr,i.fr);
			}
		}
		
	}
}

function nopriv(w){
	
	var i=_sp(w);
	var tx='<a class="system">*** <b>'+i.fr+'</b> no admite PRIVADOS en este momento...<br>';
	//alert(i.fr)
	writetxt(i.fr,tx);
}

function moreinfo(w){
	var i=_sp(w);
	var tx='<a class="system">'+decodeURI(i.info.decodeHTML())+'</a>';
	
	moreifo[i.us]=tx;
	//alert(i.us + "<--->" +moreifo[i.us])
}

function createtxt(otx){
	var i=_sp(otx), a1='', a2='';
	var mc='';if (varformat=='1') mc=getclass(i.txg); else i.msg=i.msg.toLowerCase();
	var ufr = null;
	if (mc!='') { a1='<a class="'+mc+'">';a2="</a>";}
	var msg=decodeURI(i.msg.decodeHTML());
	msg=menc(msg);	msg=emot(msg);
	ufr=_go(i.fr+"_");
	if (ufr!=null){
		var da=_ga(ufr,'data');
		var q=_sp(da);
		if (q.stt>1 && _gdp(ufr)==''){
			var frm=formate(q,5); //alert(frm);
			var tx=frm+'&raquo;&nbsp;'+settime()+a1 + msg+ a2;
			if (i.dest!="*"){
				playsound(2);
				if (i.fr!=me.user){
					//alert(i.fr)
					_sa("_"+i.fr,'write','');
					putstyle();
				}
			}
			if (q.stt>1) writetxt(i.dest,tx,i.fr); /////////////
			
		}
	}
}

function menc(msg){
	if (msg.toLowerCase().indexOf(me.user.toLowerCase())!=-1){
		eval("var r=/"+me.user+"/g");
		msg=msg.replace(r,'<b>'+me.user+'</b>');
		msg=stdimg('menc.png',34,15)+msg;
		playsound(0);
	}
	return msg;	
}


function settime(){
	var lmn=_ga(lspn,'ltm');

	var dt=new Date();
	var tt= ((dt.getMinutes()<10)?'0':'')+dt.getMinutes()
	var ti= (dt.getHours()%12)+":"+tt
	if (tt!=lmn){
		_sa(lspn,'ltm',tt);
		return "<label>["+ti+"] </label>";
		
		
		
	} 
	return '';
}

function showsub(e){
	//alert(e)
	return false;
}

function emot(m){
	for (var t=65;t<65+26;++t){
		var ch=String.fromCharCode(t).toLowerCase();
		eval("var r=/\{"+ch+"\}/g");
		var gf='<img src="im/em/i'+ch+'.gif" width="47" height="44" align="absmiddle" />';
		m=m.replace(r,gf);
	}
	return m;
}

function contchar(str1,str2){
	ret=0;
	
	var a=str1.indexOf(str2)
	while(a!=-1){
		ret++
		str1=str1.substr(a+str2.length);
		var a=str1.indexOf(str2)
	} return ret;
}
	
function getclass(xg){
	var cn='';
	if (xg.charAt(0)!='0') cn='tb ';
	if (xg.charAt(1)!='0') cn+='ti ';
	if (xg.charAt(2)!='0') cn+='tu ';
	if (xg.charAt(3)!='0') cn+='tx'+xg.charAt(3);
	return cn;
}

function writetxt(to,tx,fr){
	if (fr==null) fr=to;
	var ds=null,q=null, dst=null;
	if (to==dest || (to==me.user && dest==fr)){
		ds=_go('wrimain');
	} else {
		if (to=='*') dst=_chl(_go('tbusers'),0,0);
		else { dst=_go(fr+"_");	}
		ds=_chl(dst,0,1);
		var ths=_go("_"+fr);
		if (ths!=null) { //////////////////////////////////////////
			if (_ga(ths,'user')!=dest && to!='*')
			_cn(ths,'tab2');
			//alert(sel);
		}
	}
	
	//alert(fr+ " " +dst.tagName)
	while(ds.innerHTML.length>40000){
		_rm(_chl(ds));
	}
	var ms=_ce('div');
	_ih(ms,tx);
	_ac(ds,ms);
	
	
	maxscroll();
}

function maxscroll(){
	var gz=_go('wriscroll');
	gz.scrollTop=gz.scrollHeight+1;
}
////////////////////////////////////////////////////////

window.onresize=function() {lookspl('hallzone') }
window.onload=function() {lookspl('hallzone') }



window.onunload=function(){
	//alert('adios');
	if (oln>0)	addinfo('a=exitapp&q=1',1,0);
}


function closemnmnu(){
	_dp('none','dvcontmnu');
}

//document.onmousedown=function(e){submenu(e,null)}

var ro=null;
function submenu(e,o){
		
		//alert(_ga(o,'data'))
		prf=null;
		ro=_sp(_ga(o,'data'));
		sel=ro.user;
		e=_ez(e);
		var t=(e.which)?e.which:e.button;
		if (t!=1){
			var cm=_go('dvcontmnu');
			_dp('',cm);
			writeprop(cm,ro);
			var x=e.clientX, y=e.clientY;
			
			var px=x-_wi(cm);var py=y;
			
			if ((py+_he(cm))>document.body.scrollHeight)	{
				py-=_he(cm);	
			} if (px<0){
				px+=_wi(cm);	
			}
			
			cm.style.left=px+'px';
			cm.style.top=py+'px';
			
		}
}

function writeprop(cm,i){ // poner en cm lo que se quiere de o
	
	
	var us=info(i);
	
	var str=us+"<hr>";
	
	var ce=(me.priv==255)?6:3;
	var d=((me.priv & 32)==32)?'':'disabled'
	var d1=((me.priv & 128)==128)?'':'disabled'
	
	str+=' &nbsp; Sexo: <select name="thesex" id="thesex" '+d+'><option value="M" '+((i.sex=='M')?'Selected':'')+'>M</option><option value="F" '+((i.sex=='F')?'Selected':'')+'>F</option></select>';
	
	str+=' &nbsp;Estrellas: <select name="mstar" id="mstar" '+d+'>';
	for(var t=0; t<ce;++t){	ck=(i.lev==t)?'Selected':'';str+='<option value="'+t+'" '+ck+'>'+t+'</option>';}
	
	str+='</select> &nbsp; <input type="button" value="Poner !" onClick="changesas();" '+d+'><hr> ';
	
	if(d1==''){
		var p=128;
		str+=" &nbsp; Privileg: ";
		for(var t=0; t<8;++t){
			var ck=((p & i.priv)==p)?'checked':'';
			str+='<input class="chb" type="checkbox" id="chchk'+t+'" '+d1+' '+ck+'/>';
			p=p/2;
		}	
		str+='<br>  &nbsp; Rango: &nbsp; <select name="thestt" id="thestt" '+d1+'>';
		var lgt=(me.priv&128)==128?stts.length:10;
		for(var t=0; t<lgt;++t){
			var ck=(i.stt==t)?'Selected':'';
			str+='<option value="'+t+'" '+ck+'>'+stts[t]+'</option>';
		}
		str+='</select> &nbsp; <input type="button" value="Subir !" onClick="changeattr();" '+d1+'><hr>';
		
	} if ((me.priv&2)==2){
		str+='<textarea name="motiv" cols="24" id="motiv" >No Molestes a los demás</textarea><hr>';
		str+=' <input type="button" value="Voz" onClick="doit(0);" >';
		str+=' <input type="button" value="Expulsar" onClick="doit(1);" >';
		str+=' <input type="button" value="Banear" onClick="doit(2);" >';
		str+=' <input type="button" value="Quitar Ban" onClick="doit(3);"><hr>';
	}	if ((me.priv&1)==1){
		str+=' ip: <b>'+long2ip(i.ip)+'</b> &nbsp; &nbsp; &nbsp;';
	}
	str+=' &nbsp;Puntos: <b>'+i.ttim+'</b> <hr>';
	str+=' &nbsp;Motivo del BAN: <b>'+i.note+'</b> <hr>';
	str+=' &nbsp; <a href="javascript:lookperf()">Ver perfil completo...</a>';
	//alert(str)
	_ih('dvmainmnu',str);
}

function unmark(w){
	var i=_sp(w);	
	insertuser(w);
	var tx='<a class="system">*** <b>'+i.oper+'</b> Admite a <b>'+i.user+"</b> como usuario normal...<br>";
	if (i.user==me.user) retock(i);
	writetxt('*',tx);
}

function retock(w){
	me=w;
	//var i=_sp(w);
	if (w.lnk==null) w.lnk=0;
	_ih('theuname',me.user + ' <img src="im/dwn.gif" width="16" height="16" align="absmiddle">');
	_cn('theuname','ust'+w.lnk)
}

var tag=null
function doit(w){
	tag=w;
	var st=_pv('sel','tag')+"&motiv="+encodeURI(_gv('motiv').trim().encodeHTML());	
	addinfo('a=adminact&'+st);
	_dp('none','dvcontmnu'); 
}

var sum=0;
var sel = null;

function changeattr(){
	var p=1; sum=0;
	
	for(var t=7; t>=0;--t){	var ck=_go('chchk'+t);	if(ck.checked==true) sum=sum+p; p+=p;	}	
	var st=_pv('sel','sum','thestt');
	addinfo('a=changeattr&'+st);
	_dp('none','dvcontmnu'); 
}


function changesas(){
	//sel=ro.user;
	var st=_pv('sel','mstar','thesex');
	addinfo('a=changesas&'+st);
	_dp('none','dvcontmnu'); 
}

var prf=null;

document.onclick=function(e) {
	//
	e=_ez(e); var m=_os(e),o=_p1(m); 
	
	
	if(o==null) return;
	
	if(o.id!='showthemenu') _dp('none','showMNU');
	
	if(o.id!='unamesel2') _dp('none','us_stt');
	
	
	if (selim!=null && selim!=o){
	
		_cn(selim,'toolbut');
		_dp('none',seldv,'dvcontmnu'); selim=null;
	}
	

	if (selimf!=null) if (selimf!=o && _ga(m,'fil')!=1){// && selimf.id!='q1111'){
		_cn(selimf,'toolbut');
		_dp('none',seldvf,'dvcontmnu'); selimf=null;
	}

	if (_chl(o)!=_go('showpal')) _dp('none','tbcolor');

	if(o.tagName=='TR') o=_chl(o); // para mozilla

	var a=_ga(o,'model');
	
	if (a!=null){
		
		txc=a;
		_cn(_go('setcolor'),'tcol'+a);
		putstyle();
		
	}
	
	
	if (prf!=null){ // perfil 
	//alert(o.id);
		if (_chl(o)!=_go('dvmainmnu') && o!=_go('dvmainmnu')) _dp('none','dvcontmnu'); 
		prf=null;
	} else {
		prf=1;
	}
	
	
	
}


function putstt(w){
	 addinfo('a=newlnk&lnk='+w,1,0);
}

function checktimer(){
	if (oln==1){
	_ih('thetim',mycount())
		
	}
}

function mycount(){
	if (me!=null) {
		try {
			var ntim=now();
			return parseInt(parseInt(me['ttim'])+(ntim-lki)/1000); 
		}catch(e){
			return parseInt(parseInt(me['ttim'])); 
		}
	} else return 0;
}

var varnopv=(_gcv('nopv'))?_gcv('nopv'):'0'; if (varnopv=='1'){  _cn('tdnopv','chk'); _sa('tdnopv','chk','1');}
var varnosound=(_gcv('sound'))?_gcv('sound'):'0'; if (varnosound=='1'){ _cn('tdnosound','separ chk');_sa('tdnosound','chk','1');}
var varformat=(_gcv('format'))?_gcv('format'):'0'; if (varformat=='1'){ _cn('tdformat','separ chk');_sa('tdformat','chk','1');}
var thefast=4;

function mnuclick(w){
	
	var ele=parseInt(_ga(w,'ele'));
	var add='';
	var nv=(_ga(w,'chk')=='1')?'0':'1';
	switch(ele){
		case 0: // ver perfil
			_ih('showDET','<br><table width="100%" border="0" cellspacing="3" cellpadding="0"><tr><td align="right">Anterior:</td><td><input name="pwrant" type="password" id="pwrant" size="15" maxlength="20" ></td></tr><tr><td align="right">Nueva clave:</td><td><input name="pwrnew" type="password" id="pwrnew" size="15" maxlength="20" ></td></tr><tr><td align="right">Repetir:</td><td><input name="pwrnew1" type="password" id="pwrnew1" size="15" maxlength="20" ></td></tr><tr><td height="37" align="right">&nbsp;</td><td><input type="submit" name="pwrbut" id="pwrbut" value="!Aceptar!"  onClick="sendprof();"></td></tr><tr><td colspan="2" align="right" id="profmess">&nbsp;</td></tr></table>');
			_ih('ShowTIT','Cambiar clave');	_dp('','dvMenu2');
			if (me.stt<3) { _di(T,'pwrant'); }
		break;
		case 10:
		_ih('showDET','<br><table width="100%" border="0" cellspacing="3" cellpadding="0"><tr><td align="right">Sexo:</td><td><select name="datasex" id="datasex"><option value="M">Masc</option><option value="F">Fem</option></select></td></tr><tr><td align="right">Email:</td><td><input name="datamail" type="text" id="datamail" size="20" maxlength="20" ></td></tr><tr><td height="37" align="right">&nbsp;</td><td><input type="submit" name="pwrbut" id="pwrbut" value="!Aceptar!"  onClick="sendmydata();"></td></tr><tr><td colspan="2" align="right" id="profmess">&nbsp;</td></tr></table>');
			_ih('ShowTIT','Datos de Usuario');
			_go('datasex').value=me.sex;
			if (me.ref==1 ) _di(T,'datamail');
			 _dp('','dvMenu2');
			
		
		break;
				case 11:
		_ih('showDET','<br><table width="450px" height="450px" border="0"  ><tr><td><iframe src="http://inbox.im/fregistro" frameborder="0" width="450px" height="450px" > </iframe></td></tr><tr><td colspan="2" align="right" id="profmess">&nbsp;</td></tr></table>');
			_ih('ShowTIT','Puntos');
				_dp('','dvMenu2');
				case 12:
		_ih('showDET','<br><table width="450px" height="450px" border="0"  ><tr><td><iframe src="http://69.195.82.133/ayuda.html" frameborder="0" width="450px" height="450px" > </iframe></td></tr><tr><td colspan="2" align="right" id="profmess">&nbsp;</td></tr></table>');
			_ih('ShowTIT','Ayuda');
				_dp('','dvMenu2');
		break;
		
		case 1:
			varnopv=nv;
			if (nv==1) add="chk";
			_cn(w,add);
			_scv('nopv',nv);
		break;
		case 2:
			varnosound=nv;
			if (nv==1) add=" chk";
			_cn(w,'separ'+add);
			_scv('sound',nv);
		break;
		case 7:
			varformat=nv;
			if (nv==1) add=" chk";
			_cn(w,'separ'+add);
			_scv('format',nv);
		break;
		case 3:	case 4:	case 5:
			thefast=ele;
			_cn(_go('fast3'),'');
			_cn(_go('fast4'),'');
			_cn(_go('fast5'),'separ ');
			_cn(_go('fast'+ele),_gcn(_go('fast'+ele))+' chk');
			
		break;
		case 6: // desconectaterse
			if (confirm('Esta seguro que desea salir?')){
			addinfo('a=exitapp&q=2',1,0);
			discall();
			}
		break;
		
		case 8: // desconectaterse
		eraselob()
		break;
		
		case 9: // desconectaterse
		closelob()
		break;
		

		
	}
	_sa(w,'chk',nv);
}


function showperf(){

}


function showMenu(){
	_dp('','showMNU');
}

var ln=_gcv('luser');
if (ln){
	_ih('luser',ln);
	_go('txUs').value=ln;
	_dp('none','txUs');
	_vi('visible','troth');
	
	//alert(ln)	
}

function eraselob(){
		_ih('wrimain','');
}

function closelob(){
	//alert(_p1(lspn,7).tagName)
		closetab(lt);
}

addinfo('a=initialize&friend='+friend()+"&loc="+loc()+"&appver="+appver,1,0);
setInterval(lookinterval,1000);


function loc(){ return encodeURI(location.href.trim().encodeHTML())}

///////////////////////////////////
var slcc=0;
var slmx=slph.length;

opac(_go('slytext'),7);
/*slide();
function slide(){
	//alert(slmx+" " +slcc);

	var dv=_go('dvslide');
	var ds=(_chl(dv,0)); 
	ds.style.background="url("+slph[slcc]+")";
	opacto(ds,1,10,opacend);	
}

function opacend(){
	var dv=_go('dvslide');
	var ds=(_chl(dv,0)); 
	dv.style.background="url("+slph[slcc]+")";
	opac(ds,0);
	_ih('slytext',"<br>"+sltx[slcc])
	slcc++; if (slcc>=slmx) slcc=0;
	ds.style.background="url("+slph[slcc]+")";
	if (oln!=1) setTimeout('slide()',7000);
}*/

function rating(w){
	
	
	var ret='<table width="100%" border="0" cellpadding="2" cellspacing="1" id="tb_rating">', cc=1, arr=[];
	var uu=w.split(";");
	for(var uw in uu){
		var dd=uu[uw].split(",");
		var co=dd[0].split("\:");
		var uss=(dd[1].length<11)?dd[1]:dd[1].substr(0,10)+".";
		arr[cc]="<td> &nbsp; "+cc+".- "+stdimg('fl/'+co[1].toLowerCase()+'.png',16,11)+" "+uss+"</td><td><b>"+dd[2]+"</b></td>";
		cc++;
	}
	for (var t=1; t<11; t++){

		var c1=(arr[t]!=null)?arr[t]:"&nbsp;";
		var c2=(arr[t+10]!=null)?arr[t+10]:"&nbsp;";
		ret+="<tr>"+c1+c2+"</tr>";
	}
	ret+="</table>";
	

	_ih('dvslide',ret);
}

var cq=0;
function opacto(w,b,e,f){
	cq++;
	opac(w,b);
	status=b
	if (b==e){ if (f!=null) f();} else{
		b+=(b<e)?1:-1;	
		setTimeout(function (){opacto(w,b,e,f) },50);
	}
	
}

function stats(w,uol,msg,tot){
	var td1='', td2='', td3=''
	var i=w.split(",");
	for (var t=0; t<i.length; ++t){
		var p=i[t].split(":");td1="<td class=\"sttd1\">"+p[0]+"</td>"+td1;
		td2="<td class=\"sttd2\">"+p[1]+"</td>"+td2; td3="<td class=\"sttd3\">"+p[2]+"</td>"+td3;
	}
	
	for (var t=i.length; t<7; ++t){
		td1="<td class=\"sttd1\">&nbsp;</td>"+td1;td2="<td>&nbsp;</td>"+td2;td3="<td class=\"sttd2\">&nbsp;</td>"+td3;
	}
	var wr="<table width=\"100%\"><tr>"+td1+"</tr><tr>"+td2+"</tr><tr>"+td3+"</tr></table>";
	_ih('tdst',wr);
	
	_ih('tduol',"<b>("+uol+") Usuarios conectados</b>")
	_ih('tdmsg',msg)
	_ih('totvis',tot);
}

///////////////////////////////////
function playsound(w){
	var snds=Array('ntf','key','toq','rng','rn1');	if (varnosound!='1'){var sn = _go('dxsound');
	sn.innerHTML='<embed src="sn/'+snds[w]+'.wav" hidden=true autostart=true loop=false>';	}
}

function sendmydata(){
	var s="a=changemydata&"+_pv('datasex');	
	if (me.fij!=1 && _gv('datamail').trim()!='') s+="&"+_pv('datamail');	
	addinfo(s,1);
	_di(T,'pwrbut');
}

function mydataerror(){
	alert('ERROR: No se guardaron los datos...');
	_di(F,'pwrbut');
}

function sendprof(){
	var s="a=changeprof&"+_pv('pwrnew','pwrnew1');	
	if (me.stt>2) s+="&"+_pv('pwrant');	
	addinfo(s,1);
	_di(T,'pwrbut');
}


function newstatus(w){

	var i=_sp(w);
	if (i.user==me.user) retock(i);
	insertuser(w);
	var tx='<a class="system">*** <b>'+i.user+'</b> ha cambiado su perfil...';
 	writetxt('*',tx);
	_dp('none','dvMenu2');

}

function newlnk(w){

	var i=_sp(w);
	if (i.user==me.user) retock(i);
	insertuser(w);
	//_dp('none','dvMenu2');

}


function pwdok(){
	var tx='<a class="system">*** La <b>contraseña</b> ha cambiado <b>satisfactoriamente</b>...';
 	writetxt('*',tx);
	_dp('none','dvMenu2');
}

function pwderror(){
	alert('No se pudo cambiar la contraseña...');
	_di(F,'pwrbut');
}

function facebook(){
	
	FB.init("81b0618602add8a897566a774220618e");
}

function friend(){
	var fr=Array('facebook.com');
	var cad=location.href
	//if (cad!='http://megacosmo.com/mega8') alert(cad)
	for( var it in fr) {
		var bu=fr[it];
		if (cad.indexOf(bu)!=-1) return bu; 
	}
	return '';
}

var tem='';
function radiostats(w){
	var q=w.split(",");
	//alert(q.length + " []  " +w)
	if (q.length>6){
		_ih('radioesc',q[0]+" oyentes");	
		_ih('radiotxt',q[6]);	
	}
	
}

function writeon(w){
	//alert(w)
	var ob=_go("_"+w);
	if (ob!=null) _sa(ob,'write','1');
	putstyle();
}