';
tuki=dat2+1;
if(dat1<2000){
dat1=dat1+1900;
}
niti=new Array(31,28,31,30,31,30,31,31,30,31,30,31);
if((dat1%4==0&&dat1%100!=0)||dat1%400==0){
niti[1]=29;
}
suu=niti[dat2];
dat.setDate(1);
tuitati=dat.getDay();
mae='';
for(y=1;y<=tuitati;y++){
mae=mae+' | ';
}
hi=new Array();
toku =0;
flg_d=0; //土
flg_n=0; //日,祝
flg_f=0; //振替
for(i=1;i<=suu;i++){
if((i+tuitati)%7==2){ //改正祝日法
toku++;
}if((i+tuitati)%7==1){ //日
flg_n++;
}else if((i+tuitati)%7==0){ //土
flg_d++;
}
switch(tuki){
case 1:
if(i==1||(toku==2&&((i+tuitati)%7==2))){
flg_n++;
}break;
case 2:
if(i==11){
flg_n++;
}break;
case 3:
if(i==20){
flg_n++;
}break;
case 4:
if(i==29){
flg_n++;
}break;
case 5:
if(i==3||i==4||i==5){
flg_n++;
}break;
case 7:
if(toku==3&&((i+tuitati)%7==2)){
flg_n++;
}break;
case 9:
if(i==23||(toku==3&&((i+tuitati)%7==2))){
flg_n++;
}break;
case 10:
if(toku==2&&((i+tuitati)%7==2)){
flg_n++;
}break;
case 11:
if(i==3||i==23){
flg_n++;
}break;
case 12:
if(i==23){
flg_n++;
}break;
}
if(flg_n>0||flg_f>0){
if(i==dat3){
hi[i]=''+i+' | '; //当日色
}else{
hi[i]=''+i+' | ';
}
flg_f=0;
if(flg_n==2){flg_f++;}
}else if(flg_d>0){
if(i==dat3){
hi[i]=''+i+' | '; //当日色
}else{
hi[i]=''+i+' | '; //土曜日
}
}else{
if(i==dat3){
hi[i]=''+i+' | '; //当日色
}else{
hi[i]=''+i+' | ';
}
}
flg_d=0;flg_n=0;
}
for(k=7-tuitati;k<=suu;k=k+7){
hi[k]=hi[k]+'
';
}
date=mae;
for(j=1;j<=suu;j++){
date=date+hi[j];
}
youbi='
| 日 | 月 | 火 | 水 | 木 | 金 | 土 |
';
doc=st+'| '+dat1+'年'+tuki+'月 |
'+youbi+date+ed;
document.write(doc);
}
//-->