// Event Calendar
// copyright Stephen Chapman, 10th June 2006, 30th October 2006

var tb = 't'; // top or bottom (t or b)
var headbg = '#cccccc';  // table heading background colour
//var todaybg = '#FFFFFF'; // current selected date background colour
var textclr = '#FFFFFF'; // text colour
var linkclr = '#ff9999'; // link text colour
var noMessage =  ''; // message to display when no entry in array
var Bdates = "";
var dZero = "";
var mZero = "";
var d = new Date();
var curr_date = d.getDate();
//alert(curr_date);
var curr_month = d.getMonth();
var curr_year = d.getFullYear();

var dA = new Array(); var x = 0;
// first 8 characters in ccyymmdd format for single date events
// first 8 characters in 0000mmdd format for every year events
dA[x++] = "00000101 New Year";
dA[x++] = "00000214 Valentine's day";
dA[x++] = "00000709 Steve's Birthday";
dA[x++] = "00000919 Site Anniversary";
dA[x++] = "00001206 St Nicholas' Day";
// dA[x++] = "20060610 New Event Calendar Started today";

// permission is granted to use this javascript provided that the below code is not altered
var pageLoaded = 0; window.onload = function() {
	pageLoaded = 1;


	//Bdates = document.getElementById("bdates").value;

	//alert(" "+document.getElementById("ss").value);
}
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 = ['January','February','March','April','May','June','July','August','September','October','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('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 = ['Sun','Mon','Tue','Wed','Thu','Fri','Sat']; 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(); var daysInMonth = monthlength(month+1,year); var hilite_start = '<td width="30"  align="center"><b>'; var td_start = '<td width="30" align="center">'; var cal = '<div id="cal"><div style="height:140px;"><div style="border:1pt solid #CCCCCC;"><table border="0" cellspacing="0" cellpadding="2" style="width:150px;font-family:arial;" align="center"><tr><td colspan="7" style="background:' + headbg + '" align="center"><b>' + moy[month]  + ' ' + year + '<\/b><\/td><\/tr><tr>';
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 - 1; while (weekday < 0) weekday += 7; for(dex=0; dex < weekday; dex++) cal += td_start + ' <\/td>';

	Bdates = document.getElementById("bdates").value;

	for(dex=1; dex <= daysInMonth; dex++)
		{
		if(weekday == 7)
		{
			cal += '</tr><tr>';
			weekday = 0;
	   }
	  if( dex<=9)
			 dZero = "0";
	  else
		dZero = "";
	   if( month<=8)
	    mZero = "0"; //alert(month);}
		else
			mZero = "";
		month1 = parseInt(month)+1; //alert(month1);
				//alert(dex+'==='+month+"=="+year);
				//Sstring = "0"+dex+"."+month+"."+year;


		Sstring = dZero+dex+"."+mZero+month1+"."+year;
		Sstring1 = Sstring;
		 var hrefsSatart = "";
		 var hrefsEnd = "";
		if(Bdates.indexOf(Sstring)== -1)
			{
				ccolor = "green";
			}
		else
			ccolor = "red";
	if(dex < curr_date && year<=curr_year && month <=curr_month)
			{
				ccolor = "red";
				hrefsSatart = "";
				hrefsEnd="";
			}
	else if (month <curr_month && year<=curr_year)
			{
				ccolor = "red";
				hrefsSatart = "";
				hrefsEnd="";
			}
	if(year<curr_year)
			{
			ccolor = "red";
				hrefsSatart = "";
				hrefsEnd="";
			}
	//alert(Sstring1+" "+ccolor);
	   if(selDate==year+getmmdd(month+1,dex))
		    cal += hilite_start +hrefsSatart+'<span  id='+Sstring1+' style="color:#FFFFFF;border: 1px solid black;background-color:'+ccolor+';" '+clickDate(dex,month,year) + '>'+ dex + '<\/span><\/b>'+hrefsEnd+'<\/td>'; else
			cal += td_start + hrefsSatart+'<span id='+Sstring1+' style="color:#FFFFFF;background-color:'+ccolor+';" '+clickDate(dex,month,year) + '>' + dex + '<\/span>'+hrefsEnd+'<\/td>'; weekday += 1;}
			for(dex=weekday; dex < 7; dex++)
				cal += td_start + ' <\/td>'; cal += '<\/tr><\/table><div style="height:4px;font-size:0px;display:block;background-color:#FFFFFF;"><\/div><\/div><\/div>';
			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 border="0" cellspacing="0" cellpadding="2" width="210" style="width:160px;font-size:10px;font-family:arial" align="center" class="cal_nav"><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><tr><td colspan="1" style="padding-top:10px"><div style="border:0px solid #000000;width:10px;height:10px;background-color:green;font-size:9px">&nbsp;&nbsp;&nbsp;&nbsp;<span style="background-color:FFFFFF">&nbsp;Available</span></div></td><td colspan="3" style="padding-top:10px"><div style="border:0px solid #000000;width:10px;height:10px;background-color:red;margin-left:25px;font-size:9px">&nbsp;&nbsp;&nbsp;&nbsp<span style="background-color:FFFFFF">&nbsp;Not&nbsp;Available</span></div></td></tr></table>';} else {cal += '<div> </div>';} cal += '</div>'; return cal;}
function start() {var x = '<div id="calDate" style="border:10pt solid #cccccc;"><\/div>';var y = ''; if (tb == 't') y = x + dispCal(0,0); else y = dispCal(0,0) + x; document.getElementById('calendarView').innerHTML = y; ev();}
loaded('calendarView',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+'" 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 = noMessage;document.getElementById('calDate').innerHTML = selDate + ':<br \/>' +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 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 == '')
	{
	document.getElementById('calDate').style.display = 'none';
	ct = noMessage;
	document.getElementById('calDate').innerHTML = ''
	}
	}