TRKnow = new Date();
var TRKr="";
TRKr = document.referrer;
TRKssi=screen.width+"x"+screen.height;TRKj=navigator.javaEnabled()
if (navigator.appName != "Netscape") {TRKcdi=screen.colorDepth}
else {TRKcdi=screen.pixelDepth}
TRKusercode=getCookie("UserCode")
TRKsessioncode=getCookie("SessionCode")
var TRKrandomnumber=Math.floor(Math.random()*10000)
if (TRKusercode == null || (TRKusercode=="")) {TRKusercode = "UserCode" + TRKnow.getTime() +"r"+ TRKrandomnumber}
if (TRKsessioncode == null || (TRKsessioncode=="")) {TRKsessioncode = "SessionCode" + TRKnow.getTime() +"r"+ TRKrandomnumber}
setCookie("UserCode", TRKusercode, 10000)
setCookie("SessionCode", TRKsessioncode, 1)
TRKusercode=""
TRKsessioncode=""
TRKusercode=getCookie("UserCode")
TRKsessioncode=getCookie("SessionCode")

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);

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

document.write("<a href=\"http://www.ergo.co.uk/tracker/trackerexcludeuser.asp?UserName="+TRKusercode+"\"><IMG BORDER=0 SRC=\"http://www.ergo.co.uk/tracker/tracker.asp?SN="+sn+"&SSI="+TRKssi+"&CDI="+TRKcdi+"&J="+TRKj+"&R="+escape(TRKr)+"&uc="+TRKusercode+"&sc="+TRKsessioncode+"&ICON="+icon+"&SHK="+TRKshk+"&FLA="+TRKfla+"&RP="+TRKrp+"&MOV="+TRKmov+"&WMA="+TRKwma+"&PDF="+TRKpdf+"&TIME="+TRKnow.getTime()+"\"></a>\n")

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

function 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 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 'Yes';
	else return 'No';
}

function detectNS(TRKClassID) {
	TRKn = "No";
	if (TRKnse.indexOf(TRKClassID) != -1) if (navigator.mimeTypes[TRKClassID].enabledPlugin != null) TRKn = "Yes";
	return TRKn;
}

function TRKShowForm(TRKobj){
var TRKstr='\?'
for (i=0;i<TRKobj.elements.length;i++) {
	TRKShow = true
	if (TRKobj.elements[i].type == "radio" || TRKobj.elements[i].type == "checkbox") TRKShow = TRKobj.elements[i].checked;
	if (TRKobj.elements[i].type == "select") TRKShow = TRKobj.elements[i].selected;
	if (TRKShow) TRKstr=TRKstr+TRKobj.elements[i].name+'='+escape(TRKobj.elements[i].value)+'&';
}
TRKstr=TRKstr.substring(0,2000)
return TRKstr
}