/*
+------------------------------------------------------+
|【moocalen 1.04】                                     |
|Copyright : 無料素材屋 Moo　～無料素材～              |
|URL       : http://common1.biz/                       |
+------------------------------------------------------+
|※注意事項                                            |
|１．このスクリプトはフリー素材です。                  |
|２．このスクリプトを使用したことによって生じる        |
|    いかなる損害に対して作者は一切の責任を負いません。|
+------------------------------------------------------+
*/
var Holiday        = new Object();
var RegularHoliday = new Object();
var HolidayColor   = new Array();
var Yasumi         = new Array();
//----------------------------------------------------//
Yasumi[1] = '休診日';

HolidayColor[1] = '#FF0000';

Holiday['20110804'] = 1;
Holiday['20110811'] = 1;
Holiday['20110814'] = 1;
Holiday['20110815'] = 1;
Holiday['20110816'] = 1;
Holiday['20110817'] = 1;
Holiday['20110818'] = 1;
Holiday['20110825'] = 1;
Holiday['20111201'] = 1;
Holiday['20111208'] = 1;
Holiday['20111215'] = 1;
Holiday['20111222'] = 1;
Holiday['20111229'] = 1;
Holiday['20111230'] = 1;
Holiday['20111231'] = 1;
Holiday['20120101'] = 1;
Holiday['20120102'] = 1;
Holiday['20120103'] = 1;
Holiday['20120105'] = 1;
Holiday['20120112'] = 1;
Holiday['20120119'] = 1;
Holiday['20120126'] = 1;

RegularHoliday['1-0'] = 0;
RegularHoliday['1-1'] = 0;
RegularHoliday['1-2'] = 0;
RegularHoliday['1-3'] = 0;
RegularHoliday['1-4'] = 1;
RegularHoliday['1-5'] = 0;
RegularHoliday['1-6'] = 0;
RegularHoliday['2-0'] = 0;
RegularHoliday['2-1'] = 0;
RegularHoliday['2-2'] = 0;
RegularHoliday['2-3'] = 0;
RegularHoliday['2-4'] = 1;
RegularHoliday['2-5'] = 0;
RegularHoliday['2-6'] = 0;
RegularHoliday['3-0'] = 0;
RegularHoliday['3-1'] = 0;
RegularHoliday['3-2'] = 0;
RegularHoliday['3-3'] = 0;
RegularHoliday['3-4'] = 1;
RegularHoliday['3-5'] = 0;
RegularHoliday['3-6'] = 0;
RegularHoliday['4-0'] = 0;
RegularHoliday['4-1'] = 0;
RegularHoliday['4-2'] = 0;
RegularHoliday['4-3'] = 0;
RegularHoliday['4-4'] = 1;
RegularHoliday['4-5'] = 0;
RegularHoliday['4-6'] = 0;
RegularHoliday['5-0'] = 0;
RegularHoliday['5-1'] = 0;
RegularHoliday['5-2'] = 0;
RegularHoliday['5-3'] = 0;
RegularHoliday['5-4'] = 1;
RegularHoliday['5-5'] = 0;
RegularHoliday['5-6'] = 0;
RegularHoliday['6-0'] = 0;
RegularHoliday['6-1'] = 0;
RegularHoliday['6-2'] = 0;
RegularHoliday['6-3'] = 0;
RegularHoliday['6-4'] = 1;
RegularHoliday['6-5'] = 0;
RegularHoliday['6-6'] = 0;

var type        = '1';
var fsize       = '12px';
var view_month  = '2';
var yoko        = '2';
var main_color  = '#71382c';
var wid         = '20px';
var hei         = '19px';
var b0_color    = '#fff4fb';
var b6_color    = '#ebf4ff';

//----------------------------------------------------//

var Week = new Array('日','月','火','水','木','金','土');


var Days = new Array(31,28,31,30,31,30,31,31,30,31,30,31);
var calen = new String();

var now = new Date();
var yea = now.getFullYear();
var mon = now.getMonth()+1;
calen += '<table style="border:none;margin:auto;padding:0px;background-color:transparent;">';
for(var c=0;c<view_month;c++){
	if(c % yoko == 0){calen += '<tr>';}
	calen += '<td style="border:none;padding:3px;">';
	calen += moo_calen(yea,mon);
	calen += '</td>';
	if(c % yoko == yoko-1){calen += '</tr>';}
	mon++;
	if(mon > 12){yea++;mon-=12;}
}
calen += '<tr>';
calen += '<td style="border:none;padding:3px;font-size:'+fsize+';text-align:left;padding:5px 10px;line-height:150%;" colspan="'+yoko+'">';
for(var h=1;h<HolidayColor.length;h++){
	calen += '<span style="background-color:'+HolidayColor[h]+';">&nbsp;&nbsp;&nbsp;&nbsp;</span> … '+Yasumi[h]+'<br />';
}
calen += '</td>';
calen += '</tr>';

calen += '</table>';
document.write(calen);

