// <!-- js_.bat --> //
// <!--
// ------------------------------------------------------------------------------------
// Control errores
var Chivar=(window.location.href.indexOf('file')>=0||window.location.href.indexOf('//principal/')>=0);
function NoChivarse() {return !Chivar;}
window.onerror=myerrorhandler();
function myerrorhandler(message,url,line){return NoChivarse;}
// ----------------------------------------------------------------------------------------
// Navegador
var ms = (navigator.appVersion.indexOf('MSIE')>0);
var ie4 = (ms) && (parseInt(navigator.appVersion.substring(0,1)) >= 4);
var ie5 = (ms && navigator.appVersion.indexOf("5.") >= 0) ? 1 : 0;
var ns = (navigator.appName == 'Netscape');
var ns4 = (ns) && ( parseInt(navigator.appVersion.substring(0,1)) >= 4);
var ns5 = (ns) && ( parseInt(navigator.appVersion.substring(0,1)) >= 5);
// ----------------------------------------------------------------------------------------
// Servidor seguro
var Protocolo=window.location.protocol;
var esSeguro=(Protocolo=='https:');
// ----------------------------------------------------------------------------------------
 var DirTop;
 var PathTop;
 DirTop=window.location.href; PathTop=window.location.pathname;
  if ( ns5 || ie5 ) {
   eval('try { DirTop=parent.window.DirTop; } catch (e) { DirTop=window.location.href; }');
   eval('try { PathTop=parent.window.PathTop; } catch (e) { PathTop=window.location.pathname; }');
  } else if ( ie4 ) {
   DirTop=parent.window.DirTop;
   PathTop=parent.window.PathTop;
  }
  if (!DirTop) DirTop=window.location.href;
  if (!PathTop) PathTop=window.location.pathname;
// ----------------------------------------------------------------------------------------
// -->


