function MM_nbGroup(event, grpName) { //v6.0
  var i,img,nbArr,args=MM_nbGroup.arguments;
  if (event == "init" && args.length > 2) {
    if ((img = MM_findObj(args[2])) != null && !img.MM_init) {
      img.MM_init = true; img.MM_up = args[3]; img.MM_dn = img.src;
      if ((nbArr = document[grpName]) == null) nbArr = document[grpName] = new Array();
      nbArr[nbArr.length] = img;
      for (i=4; i < args.length-1; i+=2) if ((img = MM_findObj(args[i])) != null) {
        if (!img.MM_up) img.MM_up = img.src;
        img.src = img.MM_dn = args[i+1];
        nbArr[nbArr.length] = img;
    } }
  } else if (event == "over") {
    document.MM_nbOver = nbArr = new Array();
    for (i=1; i < args.length-1; i+=3) if ((img = MM_findObj(args[i])) != null) {
      if (!img.MM_up) img.MM_up = img.src;
      img.src = (img.MM_dn && args[i+2]) ? args[i+2] : ((args[i+1])? args[i+1] : img.MM_up);
      nbArr[nbArr.length] = img;
    }
  } else if (event == "out" ) {
    for (i=0; i < document.MM_nbOver.length; i++) {
      img = document.MM_nbOver[i]; img.src = (img.MM_dn) ? img.MM_dn : img.MM_up; }
  } else if (event == "down") {
    nbArr = document[grpName];
    if (nbArr)
      for (i=0; i < nbArr.length; i++) { img=nbArr[i]; img.src = img.MM_up; img.MM_dn = 0; }
    document[grpName] = nbArr = new Array();
    for (i=2; i < args.length-1; i+=2) if ((img = MM_findObj(args[i])) != null) {
      if (!img.MM_up) img.MM_up = img.src;
      img.src = img.MM_dn = (args[i+1])? args[i+1] : img.MM_up;
      nbArr[nbArr.length] = img;
  } }
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

if(!document.getElementById){
  if(document.all)
  document.getElementById=function(){
	if(typeof document.all[arguments[0]]!="undefined")
	return document.all[arguments[0]]
	else
	return null
  }
  else if(document.layers)
  document.getElementById=function(){
	if(typeof document[arguments[0]]!="undefined")
	return document[arguments[0]]
	else
	return null
  }
}

function popper(url, height, width)
{
	newwindow=window.open(url,'name','height=' + height + ',width=' + width);
	if (window.focus) {newwindow.focus()}
}

function printPage() { print(document); }

function addToFavorites() {
	var urlAddress = unescape(window.location.href);
	var pageName = unescape(document.title);
	if (window.external) {
		window.external.AddFavorite(urlAddress,pageName);
	} else {
		alert("Sorry, your browser doesn't support this function.");
	}
}

function emailPageLink () {
//	document.write ('<a href="mailto:?Subject=Interesting%20material%20on%20www.web1marketing.com&body=C:\Documents%20and%20Settings\Josh\My%20Documents\My%20Webs\web1marketing.com\search-engine\marketing.htm">Share this page</a>');
	var urlAddress = window.location.href;
	var pageName = unescape(document.title);
	document.location = "mailto:?Subject=Page%20of%20interest%20at%20www.web1marketing.com&body=This page might be of interest: " + urlAddress;
}

function bookmarkThis () {
	if (navigator.appName=='Microsoft Internet Explorer') {
		window.external.AddFavorite(window.location.href,unescape(document.title));
	} else {
		alert('Your browser does not support this feature.');
	}
}

function setCookie(name, value, expires, path, domain, secure) {
	var curCookie = name + "=" + escape(value) +
		((expires) ? "; expires=" + expires.toGMTString() : "") +
		((path) ? "; path=" + path : "") +
		((domain) ? "; domain=" + domain : "") +
		((secure) ? "; secure" : "");
	document.cookie = curCookie;
}
	
function getCookie(name) {
	var dc = document.cookie;
	var prefix = name + "=";
	var begin = dc.indexOf("; " + prefix);
	if (begin == -1) {
		begin = dc.indexOf(prefix);
		if (begin != 0) return null;
	} 
	else begin += 2;
	var end = document.cookie.indexOf(";", begin);
	if (end == -1) end = dc.length;
	return unescape(dc.substring(begin + prefix.length, end));
}

function deleteCookie(name, path, domain) {
	if (getCookie(name)) {
		document.cookie = name + "=" +
		((path) ? "; path=" + path : "") +
		((domain) ? "; domain=" + domain : "") +
		"; expires=Thu, 01-Jan-70 00:00:01 GMT";
	}
}

function check () {
	alert('Code/referrer/real referrer: ' + getCookie('ac') + ' / ' + getCookie('referrer')+ ' / ' + top.document.referrer);
}

// ================= Code to run when loaded =================

var qs = location.search.substring(1);
var nv = qs.split('&');
var url = new Object();
var mySite = "tracedetect.com";

for(i = 0; i < nv.length; i++) {
	eq = nv[i].indexOf('=');
	url[nv[i].substring(0,eq).toLowerCase()] = unescape(nv[i].substring(eq + 1));
}

if (url.ac) { // If there is a parameter called "ac"
	var now = new Date();
	now.setTime(now.getTime() + 365 * 24 * 60 * 60 * 1000); 
	setCookie("ac", url.ac, now, '/');
} else {
	var ac = getCookie("ac");
	if (!ac) 	{	// No cookie set.
		var now = new Date();
		now.setTime(now.getTime() + 365 * 24 * 60 * 60 * 1000);
		
		var dr = document.referrer;
if (getCookie("testing")) {alert ("Referrer:" + dr + ".");}
		var loc_domain = dr.indexOf(".", dr.indexOf("//")) + 1;
if (getCookie("testing")) {alert ("loc_domain:" + loc_domain + ".");}
		var loc_end_domain = dr.indexOf(".", loc_domain);
if (getCookie("testing")) {alert ("loc_end_domain:" + loc_end_domain + ".");}
		var referring_domain = dr.substring(loc_domain, loc_end_domain);
if (getCookie("testing")) {alert ("referring_domain:" + referring_domain + ".");}
		switch (referring_domain)
		{
			case "google":
				var se_code = "SE-GO"
			break
			case "yahoo":
				var se_code = "SE-YA"
			break
			case "msn":
			case "g.msn.com":
			case "search.msn.com":
				var se_code = "SE-MSN"
			break
			case "aol":
				var se_code = "SE-AOL"
			break
			case "ask":
				var se_code = "SE-ASK"
			break
			case "netscape":
				var se_code = "SE-NET"
			break
			case "dogpile":
				var se_code = "SE-DOG"
			break
			case "altavista":
				var se_code = "SE-ALT"
			break
			default:
				var se_code = "NC"
		}

		setCookie("ac", se_code, now, '/');
	}
}

// For testing
if (url.reset) {
	deleteCookie("ac");
	deleteCookie("referrer");
}

// For testing
if (url.testing) {
	if (url.testing = "clear") {
		deleteCookie("testing");
		alert ("Testing cookie cleared.");
	} else {
		setCookie ("testing", url.testing, now, '/');
		alert ("Testing cookie set: " + url.testing);
	}
}


// If from an external site, store the referrer in a cookie that lasts 2 hours.
var referrer = top.document.referrer;
if (referrer == "") referrer = mySite;
if (referrer.indexOf(mySite) != -1) {
	; // If referrer is from within the site, do nothing.
} else {
	var now = new Date();
	now.setTime(now.getTime() + 2 * 60 * 60 * 1000); 
	setCookie("referrer",top.document.referrer, now, '/')
};