// permission is granted to use this javascript provided that the below code is not altered
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 = ['Januar','Februar','Marts','April','Maj','Juni','Juli','August','September','Oktober','November','December'];
	var today = new Date();
	var selDate = '';
	
	function dispCal(yy,mm) {
	evstr = '';
	if (mm < 0 || mm > 12) {
		alert('month must be between 1 and 12'); 
		return false;
} 

if (yy != 0 && (yy < 1901 || yy > 2100)) {
	alert('year must be after 1900 and before 2101'); 
	return false;
} 

var dow = ['M','T','O','T','F','L','S']; 
var calendar = new Date();  
var today = calendar.getDate(); 

calendar.setDate(1);

if (yy > 1900) calendar.setFullYear(yy); 
if (mm > 0) calendar.setMonth(mm - 1); 
var yy = year = calendar.getFullYear(); 
var month = calendar.getMonth(); 
calendar.setDate(today); 
var weekday = calendar.getDay(); 
weekday = weekday-1;
var daysInMonth = monthlength(month+1,year); 
var hilite_start = '<td width="30" style="background:' + todaybg + '" align="center"><b>'; 
var td_start = '<td width="30" align="center">'; 

	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; 

var cal = '<div id="cal"><div style="border:1pt solid #cccccc;height:130px;width:175px;"><table border="0" cellspacing="0" cellpadding="2" align="center"><tr><td align="right"><a href="#" onclick="if (cala = dispCal('+yyb+','+mmb+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><</a><\/td><td colspan="5" align="center"><b>' + moy[month]  + ' ' + year + '<\/b><\/td><td><a href="#" onclick="if (cala = dispCal('+yya+','+mma+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}">></a><\/td><\/tr><tr  style="background:' + headbg + '">'; 

for(dex=0; dex < 7; dex++) {
	cal += td_start + '<font color="#FFFFFF"><b>' + dow[dex] + '</b></font></td>';
} 
cal += '<\/tr><tr>'; 
var day2 = today; 
for (dex = today; dex > 6; dex -=7) day2 = dex; weekday -= day2 - 1; 

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 (j=0; j < eA.length; j++) {
	
	var ttt = year + getmmdd(month+1,dex);
	var evInfo = eA[j].split('__');
	if (ttt == evInfo[0]) {
		
		//evstr += getEvents(year + getmmdd(month+1,dex));
		evstr += evInfo[1];
	}
}
}


for(dex=weekday; dex < 7; dex++) cal += td_start + ' <\/td>'; 
cal += '<\/tr><\/table><\/div>';
if (document.getElementById) {

	//cal += '<table border="0" cellspacing="0" cellpadding="2" width="210"><tr><td><a href="#" onclick="if (cala = dispCal('+yb+','+mm+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><<</a></td><td><a href="#" onclick="if (cala = dispCal('+yyb+','+mmb+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><</a></td><td align="right"><a href="#" onclick="if (cala = dispCal('+yya+','+mma+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}">></a></td><td align="right"><a href="#" onclick="if (cala = dispCal('+ya+','+mm+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}">>></a></td></tr></table>';
	} 
	else {
		cal += '<div> </div>';} cal += '</div>'; 
		document.getElementById('eventslist').innerHTML = evstr;
		return cal;
   }
function start() {
	//var x = '<div id="calDate" style="border:1pt solid #cccccc;width:238px"><\/div>'; 
	var y = ''; 
	if (tb == 't') y = dispCal(0,0); 
	else y = dispCal(0,0); document.getElementById('calendar').innerHTML = y; ev();
}
loaded('calendar',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:'+textclr+'"'; 
	/*else return 'style="cursor:pointer;color:'+linkclr+';font-weight:bold;text-decoration:underline;" onclick="selDate = '+year+ getmmdd(month+1,day)+'; isDate(' + day + ',' + month + ',' + year + ');return false;"'; */
	else return 'style="color:'+linkclr+';font-weight:bold;"';
}

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 = noMessage;
	//document.getElementById('calDate').innerHTML = selDate + ':<br \/>' +ct; 
	document.location.href = 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 dA[i].substr(8);
		}
	}
	return '';
}

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

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

function ev() {
	var ct = nextDate(selDate);
	var ct = nextDate(selDate);
	if (ct == '') ct = nextDate('0000' + selDate.substr(4));
	if (ct == '') ct = noMessage; document.getElementById('calDate').innerHTML = selDate + ':<br \/> ' +ct;
}