// <!--
// ----------------------------------------------------------------------------------------
// Utiles diversos
// ------------------------------------------------------------------------------------
//----------------------------------------------------------------------------------------
// Variables usadas por algún módulo
var usupasurl='';
//----------------------------------------------------------------------------------------
//Objeto Detector Navegador
function DetectorNavegador() {
  this.NS4 = document.layers;
  this.IE4 = document.all;
  this.DOM = document.getElementById;
  this.DHTML = this.NS4 || this.IE4 || this.DOM;
}
//----------------------------------------------------------------------------------------
function separa() {G_L('<center><hr size="5" width="468"></'+'center>');}
// ------------------------------------------------------------------------------------
function aviso(mensaje) {
//if (Chivar) alert(mensaje);
}
//----------------------------------------------------------------------------------------
function G_L(linea) {eval('document.writeln('+"'"+linea+"'"+');');}
function grabaLinea(linea) {G_L(linea);}
// ----------------------------------------------------------------------------------------
function quienpon() { window.open(DirCGIComun+'quien.cgi' , 'quien', ' toolbar=no,width=5,height=5'); self.focus(); }
function quien() {
var quien=LeeGalleta (document,'nombre_usuario');
 if (quien==null) quien='';
//030428 if (quien=='') { quienpon(); }
 return quien;
}
// ----------------------------------------------------------------------------------------
function refrescar() {
 if (LeeGalleta(document,'refrescando')==null) {
  PonGalleta (document,'refrescando', true);
  window.location.reload(true);
 } else BorraGalleta (document,'refrescando');
}
// ----------------------------------------------------------------------------------------
//020301 function imprimir() { G_L('<A HREF="javascript:print()"><IMG SRC="/comun/print.gif" WIDTH="15" HEIGHT="11" BORDER="0" ALT="Imprimir página"></A>'); }
function txtImprimir() { return ('<A HREF="javascript:print()"><IMG SRC="'+DirComun+'print.gif" WIDTH="15" HEIGHT="11" BORDER="0" ALT="Imprimir página"></A>'); }
function imprimir() { G_L(txtImprimir()); }
// ----------------------------------------------------------------------------------------
function volver() { G_L('<A HREF="javascript:history.go(-1)"><IMG SRC="'+DirComun+'ico_volver.gif" BORDER="0" ALT="Volver"></A>'); }
// ----------------------------------------------------------------------------------------
//010927 cargadojsmarca('js_utiles');
// ----------------------------------------------------------------------------------------
function entreFechas(desde, hasta) {
 var Ahora=new Date();
 var any = Ahora.getFullYear();
 var Desde=new Date(); var Hasta=new Date();
 Desde=new Date(desde+'/'+any); Hasta=new Date(hasta+'/'+any);
 if (Hasta<Desde) Hasta=new Date(hasta+'/'+(any+1));
 if (Ahora>=Desde && Ahora<=Hasta) return true; else return false;
}
// ----------------------------------------------------------------------------------------
function FechaLetra(){
  var month=new Array(12);
  month[0]="Enero";
  month[1]="Febrero";
  month[2]="Marzo";
  month[3]="Abril";
  month[4]="Mayo";
  month[5]="Junio";
  month[6]="Julio";
  month[7]="Agosto";
  month[8]="Septiembre";
  month[9]="Octubre";
  month[10]="Noviembre";
  month[11]="Diciembre";
  var odate= new Date();
  iday = odate.getDate(); 
  smonth = month[odate.getMonth()];
  iyear = odate.getFullYear();
  return iday+" de "+smonth+" de "+iyear; 
}
// ----------------------------------------------------------------------------------------
function mostrar_obj(nombre, mostrar) {
 Obj=document.getElementById(nombre);
//080401 if (!mostrar) { if (!Obj.style.display || Obj.style.display == 'none' || Obj.style.display == '') mostrar='block'; else mostrar='none'; }
 if (!mostrar) { if (Obj.style.display && Obj.style.display == 'none') mostrar='block'; else mostrar='none'; }
 Obj.style.display = mostrar;
 return (Obj.style.display!='none');
}
// ----------------------------------------------------------------------------------------
var ObjActivo='';
function activar(Objeto) {
  if (ObjActivo!='' && ObjActivo!=Objeto) if (mostrar_obj(ObjActivo)) mostrar_obj(ObjActivo);
  if (!Objeto) ObjActivo='';
  else if (mostrar_obj(Objeto)) ObjActivo=Objeto; else ObjActivo='';
  return false;
}
// ------------------------------------------------------------------------------------
function formatnum(num) {
  num = num.toString().replace(/\$|\,/g,'');
  if(isNaN(num)) num = "0";
  cents = Math.floor((num*100+0.5)%100);
  num = Math.floor((num*100+0.5)/100).toString();
  if(cents < 10) cents = "0" + cents;
  for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
    num = num.substring(0,num.length-(4*i+3))+'.'+num.substring(num.length-(4*i+3));
//  return ("$" + num + "," + cents);
  return (num + "," + cents);
}
// ----------------------------------------------------------------------------------------
function formatea_numero_entero(num) {
  num = num.toString().replace(/\$|\,/g,'');
  if(isNaN(num)) num = "0";
  num = Math.floor((num*100+0.5)/100).toString();
  for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
    num = num.substring(0,num.length-(4*i+3))+'.'+num.substring(num.length-(4*i+3));
  return num;
}
// ----------------------------------------------------------------------------------------
function PonCabecera() {
  G_L('<DIV ALIGN="CENTER">');
  G_L('<a href="'+PralDir+PralRef+'" target="_top">');
  G_L('<img src="'+PralDir+'letrero.php" border="0" width="469" height="61" ALT="">');
  G_L('</a>');
  var Aux=window.location.href;
  if (Aux.indexOf('cab.html')<0) separa();
  G_L('</DIV>');
}
// ------------------------------------------------------------------------------------
function splitea(texto,separador) {
var resultado=new Array();
  if (ie4||ns4) {resultado=texto.split(separador);} else { 
    if (texto==''||separador=='') {resultado[resultado.length]=texto;} else {
      while (texto!='') {
        var l=texto.indexOf(separador);
        var aux
        if (l>=0) {aux=texto.substring(0,l);texto=texto.substring(l+1);} else {aux=texto;texto='';}
        resultado[resultado.length]=aux;
      }
    }
  } 
  return resultado;
}
// ----------------------------------------------------------------------------------------
function google_busca() {
  G_L('<!-- SiteSearch Google -->');
  G_L('<form STYLE="margin:0; padding:0; border:0;" method="get" action="http://www.google.es/custom" target="_top">');
  G_L('<table ALIGN="CENTER" border="0">');
  G_L('<tr><td nowrap="nowrap" valign="top" align="left">');
  G_L('<a href="http://www.google.com/"><img src="http://www.google.com/logos/Logo_25wht.gif" border="1" alt="Google"></img></a>');
  G_L('</td>');
  G_L('<td nowrap="nowrap">');
  G_L('<input type="hidden" name="domains" value="'+DomNom+extDNS+'"></input>');
  G_L('<input CLASS="formulariopeq" type="text" name="q" size="20" maxlength="255" value=""></input>');
  G_L('<input CLASS="formulariopeq" type="submit" name="sa" value="Búsqueda"></input>');

  G_L('<BR />');
  G_L('<input type="radio" name="sitesearch" value=""></input>');
  G_L('<SPAN CLASS="formulariopeq">Web</SPAN>');
  G_L('<input type="radio" name="sitesearch" value="'+DomNom+extDNS+'" checked="checked"></input>');
  G_L('<SPAN CLASS="formulariopeq">'+DomNom+extDNS+'</SPAN>');

  G_L('</td></tr></table>');

  G_L('<input type="hidden" name="client" value="pub-2956922364325861"></input>');
  G_L('<input type="hidden" name="forid" value="1"></input>');
  G_L('<input type="hidden" name="ie" value="ISO-8859-1"></input>');
  G_L('<input type="hidden" name="oe" value="ISO-8859-1"></input>');
//060130  G_L('<input type="hidden" name="cof" value="GALT:#008000;GL:1;DIV:'+LetraOscuraColor+';VLC:663399;AH:center;BGC:'+FondoClaroColor+';LBGC:'+FondoClaroColor+';ALC:'+LetraOscuraColor+';LC:'+LetraOscuraColor+';T:'+LetraOscuraColor+';GFNT:0000FF;GIMP:0000FF;LH:60;LW:468;L:http://www.'+DomNom+extDNS+'/letrero.php;BIMG:http://'+DomNom+extDNS+'/fondo.jpg;S:http://www.'+DomNom+extDNS+';FORID:1;"></input>');
//060130  G_L('<input type="hidden" name="cof" value="GALT:#008000;GL:1;DIV:#336699;VLC:663399;AH:center;BGC:FFFFFF;LBGC:336699;ALC:0000FF;LC:0000FF;T:000000;GFNT:0000FF;GIMP:0000FF;FORID:1;"></input>');
  G_L('<input type="hidden" name="hl" value="es"></input>');
  G_L('</form>');
  G_L('<!-- SiteSearch Google -->');
}
// ----------------------------------------------------------------------------------------
function google_video(id, play) {
  if (play) play = '&autoPlay=true'; else play='';
  ini = '<embed style="width:100%; height:100%;" id="VideoPlayback" align="middle" type="application/x-shockwave-flash" src="http://video.google.com/googleplayer.swf?docId=';
  fin = '" allowScriptAccess="sameDomain" quality="best" bgcolor="#ffffff" scale="noScale" salign="TL"  FlashVars="playerMode=embedded"> </embed>';
  G_L(ini+id+play+fin);
}
// ----------------------------------------------------------------------------------------
function youtube_video(id, play) {

//071217 youtube_flvplayer(id, play); return;

//070616  if (play) play = '&&autoplay=1'; else play='';
  if (play) play = '&autoplay=1'; else play='';
  G_L('<object width="100%" height="100%">');
  G_L('<param name="movie" value="http://www.youtube.com/v/'+id+'&rel=0'+play+'"></param>');
  G_L('<embed src="http://www.youtube.com/v/'+id+play+'" align="middle" type="application/x-shockwave-flash" width="100%" height="100%"></embed>');
  G_L('</object>');
}
// ----------------------------------------------------------------------------------------
function youtube_flvplayer(id, play) {
  if (play) play = '&autostart=true'; else play='';
  G_L('<object width="100%" height="100%">');
  G_L('<embed src="/comun/flvplayer.swf" align="middle" width="100%" height="100%" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" flashvars="type=flv&allowfullscreen=true&file=http://cache.googlevideo.com/get_video?video_id='+id+'&image=http://img.youtube.com/vi/'+id+'/2.jpg'+play+'" />');
  G_L('</object>');
}
// ----------------------------------------------------------------------------------------
// -->// <!--
//010927 cargadojsmarca('js_contador');
//----------------------------------------------------------------------------------------
// contadores
//var totalizado=false;
var ContadoBasico=false;
//----------------------------------------------------------------------------------------
// Estilo de los contadores
  document.writeln('<STYLE TYPE="text/css">');
