var Now;
var Year = 2008;
var Month = 1;
var FirstYear = 2008;
    
function CalcCalendar() {
  var dow = new Array(-5, 1, 0, -1, -2, -3, -4);
  var days = new Array(31,28,31,30,31,30,31,31,30,31,30,31);
  if (((Year%4 == 0) && (Year%100 != 0)) || (Year%400 == 0)) days[1] = 29;
  var numdays = days[Month-1];
  var cal = document.getElementById("calendar");
  var date = new Date(Year,Month-1,1);
  var cnt = dow[date.getDay()];
  var val ="";
  var d = "";
  var tst=0;

  for (var r=0;r<6;r++) 
  {
    for (var c=0;c<7;c++)
    {
      val = " ";
      if (cnt<10) d="0"+cnt;
      else d = cnt;
      if ((cnt>=1) && (cnt<=numdays))
      {
        val = cnt;
        if (Month<10) d = d + "-0"+Month+"-"+Year;
        else d = d + "-" + Month + "-" + Year;
      }
      cal.rows[4+r].cells[c].firstChild.nodeValue = val;
      cal.rows[4+r].cells[c].bgColor = "#80e080";
     tst=0;
      for (var i=0;i<dates.length;i++) 
      {
        if (dates[i]==d)  { cal.rows[4+r].cells[c].bgColor = "#e0a0a0"; tst=1; }
      }
      for (var i=0;i<bezoekjes.length;i++) 
      {
        if (bezoekjes[i]==d) 
       {
         if (tst) cal.rows[4+r].cells[c].bgColor= "#806060";
         else cal.rows[4+r].cells[c].bgColor= "#608060";
       } 
      }
      cnt++;
    }
  }
}

function SetYear(y) {
  var r = document.getElementById("calendar").rows[0];
  for (var i=0;i<4;i++) r.cells[i].bgColor = "#a0a0a0";
  r.cells[y-FirstYear].bgColor = "#c0e0e0";
  Year = y;
  CalcCalendar();
}

function SetMonth(m) { 
  var c = document.getElementById("calendar");
  var r = c.rows[Math.floor(1+((m-1) / 6))];
  for (var i=0;i<7;i++) c.rows[1].cells[i].bgColor = "#b0b0b0";
  for (var i=0;i<7;i++) c.rows[2].cells[i].bgColor = "#b0b0b0";
  r.cells[((m-1)%6)].bgColor = "#d0f0f0";
  Month = m;
  CalcCalendar();
}

function Init() {
  Now   = new Date();
  Year  = Now.getFullYear(); 
  Month = Now.getMonth()+1;
  SetMonth(Month);
  SetYear(Year);
}
