//万年暦  by「菊池さん」 <http://kikuchisan.net/>
//個人設定。あなたの環境にあわせて変更します
   cont = 1;	//sayhappy_sp.cgiを利用しない(0)、する(1)
   dir = "../../birthday/sayhappy_sp.cgi";	//利用する場合sayhappy_sp.cgiのパス指定
//ここまで
   nDate = new Date();
   thisDay = nDate.getDate();
   thisMonth = nDate.getMonth();
function koyomi(mymonth) {
   var str = new Array();
   str = mymonth.split("/");
   myday = new Date();
   myday.setDate(1);
   myday.setMonth(str[1]-1);
   myday.setYear(str[0]);

   monthDays = new Array(31,28,31,30,31,30,31,31,30,31,30,31);
   kyuDays = new Array("0101","0115","0211","0321","0429","0503","0504","0505","0720","0915","0923","1010","1103","1123","1223");  //祝日設定(変更出来ません)
   kyuDayn = new Array("元旦","成人の日","建国記念日","春分の日","昭和の日","憲法記念日","みどりの日","子供の日","海の日","敬老の日","秋分の日","体育の日","文化の日","勤労感謝日","天皇誕生日");

   tokuDays = new Array();	//特別日設定
   year = myday.getYear(); if (year < 2000) year = year + 1900;
   month = myday.getMonth()+1;

   if (((year % 4 == 0) && (year % 100 != 0)) || (year % 400 == 0))
      { monthDays[1] = 29; }  // うるう年計算
   kyuDays[3] = "03" + Math.floor(20.8431 + 0.242194 * (year - 1980) - Math.floor((year - 1980)/4));  // 春分の日を求める（1980-2099まで）
   kyuDays[10] = "09" + Math.floor(23.2488 + 0.242194 * (year - 1980) - Math.floor((year - 1980)/4));  // 秋分の日を求める（1980-2099まで）

   nDays = monthDays[myday.getMonth()];

   firstDay = myday;
   firstDay.setDate(1);
   startDay = firstDay.getDay();

// 2000年以降の成人の日/体育の日(第２月曜日)の計算
if (year >= 2000 &&(month == 1 || month == 10)) {
   if (startDay <= 1) happyMon = 7 + (2 - startDay);
   else               happyMon = 14 - (startDay - 2);
   if (happyMon < 10) happyMon = "0" + happyMon;
   if (month == 1) kyuDays[1] = "01" + happyMon;
   else            kyuDays[11] = "10" + happyMon;
}
// 2003年以降の海の日/敬老の日(第３月曜日)の計算
if (year >= 2003 && (month == 7 || month == 9)) {
   if (startDay <= 1) happyMon = 14 + (2 - startDay);
   else               happyMon = 21 - (startDay - 2);
   if (happyMon < 10) happyMon = "0" + happyMon;
   if (month == 7) kyuDays[8] = "07" + happyMon;
   else            kyuDays[9] = "09" + happyMon;
}
// 2007年以降は5/3,4のいずれかが日曜のときは5/6は振替休日
// (5/5が日曜のケースは「振替休日の自動計算」で計算)
if (year >= 2007 && month == 5) {
  for (i = 3; i <= 4; i++) {
    zday = (year + parseInt(year/4) - parseInt(year/100) + parseInt(year/400) + parseInt((13*month + 8)/5) + i ) % 7;
    if (zday == 0) {
      kyuDays[kyuDays.length] = "0506";
      kyuDayn[kyuDayn.length] = "振替休日";
    }
  }
}
// 2007年以降は前後が祝日の場合の平日は国民の休日となる(敬老の日と秋分の日)
// 2150年までは秋分の日が必ず水曜日になることから判定
if (year >= 2007 && month == 9) {
    hday = kyuDays[10].substring(2,4)*1;
    zday = (year + parseInt(year/4) - parseInt(year/100) + parseInt(year/400) + parseInt((13*month + 8)/5) + hday) % 7;
    if (zday == 3) {
      hday = hday - 1;
      kyuDays[kyuDays.length] = "09" + hday;
      kyuDayn[kyuDayn.length] = "国民の休日";
    }
}

skip = 0;
for (i = 0; i < kyuDays.length; i++) { // 振替休日の自動計算
   hmon = kyuDays[i].substring(0,2);
   if (hmon == month) {
      hday = kyuDays[i].substring(2,4)*1;
      if (hmon <= 2) { zyear = year - 1;	zmon = parseInt(hmon) + 12; }
      else { zyear = year;	zmon = hmon; }
      zday = (zyear + parseInt(zyear/4) - parseInt(zyear/100) + parseInt(zyear/400) + parseInt((13*zmon + 8)/5) + hday ) % 7;
      if (zday == 0) {
         hday = hday + 1;
         if (hday < 10) { hday = "0" + hday;}
         for (i = 0; i < kyuDays.length; i++) { //振替休日が祝日の場合スキップ
          if (kyuDays[i] == (hmon + hday)) { skip = 1; }
         }
         if (skip == 0) {
           kyuDays[kyuDays.length] = hmon + hday;
           kyuDayn[kyuDayn.length] = "振替休日";
         }
      }
   }
}
   doc ="<CENTER><TABLE bgcolor=white border=0 bordercolor=white cellpadding=2 width=100%>";
//   doc+="<TR bgcolor=#0000a0><TH COLSPAN=7><FONT color=white>";
//   doc+=year + "年 ";
//   doc+=month + "月</FONT></TH></TR>";
   doc+="<TR bgcolor=#f7ffa0><TD><FONT color=red>日</FONT></TD><TD><FONT color=black>月</FONT></TD><TD><FONT color=black>火</FONT></TD><TD><FONT color=black>水</FONT></TD><TD><FONT color=black>木</FONT></TD><TD><FONT color=black>金</FONT></TD><TD><FONT color=blue>土</FONT></TD></TR>";

   doc+="<TR bgcolor=#ddffdd>";
   column = 0;
   for (i=0; i<startDay; i++)
   {
      doc+="<TD>　</TD>";
      column++;
   }
   for (i=1; i<=nDays; i++)
   {
      if (i==thisDay && myday.getMonth()==thisMonth) {  //本日の背景色変更
        doc+="<TD ALIGN=center bgcolor=cyan>";
      } else { doc+="<TD ALIGN=center>"; }
      if (cont == 1) {
        doc+="<a href='"+ dir +"?month="+ month +"&day="+ i +"'>"; //ハッピーバースディのリンク設定
      }
      weekDay = myday;
      weekDay.setDate(i);
      if (weekDay.getDay() == 0)      doc+="<FONT COLOR=red>";
      else if (weekDay.getDay() == 6) doc+="<FONT COLOR=blue>";
      else                            doc+="<FONT COLOR=black>";
      for (j=0; j<kyuDays.length; j++)		//祝日判定
      {
        if (myday.getMonth()+1 == kyuDays[j].substring(0,2) && i == kyuDays[j].substring(2,4)*1) doc+="<FONT COLOR=red>";
      }
      for (j=0; j<tokuDays.length; j++)		//特別日判定
      {
        if (myday.getMonth()+1 == tokuDays[j].substring(0,2) && i == tokuDays[j].substring(2,4)*1) doc+="<FONT COLOR=magenta>";
      }
      doc+=i;
      doc+="</FONT></a></TD>"
      column++;
      if (column == 7 && i != nDays)
      {
         doc+="</TR><TR bgcolor=#ddffdd>";
         column = 0;
      }
   }
   for (i=0; column<7; i++){
      doc+="<TD>　</TD>";
      column++;
   }
   doc+="</TR></TABLE></CENTER>";
   document.write(doc);
}
