function kaone_err100(string)
{
    alert(string)
}

function kaone_isDigit(c)
{
    return "0123456789.".indexOf(c) == -1 ? 0 : 1
}

var newline = (navigator.appVersion.lastIndexOf('Win') != -1) ? "\r\n" : "\n"
var string_constant_blank = "                                  "
var string_constant_zero  = "0000000000000000000000000000000000"
var _line = ""  // 出力行バッファ

function  kaone_out_one_line()
{
    document.Result.result.value =_line+newline
    _line = ""
}

function kaone_printf(arg)
{
    var i, c, c2, c3, ww, pointer = 1, w = 0, d = 0, left, piriod
    var format = kaone_printf.arguments[0]
    _line = ""
    for (i = 0; i < format.length; i++) {
		zero = 0
        c = format.charAt(i)
        if (c == "/") {
            if (_line == "") _line = " "
            kaone_out_one_line()
        }
        else if (c == "%") {
            left = 0
            i++
            c2 = format.charAt(i)
            if (c2 == "%" || c2 == "/") {
                _line += c2
                continue
            }
            else if (c2 == "-") {
                left = 1
                c2 = format.charAt(++i)
            }
            if (kaone_isDigit(c2)) {
                if( c2 == "0" ){
                    c3 = format.charAt(++i)
                    zero = 1
		            if (kaone_isDigit(c3)) {
		                piriod = w = d = 0
		                while ((c4 = format.charAt(i)) != "s" && c4 != "f" &&
		                        c4 != "g" && c4 != "i" && c4 != "d") {
		                    if (c4 == ".") {
		                        piriod = 1
		                    }
		                    else if (kaone_isDigit(c4) == 0) {
		                        kaone_err100("non digit after % ("+c4+")")
		                    }
		                    else if (piriod == 0) {
		                        w = w*10+eval(c4)
		                    }
		                    else if (piriod == 1) {
		                        d = d*10+eval(c4)
		                    }
		                    i++
		                }
		                if (c4 == "s") {
		                    kaone_print_string(left, w, kaone_printf.arguments[pointer++])
		                }
		                else if (c4 == "g" || c4 == "f") {
		                    kaone_print_number(zero, c4, w, d, kaone_printf.arguments[pointer++])
		                }
		                else if (c4 == "i" || c4 == "d") {
		                    kaone_print_number(zero, c4, w, 0, kaone_printf.arguments[pointer++])
		                }
					}
                }else{
	                piriod = w = d = 0
	                while ((c3 = format.charAt(i)) != "s" && c3 != "f" &&
	                        c3 != "g" && c3 != "i" && c3 != "d") {
	                    if (c3 == ".") {
	                        piriod = 1
	                    }
	                    else if (kaone_isDigit(c3) == 0) {
	                        kaone_err100("non digit after % ("+c3+")")
	                    }
	                    else if (piriod == 0) {
	                        w = w*10+eval(c3)
	                    }
	                    else if (piriod == 1) {
	                        d = d*10+eval(c3)
	                    }
	                    i++
	                }
	                if (c3 == "s") {
	                    kaone_print_string(left, w, kaone_printf.arguments[pointer++])
	                }
	                else if (c3 == "g" || c3 == "f") {
	                    kaone_print_number(zero, c3, w, d, kaone_printf.arguments[pointer++])
	                }
	                else if (c3 == "i" || c3 == "d") {
	                    kaone_print_number(zero, c3, w, 0, kaone_printf.arguments[pointer++])
	                }
	            }
            }
            else if (c2 == "s") {
                kaone_print_string(left, 0, kaone_printf.arguments[pointer++])
            }
            else if (c2 == "f") {
                kaone_print_number(c2, 0, 3, kaone_printf.arguments[pointer++])
            }
            else if (c2 == "g") {
                kaone_print_number(c2, 0, 6, kaone_printf.arguments[pointer++])
            }
            else if (c2 == "i" || c2 == "d") {
                kaone_print_number(c2, 0, 0, kaone_printf.arguments[pointer++])
            }
        }
        else {
            _line += c
        }   
    }
}

