var popunder="mailinglistpop.php"
	var winfeatures="width=645,height=550,scrollbars=0,resizable=0,toolbar=0,location=0,menubar=1,status=1,directories=0"

	var once_per_session=0

	function get_cookie(Name) {
		var search = Name + "="
		var returnvalue = "";
		if (document.cookie.length > 0) {
			offset = document.cookie.indexOf(search)
			if (offset != -1) { // if cookie exists
				offset += search.length
				end = document.cookie.indexOf(";", offset);
				if (end == -1) {
					end = document.cookie.length;
					returnvalue=unescape(document.cookie.substring(offset, end));
				}
			}
		}
		return returnvalue;
	}

	function loadornot(){
		if (get_cookie('popunder')==''){
			loadpopunder()
			document.cookie="popunder=yes"
		}
	}

	function loadpopunder(){
		win2=window.open(popunder,"",winfeatures)
		window.focus()
	}

	if (once_per_session==0) {
		loadpopunder()
	} else {
		loadornot()
	}