/*---dbunkatu2.js ---------------------------*/

 TukiHi=new Array();
  TukiHi[0] =31; // 1月(以下平年)
  TukiHi[1] =28; // 2月
  TukiHi[2] =31; // 3月
  TukiHi[3] =30; // 4月
  TukiHi[4] =31; // 5月
  TukiHi[5] =30; // 6月
  TukiHi[6] =31; // 7月
  TukiHi[7] =31; // 8月
  TukiHi[8] =30; // 9月
  TukiHi[9] =31; //10月
  TukiHi[10]=30; //11月

 //var j;
 var Zyun=0;
 var Ku=0;
 var owariR=0;
 var kankaku2=6000;

 zidosinkoFlag="on";
 susumuFlag="on";
 stopFlag="off";

/*---独楽吟を表示 ------------------------------------------*/
function akemiF(){

	//元日から前月までの延べ日数計算                                     
  for(i=0; i<m; i++){
		Zyun=Zyun + TukiHi[i];          //月m(0---11,ymd.js 参照)
	}

	//閏年算定(2月分日数加算)
	if(m>=2){uruuTosiF();}            //本日が3月以後なら

	//元日から本日までの延べ日数計算
  Zyun=Zyun + d;   //日d(1---31,ymd.js 参照)
  Zyun=Zyun-1;     //配列添え字に対応させる
  Zyun=Zyun % 52;  //0〜51
  document.Form1.dspTime11.value="　" + Kakugen[Zyun];
  document.Form2.dspTime21.value=" "+(Zyun+1)+"番";
	btnColor();
} 

/*---閏年算定--------------------------------------------------------*/
/*---�@ 西暦年が-----------４で割り切れる年は閏年とする　例　1996年 
     �A �@であっても---１００で割り切れる年は平年とする　例　1900年
     �B �Aであっても---４００で割り切れる年は閏年とする　例　2000年---*/

function uruuTosiF(){
	var uruuTosi;                                //年y(ymd.js 参照)
	if     (y % 4==0 && y % 100==0 && y % 400==0){uruuTosi=true;}
	else if(y % 4==0 && y % 100==0)              {uruuTosi=false;}
	else if(y %4 ==0)                            {uruuTosi=true;}
	else                                         {uruuTosi=false;}
	if(uruuTosi){Zyun++;}
}

/*---自動進行 value="AUTO" onClick="autoF()"----------------------*/
function autoF(){
	if(zidosinkoFlag=="on"){
		zidosinkoFlag="off";
    susumuFlag="off";
    stopFlag="on";
		btnColor();
    autoF2();
	}
}

/*--- 自動進行 autoF2()---------------------------------------------------*/
function autoF2(){
	FmoveA();
  timerIDakemi=setTimeout("autoF2()", kankaku2);
}

/*--- 自動進行停止 nenyuForm2 value="STOP" onClick="stopF()"------------------*/
function stopF(){
	if(stopFlag=="on"){
		clearTimeout(timerIDakemi);  //自動進行停止
    zidosinkoFlag="on";
    susumuFlag="on";
    stopFlag="off";
		btnColor();
	}
}

/*--- 一つ進む nenyuForm2 value="NEXT" onClick="nextF()"---------------------*/
function nextF(){
	if(susumuFlag=="on"){
		zidosinkoFlag="on";
    susumuFlag="on";
    stopFlag="off";
		btnColor();
    FmoveA();
	}
}

/*---独楽吟表示---------------------------------------------------------*/
function FmoveA(){
	Zyun++;
  Zyun=Zyun % 52;  //0〜51
  document.Form2.dspTime21.value=" "+(Zyun+1)+"番";
  FmF2A =  "          " + Kakugen[Zyun];  //space 10
  tc=0;
  FMess();
} 

/*----------------------------------------------------------------------*/
function FMess(){
  document.Form1.dspTime11.value=FmF2A;
  FmF2A = FmF2A.substring(1,FmF2A.length);
  tc=tc+1;
  if (tc<11) {setTimeout("FMess()",100);}
}
/*-----------------------------------------------------------------------*/
function btnColor(){
	if(zidosinkoFlag=="on"){document.Form2.auto.style.color="GREEN";}
	else                   {document.Form2.auto.style.color="red";}
  if(susumuFlag=="on")   {document.Form2.next.style.color="GREEN";}
	else                   {document.Form2.next.style.color="red";};
  if(stopFlag=="on")     {document.Form2.stop.style.color="GREEN";}
	else                   {document.Form2.stop.style.color="red";};
}
/*-----------------------------------------------------------------------*/