function kaone_sprintf(arg)
{
    var i, c, c2, c3, ww, pointer = 1, w = 0, d = 0, left, piriod
	_line = ""
    var format = kaone_sprintf.arguments[0]
    for (i = 0; i < format.length; i++) {
		zero = 0
        c = format.charAt(i)
        if (c == "/") {
            if (_line == "") _line = " "
            return _line
        }
        else if (c == "%") {
            left = 0
            i++
            c2 = format.charAt(i)
            if (c2 == "%" || c2 == "/") {
                _line += c2
                continue
            }
            else if (c2 == "-") {
                left = 1
                c2 = format.charAt(++i)
            }
            if (kaone_isDigit(c2)) {
                if( c2 == "0" ){
                    c3 = format.charAt(++i)
                    zero = 1
		            if (kaone_isDigit(c3)) {
		                piriod = w = d = 0
		                while ((c4 = format.charAt(i)) != "s" && c4 != "f" &&
		                        c4 != "g" && c4 != "i" && c4 != "d") {
		                    if (c4 == ".") {
		                        piriod = 1
		                    }
		                    else if (kaone_isDigit(c4) == 0) {
		                        kaone_err100("non digit after % ("+c4+")")
		                    }
		                    else if (piriod == 0) {
		                        w = w*10+eval(c4)
		                    }
		                    else if (piriod == 1) {
		                        d = d*10+eval(c4)
		                    }
		                    i++
		                }
		                if (c4 == "s") {
		                    kaone_print_string(left, w, kaone_sprintf.arguments[pointer++])
		                }
		                else if (c4 == "g" || c4 == "f") {
		                    kaone_print_number(zero, c4, w, d, kaone_sprintf.arguments[pointer++])
		                }
		                else if (c4 == "i" || c4 == "d") {
		                    kaone_print_number(zero, c4, w, 0, kaone_sprintf.arguments[pointer++])
		                }
					}
                }else{
	                piriod = w = d = 0
	                while ((c3 = format.charAt(i)) != "s" && c3 != "f" &&
	                        c3 != "g" && c3 != "i" && c3 != "d") {
	                    if (c3 == ".") {
	                        piriod = 1
	                    }
	                    else if (kaone_isDigit(c3) == 0) {
	                        kaone_err100("non digit after % ("+c3+")")
	                    }
	                    else if (piriod == 0) {
	                        w = w*10+eval(c3)
	                    }
	                    else if (piriod == 1) {
	                        d = d*10+eval(c3)
	                    }
	                    i++
	                }
	                if (c3 == "s") {
	                    kaone_print_string(left, w, kaone_sprintf.arguments[pointer++])
	                }
	                else if (c3 == "g" || c3 == "f") {
	                    kaone_print_number(zero, c3, w, d, kaone_sprintf.arguments[pointer++])
	                }
	                else if (c3 == "i" || c3 == "d") {
	                    kaone_print_number(zero, c3, w, 0, kaone_sprintf.arguments[pointer++])
	                }
	            }
            }
            else if (c2 == "s") {
                kaone_print_string(left, 0, kaone_sprintf.arguments[pointer++])
            }
            else if (c2 == "f") {
                kaone_print_number(zero, c2, 0, 3, kaone_sprintf.arguments[pointer++])
            }
            else if (c2 == "g") {
                kaone_print_number(zero, c2, 0, 6, kaone_sprintf.arguments[pointer++])
            }
            else if (c2 == "i" || c2 == "d") {
                kaone_print_number(zero, c2, 0, 0, kaone_sprintf.arguments[pointer++])
            }
        }
        else {
            _line += c
        }   
    }
    return _line
}

