//www.fortochka.com
//A Babichev 2006 Copyright
function xDy(mm, yy){
var mDy;
if((mm == 3) || (mm == 5) || (mm == 8) || (mm == 10)){ 
mDy = 30;
}
else{
mDy = 31;
if(mm == 1){
if (yy/4 - parseInt(yy/4) != 0){
mDy = 28;
}
else{
mDy = 29;
}
}
}
return mDy; 
}
function cl(){
var now = new Date;
var dd = now.getDate();
var mm = now.getMonth();
var dow = now.getDay();
var yy = now.getFullYear();
var arM = new Array("January","February","March","April","May","June","July","August","September","October","November","December")
var arY = new Array()
for (ii=0;ii<=4;ii++){
arY[ii] = yy + ii -2
}
var arD = new Array("Sun","Mon","Tue","Wed","Thu","Fri","Sat")
var text = ""
text = "<div style=width:220px><form name=caFo id=cf>"
text += "<a href=Month- onClick='mMo(-1);this.blur();return false;'>&#9668;</a>&nbsp;&nbsp;"
text += "<select style=margin:auto;width:90px name=selMonth onChange='chC()'>"
for (ii=0;ii<=11;ii++){
if (ii==mm){
text += "<option value= " + ii + " Selected>" + arM[ii] + "</option>"
}
else{
text += "<option value= " + ii + ">" + arM[ii] + "</option>"
}
}
text += "</select>&nbsp;<a href=Month+ onClick='mMo(1);this.blur();return false;'>&nbsp;&#9658;</a>&nbsp;&nbsp;"
text += "<select style=margin:auto;width:54px name=selYear onChange='chC()'>"
for (ii=0;ii<=4;ii++){
if (arY[ii]==yy){
text += "<option value= " + arY[ii] + " Selected>" + arY[ii] + "</option>"
}
else{		
text += "<option value= " + arY[ii] + ">" + arY[ii] + "</option>"
}
}
text += "</select><table width=220><tr>"
for (ii=0;ii<=6;ii++){
text += "<td class=c3>" + arD[ii] + "</td>"
}
text += "</tr>"
aa = 0
for (kk=0;kk<=5;kk++){
text += "<tr>"
for (ii=0;ii<=6;ii++){
text += "<td class=c2 id=td" + aa + "><div =" + aa + " ID=" + aa + " ></div></td>"
aa += 1
}
text += "</tr>"
}
text += "</table></form></div>"
document.write(text)
chC()
}
function chC(){
var now = new Date
var dd = now.getDate()
var mm = now.getMonth()
var dow = now.getDay()
var yy = now.getFullYear()
var cuM = parseInt(document.caFo.selMonth.value)
var prM
if (cuM!=0){
prM = cuM - 1
}
else{
prM = 11
}
var cuY = parseInt(document.caFo.selYear.value)
var mmyy = new Date()
mmyy.setFullYear(cuY,cuM,1)
var dy1 = mmyy.getDay()
if (dy1 == 0){
dy1 = 7
}
var arN = new Array(41)
var aa
for (ii=0;ii<dy1;ii++){
arN[ii] = xDy((prM),cuY) - dy1 + ii + 1
}
aa = 1
for (ii=dy1;ii<=dy1+xDy(cuM,cuY)-1;ii++){	
arN[ii] = aa
aa += 1
}
aa = 1
for (ii=dy1+xDy(cuM,cuY);ii<=41;ii++){
arN[ii] = aa
aa += 1
}
for (ii=0;ii<=41;ii++){		
eval("document.getElementById('td"+ii+"')").style.backgroundColor = "#f0f0df"
}	
var dCo = 0
for (ii=0;ii<=41;ii++){		
if (((ii<7)&&(arN[ii]>20))||((ii>27)&&(arN[ii]<20))){
eval("document.getElementById('"+ii+"')").innerHTML = arN[ii]
eval("document.getElementById('"+ii+"')").style.color = "#eee"	
}
else{
eval("document.getElementById('"+ii+"')").innerHTML = arN[ii]
if ((dCo==0)||(dCo==6)){
eval("document.getElementById('"+ii+"')").style.color = "#1e485c"				
}
else{
eval("document.getElementById('"+ii+"')").style.color = "#1e485c"
}
if ((arN[ii]==dd)&&(mm==cuM)&&(yy==cuY)){
eval("document.getElementById('"+ii+"')").style.color = "#980000"				
}
}	
dCo += 1
if (dCo>6){
dCo=0
}						
}		
}
function cBg(id){
if (eval("document.getElementById('td"+id+"')").style.backgroundColor != "#f0f0df"){
eval("document.getElementById('td"+id+"')").style.backgroundColor = "#f0f0df"
}
else{
eval("document.getElementById('td"+id+"')").style.backgroundColor = "#f0f0df"
}
//Repetition for stupid Netscape6	
if (eval("document.getElementById('td"+id+"')").style.backgroundColor != "#f0f0df"){
eval("document.getElementById('td"+id+"')").style.backgroundColor = "#f0f0df"
}
else{
eval("document.getElementById('td"+id+"')").style.backgroundColor = "#f0f0df"
}
if (eval("document.getElementById('td"+id+"')").style.backgroundColor != "#f0f0df"){
eval("document.getElementById('td"+id+"')").style.backgroundColor = "#f0f0df"
}
else{
eval("document.getElementById('td"+id+"')").style.backgroundColor = "#f0f0df"
}	
}
function mMo(dir){
var now = new Date
var mnY = now.getFullYear() - 2
var mxY = now.getFullYear() + 2
var mm = parseInt(document.caFo.selMonth.value)
var yy = parseInt(document.caFo.selYear.value)
if (yy==mnY && mm==0 && parseInt(dir)==-1){
}
else{
if (yy==mxY && mm==11 && parseInt(dir)==1){
}
else{
mm = mm + parseInt(dir)
if (mm==-1){
mm=11
yy = yy - 1
document.caFo.selYear.value = yy		
}
if (mm==12){
mm=0
yy = yy + 1
document.caFo.selYear.value = yy		
}
document.caFo.selMonth.value = mm
chC()		
}
}
}