/* ************************************************************** */
/*                                         MEMOKALENDER                                                      */
/* ************************************************************** */
/*                                WAT JE KUNT AANPASSEN                                            */
/* ************************************************************** */

var tb = 't'; // top of bottom (t of b): plaatsing berichten boven of onder de kalender
//#4093C5
var titelAg = '#4093C5';  // achtergrondkleur tabeltitel
var vandaagAg = '#99cccc'; // achtergrondkleur vandaag
var linkAg = '#00cc00';    //hyperlink achtergrondkleur
var tekstkleur = '#000000'; // tekst kleur
var linkkleur = '#cc0000'; // hyperlink tekst kleur
var geenBericht =  '<br/>Vandaag geen berichten<br/><br/>'; // bericht indien geen gegevens beschikbaar zijn


/* ***************************************************************** */
/*                                HIERONDER NIETS MEER WIJZIGEN                               */
/* ***************************************************************** */
var pageLoaded = 0; 
window.onload = function() {pageLoaded = 1;}

function loaded(i,f) {
if (document.getElementById && document.getElementById(i) != null) f(); 
else if (!pageLoaded) setTimeout('loaded(\''+i+'\','+f+')',100);
}

function monthlength(month,year) {
var dd = new Date(year, month, 0);
return dd.getDate();}
var moy = ['januari','februari','maart','april','mei','juni','juli','augustus','september','oktober','november','december'];
var today = new Date();
var selDate = today.getFullYear()+getmmdd(today.getMonth()+1,today.getDate());

function dispCal(yy,mm) {

if (mm < 0 || mm > 12) {alert('maand moet tussen 1 en 12'); return false;} 
if (yy != 0 && (yy < 1901 || yy > 2100)) {alert('jaar moet na 1900 en voor 2101'); return false;} 
var dow = ['ma','di','wo','do','vr','za','zo']; 
var memokalender = new Date();  
var today = memokalender.getDate(); 
memokalender.setDate(1); 
if (yy > 1900) memokalender.setFullYear(yy); 
if (mm > 0) memokalender.setMonth(mm - 1); 
var yy = year = memokalender.getFullYear();

var month = memokalender.getMonth(); 
memokalender.setDate(today); 
var weekday = memokalender.getDay(); 
var daysInMonth = monthlength(month+1,year); 
var hilite_start = '<td width="25" style="background:' + vandaagAg + '" align="center"><b>'; 
var td_start = '<td width="25" align="center">';

var cal = '<div id="cal"><div style="border:1pt solid #4093C5; height:150px;width:188px"><table border="0" cellspacing="0" cellpadding="2" align="center"><tr>';

if (document.getElementById) {var mmb = month;  mm = month + 1; var yya = yyb = yy; if (mmb <1) {mmb += 12; yyb--;} var mma = month + 2; 
if (mma > 12) {mma -= 12; yya++;} 
var yb = yy -1; 
var ya = yy +1; 
cal += '<table style="background:' + titelAg + ';" border="0" cellspacing="0" cellpadding="2" width="188"><tr><td style="cursor:pointer; color:'+linkkleur+'; width="10" align="left"><a href="#" onclick="if (cala = dispCal('+yyb+','+mmb+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><img src="./pics/l.png" style="width: 20px; height:20px;" alt="previous month" border="0"></a></td><td align="center" ><b style="color:white; font-size: 11px;">'+ moy[month] +' '+ year +'</b></td><td style="cursor:pointer; color:'+linkkleur+';" width="10" align="right"><a href="#" onclick="if (cala = dispCal('+yya+','+mma+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><img src="./pics/r.png" style="width: 20px; height:20px;" alt="next month" border="0"><\/a><\/td><\/tr><\/table>';} 
else {cal += '<div> </div>';}

cal += '<\/tr><tr><table>';
for(dex=0; dex < 7; dex++) { cal += td_start + dow[dex] + '<\/td>'; } 
cal += '<\/tr><tr>'; 
var day2 = today; 
for (dex = today; dex > 6; dex -=7) day2 = dex; weekday -= day2 ; 
while (weekday < 0) weekday += 7; 
for(dex=0; dex < weekday; dex++) cal += td_start + ' <\/td>'; 
for(dex=1; dex <= daysInMonth; dex++) {
if(weekday == 7) {cal += '<\/tr><tr>'; weekday = 0;} 
if(selDate==year+getmmdd(month+1,dex)) cal += hilite_start +'<span '+clickDate(dex,month,year) + '>'+ dex + '<\/span><\/b><\/td>'; else cal += td_start + '<span '+clickDate(dex,month,year) + '>' + dex + '<\/span><\/td>'; weekday += 1;} 
for(dex=weekday; dex < 7; dex++) cal += td_start + ' <\/td>'; 
cal += '<\/tr><\/table><\/div>';
cal += '</div>'; 
return cal;
}

function start() {
var x = '<div id="calDate" style="border:1pt solid #4093C5; width:188px"><\/div>'; 
var y = ''; 
if (tb == 't') y = x + dispCal(0,0); 
else y = dispCal(0,0) + x; 
document.getElementById('memokalender').innerHTML = y; ev();}
loaded('memokalender',start);

function clickDate(day, month, year) {
var ct = nextDate(year + getmmdd(month+1,day));
if (ct == '') ct = nextDate('0000' + getmmdd(month+1,day));
if (ct == '') return 'style="color:'+tekstkleur+'"'; 
else return 'style="cursor:pointer; color:'+linkkleur+'; background:'+linkAg+';" onclick="selDate = '+year+ getmmdd(month+1,day)+'; isDate(' + day + ',' + month + ',' + year + ');return false;"';}

function isDate(dayVal,monthVal,yearVal) {
var ct = nextDate(yearVal + getmmdd(monthVal+1,dayVal));
if (ct == '') ct = nextDate('0000' + getmmdd(monthVal+1,dayVal));
if (ct == '') ct = geenBericht;
document.getElementById('calDate').innerHTML = ct; 
return false;}

function nextDate(yymmdd) {
var x = dA.length;
for (var i = 0; i < x; i++) {
if (dA[i].substr(0,8) == yymmdd) return '<br/>'+dA[i].substr(8)+'<br/><br/>';}
return '';}

function getmmdd(mm,dd) {return (mm > 9 ? '' + mm : '0' + mm) + (dd > 9 ? dd : '0' + dd);}

function ev() {
var ct = nextDate(selDate);
if (ct == '') ct = nextDate('0000' + selDate.substr(4));
if (ct == '') ct = geenBericht; 
document.getElementById('calDate').innerHTML = ct;}

/* ***************************************************************** */
/*           EINDE MEMOKALENDER                                      */
/* ***************************************************************** */