function _tpexec(pagi){
var sessiontime,_hoy,codaleat1,codaleat1b,codaleat2,codaleat2b,espiracion;

var myd=document.domain;
if (myd.substring(0,4)=="www."){
 myd=myd.substring(4,myd.length);}

if (dameCookie("_trackerperu2007session")==null){
codaleat1=Math.round(Math.random()*2147483647);
codaleat1b=Math.round(Math.random()*9999);
sessiontime="1800";
_hoy=new Date();
espiracion=new Date(_hoy.getTime()+(sessiontime*1000));
espiracion=" expires="+ espiracion.toGMTString()+";";
document.cookie="_trackerperu2007session=" + codaleat1b + codaleat1 + "; path=/;" + espiracion +  "domain=" + myd + ";";}

if (dameCookie("_trackerperu2007user")==null){
codaleat2=Math.round(Math.random()*2147483647);
codaleat2b=Math.round(Math.random()*9999);
document.cookie="_trackerperu2007user=" + codaleat2b + codaleat2 + "; path=/; expires=Sun, 18 Jan 2038 00:00:00 GMT;" +  "domain=" + myd + ";";}

var vlocation="http://www.";
vlocation+="trackerperu.info"
vlocation+="/tracker/"
vlocation+="trackering.asp"
var vr="";
var vrtype="0";
var vres="0";
var vurl="";
var vcolors="";
var vnav=navigator.appName;
var navlang="";
var vjava=navigator.javaEnabled()?1:0;
var vflash=versionflash();
var vcookie=navigator.cookieEnabled?1:0;
var napp="";

if ((vr == "") || (vr == "unknown origin") || (vr == "unknown") || (vr == "undefined"))
	if (document["parent"] != null) 
		if (parent["document"] != null) 
			if (parent.document["referrer"] != null) 
				if (typeof(parent.document) == "object")
				{
					vrtype="1";
					vr=parent.document.referrer; 
				}

if ((vr == "") || (vr == "unknown origin") || (vr == "unknown") || (vr == "undefined"))
	if (document["referrer"] != null) 
	{
		vrtype="4";
		vr = document.referrer;
	}

if((vr=="") || (vr=="undefined")){vr="Favoritos/Directamente";};

vres=screen.width+"x"+screen.height;

vurl = document.URL;

//adicionado el 28/04/2009
if (typeof _tpdato != 'undefined')
{
	if (vurl.indexOf('?')==-1)	vurl += '?_tpdato=' + _tpdato;
	else vurl += '&_tpdato=' + _tpdato;
}
//////////////////////////


if(vnav.substring(0,9)=="Microsoft"){vnav="MSIE";};
vcolors=(vnav=="MSIE")?screen.colorDepth:screen.pixelDepth;
if(vcolors=="undefined"){vcolors="";};
if (vcolors!="") {vcolors=vcolors+"-bit";}

if (navigator.language) { navlang=navigator.language.toLowerCase(); }
else if (navigator.browserLanguage) { navlang=navigator.browserLanguage.toLowerCase(); }

version=navigator.appVersion.toLowerCase().split(";", 3)[1];
vnav=navigator.appName.toLowerCase();
napp=navigator.userAgent.toLowerCase();
tpu=dameCookie("_trackerperu2007user");
tps=dameCookie("_trackerperu2007session");

var _tpimg=new Image(1,1);
var _gettp=vlocation 
_gettp+= "?ide=" + ide + "&REF=" + escape(vr);
_gettp+="&vcolors=" + vcolors + "&vjava=" + vjava;
_gettp+="&vflash=" + vflash + "&vcookie=" + vcookie;
_gettp+="&res=" + vres + "&colors=" + vcolors;
_gettp+="&version=" + version + "&vnapp=" + escape(napp);
_gettp+="&navlang=" + navlang + "&tpu=" + tpu;
_gettp+="&tps=" + tps;
if (_tpexec.arguments.length>0){vurl+="?_trParam=" + pagi}
_tpimg.src = _gettp + "&vurl=" + escape(vurl);
_tpimg.onload=function() {return;}
}

_tpexec();

function dameCookie(name){
  var cname = name + "=";               
  var dc = document.cookie;             
  if (dc.length > 0) {              
    begin = dc.indexOf(cname);       
    if (begin != -1) {           
      begin += cname.length;       
      end = dc.indexOf(";", begin);
      if (end == -1) end = dc.length;
        return unescape(dc.substring(begin, end));
    } 
  }
  return null;
}

function versionflash(){
 var f="-";
 if (navigator.plugins && navigator.plugins.length) {
  for (var ii=0;ii<navigator.plugins.length;ii++) {
   if (navigator.plugins[ii].name.indexOf('Shockwave Flash')!=-1) {
    f=navigator.plugins[ii].description.split('Shockwave Flash ')[1];
    break;
   }
  }
 } else if (window.ActiveXObject) {
  for (var ii=10;ii>=2;ii--) {
   try {
    var fl=eval("new ActiveXObject('ShockwaveFlash.ShockwaveFlash."+ii+"');");
    if (fl) { f=ii + '.0'; break; }
   }
   catch(e) {}
  }
 }
 return f;
}