var TRKtimer;

function stattrak_setCookie(TRKNameOfCookie, TRKvalue, TRKexpirehours) {
        var TRKExpireDate = new Date ();
        TRKExpireDate.setTime(TRKExpireDate.getTime() + (TRKexpirehours * 3600 * 1000));
        document.cookie = TRKNameOfCookie + "=" + escape(TRKvalue) + "; path=/" + ((TRKexpirehours == null) ? "" : "; expires=" + TRKExpireDate.toGMTString());
}

function stattrak_detectIE(TRKClassID) {
        TRKresult = false;
        document.write('<SCR' + 'IPT LANGUAGE=VBScript>\n on error resume next \n TRKresult = IsObject(CreateObject("' + TRKClassID + '"))</SCR' + 'IPT>\n');
        if (TRKresult) return 'y';
        else return 'n';
}

function stattrak_detectNS(TRKClassID) {
        var TRKn = "n";
        if (TRKnse.indexOf(TRKClassID) != -1) if (navigator.mimeTypes[TRKClassID].enabledPlugin != null) TRKn = "y";
        return TRKn;
}

function stattrak_getCookie(TRKNameOfCookie){
        if (document.cookie.length > 0){
                var TRKbegin = document.cookie.indexOf(TRKNameOfCookie+"=");
                if (TRKbegin != -1) {
                        TRKbegin += TRKNameOfCookie.length+1;
                        var TRKend = document.cookie.indexOf(";", TRKbegin);
                        if (TRKend == -1) TRKend = document.cookie.length;
                        return unescape(document.cookie.substring(TRKbegin, TRKend));
                }
                return null;
        }
        return null;
}

function stattrak_startTimer() {
	TRKtimer = setTimeout("stattrak_refreshCookie()", 600000);
}

function stattrak_refreshCookie() {
	stattrak_setCookie("STATTRAKSESSION_ID", TRKsessionid, 1);
	stattrak_startTimer()
}

function ie_page_size() {
	if (document.all) {
        var size = (document.fileSize)*1;
        var y = document.images;
        var imglength = 0;
        for (i=0;i<y.length;i++)
        {
                imglength += (y[i].fileSize)*1;
        }
        return (size + imglength);
	}
	
	return 0;
}


if (stattrak_id) {
var TRKnow = new Date();
var TRKscreen=screen.width+"x"+screen.height;
var TRKcdi;
if (navigator.appName != "Netscape") {TRKcdi=screen.colorDepth}
else {TRKcdi=screen.pixelDepth};
var TRKjava=navigator.javaEnabled();
var TRKrandomnumber=Math.floor(Math.random()*10000);

var TRKuserid=""; TRKuserid=stattrak_getCookie("STATTRAKUSER_ID");
var TRKsessionid=""; TRKsessionid=stattrak_getCookie("STATTRAKSESSION_ID");
TRKuserid=stattrak_getCookie("STATTRAKUSER_ID");
TRKsessionid=stattrak_getCookie("STATTRAKSESSION_ID");
if (TRKuserid == null || (TRKuserid=="")) {TRKuserid = "stattrakuser_id" + TRKnow.getTime() +"r"+ TRKrandomnumber};
if (TRKsessionid == null || (TRKsessionid=="")) {TRKsessionid = "stattraksession_id" + TRKnow.getTime() +"r"+ TRKrandomnumber};
stattrak_setCookie("STATTRAKUSER_ID", TRKuserid, 10000);
stattrak_setCookie("STATTRAKSESSION_ID", TRKsessionid, 1);

var TRKagt=navigator.userAgent.toLowerCase();
var TRKie  = (TRKagt.indexOf("msie") != -1);
var TRKns  = (navigator.appName.indexOf("Netscape") != -1);
var TRKwin = ((TRKagt.indexOf("win")!=-1) || (TRKagt.indexOf("32bit")!=-1));
var TRKmac = (TRKagt.indexOf("mac")!=-1);

// Detect the browser internal width and height
if (document.documentElement && document.documentElement.clientWidth)
var TRKwinsize = document.documentElement.clientWidth + 'x' + document.documentElement.clientHeight;
else if (document.body)
TRKwinsize = document.body.clientWidth + 'x' + document.body.clientHeight;
else
TRKwinsize = window.innerWidth + 'x' + window.innerHeight;

if (TRKie && TRKwin) {
		var TRKshk = stattrak_detectIE("SWCtl.SWCtl.1")
		var TRKfla = stattrak_detectIE("ShockwaveFlash.ShockwaveFlash.1")
		var TRKrp  = stattrak_detectIE("rmocx.RealPlayer G2 Control.1")
		var TRKmov = stattrak_detectIE("QuickTimeCheckObject.QuickTimeCheck.1")
		var TRKwma = stattrak_detectIE("MediaPlayer.MediaPlayer.1")
		var TRKpdf = 'n';
if (stattrak_detectIE("PDF.PdfCtrl.1") == 'y') { TRKpdf = 'y'; }
	if (stattrak_detectIE('PDF.PdfCtrl.5') == 'y') { TRKpdf = 'y'; }
		if (stattrak_detectIE('PDF.PdfCtrl.6') == 'y') { TRKpdf = 'y'; }
}
if (TRKns || !TRKwin) {
		var TRKnse = ""; for (var TRKi=0;TRKi<navigator.mimeTypes.length;TRKi++) TRKnse += navigator.mimeTypes[TRKi].type.toLowerCase();
		var TRKshk = stattrak_detectNS("application/x-director")
		var TRKfla = stattrak_detectNS("application/x-shockwave-flash")
		var TRKrp  = stattrak_detectNS("audio/x-pn-realaudio-plugin")
		var TRKmov = stattrak_detectNS("video/quicktime")
		var TRKwma = stattrak_detectNS("application/x-mplayer2")
		var TRKpdf = stattrak_detectNS("application/pdf");
}

var total_size = ie_page_size();

var img = 'https://stattrak.submitnet.net/cgi/stattrak.pl?id=' + stattrak_id + '&ref=';
img += escape( document.referrer );
img += '&size=' + escape(total_size);
img += '&screen=' + TRKscreen + '&win=' + TRKwinsize + '&cdi=' + TRKcdi + '&java=' + TRKjava + '&shk=' + TRKshk + '&fla=' + TRKfla + '&rp=' + TRKrp + '&mov=' + TRKmov + '&wma=' + TRKwma + '&pdf=' + TRKpdf + '&uid=' + TRKuserid + '&sid=' + TRKsessionid;

stattrak_startTimer();

document.write('<img src="' + img + '">');
}
