function pagetop() {
   if(navigator.appName == "Microsoft Internet Explorer" && document.compatMode == "CSS1Compat") {
      sctop = document.body.parentNode.scrollTop;
   }
   else if(window.pageYOffset){
      sctop = window.pageYOffset;
   } else {
      sctop = document.body.scrollTop;
   }

   if(sctop){
      scup = Math.ceil(sctop*.5);
      scrollBy(0,-scup);
      if (sctop-scup) setTimeout("pagetop()",20);
   }
}

var lead_source="";
theCookie=document.cookie+";";
start=theCookie.indexOf("lead_source=");
if (start != -1 ) {
	end=theCookie.indexOf(";",start);
	lead_source=unescape(theCookie.substring(start+"lead_source=".length, end));
}
if (lead_source == "" ) {
	var mainStr = document.URL;
	var offset = mainStr.indexOf("#");
	if(offset != -1)	{
		lead_source=mainStr.substring(offset+"#".length, mainStr.length);
	}else{
		mainStr=document.referrer;
		lead_source=mainStr.split("?", 1);
	}
	document.cookie="lead_source="+lead_source+"; domain=netpro.co.jp;";
}