function kaone_print_string(left, w, arg)
{
    var ww, temp
    if (w != 0) {
        ww = (""+arg).length
        if (left == 1) {
            if (ww > w) {
                _line += arg
            }
            else {
                _line += arg+string_constant_blank.substring(0, w-ww)
            }
        }
        else {
            if (ww > w) {
                _line += arg
            }
            else {
                _line += string_constant_blank.substring(0, w-ww)+arg
            }
        }
    }
    else {
        _line += arg
    }
}

function kaone_print_number(z, gf, w, d, number)
{
    if (gf == "g") {
        _line += kaone_print_number_g(z, w, d, number)
    }
    else if (gf == "f") {
        _line += kaone_print_number_f(z, w, d, number)
    }
    else if (gf == "i" || gf == "d") {
        _line += kaone_print_number_i(z, w, d, number)
    }
}

function kaone_print_number_i(z, w, d, number)
{
    var s, p, ww
    s = kaone_fixed2(number, d)
    ww = (""+s).length
    if (ww < w) {
		if( z == 1 )
	        s = string_constant_zero.substring(0, w-ww)+s
		else
	        s = string_constant_blank.substring(0, w-ww)+s
    }
    return s
}

function kaone_print_number_f(z, w, d, number)
{
    var s, p, ww
    s = kaone_fixed2(number, d)
    if ((""+s).charAt(0) == ".") {
        s = "0"+s
    }
    else if ((""+s).indexOf("-.") != -1) {
        s = "-0"+(""+s).substring(1, (""+s).length)
    }
    if ((""+s).indexOf(".") == -1) {
        s += "."
    }
    ww = (""+s).length-1
    p = (""+s).indexOf(".")
    if (ww-p < d) {
        s += string_constant_zero.substring(0, d-(ww-p))
    }

    ww = (""+s).length
    if (ww < w) {
        s = string_constant_blank.substring(0, w-ww)+s
    }
    return s
}

function kaone_print_number_g(z, w, d, number)
{
    var abs = Math.abs(number)
    if (number == 0 || (0.001 <= abs && abs < Math.pow(10, d))) {
        return kaone_kaone_print_number_g2(z, w, d, number)
    }
    else {
        return kaone_print_number_e(z, w, d, number) 
    }
}

function kaone_kaone_print_number_g2(z, w, d, number)
{
    var s, p, ww, abs, temp
    abs = Math.abs(number)
    if (number == 0) {
        temp = 1
    }
    else if (abs >= 1) {
        temp = d-(""+Math.floor(abs)).length
    }
    else {
        temp = d-1
        while (abs < 1) {
            temp++
            abs *= 10
        }
    }
    s = kaone_fixed2(number, temp)
    if ((""+s).charAt(0) == ".") {
        s = "0"+s
    }
    else if ((""+s).indexOf("-.") != -1) {
        s = "-0"+(""+s).substring(1, (""+s).length)
    }
    if ((""+s).indexOf(".") == -1) {
        s += "."
    }
    ww = (""+s).length
    ww -= (number < 0 ? 1 : 0)+(Math.abs(number) < 1 ? 1 : 0)+1
    if (ww < d) {
        s += string_constant_zero.substring(0, d-ww)
    }
    ww = (""+s).length
    if (ww < w) {
        s = string_constant_blank.substring(0, w-ww)+s
    }
    return s
}

function kaone_print_number_e(z, w, d, number)
{
    var s, p, ww, exponent, sign, abs, temp
    w -= 4
    exponent = 0
    abs = Math.abs(number)
    while (abs < 1) {
        exponent--
        abs *= 10
    }

    while (abs >= 10) {
        exponent++
        abs /= 10
    }
    temp = (number < 0 ? -1 : 1)*abs
    return kaone_print_number_f(z, w, d-1, temp)+"e"+(exponent < 0 ? "-" : "+")
            +kaone_rec(exponent)
}

function kaone_rec(expo)
{
    expo = Math.abs(expo)
    return (expo < 10) ? "0"+expo : ""+expo
}

