sp_track_init();
function sp_track_init() {
 var newvisit;
 var referrer=sp_all_getcookie("sp_track_referrer");
 if (! referrer) {
  newvisit=1;
  referrer=document.referrer || "unknown";
  sp_all_setcookie("sp_track_referrer", referrer);
  }
 else
  newvisit=0;

 var firstvisit=sp_all_getcookie("sp_track_firstvisit");
 if (! firstvisit) {
  var now=new Date();
  now=now.getTime()/1000;
  firstvisit=Math.floor(now)+" 0 "+referrer;
 }
 firstvisit.match("([0-9]+) ([0-9]+) (.+)");
 firstvisit=RegExp.$1+" "+(Math.floor(RegExp.$2)+newvisit)+" "+RegExp.$3;
 sp_all_setcookie("sp_track_firstvisit", firstvisit, 1000);
}

function sp_all_setcookie(name, value, days) {
 if (arguments.length==3) {
  var time=days*24*60*60*1000;
  var CookieExpires=new Date();
  CookieExpires.setTime(CookieExpires.getTime()+time);
  document.cookie=name+"="+value+"; Path=/; expires="+CookieExpires.toGMTString();
 } else
  document.cookie=name+"="+value+"; Path=/";
}

function sp_all_getcookie(name) {
 var result=null;
 var tmp=" "+name+"=";
 var cookies=" "+document.cookie+";";
 var start=cookies.indexOf(tmp);
 if (start!=-1) {
  start+=tmp.length;
  end=cookies.indexOf(";", start);
  result=unescape(cookies.substring(start, end));
 }
 return result;
}

