var cgi = "http://kuee.vividcode.info/_lib/ana/ana.cgi";

// URLエンコード関数
// 参考:http://www.cresc.co.jp/tech/java/URLencoding/JavaScript_URLEncoding.htm
function EncodeURL(str){
	var s0, i, s, u;
	s0 = "";
	for (i = 0; i < str.length; i++){
		s = str.charAt(i);
		u = str.charCodeAt(i);
		if (s == " "){
			s0 += "+"; // 半角スペースは+に変換
		}else {
// 2a:* 2d:- 2e:. 5f:_ 30-39:0-9 41-5a:A-Z 61-7a:a-z
			if ( u == 0x2a || u == 0x2d || u == 0x2e || u == 0x5f || ((u >= 0x30) && (u <= 0x39)) || ((u >= 0x41) && (u <= 0x5a)) || ((u >= 0x61) && (u <= 0x7a))){
				s0 = s0 + s;
			}else {
// 上以外の1バイト文字
				if ((u >= 0x0) && (u <= 0x7f)){
					s = "0"+u.toString(16); // 文字コードを16進数にして頭に0を挿入
					s0 += "%"+ s.substr(s.length-2); // 変数sの文字列の後ろ2文字を取って、頭に%を挿入
// 4バイト文字
				}else if (u > 0x1fffff){
					s0 += "%" + (0xf0 + ((u & 0x1c0000) >> 18)).toString(16);
					s0 += "%" + (0x80 + ((u & 0x3f000) >> 12)).toString(16);
					s0 += "%" + (0x80 + ((u & 0xfc0) >> 6)).toString(16);
					s0 += "%" + (0x80 + (u & 0x3f)).toString(16);
// 3バイト
				}else if (u > 0x7ff){
					s0 += "%" + (0xe0 + ((u & 0xf000) >> 12)).toString(16);
					s0 += "%" + (0x80 + ((u & 0xfc0) >> 6)).toString(16);
					s0 += "%" + (0x80 + (u & 0x3f)).toString(16);
// 2バイト
				}else {
					s0 += "%" + (0xc0 + ((u & 0x7c0) >> 6)).toString(16);
					s0 += "%" + (0x80 + (u & 0x3f)).toString(16);
				}
			}
		}
	}
	return s0;
}

//document.write('OK... !');

var ttl = EncodeURL(document.title);
var url = EncodeURL(document.URL);
var ref = EncodeURL(document.referrer);

var vsrc = cgi;
vsrc = vsrc + '\?TITLE=';
vsrc = vsrc + ttl;
vsrc = vsrc + '&amp;URL=';
vsrc = vsrc + url;
vsrc = vsrc + '&amp;REFR=';
vsrc = vsrc + ref;

document.write('<script ' , 'type="text/javascript" src="' , vsrc , '"><\/script>');