// Estilo para contadores
  estilocomun='';
  estilocomun+='  font-style : normal; text-decoration: none; border-width: 0px; border-style: solid; border-color: #000080;'
  estilocomun+='  color: #FFFF00; border-color:#000080; padding: 0px; background-color: #000080;';
  document.writeln(' TH.contador {'+estilocomun);
  document.writeln('  font-size: 10px; font-family: Arial; font-weight: normal; text-align: center;');
  document.writeln(' }');
  document.writeln(' TD.contador {'+estilocomun);
  document.writeln('  font-size: 14px; font-family: Courier New; font-weight: bolder; text-align: right;');
//010916 no funciona en ns  document.writeln('  width: 50px;');
  document.writeln(' }');
  document.writeln('</STYLE>');
//----------------------------------------------------------------------------------------
function ContadorCblStatsHTML(impactos,fechaultimo) {
  document.writeln('<DIV CLASS="noimp">');
var NomEst=''; eval('try { NomEst=PralNom; } catch (e) { NomEst=""; }');
 document.writeln('<table align="center" border="0" cellpadding="0" cellspacing="0"><tr>');
 document.writeln('<th valign="center" class="contador">');
//010901 document.writeln('<a href="http://principal/cabalo/">');
//010906 document.writeln('<a href="'+PralDir+'estadisticas.html">');
//020817 document.writeln('<a href="'+PralDir+'cria.html?comun/estadisticas.html?'+NomEst+'">');
 if (NomEst!="") document.writeln('<a href="'+PralDir+'cria.html?'+DirCGIComun+'cblstats.pl?estadistica='+NomEst+'">');
 document.writeln(' <IMG SRC="http://principal/cabalo/barrachina.jpg" WIDTH="15" HEIGHT="15" border="0" ALT="'+fechaultimo+'">');
 document.writeln('</a>');
 document.writeln('</th>');
 document.writeln('<td valign="center" class="contador" align="center" width="50px">'+impactos+'</td>');
 document.writeln('<th valign="center" class="contador" align="center">&nbsp;</th>');
 document.writeln('<th valign="center" class="contador" align="center">');
 var estrellas=0;
 if (impactos>=100) estrellas++;
 if (impactos>=1000) estrellas++;
 if (impactos>=5000) estrellas++;;
 for (var i=0;i<estrellas;i++) {
  if (i==4*Math.floor((i+0)/4)) { paridad='4';
  } else if (i==4*Math.floor((i+1)/4)) { paridad='3';
  } else if (i==4*Math.floor((i+2)/4)) { paridad='2';
  } else { paridad='2'; }
  document.writeln(' <IMG SRC="/comun/star'+paridad+'_thn.gif" WIDTH="9" HEIGHT="9">');
 }
 document.writeln('</th>');
 document.writeln('</tr></table>');
  document.writeln('</DIV>');
}
//----------------------------------------------------------------------------------------
function Contador(ContadorTipo,ContadorNombre) {
  document.writeln('<CENTER>');
  if (Chivar) {aviso ('Contador '+ContadorTipo+':'+ContadorNombre);}
  if (ContadorTipo=='nedstat') {ContadorNedstat(ContadorNombre) } else
  if (ContadorTipo=='ciberstats') {ContadorCiberstats(ContadorNombre) } else
  if (ContadorTipo=='fastcounter') {ContadorFastCounter(ContadorNombre) } else
  if (ContadorTipo=='servicont') {ContadorServicont(ContadorNombre) }
  if (ContadorTipo=='cblstats') {ContadorCblStats(ContadorNombre) }
// Totalizador
//  if (!totalizado) {
//    if (ContadorTipo!='ciberstats' | ContadorNombre!='20049') ContadorCiberstats('20049');
//    if (ContadorTipo!='fastcounter' |ContadorNombre!='2025398') ContadorFastCounter('2025398');
//    if (ContadorTipo!='servicont' |ContadorNombre!='total') ContadorServicont('total');
//    if (ContadorTipo!='cblstats') ContadorCblStats(ContadorNombre);
//    totalizado=true;
//  }
  document.writeln('</CENTER>');
}
//----------------------------------------------------------------------------------------
function CblStats(ContadorNombre,nuevaurl) {
  var parametros='';
//011227  parametros+=DirCGI+'cblstats.pl?';
  parametros+=DirCGIComun+'cblstats.pl?';
  parametros+=ContadorNombre;
  parametros+='?referrer='+escape(document.referrer);
  parametros+='?url='+escape(window.location);
  if (nuevaurl!='') {
    if (nuevaurl.substring(0,1)=="/") nuevaurl=BasePral+nuevaurl;
    parametros+='?href='+nuevaurl;
  }
  return parametros;
}
//----------------------------------------------------------------------------------------
function ContadorCblStatsMuestra(ContadorNombre) {
//011201 var DirCont=''; DirCont='http://208.56.202.106/cgi-bin/'; if (window.location.href.indexOf('principal')>0) DirCont=DirCGI;
var DirCont=DirCGIComun;
var DirDatRel='../contadores/';
// con netscape falla si no existe
 if (ns) {
 } else if (Chivar && window.location.href.indexOf('principal')<=0) { ContadorCblStatsHTML('000',Date());
 } else {
  document.writeln('<'+'SCRIPT SRC="'+DirCont+DirDatRel+'cont_'+ContadorNombre+'.js"></'+'SCRIPT>');
//020103  document.writeln('<'+'script language="JAVASCRIPT" src="'+DirCGIComun+DirDatRel+'cont_'+ContadorNombre+'.js"></'+'script>');
 }
}
//----------------------------------------------------------------------------------------
function ContadorCblStatsCuenta(ContadorNombre) {
var parametros=CblStats(ContadorNombre,'');
 if (!Chivar || window.location.href.indexOf('principal')>0) {
  if (!ContadoBasico || ContadorNombre!=NombreContadorBasico()) document.writeln('<IMG SRC="'+parametros+'" WIDTH="1" HEIGHT="1">');
  if (ContadorNombre==NombreContadorBasico()) ContadoBasico=true;
 }
}
//----------------------------------------------------------------------------------------
function ContadorCblStats(ContadorNombre) {
  if (!ContadorNombre || ContadorNombre=='') ContadorNombre=NombreContadorBasico();
var parametros=CblStats(ContadorNombre,'');
 ContadorCblStatsCuenta(ContadorNombre);
//020822 if (!Chivar || window.location.href.indexOf('principal')>0) ContadorCblStatsMuestra(ContadorNombre);
 ContadorCblStatsMuestra(ContadorNombre);
}
//----------------------------------------------------------------------------------------
function ContadorNedstat(ContadorNombre,Esconder) {
  document.writeln('<DIV CLASS="noimp">');
  if (Chivar) {
    if (Esconder) document.writeln('<img src="'+DirBase+'img/nedstat.gif" border=0 alt="NedStats" width=1 height=1>');
    else document.writeln('<img src="'+DirBase+'img/nedstat.gif" border=0 alt="NedStats" width=22 height=22>');
  } else {
    if (ContadorNombre!='apafcv') {
// Versión sin REFERSTAT
      document.writeln('<a href="http://es.nedstat.net/cgi-bin/viewstat?name='+ContadorNombre+'">');
      if (Esconder) document.writeln('<img src="http://es.nedstat.net/cgi-bin/nedstat.gif?name='+ContadorNombre+'" border=0 alt="" width=1 height=1></a>');
      else document.writeln('<img src="http://es.nedstat.net/cgi-bin/nedstat.gif?name='+ContadorNombre+'" border=0 alt="" width=22 height=22></a>');
// Versión con REFERSTAT
      document.writeln("<img src=\"http://es.nedstat.net/cgi-bin/referstat.gif?");
      document.writeln("name=apafcv&refer=");
      document.writeln(escape(document.referrer));
      document.writeln("\" width=1 height=1 alt=\"\" align=\"right\">");
    }
// Nedstat basic 3
//020713 PROVISIONAL    if (ContadorNombre=='apafcv') ContadorNedstat3('AAKLTwLcEZtOBDfk1LDE8PUy6VRw',Esconder);
ContadorNedstat3('AAKLTwLcEZtOBDfk1LDE8PUy6VRw',Esconder);
//020519    if (ContadorNombre=='apafcv') ContadorNedstat3('ABlIHA0W+Koagzs5b+5Z8CrfkVzA',Esconder);
  }
  document.writeln('</DIV>');
}
//----------------------------------------------------------------------------------------
function ContadorNedstat3(contNS3,Esconder) {
 if (contNS3!='') {
  var tamanyo=' width=18 height=18'; if (Esconder) tamanyo=' width=1 height=1';
  var contCmd='';
//020516  contCmd+=('<script language="JavaScript" src="http://m1.nedstatbasic.net/basic.js"></script>');
//020517  contCmd+=('<script language="JavaScript">nedstatbasic("'+contNS3+'", 0);</script>');
  contCmd+=('<script language="JavaScript">nedstatbasic("'+contNS3+'", 0,"'+tamanyo+'");</script>');
  contCmd+=('<noscript><a target="_blank" href="http://v1.nedstatbasic.net/stats?'+contNS3+'"><img src="http://m1.nedstatbasic.net/n?id='+contNS3+'" border="0" nosave'+tamanyo+'></a></noscript>');
//No va bien  if (Esconder && esSeguro) {
//No va bien   contCmd='<SCRIPT SRC="'+DirComun+'js_contador.js"></SCRIPT>'+contCmd;
//No va bien   contCmd+='<SCRIPT>setTimeout("window.close();",10000);</SCRIPT>';
//No va bien   var vtn=window.open('' , '', ' toolbar=no,width=5,height=5');
//No va bien   self.focus();
//No va bien   vtn.document.writeln(contCmd);
//No va bien  } else { document.writeln(contCmd); }
  document.writeln(contCmd);
 }
}
// FUNCIONES EXTRAIDAS DE http://m1.nedstatbasic.net/basic.js EL 16/05/2002
function plugNS(){
 var b=1;var o=0;var p=new Array("Shockwave Flash","Shockwave for Director","RealPlayer","QuickTime","VivoActive","LiveAudio","VRML","Dynamic HTML Binding","Windows Media Services");var np=navigator.plugins;
 for(var x=0;x<p.length;x++){for(var i=0;i<np.length;i++)if(np[i].name.indexOf(p[x])>=0)o|=b;b*=2;}
 return o;
}
function plugIE(){
 if(!document.body)document.write('<body>');
 var db=document.body;var o=0;var b=1;
 var p=new Array("D27CDB6E-AE6D-11CF-96B8-444553540000","2A202491-F00D-11CF-87CC-0020AFEECF20","23064720-C4F8-11D1-994D-00C04F98BBC9","","","","90A7533D-88FE-11D0-9DBE-0000C0411FC3","9381D8F2-0288-11D0-9501-00AA00B911A5","22D6F312-B0F6-11D0-94AB-0080C74C7E95");
 db.addBehavior("#default#clientcaps");
 for(var i=0;i<p.length;i++){if(p[i])if(db.isComponentInstalled("{"+p[i]+"}","componentid"))o|=b;b*=2;}
 return o;
}
function nedstatbasic(id,options,tamanyo){
 var n=navigator;var ver=n.appVersion;var name=n.appName;var d=document;var verIE=parseInt(ver.substring(ver.indexOf("MSIE")+5,ver.indexOf("MSIE")+6));if(verIE>0)ver=verIE;else ver=parseInt(ver);var u="http://m1.nedstatbasic.net/n?id="+id;var r;if(options&1)r=d.referrer;else r=top.document.referrer;
 if(!(options&2)){var rc=r;var i=rc.indexOf('?');if(i >=0)rc=rc.substring(0, i);i=rc.lastIndexOf('/');if(i >=0)rc=rc.substring(0, i+1);var l=''+d.location;if(l.indexOf(rc)==0)r='';}
 if(r&&(r!=d.location))u+="&r="+escape(r);if((name=="Netscape"&&ver>=3))u+="&p="+plugNS();if(verIE>=5&&n.appVersion.indexOf('Win')>=0&&n.userAgent.indexOf('Opera')<0)u+="&p="+plugIE();
 if(ver>=4){var s=screen;var w=s.width;var c=s.colorDepth;if(w)u+="&w="+w;if(c)u+="&c="+c;}
 d.write('<a target=_blank href="http://v1.nedstatbasic.net/stats?'+id+'"><img src="'+u+'" border=0 '+tamanyo+' alt="Nedstat Basic - Free web site statistics"></a>');
}
// /FUNCIONES EXTRAIDAS DE http://m1.nedstatbasic.net/basic.js EL 16/05/2002
//----------------------------------------------------------------------------------------
function ContadorCiberstats(ContadorNombre) {
  if (Chivar) {
    document.writeln('<img SRC="'+DirBase+'img/infase.gif" border=0 width=77 height=22 alt="CiberStats">');
  } else {
//    document.writeln('<!--PRINCIPIO CiberStats-->');
    document.writeln('<a HREF="http://gigs.infase.es/cgi-bin/status.cgi?'+ContadorNombre+'">');
    document.writeln('<img src="http://gigs.infase.es/cgi-bin/hit.cgi?user='+ContadorNombre+''+'&referer='+escape(document.referrer)+'" border=0 width=77 height=22 alt="Ciberstats">');
    document.writeln('<noscript>');
    document.writeln('<img SRC="http://gigs.infase.es/cgi-bin/hit.cgi?'+ContadorNombre+'" border=0 width=77 height=22 alt="CiberStats">');
    document.writeln('</noscript>');
    document.writeln('</a>');
//    document.writeln('<!--FIN CiberStats-->');
  }
}
//----------------------------------------------------------------------------------------
function ContadorFastCounter(ContadorNombre) {
  if (Chivar) {
    document.writeln('<img src="'+DirBase+'img/fastcounter.gif" border=0 alt="FastCounter" width=90 height=16>');
  } else {
//    document.writeln('<a href="http://member.bcentral.com/cgi-bin/fc/fastcounter-login?'+ContadorNombre+'" target="_top">');
//    document.writeln('<img border="0" src="http://fastcounter.bcentral.com/fastcounter?'+ContadorNombre+'+4050803"></a>');
//    document.writeln('<font face="arial" size="1"><a href="http://fastcounter.bcentral.com/fc-join" target="_top">FastCounter by bCentral</a></font><br>');
    document.writeln('<a href="http://fastcounter.bcentral.com/fc-join" target="_top">');
    document.writeln('<img border="0" src="http://fastcounter.bcentral.com/fastcounter?'+ContadorNombre+'+4050803" width=90 height=16></a>');
  }
}
//----------------------------------------------------------------------------------------
function ContadorServicont(ContadorNombre) {
//  if (Chivar) {
//    document.writeln('<A HREF="http://www.servicont.com"><img src="'+DirBase+'img/servicont.gif" border=0 alt="Servicont" width=66 height=26></A>');
//  } else {
//    document.writeln("<img src=\"http://www.servicont.com/cgi-bin/sc.cgi?");
//    document.writeln("cnt="+ContadorNombre+"&ref=");
//    document.writeln(escape(document.referrer));
//    document.writeln("\" alt=\"Contador\" border=\"0\">");
//  }
}
//----------------------------------------------------------------------------------------
function NombreContadorBasico() {
var auxiliar=splitea(window.location.href,'/');
var NomCont='';
 for (var i=0;i<auxiliar.length;i++) {
  if (NomCont != '' ) NomCont+='_';
  var aux=auxiliar[i];
  if (aux.indexOf('dmam')>=0) aux='dmam';
  if (aux.indexOf('acazador')>=0) aux='cazador';
  if (aux.indexOf('.com')>=0) aux=aux.substring(0,aux.indexOf('.com'));;
  if (aux.indexOf('.net')>=0) aux=aux.substring(0,aux.indexOf('.net'));;
  if (aux.indexOf('.cjb')>=0) aux=aux.substring(0,aux.indexOf('.cjb'));;
  if (aux.substring(0,4)=='www.') aux=aux.substring(4);
  if (aux.substring(0,3)=='correo.') aux=aux.substring(3);
  if (aux.substring(0,3)=='w2.') aux=aux.substring(3);
  if (aux.substring(0,3)=='w3.') aux=aux.substring(3);
  if (aux.substring(0,3)=='w4.') aux=aux.substring(3);
  if (aux.indexOf('@')>=0)       aux=aux.substring(aux.indexOf('@'));
//050816  for (var j=0;j<Prales.length;j++) if (aux==Prales[j]) NomCont='';
  if (i==auxiliar.length-1 && aux.indexOf('.')>=0) aux=aux.substring(0,aux.indexOf('.'));
  NomCont+=aux;
  if (NomCont == 'http:' || aux=='users' ) NomCont='';
 }
 if (NomCont.indexOf('?')>=0) NomCont=NomCont.substring(0,NomCont.indexOf('?'));
 if (NomCont.indexOf('&')>=0) NomCont=NomCont.substring(0,NomCont.indexOf('&'));
 if (NomCont.substring(NomCont.length-1)=='_') NomCont+='index';
 return NomCont;
}
// -->




