function WataCalendar(theYear, theMonth)
{
var wrtMonth=new Array(31,28,31,30,31,30,31,31,30,31,30,31);
var wrtDate=new Array("日","月","火","水","木","金","土");
var wrtColor=new Array("#ff0000","#000000","#000000","#000000","#000000","#00000","#0000ff");
var special=new Array(1,1, 1,2, 1,4, 1,5, 1,9, 12,5, 12,12, 12,19, 12,23, 12,26, 12,30, 12,31);
var specCol="#ff0000";
var theDate=new Date();
var theCurrentMonth=theDate.getMonth()+1;

	if(theYear >= 0)
	{
		theDate.setYear(theYear);
		theDate.setMonth(theMonth - 1);
	}

	theYear=theDate.getYear();
	theMonth=theDate.getMonth()+1;

	if(theYear < 2000)
	{
		theYear += 1900;
	}

	if(((theYear % 4 == 0) && (theYear % 100 != 0)) || (theYear % 400 == 0))
	{
		wrtMonth[2]++;
		special[1]++;
		special[3]++;
	}

	theDate.setDate(1);

	var count = theDate.getDay();
	var day = 0;
	var date = 1;
	var flag = false;
	var hFlag = false;
	var i, j;

	with(document){
			write("<TABLE BORDER=5 BORDERCOLOR=blue><TR><TH colspan=7>"
			+theYear+"年"+theMonth+"月</TH></TR>");	write("<TR>");

		for(i=0; i<7; i++){	write("<TH>", wrtDate[i], "</TH>");		}

		write("</TR>");
		flag=false;

		for(i=1; i<=wrtMonth[theMonth]+count; i++)
		{
			hFlag=false;
			if(day>=count)
			{	
				wrt=""+date;

				for(j=0; j<15; j++)
				{
					if((special[j*2]==theMonth) && (special[j*2+1]==date))
					{
						wrt=wrt.fontcolor(specCol);
						if((day % 7 )==0)	flag=true;
									hFlag=true;
					}
				}
				date++;
			}
			else { wrt="　";	}

			if((hFlag==false) && flag==false)	wrt=wrt.fontcolor(wrtColor[day % 7]);

			if(((day % 7)==1) && flag==true) {	wrt=wrt.fontcolor(specCol);	flag=false;	}

		write("<TD align=right>"+wrt+"</TD>");
		
	if((day % 7) == 6){ write("</TR><TR>");	}

	day++;
	}

	write("</TABLE>");
	}
}

function wataPrint()
{	window.print();	}