// Todas las funciones son creación de Elisoft(c)2005-2011

// Datos URL
HREFself=self.location.href;
PROTself=self.location.protocol;
HOSTself=self.location.host;
PATHself=self.location.pathname;
SEARself=self.location.search;
HASHself=self.location.hash;

// AdSense
si=true;
no=false;
AdSense=si;
AdSense_Principal=si;
AdSense_Demo=si;
AdSense_Enlaces=si;
AdSense_Foro=si;
AdSense_InOut=si;
AdSense_Juegos=si;
AdSense_Tienda=si;
AdSense_Campos=si;
AdSense_Videos=si;
AdSense_Selecciones=si;
AdSense_Destacados=si;
AdSense_SuscriptorTacticas=si;
AdSense_SuscriptorPromesas=si;
AdSense_Sub20=si;
AdSense_Noticias=si;
AdSense_Curso=si;
AdSense_PFisica=si;
AdSense_FSala=si;
AdSense_PPsicologica=si;
AdSense_Juridico=si;
AdSense_Album=si;
AdSense_Plantillas=si;
AdSense_Trabajos=si;
AdSense_Informes=si;
AdSense_Nutricion=si;

// Ejecutar sólo en la web
if (PROTself=="http:")
{
  AnalyticsScript();
  AnalyticsInicia();
  AnalyticsASClick();
  SaltaMarcosAjenos();
  EvitaEnlaceProfundo();
  ActivarEmbebidos();
  SnapPreviewAnywhere();
}

// Lanza EfectoFlash() en objetos con ID=flash-x
RGB=new Array()
sufi="|0|1|2|3|4"
sufi=sufi.split("|")
for(qsufi=0;qsufi<sufi.length;qsufi++)
{idobj="flash"+sufi[qsufi];EfectoFlash(idobj)}

// Aplica efecto flash al objeto
function EfectoFlash(idobj)
{
  if(document.getElementById(idobj))
  {
    if(typeof(RGB[idobj])=="undefined"){RGB[idobj]={R:0,G:0,B:0,iR:25,iG:0,iB:5}}
    R=RGB[idobj].R;G=RGB[idobj].G;B=RGB[idobj].B
    iR=RGB[idobj].iR;iG=RGB[idobj].iG;iB=RGB[idobj].iB
    if(R+iR<0||R+iR>255){iR=-iR};R=R+iR
    if(G+iG<0||G+iG>255){iG=-iG};G=G+iG
    if(B+iB<0||B+iB>255){iB=-iB};B=B+iB
    RGB[idobj].R=R;RGB[idobj].G=G;RGB[idobj].B=B
    RGB[idobj].iR=iR;RGB[idobj].iG=iG;RGB[idobj].iB=iB
    document.getElementById(idobj).style.color='rgb('+R+','+G+','+B+')'
    retardo=100
  }
  else
  {retardo=1000}
  setTimeout('EfectoFlash("'+idobj+'")',retardo)
}

// Retorna el objeto Shockwave Flash
function ObjetoSWF(archivo,ancho,alto)
{
  flash=''
  flash=flash+'<object width="'+ancho+'" height="'+alto+'" classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,0,0">'
  flash=flash+'<param name="movie" value="'+archivo+'">'
  flash=flash+'<param name="quality" value="high">'
  flash=flash+'<param name="wmode" value="opaque">'
  flash=flash+'<embed width="'+ancho+'" height="'+alto+'" src="'+archivo+'" quality="high" wmode="opaque" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer">'
  flash=flash+'</embed>'
  flash=flash+'</object>'
  return flash
}

// Muestra correos
function CorreoTDF(nombre)
{
  usuario = new Array() 
  usuario["afraile"]="alfonsofraile"
  usuario["fagudo"]="fernandoagudo"
  usuario["fperez"]="franciscoperez"
  usuario["ysuarez"]="yolandasuarez"
  usuario["erincon"]="joseenriquerincon"
  usuario["eagea"]="evaagea"
  usuario["alorenzo"]="adoracionlorenzo"
  usuario["dvives"]="delfivives"
  usuario["sgomar"]="salvadorgomar"
  usuario["nfraile"]="nicolasfraile"
  usuario["jlfraile"]="joseluisfraile"
  usuario["xger"]="xavierger"
  usuario["npedrosa"]="nuriapedrosa"
  usuario["padial"]="victorpadial"
  usuario["mila"]="milagrosestrada"
  usuario["jfernandez"]="javierfernandez"
  usuario["eiglesias"]="enriqueiglesias"
  usuario["npedrosa"]="nuriapedrosa"
  usuario["rrbada"]="rafaelruiz"
  usuario["webmaster"]="webmaster"
  mailtdf=usuario[nombre]+"@tacticasdefutbol.com"
  document.write(mailtdf)
}