// <!--
//010927 cargadojsmarca('js_cookies');
// ----------------------------------------------------------------------------------------
// INICIO SECCION COOKIES
function LeeGalletaVal (documento,offset) {
  var endstr = documento.cookie.indexOf (";", offset);
  if (endstr == -1) endstr = documento.cookie.length;
  return unescape(documento.cookie.substring(offset, endstr));
}
function LeeGalleta (documento,nombre) {
  var arg = nombre + "=";
  var alen = arg.length;
  var clen = documento.cookie.length;
  var i = 0;
  while (i < clen) {
    var j = i + alen;
    if (documento.cookie.substring(i, j) == arg) return LeeGalletaVal (documento,j);
    i = documento.cookie.indexOf(" ", i) + 1;
    if (i == 0) break; 
  }
  return null;
}
function PonGalleta (documento,nombre, valor) {
  var argv = PonGalleta.arguments;
  var argc = PonGalleta.arguments.length;
  var expires = (argc > 3) ? argv[3] : null;
  var path = (argc > 4) ? argv[4] : null;
  var domain = (argc > 5) ? argv[5] : null;
  var secure = (argc > 6) ? argv[6] : false;
  documento.cookie = nombre + "=" + escape (valor) +((expires == null) ? "" : ("; expires=" + expires.toGMTString())) +((path == null) ? "" : ("; path=" + path)) +((domain == null) ? "" : ("; domain=" + domain)) + ((secure == true) ? "; secure" : "");
}
function BorraGalleta (documento,nombre) {
  var exp = new Date();
  exp.setTime (exp.getTime() - 1000000000);  // Al poner tiempo de expiración anterior al actual, lo borra
  var cval = LeeGalleta (documento,nombre);
  documento.cookie =nombre + "=" + cval + "; expires=" + exp.toGMTString();
}
// FINAL SECCION COOKIES
// ----------------------------------------------------------------------------------------
// -->

