http://www.scriptsearch.com/cgi-bin/jump.cgi?ID=807
20.04.2012

TD.label
{
    MARGIN-TOP: 0px;
    FONT-WEIGHT: bold;
    FONT-SIZE: 12px;
    WIDTH: 30px;
    COLOR: black;
    FONT-FAMILY: Arial;
    HEIGHT: 16px;
    BACKGROUND-COLOR: #ffffff;
    TEXT-ALIGN: center
}
A.cal
{
    TEXT-DECORATION: none;
    COLOR: #000000
    FONT-FAMILY: Arial;
    FONT-SIZE: 16px;
}

//////////////////////////////////////////////////////////////////////////////////
//www.fortochka.com
//Alexander Babichev 2006 Coopyright
//This script is free for private use. Otherwise a $10 fee per a site is required.
//the script can be modified but the copyright notice should be left unchanged.
//////////////////////////////////////////////////////////////////////////////////

function maxDays(mm, yyyy){
var mDay;
    if((mm == 3) || (mm == 5) || (mm == 8) || (mm == 10)){
        mDay = 30;
      }
      else{
          mDay = 31
          if(mm == 1){
               if (yyyy/4 - parseInt(yyyy/4) != 0){
                   mDay = 28
               }
               else{
                   mDay = 29
              }
        }
  }
return mDay;
}

function writeCalendar(){
var now = new Date
var dd = now.getDate()
var mm = now.getMonth()
var dow = now.getDay()
var yyyy = now.getFullYear()


var arrM = new Array("January","February","March","April","May","June","July","August","September","October","November","December")
var arrY = new Array()
    for (ii=0;ii<=4;ii++){
        arrY[ii] = yyyy + ii -2
    }
var arrD = new Array("Sun","Mon","Tue","Wed","Thu","Fri","Sat")

var text = ""
text = "<form name=calForm> "
text += "<table border=1>"
text += "<tr><td>"
text += "<table width=100%><tr>"
text += "<td align=left><a href=Month- onClick='monthMove(-1);this.blur();return false;'><img src=blue_arrow_left.gif border=0></a>&nbsp;"
text += "<select name=selMonth onChange='changeCal()'>"
    for (ii=0;ii<=11;ii++){
        if (ii==mm){
            text += "<option value= " + ii + " Selected>" + arrM[ii] + "</option>"
        }
        else{
            text += "<option value= " + ii + ">" + arrM[ii] + "</option>"
        }
    }
text += "</select>&nbsp;<a href=Month+ onClick='monthMove(1);this.blur();return false;'><img src=blue_arrow_right.gif border=0></a>"
text += "</td>"

text += "<td align=right>"
text += "<select name=selYear onChange='changeCal()'>"
    for (ii=0;ii<=4;ii++){
        if (arrY[ii]==yyyy){
            text += "<option value= " + arrY[ii] + " Selected>" + arrY[ii] + "</option>"
        }
        else{        
            text += "<option value= " + arrY[ii] + ">" + arrY[ii] + "</option>"
        }
    }
text += "</select>"
text += "</td>"
text += "</tr></table>"

text += "</td></tr>"

text += "<tr><td>"
text += "<table border=1>"
text += "<tr>"
    for (ii=0;ii<=6;ii++){
        text += "<td align=center width=35 Valign=middle class="label">" + arrD[ii] + "</td>"
    }
text += "</tr>"
aa = 0

    for (kk=0;kk<=5;kk++){
        text += "<tr>"
        for (ii=0;ii<=6;ii++){
            text += "<td align=center id=td" + aa + "><a href=" + aa + " ID=" + aa + " class="cal" onClick='changeBg(this.id);this.blur();return false'>1</a></td>"
            aa += 1
        }
        text += "</tr>"
    }
text += "</table>"
text += "</td></tr>"
text += "</table>"
text += "</form>"
document.write(text)
changeCal()
}