// Evita inserción en marcos ajenos
function SaltaMarcosAjenos()
{
  if(HREFself.indexOf("piratas.html")>0){return};
  if(document.referrer.indexOf("complejodeportivohuechuraba")>0)
  {window.location.href="http://www.tacticasdefutbol.com/cursotactica/piratas.html";return};

  if(document.referrer=="" || document.referrer.indexOf("tacticasdefutbol.com")>0){return};
  window.top.location=HREFself;
}

// Evita enlaces profundos
function EvitaEnlaceProfundo()
{
  if (HREFself.indexOf("alta.php")>0 && HREFself.indexOf("uniqid")<0){return};
  if (HREFself.indexOf("payment.php")>0){return};
  if (top.location.pathname=="/" || top.location.pathname=="/index.html"){return};

  URLdom=PROTself+"//"+HOSTself;
  URLpag=PATHself+SEARself+HASHself;

  if (CookiesOn())
  {
    SetCookie("URLpag",URLpag,null,"/",null,null);
    window.top.location=URLdom;
  }
  else
  {
    URLtop=URLdom+"?p="+URLpag;
    window.top.location=URLtop;
  }
}

// Analytics (12-03-2006 20:00) UA-189478-3
// Analytics (25-06-2006 12:25) UA-437198-1
// Analytics (19-07-2008 18:55) UA-5041639-1
function AnalyticsScript()
{
  document.write('<script type="text/javascript" src="http://www.google-analytics.com/urchin.js"></script>');
}
function AnalyticsInicia()
{
  if(typeof(urchinTracker)=="function"){_uacct="UA-5041639-1";urchinTracker()}
  else{setTimeout("AnalyticsInicia()",100)};
}

// Seguimiento de AdSense con Analytics
function AnalyticsASClick()
{
  document.write('<script defer type="text/javascript" src="http://www.tacticasdefutbol.com/astrack.js"></script>');
}

// Seguimiento de un código con Analytics
function AnalyticsXXClick(codigo)
{
  if(typeof(urchinTracker)=="function"){_uacct="UA-5041639-1";urchinTracker("/"+codigo)}
  else{setTimeout("AnalyticsXXClick(codigo)",100)};
}

// Activación embebidos en IExplorer y Opera
function ActivarEmbebidos()
{
  if (HREFself.indexOf("/tacticas/")<0){return};
  document.write('<script defer type="text/javascript" src="http://www.tacticasdefutbol.com/embeddedcontent.js"></script>');
}

// Snap Preview Anywhere
function SnapPreviewAnywhere()
{
  if(HREFself.indexOf("enlaces")<0 && HREFself.indexOf("juegos")<0 || HREFself.indexOf("enlaces.html")>0){return};
  document.write('<script defer type="text/javascript" id="snap_preview_anywhere" src="http://spa.snap.com/snap_preview_anywhere.js?ap=1&sb=0&cl=1&si=0&oi=0&th=green&lang=es-mx&key=0a4827fb3e720ba0f761b59d2967513b&domain=www.tacticasdefutbol.com"></script>');
}

// Estado de las Cookies
function CookiesOn()
{
  SetCookie("ctest","ctest");
  estado = GetCookie("ctest") ? true : false;
  DelCookie("ctest");
  return estado;
}

// Guarda una Cookie
function SetCookie(nombre,valor,caduca,ruta,dominio,seguro)
{
  valor=escape(valor)
  galleta = nombre+"="+valor +
    ((caduca) ? "; expires="+caduca.toGMTString() : "") +
    ((ruta) ? "; path="+ruta : "") +
    ((dominio) ? "; domain="+dominio : "") +
    ((seguro) ? "; secure" : "")

  //alert(galleta)
  document.cookie = galleta
}

// Recupera una Cookie
function GetCookie(nombre)
{
  nombre=nombre+"="
  galleta=document.cookie
  galleta=galleta.split(";")
  valor=null
  for (quelin=0;quelin<galleta.length;quelin++)
  {
    linea=galleta[quelin]
    donde=linea.indexOf(nombre)
    if (donde>-1)
    {
      valor=linea.substring(nombre.length+donde,linea.length)
    }
  }
  valor=unescape(valor)
  if(valor=="null"){valor=null}
  if(valor=="true"){valor=true}
  if(valor=="false"){valor=false}

  //alert(valor)
  return valor
}

// Borra una Cookie
function DelCookie(nombre,ruta,dominio)
{
  caducar=new Date()
  caducar.setTime(caducar.getTime()-1)

  galleta = nombre+"=" +
    "; expires="+caducar.toGMTString() +
    ((ruta) ? "; path="+ruta : "") +
    ((dominio) ? "; domain="+dominio : "")

  //alert(galleta)
  document.cookie = galleta
}

function depura()
{
  mensaje="Depurando...";
  for(a=0;a<arguments.length;a++)
  {mensaje=mensaje+"\n"+typeof(arguments[a])+" "+arguments[a]};
  alert(mensaje);
};

