function saiyomikomi() {
    weeks=new Array("日","月","火","水","木","金","土");
    today=new Date();
    y=today.getFullYear();
    t=today.getMonth()+1;
    d=today.getDate();
    w=weeks[today.getDay()];
    h=today.getHours();
    m=today.getMinutes();
    s=today.getSeconds();
    if( t < 10 ) {t = "0" + (today.getMonth()+1);}
    if( d < 10 ) {d = "0" + today.getDate();}
    document.jikanhyouji.tsukihi.value=y+"/"+t+"/"+d+"("+w+")";
    if( h < 10 ) {h = "0" + today.getHours();}
    if( m < 10 ) {m = "0" + today.getMinutes();}
    if( s < 10 ) {s = "0" + today.getSeconds();}
    document.jikanhyouji.jikan.value=h+":"+m+":"+s;
    if(w == "月" || w == "火" || w == "水" || w == "木" || w == "金"){
              if(h > 8 && h < 16 ){
                         if(m % 20 == 0 && s==0){location.reload();}
              }
    }
}

var showType = 0;
function f_akaji(){
	// 1970/1/1 0:00:00からの経過時間（ミリ秒）による
	// 1997/h09年度末(1998/3/31)の時刻 : 894034800000
	var t_1997 = 894034800000;
	// 1998/h10年度末(1999/3/31)の時刻 : 925570800000
	var t_1998 = 925570800000;

	// 1997/h09年度末の国／地方長期債務残高 : 489兆円
	var red1997_allj = 489000000000000;
	// 1998/h10年度末の国／地方長期債務残高 : 560兆円
	var red1998_allj = 560000000000000;
	// 1997/h09年度末の普通国債残高 : 255兆円
	var red1997_cent = 255000000000000;
	// 1998/h10年度末の普通国債残高 : 299兆円
	var red1998_cent = 299000000000000;

	// 日本の人口 :125000000
	var pop = 125000000;

	// 日付オブジェクトを取得します
	var obj_date = new Date();
	// 1970/1/1 0:00:00からの経過時間（ミリ秒）を求めます
	var now_time = obj_date.getTime();

	// （大胆にも！）線形近似によって現在の長期債務残高総額を求めます
	// 現在の国／地方長期債務残高
	var akaji_allj = (red1998_allj - red1997_allj) / (t_1998 - t_1997 ) * ( now_time - t_1997) + red1997_allj;
	// 現在の普通国債残高
	var akaji_cent = (red1998_cent - red1997_cent) / (t_1998 - t_1997 ) * ( now_time - t_1997) + red1997_cent;

	// 表示形態により値を選択します
	if (showType == 0){
		var akaji = akaji_allj;
	} else if (showType == 1){
		var akaji = akaji_allj / pop;
	} else if (showType == 2){
		var akaji = akaji_cent;
	} else {
		var akaji = akaji_cent / pop;
	}

	// 赤字額の各単位を計算します
	var akajiCHO = Math.floor(akaji/1000000000000);
	var akajiOKU = Math.floor((akaji-akajiCHO*1000000000000)/100000000);
	var akajiMAN = Math.floor((akaji-akajiCHO*1000000000000-akajiOKU*100000000)/10000);
	var akajiYEN = Math.floor((akaji-akajiCHO*1000000000000-akajiOKU*100000000-akajiMAN*10000));
	var akajiSEN = Math.floor(100*(akaji-akajiCHO*1000000000000-akajiOKU*100000000-akajiMAN*10000-akajiYEN));

	// 0だったら空白にします
	if (akajiCHO == 0){	akajiCHO = ""; }
	if (akajiOKU == 0){	akajiOKU = ""; }

	// フォームに表示します
//	document.akajiC.tot.value = akaji;
	document.akajiC.cho.value = akajiCHO;
	document.akajiC.oku.value = akajiOKU;
	document.akajiC.man.value = akajiMAN;
	document.akajiC.yen.value = akajiYEN;
	document.akajiC.sen.value = akajiSEN;
	setTimeout('f_akaji()', 1000);
}

