function setable(m,a,T,F)
{
if(m==undefined)m=0;
if(a==undefined)a=0;
if(T==undefined)T="T"+a+""+m;
if(F==undefined)F=true;
document.writeln('');
document.writeln('| |
|---|
');
document.writeln('| Lu | Ma | Me | Je | Ve | Sa | Di |
|---|
');
document.writeln('| | | | | | | |
');
document.writeln('| | | | | | | |
');
document.writeln('| | | | | | | |
');
document.writeln('| | | | | | | |
');
document.writeln('| | | | | | | |
');
document.writeln('| | | | | | | |
');
if(F)document.writeln('| |
');
document.writeln('
');
bot(m,a,T,F);
}
function bis(a)
{
if(a %4 == 0 && a %100 !=0 || a %400 == 0)return true;
return false;
}
function l3(a){return a<10?" "+a:a<100?" "+a:a;}
function getjour(A,M,J)
{
var date=new Date(A,M,J);
var date2=new Date(A,0,1);
var y=date.getTime()-date2.getTime();
y=1+Math.floor(y/86400000);
var x=bis(A)?366:365;
return l3(y)+"\nReste "+l3(x-y);
}
function getWeek(year,month,day)
{
var a=Math.floor((13-month)/12);
var y=year+4800-a;
var m=month-2+12*a;
var jd=day+Math.floor(((153*m)+2)/5)+(365*y)+Math.floor(y/4)-Math.floor(y/100)+Math.floor(y/400)-32045;
var d4=(jd+31741-(jd%7))%146097%36524%1461;
var L=Math.floor(d4/1460);
var d1=((d4-L)%365)+L;
return 1+Math.floor(d1/7);
}
function l0(a){return a<10?"0"+a:a;}
function l_(a){return a<10?" "+a:a;}
function bot(m,a,T,F)
{
if(F==undefined)F=true;
var mday=1;
var wday=1;
var thisday=new Date();
var jour=thisday.getDate();
var mois=thisday.getMonth();
var an=thisday.getYear();
while(m<0){m+=12;a--;}
while(m>11){m-=12;a++;}
if(a<1800){m=mois;a=an;}
var n=new Array('Janvier','Février','Mars','Avril','Mai','Juin','Juillet','Août','Septembre','Octobre','Novembre','Décembre');
var N=new Array('janvier','février','mars','avril','mai','juin','juillet','août','septembre','octobre','novembre','décembre');
var d=new Array(31,28,31,30,31,30,31,31,30,31,30,31);
var j=new Array("dimanche","lundi","mardi","mercredi","Jeudi","vendredi","samedi");
var _a = parseInt(a);
var _b = _a % 19;
var _c = 19 * _b + 24;
var _e = _c % 30;
var _F = parseInt(_e / 28);
var _G = _e - _F;
var _h = _a + parseInt(_a / 4) + _G - 13;
var _j = _h % 7;
var _k = _G - _j;
var _M = 3 + parseInt((_k + 40) / 44);
var Paques = _k + 28 - 31 * parseInt(_M / 4) + 1;
var PaquesM = _M;
if((Paques>31)&&(PaquesM==3)){Paques-=31;PaquesM++;}
var AscensionM = PaquesM+1;
var PentecoteM = AscensionM;
var Ascension = Paques + 38;
var Pentecote = Paques + 49;
if(AscensionM!=4){Ascension-=30;Pentecote-=30;}else{Ascension-=31;Pentecote-=31;}
if((Ascension>30)&&(AscensionM==4)){Ascension-=30;AscensionM++;}
if((Pentecote>30)&&(PentecoteM==4)){Pentecote-=30;PentecoteM++;}
if((Ascension>31)&&(AscensionM==5)){Ascension-=31;AscensionM++;}
if((Pentecote>31)&&(PentecoteM==5)){Pentecote-=31;PentecoteM++;}
if(bis(_a))d[1]=29;
var letd=0;
document.getElementById(T+letd).innerHTML=n[m]+" "+a;
document.getElementById(T+letd).title="Mois d"+((m==3)||(m==7)||(m==9)?"'":"e ")+N[m]+" "+a;
letd++;
do
{
var date=new Date(a,m,mday);
var day=date.getDay();
var lejour=l_(mday);
if((an==a)&&(mois==m)&&(jour==mday))lejour=""+lejour+"";
else if(wday==0)lejour=""+lejour+"";
if(day==wday)
{
document.getElementById(T+letd).title="Semaine "+getWeek(a,m,mday)+"\nJour "+getjour(a,m,mday);
if(((mday==Paques)&&(m+1==PaquesM))
||((mday==Ascension)&&(m+1==AscensionM))
||((mday==Pentecote)&&(m+1==PentecoteM))
||((mday==1)&&(m==0||m==4||m==10))
||((mday==8)&&(m==4))
||((mday==14)&&(m==6))
||((mday==15)&&(m==7))
||((mday==11)&&(m==10))
||((mday==25)&&(m==11)))lejour=""+lejour+"";
document.getElementById(T+letd).innerHTML=lejour;
mday ++;
}
else
{
var ddd;
var r=0;
var k=0;
do
{
ddd=new Date(a,m,r--);
k=ddd.getDay();
}
while(k!=letd);
r=ddd.getDate();
k=ddd.getMonth();
var aa=ddd.getYear();
document.getElementById(T+letd).title="Semaine "+getWeek(aa,k,r)+"\nJour "+getjour(aa,k,r);
document.getElementById(T+letd).innerHTML=""+l_(r)+"";
}
letd++;
wday++;wday%=7;
}while(mday<=d[m]);
var w=1;
while(letd<43)
{
wday++;wday%=7;
var ddd=new Date(a,m+1,w);
var r=ddd.getDate();
var k=ddd.getMonth();
var aa=ddd.getYear();
document.getElementById(T+letd).title="Semaine "+getWeek(aa,k,r)+"\nJour "+getjour(aa,k,r);
document.getElementById(T+letd).innerHTML=''+l_(w++)+'';
letd++;
}
if(F)document.getElementById(T+letd).innerHTML="< "+l0(jour)+"/"+l0(mois+1)+"/"+an+" >";
}