function createCookie(name,hours) {
	var nameEQ = document.referrer;
	if (nameEQ.match("npresence.net") == null) {
		eraseCookie(name);
		if (hours) {
			var date = new Date();
			date.setTime(date.getTime()+(hours*60*60*1000));
			var expires = "; expires="+date.toGMTString();
		}
		else var expires = "";
		document.cookie = name+"="+document.referrer+expires+"; path=/";
	}
}

function noCookieExists(name) {
	var nameEQ = name + "=";
	var ca = document.cookie.split(';');
	for(var i=0;i < ca.length;i++) {
		var c = ca[i];
		while (c.charAt(0)==' ') 
			c = c.substring(1,c.length);
		if (c.indexOf(nameEQ) == 0) 
			return false;
	}
	return true;
}

function readCookie(name) {
	var nameEQ = name + "=";
	var ca = document.cookie.split(';');
	for(var i=0;i < ca.length;i++) {
		var c = ca[i];
		while (c.charAt(0)==' ') c = c.substring(1,c.length);
		if (c.indexOf(nameEQ) == 0) 
			return c.substring(nameEQ.length,c.length);
	}
	return "Referrer Unknown";
}

function eraseCookie(name) {
	var hours = -1;
	if (hours) {
		var date = new Date();
		date.setTime(date.getTime()+(hours*60*60*1000));
		var expires = "; expires="+date.toGMTString();
	}
	else var expires = "";
	document.cookie = name+"="+""+expires+"; path=/";
}

function setReferrer() {
	var cookie; 
	if (document.referrer != '') {
		document.Contact.Referrer.value = document.referrer;
	} else {
		document.Contact.Referrer.value = "Referrer Unknown";
	}
	cookie = readCookie('referrer');
	document.Contact.Source.value = cookie;
}


createCookie('referrer', 24);