
var cDomain=self.location.hostname;if(cDomain.indexOf(".")<cDomain.lastIndexOf(".")){var domainOffset=cDomain.indexOf(".")+1
cDomain=cDomain.substr(domainOffset);}
if(document.referrer.indexOf(cDomain)==-1&&document.referrer!=""&&document.cookie.indexOf("referrer=")==-1){var expDays=90;var exp=new Date();exp.setTime(exp.getTime()+(expDays*24*60*60*1000));var refdate=new Date();document.cookie="referrer="+escape(document.referrer+"&&&"+refdate.toGMTString())+"; expires="+exp.toGMTString()+"; path=/; domain="+cDomain;}
var allCookies=document.cookie;var cPos=allCookies.indexOf("referrer=");if(cPos!=-1){var cdstart=cPos+9;var cdend=allCookies.indexOf(";",cdstart);if(cdend==-1)cdend=allCookies.length;var cookieContent=allCookies.substring(cdstart,cdend);cookieContent=unescape(cookieContent);var cdatestart=cookieContent.indexOf("&&&",0);var cdateend=cookieContent.length;var cRefer=cookieContent.substring(0,cdatestart);var cDateRef=cookieContent.substring(cdatestart+3,cdateend)}
else{var cRefer="No cookie";var cDateRef="No cookie";}
function getCookie(NameOfCookie)
{if(document.cookie.length>0)
{begin=document.cookie.indexOf(NameOfCookie+"=");if(begin!=-1)
{begin+=NameOfCookie.length+1;end=document.cookie.indexOf(";",begin);if(end==-1)end=document.cookie.length;return unescape(document.cookie.substring(begin,end));}}
return null;}
function setCookie(NameOfCookie,value,expiredays)
{var ExpireDate=new Date();ExpireDate.setTime(ExpireDate.getTime()+(expiredays*24*3600*1000));document.cookie=NameOfCookie+"="+escape(value)+
((expiredays==null)?"":"; expires="+ExpireDate.toGMTString());}
function delCookie(NameOfCookie)
{if(getCookie(NameOfCookie)){document.cookie=NameOfCookie+"="+"; expires=Thu, 01-Jan-70 00:00:01 GMT";}}
function delRefer()
{if(getCookie("referrer")){document.cookie="referrer=; expires=Thu, 01-Jan-70 00:00:01 GMT";}}