// <!--
var soporta = new DetectorNavegador();
// --------------------------------------------------------------------------
function Panel(idObj){
var Obj=null;
 if (soporta.DOM) { Obj=document.getElementById(idObj);
 } else if (soporta.IE4) { Obj=document.all[idObj];
 } else if (soporta.NS4) {
  var ObjAux=null;ObjAux=document.layers['MainTable']; 
  if (idObj=="MainTable" || ObjAux==null) Obj=document.layers[idObj]; else Obj=document.layers['MainTable'].layers[idObj];
 }
 if (Obj != null) {
  Obj.Sup=PanelSup;
  Obj.Izq=PanelIzq;
  Obj.Anc=PanelAnc;
  Obj.Alt=PanelAlt;
  Obj.Visible=PanelVisible;
 }
 return Obj;
}
// --------------------------------------------------------------------------
function PanelSup(Valor) {
 if (this != null) {
  if (Valor != null) {
   Valor = parseInt(Valor);
   if (soporta.DOM || soporta.IE4) this.style.top=Valor;
   if (soporta.NS4) this.top=Valor;
  }
  if (soporta.DOM || soporta.IE4) Valor=this.style.top;
  if (soporta.NS4) Valor=this.top;
  Valor = parseInt(Valor); if (isNaN(Valor)) Valor=0;
 }
 return Valor;
}
// --------------------------------------------------------------------------
function PanelIzq(Valor) {
 if (this != null) {
  if (Valor != null) {
   Valor = parseInt(Valor);
   if (soporta.DOM || soporta.IE4) this.style.left=Valor;
   if (soporta.NS4) this.left=Valor;
  }
  if (soporta.DOM || soporta.IE4) Valor=this.style.left;
  if (soporta.NS4) Valor=this.left;
  Valor = parseInt(Valor); if (isNaN(Valor)) Valor=0;
 }
 return Valor;
}
// --------------------------------------------------------------------------
function PanelAnc(Valor) {
 if (this != null) {
  if (Valor != null) {
   Valor = parseInt(Valor);
   if (soporta.DOM || soporta.IE4) this.offsetWidth=Valor;
   if (soporta.NS4) this.clip.width=Valor;
  }
  if (soporta.DOM || soporta.IE4) Valor=this.offsetWidth;
  if (soporta.NS4) Valor=this.clip.width;
  Valor = parseInt(Valor); if (isNaN(Valor)) Valor=0;
 }
 return Valor;
}
// --------------------------------------------------------------------------
function PanelAlt(Valor) {
 if (this != null) {
  if (Valor != null) {
   Valor = parseInt(Valor);
   if (soporta.DOM || soporta.IE4) this.offsetHeight=Valor;
   if (soporta.NS4) this.clip.height=Valor;
  }
  if (soporta.DOM || soporta.IE4) Valor=this.offsetHeight;
  if (soporta.NS4) Valor=this.clip.height;
  Valor = parseInt(Valor); if (isNaN(Valor)) Valor=0;
 }
 return Valor;
}
// --------------------------------------------------------------------------
function PanelVisible(Valor) {
 if (this != null) {
  if (Valor != null) {
   if (soporta.DOM || soporta.IE4) this.style.visibility=Valor;
   if (soporta.NS4) this.visibility=Valor;
  }
  if (soporta.DOM || soporta.IE4) Valor=this.style.visibility;
  if (soporta.NS4) Valor=this.visibility;
 }
 return Valor;
}
// --------------------------------------------------------------------------
// -->// <!--
//010927 cargadojsmarca('js_correoa');
// ------------------------------------------------------------------------------------
function correoa(correoe,mostrar,asunto,cuerpo,cc,bcc) {
var correoereal='';
var correoehref='';
var separador='?';
  if (correoe=='informatica|cjb.net') correoe='informatica|'+DomNom+extDNS
  if (correoe=='webmaster|cjb.net') correoe='webmaster|'+DomNom+extDNS
  for (i=0;i<correoe.length;i++) {
    if (correoe.substring(i,i+1)=='|') {correoereal+='@';} else {correoereal+=correoe.substring(i,i+1);}
  }
  correoehref=correoereal;
  if (cc) { correoehref+=separador+'cc='+cc; separador='&'; }
  if (bcc) { correoehref+=separador+'bcc='+bcc; separador='&'; }
  if (asunto) { correoehref+=separador+'Subject='+asunto; separador='&'; }
  if (cuerpo) { correoehref+=separador+'body='+cuerpo; separador='&'; }
  if (mostrar) {
//    G_L('<A HREF=javascript:correoa("'+correoehref+'");>'+correoehref+'</A>');
    G_L('<A HREF="mailto:'+correoehref+'">'+correoereal+'</A>');
    return false;
  } else {
    this.location='mailto:'+correoehref;
  }
}
// ----------------------------------------------------------------------------------------
// -->