<?php
$tsuki = '月';
$list ="";
$list2 ="";
$dd = mktime();
for( $j = 0; $j < 2; $j++ ){
	$m = date("n",$dd);
	$dd = strtotime( date("Y/m/d",$dd) . " 1 month");
    $list = <<<EOF
<h2>$m$tsuki</h2>
<table cellspacing="0" summary="calendar">
<tr>
<td>日</td>
<td>月</td>
<td>火</td>
<td>水</td>
<td>木</td>
<td>金</td>
<td>土</td>
</tr>
<tr>
EOF;
    print $list; 
 
    // 1日の曜日を取得
    $wd1 = date("w", mktime(0, 0, 0, $m, 1, $y));
 
    // その数だけ空のセルを作成
    for ($i = 1; $i <= $wd1; $i++) {
        echo "<td> </td>";
    }
    $d = 1;
 
    while (checkdate($m, $d, $y)) {
 
        // 日曜：赤色
        if(date("w", mktime(0, 0, 0, $m, $d, $y)) == 0)
        {
            echo "<td class='sun'>$d</td>";
        }
        // 祝日：赤色
        else if(!empty($national_holiday[date("Y-m-d", mktime(0, 0, 0, $m, $d, $y))]))  
        {
            echo "<td class='sun'>$d</td>";
        }
        // 本日：シルバー
        else if ($d == date('j') && $y == date('Y') && $m == date('n')) 
        {
            echo "<td class='today'>$d</td>";
        }
        // 土日祝以外
        else{
            echo "<td class='date'>$d</td>";
        }
 
        // 週の始まりと終わりでタグを出力
        if (date("w", mktime(0, 0, 0, $m, $d, $y)) == 6)
        {
            // 週を終了
            echo "</tr>";
 
            // 次の週がある場合は新たな行を準備
            if (checkdate($m, $d + 1, $y)) {
                echo "<tr>";
            }
        }
 
        $d++;
    }
 
    // 最後の週の土曜日まで空のセルを作成
    $wdx = date("w", mktime(0, 0, 0, $m + 1, 0, $y));
 
    for ($i = 1; $i < 7 - $wdx; $i++)
    {
        echo "<td> </td>";
    }
 
    $list2 .= <<<EOF
</tr>
</table>
EOF;
    print $list2;
}
?>

