

fullurl ="" + window.location;
//ref =""+ document.referrer;
//alert (fullurl);

parturl=fullurl.split("/");


if(fullurl.match(/s13silvia\.net/))
{//ドメインチェック
	//dade = parturl[6].split(".");
	//fullurl=""+ parturl[5]+dade[0];

	if( fullurl.match(/http\:\/\/(.*)\.s13silvia\.net/) )
	{//サブドメイン付きのURLの場合
		mydomain = RegExp.$1;
//		alert(mydomain);
	}
	else
	{//サブドメイン無しのURL
		mydomain = "";
	}

	limename = mydomain ;

	if(3 == parturl.length)
	{
		limename = "" + limename +"index";
	}
	for(i=3;i<parturl.length;i++)
	{//「/」の数繰り返す。３以下は無いはず。

//		alert(parturl[3]);

		if(i == parturl.length -1)
		{//最後の区切りだった場合、

	
			if(0 == parturl[i].length)
			{//
				limename = "" +	limename + "index";
				break;
			}
			else if(-1== parturl[i].indexOf("."))
			{//「.」が無い場合
				limename = "" +	limename + parturl[i] + "index";
				break;
			}
			else
			{//「.」が有る場合、ファイル名をカット
				filename =  parturl[i].split(".");
				limename = "" + limename + filename[0];
				break;
			}			
		}
		else
		{//最後の区切り以外だったらファイル名追記
			limename = "" + limename + parturl[i];
		}



	}

//	alert(limename);
	tera="<IMG SRC='http://s13silvia.net/lime_w/lime.cgi?page=" + limename + "&name=" +document.title + "' WIDTH=1 HEIGHT=1>";
	document.write (tera);

/*	
	if(ref.indexOf("/") > -1)
	{
		dare=ref.split("/");
		if(dare[2]!="www16.tok2.com" || dare[4]!="masa2000")
		{//リファラーを見て外サーバからのLINKならば、reportに登録
			document.write("<img src='http://www16.tok2.com/home/masa2000/report/report.cgi?");
			document.write(document.referrer+"' width=1 height=1>");

		}
	}
*/
}



