//	@LightSpeed (R) RAM (Real Access Monitor) アクセス分析サブルーチン
//	Version 2.0	Nov. 30th 1999
//	Copyright (C) 1999 CoolSite, Inc.
//	Author H.Kitahara <kitahara@coolsite.co.jp> on Feb. 1st 1999
//	
//	Update M.Inoue <inoue@coolsite.co.jp> 10/26/2000
//	       Reason: サーバ移行対応（grazie => mocha）
//	
//	getCookei() の定義
function getCookie(name)
	{
	var cName = name + "=";
	var cNameLen = cName.length;
	var myCookie = document.cookie;
	var startPos = myCookie.indexOf(cName);
	var endPos;
	if (document.cookie.length == 0 )
		return null;
	if (startPos != -1)
		{
		startPos = startPos + cNameLen;
		endPos = myCookie.indexOf(";",startPos);
		if (endPos == -1) endPos = document.cookie.length;
		return unescape(myCookie.substring(startPos,endPos));
		}
	return null;
	}

//	setCookei() の定義
function setCookie(name,value,expire)
	{
	document.cookie = name + "=" + escape(value) + "; expires=" + expire.toGMTString();
	}

//	Cookei の有効期限の定義
var expire = new Date();
expire.setTime(expire.getTime() + (60*24*60*60*1000));

//	変数の定義
var eMail;
var counter;
var id;
var pageUrl;
pageUrl = document.location;
var mailTo;
//	モニタの送付先アドレス
mailTo = "lam@reflect.co.jp";

//	eMailの取得
eMail = getCookie("@email");

//	カウンタの所得及び加算
counter = getCookie("@"+pageUrl);
if ( counter == null)
	{
	counter = 0;
	}
counter++;
setCookie("@"+pageUrl,counter,expire);

//	ＩＤの所得及び加算
id = getCookie("@id");
if ( id == null)
	{
	id = "RAM" + Math.random()*1000000000000000000;
	}
setCookie("@id",id,expire);

//	ログファイルの出力
	document.write("<IMG SRC=http://www.coolsite.co.jp/cgi-bin/ram.cgi?"
	+ "mailto=" + escape(mailTo) + "&"
	+ "eMail=" + escape(eMail) + "&"
	+ "location=" + escape(pageUrl) + "&"
	+ "title=" + escape(document.title) + "&"
	+ "counter=" + counter + "&"
	+ "referrer=" + escape(document.referrer) + "&"
	+ "id=" + id
	+ " WIDTH=1 HEIGHT=1>");