PD9waHAKJHRzdWtpID0gJ+aciCc7CiRsaXN0ID0iIjsKJGxpc3QyID0iIjsKJGRkID0gbWt0aW1lKCk7CmZvciggJGogPSAwOyAkaiA8IDI7ICRqKysgKXsKCSRtID0gZGF0ZSgibiIsJGRkKTsKCSRkZCA9IHN0cnRvdGltZSggZGF0ZSgiWS9tL2QiLCRkZCkgLiAiIDEgbW9udGgiKTsKICAgICRsaXN0ID0gPDw8RU9GCjxoMj4kbSR0c3VraTwvaDI+Cjx0YWJsZSBjZWxsc3BhY2luZz0iMCIgc3VtbWFyeT0iY2FsZW5kYXIiPgo8dHI+Cjx0ZD7ml6U8L3RkPgo8dGQ+5pyIPC90ZD4KPHRkPueBqzwvdGQ+Cjx0ZD7msLQ8L3RkPgo8dGQ+5pyoPC90ZD4KPHRkPumHkTwvdGQ+Cjx0ZD7lnJ88L3RkPgo8L3RyPgo8dHI+CkVPRjsKICAgIHByaW50ICRsaXN0OyAKCiAgICAvLyAx5pel44Gu5puc5pel44KS5Y+W5b6XCiAgICAkd2QxID0gZGF0ZSgidyIsIG1rdGltZSgwLCAwLCAwLCAkbSwgMSwgJHkpKTsKCiAgICAvLyDjgZ3jga7mlbDjgaDjgZHnqbrjga7jgrvjg6vjgpLkvZzmiJAKICAgIGZvciAoJGkgPSAxOyAkaSA8PSAkd2QxOyAkaSsrKSB7CiAgICAgICAgZWNobyAiPHRkPiA8L3RkPiI7CiAgICB9CiAgICAkZCA9IDE7CgogICAgd2hpbGUgKGNoZWNrZGF0ZSgkbSwgJGQsICR5KSkgewoKICAgICAgICAvLyDml6Xmm5zvvJrotaToibIKICAgICAgICBpZihkYXRlKCJ3IiwgbWt0aW1lKDAsIDAsIDAsICRtLCAkZCwgJHkpKSA9PSAwKQogICAgICAgIHsKICAgICAgICAgICAgZWNobyAiPHRkIGNsYXNzPSdzdW4nPiRkPC90ZD4iOwogICAgICAgIH0KICAgICAgICAvLyDnpZ3ml6XvvJrotaToibIKICAgICAgICBlbHNlIGlmKCFlbXB0eSgkbmF0aW9uYWxfaG9saWRheVtkYXRlKCJZLW0tZCIsIG1rdGltZSgwLCAwLCAwLCAkbSwgJGQsICR5KSldKSkgIAogICAgICAgIHsKICAgICAgICAgICAgZWNobyAiPHRkIGNsYXNzPSdzdW4nPiRkPC90ZD4iOwogICAgICAgIH0KICAgICAgICAvLyDmnKzml6XvvJrjgrfjg6vjg5Djg7wKICAgICAgICBlbHNlIGlmICgkZCA9PSBkYXRlKCdqJykgJiYgJHkgPT0gZGF0ZSgnWScpICYmICRtID09IGRhdGUoJ24nKSkgCiAgICAgICAgewogICAgICAgICAgICBlY2hvICI8dGQgY2xhc3M9J3RvZGF5Jz4kZDwvdGQ+IjsKICAgICAgICB9CiAgICAgICAgLy8g5Zyf5pel56Wd5Lul5aSWCiAgICAgICAgZWxzZXsKICAgICAgICAgICAgZWNobyAiPHRkIGNsYXNzPSdkYXRlJz4kZDwvdGQ+IjsKICAgICAgICB9CgogICAgICAgIC8vIOmAseOBruWni+OBvuOCiuOBqOe1guOCj+OCiuOBp+OCv+OCsOOCkuWHuuWKmwogICAgICAgIGlmIChkYXRlKCJ3IiwgbWt0aW1lKDAsIDAsIDAsICRtLCAkZCwgJHkpKSA9PSA2KQogICAgICAgIHsKICAgICAgICAgICAgLy8g6YCx44KS57WC5LqGCiAgICAgICAgICAgIGVjaG8gIjwvdHI+IjsKCiAgICAgICAgICAgIC8vIOasoeOBrumAseOBjOOBguOCi+WgtOWQiOOBr+aWsOOBn+OBquihjOOCkua6luWCmQogICAgICAgICAgICBpZiAoY2hlY2tkYXRlKCRtLCAkZCArIDEsICR5KSkgewogICAgICAgICAgICAgICAgZWNobyAiPHRyPiI7CiAgICAgICAgICAgIH0KICAgICAgICB9CgogICAgICAgICRkKys7CiAgICB9CgogICAgLy8g5pyA5b6M44Gu6YCx44Gu5Zyf5puc5pel44G+44Gn56m644Gu44K744Or44KS5L2c5oiQCiAgICAkd2R4ID0gZGF0ZSgidyIsIG1rdGltZSgwLCAwLCAwLCAkbSArIDEsIDAsICR5KSk7CgogICAgZm9yICgkaSA9IDE7ICRpIDwgNyAtICR3ZHg7ICRpKyspCiAgICB7CiAgICAgICAgZWNobyAiPHRkPiA8L3RkPiI7CiAgICB9CgogICAgJGxpc3QyIC49IDw8PEVPRgo8L3RyPgo8L3RhYmxlPgpFT0Y7CiAgICBwcmludCAkbGlzdDI7Cn0KPz4=