function tvhyoji(num) {
       if(num == 1){
              weeks=new Array("日","月","火","水","木","金","土");
              today=new Date();y=today.getFullYear();
              t=today.getMonth()+1;d=today.getDate();
              w=weeks[today.getDay()];
              h=today.getHours();
              if( t < 10 ) {t = "0" + (today.getMonth()+1);}
              if( d < 10 ) {d = "0" + today.getDate();}
              document.TV.year.value=y; document.TV.tsuki.value=t; 
　　　　　　　document.TV.hi.value=d;document.TV.youbi.value=w;
              document.TV.time.value = h;
      }
      if(num == 2){
                file="http://ck.jp.ap.valuecommerce.com/servlet/referral?sid=2240136&pid=873767541&vc_url=http%3a%2f%2ftv.yahoo.co.jp%2flistings%2f%3farea%3d"+document.TV.area.value+"%26starttime%3d"+document.TV.time.value+"%26detail%3d1%26gcode%3d0%26cal%3d0%26date%3d"+document.TV.year.value+document.TV.tsuki.value+document.TV.hi.value+"%26type%3dnormal%26category%3d"+document.TV.category.value+"%26mitai%3d1%26page%3d0%26span%3d"+document.TV.span.value;
                location.href=file;
      }
}

function kscheck(num){
        if(num=="yk"){
                ks=document.yahooF;
                if(ks.s.value==""){
		        alert("検索キーワードが入力されていません。");
		        return false;
                }
                else return;
        }
        else if(num=="ik"){
                ks=document.infoseekF;
                if(ks.search.value==""){
		        alert("検索キーワードが入力されていません。");
		        return false;
                }
                else return;
        }
}

function hprcheck(num){
        if(num=="ra"){
                hpr=document.raku;
                if (hpr.search.value == "" ) {
		        alert("検索キーワードが入力されていません。");
		        return false;
                 }
                 else{hpr.burauza.value="good";return;}
        }
        else if(num=="hpk"){
                hpr=document.hpkensaku;
                if(hpr.search.value == ""){
		        alert("検索キーワードが入力されていません。");
		        return false;
                }
                switch(hpr.engine.selectedIndex){
                        case 0:hpr.look.value="";break;<!-- Yahoo&Google同時検索 -->
                        case 1:hpr.look.value="on";break;<!-- Yahoo!Japan検索 -->
                        case 2:hpr.look.value="";hpr.andor.value="and";break;<!-- Google_JP検索 -->
                        case 3:hpr.look.value="";hpr.andor.value="and";break;<!-- Yahoo!米国検索 -->
                        case 4:hpr.look.value="";hpr.andor.value="and";break;<!-- Google検索 -->
                        case 5:hpr.look.value="";hpr.andor.value="and";break;<!-- AskJP検索 -->
                        case 6:hpr.look.value="";hpr.andor.value="and";break;<!-- goo検索 -->
                        case 7:hpr.look.value="";hpr.andor.value="and";break;<!-- plala_goo検索 -->
                        case 8:hpr.look.value="";break;<!-- ocn検索 -->
                        case 9:hpr.look.value="";hpr.andor.value="and";break;<!-- biglobe検索 -->
                        case 10:hpr.look.value="";hpr.andor.value="and";break;<!-- excite検索 -->
                        case 11:hpr.look.value="";hpr.andor.value="and";break;<!-- fresheye検索 -->
                        case 12:hpr.look.value="";hpr.andor.value="and";break;<!-- DION検索 -->
                        case 13:hpr.look.value="";hpr.andor.value="and";break;<!-- ODN検索 -->
                        case 14:hpr.look.value="";hpr.andor.value="and";break;<!-- nifty検索 -->
                        case 15:hpr.look.value="";hpr.andor.value="and";break;<!-- so-net検索 -->
                }
                hpr.burauza.value="good";
                return;
        }
}
