function schrikkeljaar(jaar)
{ if (jaar%400==0) return true
  else if (jaar%4==0 && jaar%100!=0) return true
  else return false }

function naam_maand(n)
{ var naam
  if (n==1) naam="januari"
  if (n==2) naam="februari"
  if (n==3) naam="maart"
  if (n==4) naam="april"
  if (n==5) naam="mei"
  if (n==6) naam="juni"
  if (n==7) naam="juli"
  if (n==8) naam="augustus"
  if (n==9) naam="september"
  if (n==10) naam="oktober"
  if (n==11) naam="november"
  if (n==12) naam="december"
  return naam }

function maandkalender(datum,maand,jaar)
{ var eerste=new Date(jaar,maand-1,1)
  var begin=eerste.getDay()+1
  if ( maand==4 || maand==6 || maand==9 || maand==11 ) dagen=30
              else if (maand==2 && schrikkeljaar(jaar)) dagen=29
                   else if (maand==2 && !schrikkeljaar(jaar)) dagen=28
                        else dagen=31
  var kalender='<table><tr><td colspan="7" class="maand">'+naam_maand(maand)+' '+jaar+'</td></tr><tr><td class="dag">zo</td><td class="dag">ma</td><td class="dag">di</td><td class="dag">wo</td><td class="dag">do</td><td class="dag">vr</td><td class="dag">za</td></tr>'
  if (begin>1) { kalender+='<tr>'
                 for (var i=1; i<begin; i++) { kalender+='<td class="leeg">&nbsp;</td>' } }
  var dag=1
  if (i<8) for (i=i; i<8; i++) { if (datum==dag) { kalender+='<td class="vandaag">'+dag+'</td>' } else { kalender+='<td class="datum">'+dag+'</td>' }; dag++ }
  while (dag<=dagen-7) { kalender+='</tr><tr>'
                         for (i=1; i<8; i++) { if (datum==dag) { kalender+='<td class="vandaag">'+dag+'</td>' } else { kalender+='<td class="datum">'+dag+'</td>' }; dag++ } }
  kalender+='</tr>'
  var rest=dagen-dag+1
  if (rest>0) { kalender+='<tr>'
                for (i=1; i<=rest; i++) { if (datum==dag) { kalender+='<td class="vandaag">'+dag+'</td>' } else { kalender+='<td class="datum">'+dag+'</td>' }; dag++ }
                if (i<8) for (i=i; i<8; i++) { kalender+='<td class="leeg">&nbsp;</td>' }
                kalender+='</tr>' }
  kalender+='</table><br />'
  document.write(kalender) }