function changeCal(){
var now = new Date
var dd = now.getDate()
var mm = now.getMonth()
var dow = now.getDay()
var yyyy = now.getFullYear()

var currM = parseInt(document.calForm.selMonth.value)
var prevM
    if (currM!=0){
        prevM = currM - 1
    }
    else{
        prevM = 11
    }
    
var currY = parseInt(document.calForm.selYear.value)

var mmyyyy = new Date()
mmyyyy.setFullYear(currY,currM,1)

var day1 = mmyyyy.getDay()
    if (day1 == 0){
        day1 = 7
    }

var arrN = new Array(41)
var aa

    for (ii=0;ii<day1;ii++){
        arrN[ii] = maxDays((prevM),currY) - day1 + ii + 1
    }

    aa = 1
    for (ii=day1;ii<=day1+maxDays(currM,currY)-1;ii++){    
        arrN[ii] = aa
        aa += 1
    }
    
    aa = 1
    for (ii=day1+maxDays(currM,currY);ii<=41;ii++){
        arrN[ii] = aa
        aa += 1
    }
    
    for (ii=0;ii<=41;ii++){        
        eval("document.getElementById('td"+ii+"')").style.backgroundColor = "#ffffff"
    }    
    

var dCount = 0
    for (ii=0;ii<=41;ii++){        
        if (((ii<7)&&(arrN[ii]>20))||((ii>27)&&(arrN[ii]<20))){
            eval("document.getElementById('"+ii+"')").innerHTML = arrN[ii]
            eval("document.getElementById('"+ii+"')").style.color = "#000000"
            eval("document.getElementById('"+ii+"')").style.fontWeight = "normal"    
        }
        else{
            eval("document.getElementById('"+ii+"')").innerHTML = arrN[ii]
            if ((dCount==0)||(dCount==6)){
                eval("document.getElementById('"+ii+"')").style.color = "#FF0000"                
                eval("document.getElementById('"+ii+"')").style.fontWeight = "bold"                
            }
            else{
                eval("document.getElementById('"+ii+"')").style.color = "#000000"
                eval("document.getElementById('"+ii+"')").style.fontWeight = "bold"
            }
            if ((arrN[ii]==dd)&&(mm==currM)&&(yyyy==currY)){
                eval("document.getElementById('td"+ii+"')").style.backgroundColor = "#90ee90"                
            }
        }
        
    dCount += 1
        if (dCount>6){
            dCount=0
        }                        
    }        
}

function changeBg(id){
    if (eval("document.getElementById('td"+id+"')").style.backgroundColor != "yellow"){
        eval("document.getElementById('td"+id+"')").style.backgroundColor = "yellow"
    }
    else{
        eval("document.getElementById('td"+id+"')").style.backgroundColor = "#ffffff"
    }
//Repetition for stupid Netscape6    
    if (eval("document.getElementById('td"+id+"')").style.backgroundColor != "yellow"){
        eval("document.getElementById('td"+id+"')").style.backgroundColor = "yellow"
    }
    else{
        eval("document.getElementById('td"+id+"')").style.backgroundColor = "#ffffff"
    }
    if (eval("document.getElementById('td"+id+"')").style.backgroundColor != "yellow"){
        eval("document.getElementById('td"+id+"')").style.backgroundColor = "yellow"
    }
    else{
        eval("document.getElementById('td"+id+"')").style.backgroundColor = "#ffffff"
    }    
}

function monthMove(dir){
var now = new Date
var minY = now.getFullYear() - 2
var maxY = now.getFullYear() + 2
var mm = parseInt(document.calForm.selMonth.value)
var yyyy = parseInt(document.calForm.selYear.value)

    if (yyyy==minY && mm==0 && parseInt(dir)==-1){
    }
    else{
        if (yyyy==maxY && mm==11 && parseInt(dir)==1){
        }
        else{

            mm = mm + parseInt(dir)
            if (mm==-1){
                mm=11
                yyyy = yyyy - 1
                document.calForm.selYear.value = yyyy        
            }
            if (mm==12){
                mm=0
                yyyy = yyyy + 1
                document.calForm.selYear.value = yyyy        
            }
            document.calForm.selMonth.value = mm
            changeCal()        
        }
    }
}