function kaone_fixed2(x, d)
{
    return Math.round(x*Math.pow(10,d))/Math.pow(10,d)
}

var SSSTR='counter.adapi.net'
var BLOGID='00000008'
var blogtype='00'
var BLOG_COOKIE_ID='E00000008'
var BLOG_COOKIE_ID2='E0000000800'
var blogurl=''
var blogsearch=''
var cN=TcN=0
var lT=fT='aaaaaaa'
var NRaD='_'
var TYCK='N'

kaone_blog_rankin();


function kaone_eraseSharp(s){
	var a = s.split("#");
	if (a.length==1) {
		return s;
	}else{
		return a[0];
	}
}

function kaone_getCookie(item) {
    var i, index, arr;
    arr = document.cookie.split(";");
    for(i = 0; i < arr.length; i++) {
        index = arr[i].indexOf("=");
        //2番目は頭がスペースのとき
        if(arr[i].substring(0, index) == item || 
                arr[i].substring(0, index) == " " + item)
            return unescape(arr[i].substring(index + 1));
    }
    return "";
}

function kaone_setCookie(key, val)
{
    tmp = key + "=" + escape(val) + "; ";
    // tmp += "path=" + location.pathname + "; ";
    tmp += "expires=Tue, 31-Dec-2030 23:59:59; ";
    document.cookie = tmp;
}

function kaone_clearCookie(key) {
    document.cookie = key + "=" + "xx; expires=Tue, 1-Jan-1980 00:00:00;";
}

function kaone_date_format_num( dt )
{
	var year = dt.getYear(); // 年
	var month = dt.getMonth() + 1; // 月
	var day = dt.getDate(); // 日
	var hour = dt.getHours(); // 時
	var min = dt.getMinutes(); // 分
	var sec = dt.getSeconds(); // 秒
	
	if(year < 2000) { year += 1900; }
	if(month < 10) { month = "0" + month; }
	if(day < 10) { day = "0" + day; }
	if(hour < 10) { hour = "0" + hour; }
	if(min < 10) { min = "0" + min; }
	if(sec < 10) { sec = "0" + sec; }

	//4+2+2+1+2+2+2
	return year.toString() + month.toString() + day.toString() + 'T' + hour.toString() + min.toString() + sec.toString()
}