function moo_calen(yea,mon){
	var now = new Date();
	var now_yea = now.getFullYear();
	var now_mon = now.getMonth()+1;
	var now_day = now.getDate();
	
	if(!yea){yea = now_yea;}
	if(!mon){mon = now_mon;}
	
	var date = new Date();
	    date.setDate(1);
	    date.setMonth(mon-1);
	    date.setFullYear(yea);
	var start_week = date.getDay();
	
	uruu(yea);
	var last_day = Days[mon-1];
	
	var back_yea = yea;
	var back_mon = mon-1;
	if(back_mon < 1){
		back_yea --;
		back_mon += 12;
	}
	var next_yea = yea;
	var next_mon = mon+1;
	if(next_mon > 12){
		next_yea ++;
		next_mon -= 12;
	}
	
	var ye = new String(yea);
	var mo = new String(mon);
	if(mo < 10){mo = '0'+mo;}
	
	var base;
	var tabl;
	var tdym;
	var tdw;
	var td0;
	var td6;
	var tdh = new Object();
	var td;
	if(type == 1){
		base = 'text-align:center;vertical-align:middle;font-size:'+fsize+';padding:0px;margin:auto;line-height:120%;color:#000000;';
		tabl = '<table style="border-collapse:collapse;border:none;background-color:transparent;">';
		tdym = '<td style="'+base+'border:solid 1px '+main_color+';width:auto;height:'+hei+';background-color:'+main_color+';color:#ffffff;" colspan="7">';
		tdw  = '<td style="'+base+'border:solid 1px '+main_color+';width:'+wid+';height:'+hei+';background-color:#ffffff;">';
		td0  = '<td style="'+base+'border:solid 1px '+main_color+';width:'+wid+';height:'+hei+';background-color:'+b0_color+';">';
		td6  = '<td style="'+base+'border:solid 1px '+main_color+';width:'+wid+';height:'+hei+';background-color:'+b6_color+';">';
		td   = '<td style="'+base+'border:solid 1px '+main_color+';width:'+wid+';height:'+hei+';background-color:#ffffff;">';
		for(var h=1;h<HolidayColor.length;h++){
			tdh[h]  = '<td style="'+base+'border:solid 1px '+main_color+';width:'+wid+';height:'+hei+';background-color:'+HolidayColor[h]+';">';
		}
	}else if(type == 2){
		base = 'border:none;text-align:center;vertical-align:middle;font-size:'+fsize+';padding:0px;margin:auto;line-height:120%;color:#000000;';
		tabl = '<table style="border-collapse:separate;border:none;background-color:transparent;">';
		tdym = '<td style="'+base+'width:auto;height:'+hei+';background-color:transparent;" colspan="7">';
		tdw  = '<td style="'+base+'width:'+wid+';height:'+hei+';background-color:'+main_color+';color:#ffffff;">';
		td0  = '<td style="'+base+'width:'+wid+';height:'+hei+';background-color:'+b0_color+';">';
		td6  = '<td style="'+base+'width:'+wid+';height:'+hei+';background-color:'+b6_color+';">';
		td   = '<td style="'+base+'width:'+wid+';height:'+hei+';background-color:#ffffff;">';
		for(var h=1;h<HolidayColor.length;h++){
			tdh[h]  = '<td style="'+base+'width:'+wid+';height:'+hei+';background-color:'+HolidayColor[h]+';">';
		}
	}else if(type == 3){
		base = 'text-align:center;vertical-align:middle;font-size:'+fsize+';padding:0px;margin:auto;line-height:120%;color:#000000;';
		tabl = '<table style="border-collapse:separate;border:none;background-color:transparent;">';
		tdym = '<td style="'+base+'border:none;width:auto;height:'+hei+';background-color:transparent;" colspan="7">';
		tdw  = '<td style="'+base+'border:none;width:'+wid+';height:'+hei+';background-color:transparent;">';
		td0  = '<td style="'+base+'border:solid 1px '+main_color+';width:'+wid+';height:'+hei+';background-color:'+b0_color+';">';
		td6  = '<td style="'+base+'border:solid 1px '+main_color+';width:'+wid+';height:'+hei+';background-color:'+b6_color+';">';
		td   = '<td style="'+base+'border:solid 1px '+main_color+';width:'+wid+';height:'+hei+';background-color:#ffffff;">';
		for(var h=1;h<HolidayColor.length;h++){
			tdh[h]  = '<td style="'+base+'border:solid 1px '+main_color+';width:'+wid+';height:'+hei+';background-color:'+HolidayColor[h]+';">';
		}
	}
    
	var view = new String();
	var nanshuume = new Object();
	var we = 0;
	var da = 0;
	
	view += tabl;
	view += '<tr>'+tdym;
	view += yea+'年'+mon+'月';
	view += '</td></tr>';
	view += '<tr>';
	for(var w=0;w<7;w++){
		view += tdw+Week[w]+'</td>';
		nanshuume[w] = 0;
	}
	view += '</tr>';
	
	for(var g=0;g<6;g++){
		view += '<tr>';
		for(var d=g*7+1;d<=g*7+7;d++){
			if(we < start_week){
				view += td+'&nbsp;</td>';
        	}else{
        		var wee = we % 7;
        		nanshuume[wee]++;
        		if(da < Days[mo-1]){
					da++;
					var dd = da;
					if(da < 10){dd = '0'+da;}
					if(Holiday[ye+mo+dd] == -1){
						if(we % 7 == 0){
							view += td0;
						}else if(we % 7 == 6){
							view += td6;
						}else{
							view += td;
						}
					}else if(Holiday[ye+mo+dd] > 0){
						view += tdh[Holiday[ye+mo+dd]];
					}else if(RegularHoliday[nanshuume[wee]+'-'+wee] > 0){
						view += tdh[RegularHoliday[nanshuume[wee]+'-'+wee]];
					}else if(we % 7 == 0){
						view += td0;
					}else if(we % 7 == 6){
						view += td6;
					}else{
						view += td;
					}
					view += da+'</td>';
        		}else{
					view += td+'&nbsp;</td>';
        		}
        	}
			we++;
		}
		view += '</tr>';
	}
	view += '</table>';
	return view;
}

function uruu(yea){
	var uruu = 28;
	if((yea % 4 == 0 && yea % 100 != 0) || yea % 400 == 0){
		uruu = 29;
	}
	Days[1] = uruu;
}