youbi = new Array("日","月","火","水","木","金","土");
kyureki = new Array("睦月","如月","弥生","卯月","皐月","水無月","文月","葉月","長月","神無月","霜月","師走");
oneDay = 24 * 60 * 60 * 1000;
d = new Date();
dy = (d.getYear() % 1900 + 1900);
dm = (d.getMonth() + 1);
dd = d.getDate();
da = youbi[d.getDay()] + "曜日";
evt = "";

function wrCalendar() {
	for (var i = 0; i < eventList.length - 1; i += 3) { evt += eventList[i] + ","; }
	var n = new Date(dy, dm - 1, 1, 0, 0, 0);
	var s = dm + "月 [" + kyureki[dm - 1] + "]";
	s += "<table border=0 cellspacing=0 cellpadding=0><tr>";
	for (var i = 0; i < 7; i++) {
		s += "<th>" + youbi[i] + "</th>";
	}
	s += "</tr>\n";
	while (n.getMonth() == d.getMonth()) {
		n.setTime(n.getTime() - n.getDay() * oneDay);
		s += "<tr>";
		for (var i = 0; i < 7; i++) {
			s += '<td><div style="';
			if (n.getDay() == 0) s += 'color:#933;';
			if (n.getDay() == 6) s += 'color:#69C;';
			if (n.getYear() == d.getYear() && n.getMonth() == d.getMonth() && n.getDate() == d.getDate()) s += 'font-weight:bold;background:#DE6;';
			var nDate = n.getFullYear() + "/" + keta2(n.getMonth() + 1) + "/" + keta2(n.getDate());
			if (evt.indexOf(nDate) != -1) {
				s += 'text-decoration:underline;cursor:pointer;cursor:hand;" onClick="eventChk(\'' + nDate + '\')';
			}
			s += '">';
			s += (n.getMonth() == d.getMonth()) ? n.getDate() : "&nbsp;";
			s += "</div></td>";
			n.setTime(n.getTime() + oneDay);
		}
		s += "</tr>";
	}
	s += "</table>";
	document.getElementById('calendar').innerHTML = s;
	eventChk();
}

function eventChk(n) {
	if (!n) n = dy + "/" + keta2(dm) + "/" + keta2(dd);
	for (var i = 0; i < eventList.length - 1; i += 3) {
		if (eventList[i] == n) {
			document.getElementById('event').innerHTML = eventList[i] + ' 【' + eventList[i + 1] + '】<br>' + eventList[i + 2];
			document.getElementById('event').style.display = 'block';
			break;
		} else {
			document.getElementById('event').style.display = 'none';
		}
	}
}

function keta2(n) {
	return Number(n) < 10 ? '0' + n : n;
}