var kyori=null;
var myspeed = 4; 
function SMscroll() { 
   if ((navigator.appName.indexOf("Internet Explorer",0) != -1) && kyori ==null) {
     kyori =  document.body.scrollHeight;
   } else if (window.innerHeight&& kyori ==null) {
     kyori= window.innerHeight;
   }
 var idoukyori = kyori/myspeed;
 var titen = kyori-idoukyori;
 window.scrollTo(0,titen);
 if (titen > 1) {
   var Timer1 = setTimeout("SMscroll()",15);
   kyori = titen; 
 } else {
   kyori=null;
   window.scrollTo(0,0);
 }
}


function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function MM_goToURL() { //v3.0
  var i, args=MM_goToURL.arguments; document.MM_returnValue = false;
  for (i=0; i<(args.length-1); i+=2) eval(args[i]+".location='"+args[i+1]+"'");
}

function PrintPage(){
	if(document.getElementById || document.layers){
		window.print();		//印刷をします
	}
}

function MM_callJS(jsStr) { //v2.0
  return eval(jsStr)
}

function CloseWin(){
    window.close();
	}


/*
===========================================================
フォントサイズ変更スクリプト（タイプA）

Last Updated:08/21/2001
　　　10/23/2001最終更新版より下記のURIのみ変更

insomnia!
http://insomnia.jp/
http://insomnia.jp/workshop/
===========================================================
*/


/*
========== ::: ブラウザ判別時に使用する変数 ::: ==========
*/
uaName = navigator.userAgent;
appName = navigator.appVersion;


/*
========== ::: 初期設定 ::: ==========
*/

// 値の単位を設定（必ずダブルクオートかクオートで括る）
var fontSizeUnit = "%";

// 一回の操作で変化させる値を設定（ダブルクオートやクオートで括らない）
var perOrder = 10;

// 初期状態の値を設定（ダブルクオートやクオートで括らない）
var defaultSize = 70;


/*
========== ::: 現時点の値に初期値を代入 ::: ==========
*/
var currentSize = defaultSize;


/*===================================
  [関数 fsc]
  引数CMDに渡される値に応じて
  html要素またはbody要素の
  スタイルプロパティを変更する
====================================*/

function fsc( CMD ){

  // 拡大：現時点の値に一回の操作で変化させる値を加えて操作後の値"newSize"に代入
  if( CMD == "larger" ){
    var newSize = Number(currentSize + perOrder);
  }
  
  // 縮小：現時点の値から一回の操作で変化させる値を引き操作後の値に代入
  // 現時点のサイズの値が一回の操作で変化させる値と同じならそのまま操作後の値に代入
  if( CMD == "smaller" ){
    if ( currentSize != perOrder ){
      var newSize = Number(currentSize - perOrder);
    }
    else{
      var newSize = Number(currentSize);
    }
  }
  
  // 元に戻す：操作後の値を初期値にする
  if( CMD == "default" ){
    var newSize = defaultSize;
  }


  // === ::: 変更を加えるオブジェクトの判定 ::: ===
  //
  // NN4用エラーメッセージダイアログ
  if( document.layers ){
    window.alert( "このスクリプトはNetscape Communicator4.xでは動作しません" );
    return false;
  }
  
  // MacIE4用エラーメッセージダイアログ
  else if(( appName.indexOf("Mac",0) != -1 ) && ( uaName.indexOf("MSIE 4.0",0) != -1 )){
    window.alert( "Sorry! MacIE4.0 is not supported." );
    return false;
  }

  else if( document.body ){
  
  // オブジェクトのfontSizeプロパティを書き換える
    document.body.style.fontSize = newSize + fontSizeUnit;
  // 現在の値を操作後の値に変更
    currentSize = newSize;
  }
  
}
// _______________________________________ end of function fsc() ___ 

//EOF