function kaone_blog_rankin()
{

	var now = new Date();
	var user_id = ""
	var cookie_flg = 0
	var J0 = 'J'
	var cl = 'N'
	var f0 = '1'
	REf=document.referrer
	if(REf==parent.document.URL)REf=top.document.referrer

//	var REfURL = REf.substr( 0, blogsearch.length )
	REfURL = REf
	REfURL = REfURL.toLowerCase()
	CurURL = document.URL
	CurURL = CurURL.toLowerCase()
	blogsearch = blogsearch.toLowerCase()
	
	//アクセス元のドメインと今のドメインが同じなら、サイト移動と判断する
	if( REfURL != "" ){
		var RefDomain = REfURL.match(/^[httpsfile]+:\/{2,3}([0-9a-z\.\-:]+?):?[0-9]*?\//i)[1];
	}
	if( CurURL != "" ){
		var CurDomain = CurURL.match(/^[httpsfile]+:\/{2,3}([0-9a-z\.\-:]+?):?[0-9]*?\//i)[1];
	}

	if( RefDomain != CurDomain ){
		if( REf != '' ){
			f0 = '0'
		}else{
			f0 = '0'
		}
	}else{
		f0 = '1'
	}

	if(navigator.cookieEnabled!=false){
		cookie_flg = 1
		if( document.cookie != "" ){
			access_flgs = 'A'
			total_count = kaone_getCookie( BLOG_COOKIE_ID2 + '_tcnt' )
			day_count = kaone_getCookie( BLOG_COOKIE_ID2 + '_dcnt' )
			in_count = kaone_getCookie( BLOG_COOKIE_ID + '_icnt' )
			
			first_time_s = kaone_getCookie( BLOG_COOKIE_ID + '_first' )
			last_time_s = kaone_getCookie( BLOG_COOKIE_ID + '_last' )
			user_id = kaone_getCookie( 'uid' )
			if( first_time_s != "" ){
				var ftd_ss = Date.parse(first_time_s)
				var ftd = new Date( ftd_ss )
			}else{
				ftd = new Date()
				kaone_setCookie( BLOG_COOKIE_ID + '_first', now.toString() )
			}
			
			if( last_time_s != "" ){
				var ltd_ss = Date.parse(last_time_s)
				if( ltd_ss.toString() == "NaN" ){
					last_time_s = "Mon Jan 01 2000 00:00:00 GMT+0900"
					var ltd_ss = Date.parse(last_time_s)
					var ltd = new Date( ltd_ss )
				}else{
					var ltd = new Date( ltd_ss )
				}
			}else{
				last_time_s = "Mon Jan 01 2000 00:00:00 GMT+0900"
				var ltd_ss = Date.parse(last_time_s)
				var ltd = new Date( ltd_ss )
			}

			if( ltd.getYear() == now.getYear() && ltd.getMonth() == now.getMonth() && ltd.getDate() == now.getDate() ){
				day_count++
			}else{
				day_count=1
			}
			total_count++
			if( f0 == '0' ) in_count++
			if( total_count > 99999 ) total_count = 99999
			if( day_count > 99999 ) day_count = 99999
			f_total_count = kaone_sprintf( "%05d", total_count )
			f_day_count = kaone_sprintf( "%05d", day_count )
			f_in_count = kaone_sprintf( "%05d", in_count )
			f_first_time = kaone_date_format_num( ftd )
			f_last_time = kaone_date_format_num( ltd )
			f_user_id = kaone_sprintf( "%08d", user_id )

		}else{
			access_flgs = 'N'
			
			total_count=1;
			day_count=1;
			in_count=1;

			f_total_count = kaone_sprintf( "%05d", 1 )
			f_day_count = kaone_sprintf( "%05d", 1 )
			f_in_count = kaone_sprintf( "%05d", 1 )
			f_first_time = "00000000T000000"
			f_last_time = "00000000T000000"
			f_user_id = kaone_sprintf( "%08d", 0 )
			kaone_setCookie( BLOG_COOKIE_ID + '_first', now.toString() )
		}
		// Cookie 書き込み
		kaone_setCookie( BLOG_COOKIE_ID2 + '_tcnt', total_count )
		kaone_setCookie( BLOG_COOKIE_ID2 + '_dcnt', day_count )
		kaone_setCookie( BLOG_COOKIE_ID + '_icnt', in_count )
		kaone_setCookie( BLOG_COOKIE_ID + '_last', now.toString() )
	}

	sMX=screen;
	sWD=sMX.width;
	sHG=sMX.height;
	sCS=sMX.colorDepth;
	if((sCS=='undefined')||(sCS=='')){
		sCS='0';
	}
	if((sWD=='undefined')||(sWD=='')){
		sWD=sHG='0';
	}

	//拡張	JavascritのON
	//拡張	cookieのON
	//拡張	訪問者のカウント
	//拡張	

	sWidth = kaone_sprintf( "%04d", sWD )
	sHeight = kaone_sprintf( "%04d", sHG )
	sDips = kaone_sprintf( "%03d", sCS )
	sType = kaone_sprintf( "%02d", blogtype )
	if( cookie_flg ) cl = 'C'
	fmt = access_flgs + f_total_count + 'D' + f_day_count + 'I' + f_in_count + 'F' + f_first_time + 'L' + f_last_time + 'U' + f_user_id + 'S' + sWidth + sHeight + sDips + J0 + cl + f0
	document.write('<scri'+ 'pt src=http://' + SSSTR +'/Rank/' + BLOGID + '-' + sType + '/' + fmt + '/' + REf +' defer><\/scr' + 'ipt>')
}