var nextprebg = '#cc6600';  // sfondo pulsanti precedente e successivo
var dayswk = '#99cc33';  // sfondo giorni della settimana [Dom,Lun,...,Sab]
var daysbg = '#ffffcc';  // sfondo giorni [1,2,3,...,30,31]
var daylink = '#ffcc33'; // sfondo del giorno con eventi
var todaybg = '#99cccc'; // sfondo data corrente
var cordatebg = '#6699cc'; // sfondo della barra data corrente
var noMessage = 'Nessun evento programmato'; // messaggio da visualizzare quando non si entra nell'array
var dimw = '30'; // larghezza celle della tabella
var dimh = '20'; // altezze celle della tablella
var dimborderext = '1'; // spessore bordo esterno tabella
var tableborder = '#660000'; // colore del bordo della tabella
var dimwtable = dimw*7;

var thisDate = 1;	// Tracks current date being written in calendar
var wordMonth = new Array("Gennaio","Febbraio","Marzo","Aprile","Maggio","Giugno","Luglio","Agosto","Settembre","Ottobre","Novembre","Dicembre");
var today = new Date();	// Date object to store the current date
var todaysDay = today.getDay() + 1;		// Stores the current day number 1-7
var todaysDate = today.getDate();		// Stores the current numeric date within the month
var todaysMonth = today.getUTCMonth() + 1;	// Stores the current month 1-12
var todaysYear = today.getFullYear();	// Stores the current year
var monthNum = todaysMonth;				// Tracks the current month being displayed
var yearNum = todaysYear;				// Tracks the current year being displayed
var firstDate = new Date(String(monthNum)+"/1/"+String(yearNum));	// Object Storing the first day of the current month
var firstDay = firstDate.getUTCDay();	// Tracks the day number 1-7 of the first day of the current month
var lastDate = new Date(String(monthNum+1)+"/0/"+String(yearNum));	// Tracks the last date of the current month
var numbDays = 0;
var calendarString = "";
var eastermonth = 0;
var easterday = 0;

function changedate(buttonpressed) {
	if (buttonpressed == "prevyr") yearNum--;
	else if (buttonpressed == "nextyr") yearNum++;
	else if (buttonpressed == "prevmo") monthNum--;
	else if (buttonpressed == "nextmo") monthNum++;
	else  if (buttonpressed == "return") { 
		monthNum = todaysMonth;
		yearNum = todaysYear;
	}

	if (monthNum == 0) {
		monthNum = 12;
		yearNum--;
	}
	else if (monthNum == 13) {
		monthNum = 1;
		yearNum++
	}

	lastDate = new Date(String(monthNum+1)+"/0/"+String(yearNum));
	numbDays = lastDate.getDate();
	firstDate = new Date(String(monthNum)+"/1/"+String(yearNum));
	firstDay = firstDate.getDay() + 1;
	createCalendar();
	return;
}


function easter(year) {
// feed in the year it returns the month and day of Easter using two GLOBAL variables: eastermonth and easterday
var a = year % 19;
var b = Math.floor(year/100);
var c = year % 100;
var d = Math.floor(b/4);
var e = b % 4;
var f = Math.floor((b+8) / 25);
var g = Math.floor((b-f+1) / 3);
var h = (19*a + b - d - g + 15) % 30;
var i = Math.floor(c/4);
var j = c % 4;
var k = (32 + 2*e + 2*i - h - j) % 7;
var m = Math.floor((a + 11*h + 22*k) / 451);
var month = Math.floor((h + k - 7*m + 114) / 31);
var day = ((h + k - 7*m +114) % 31) + 1;
eastermonth = month;
easterday = day;
}


function createCalendar() {
	var daycounter = 0;
	calendarString = '';
	calendarString += '<table border="'+dimborderext+'" bordercolor="'+tableborder+'" cellpadding="0" cellspacing="0">';
	calendarString += '<tr><td><table width="'+dimwtable+'" border="0" cellpadding="0" cellspacing="0">';
	calendarString += '<tr>';
	calendarString += '<td bgcolor="#ffffff" width="'+dimwtable+'" align="center" valign="center"><span class="mese">'+wordMonth[monthNum-1]+'&nbsp;&nbsp;'+ yearNum+'<\/span><\/td>';
	calendarString += '<\/tr><\/table>';
	calendarString += '<table width="'+dimwtable+'" border="0" cellpadding="0" cellspacing="0"><tr>';
	calendarString += '<td bgcolor="'+nextprebg+'"align="left" valign="center"><a href="#" onClick="changedate(\'prevyr\')"><span class="pulsantiprenext"><<<\/span><\/a><\/td>';
	calendarString += '<td bgcolor="'+nextprebg+'"align="left" valign="center"><a href="#" onClick="changedate(\'prevmo\')"><span class="pulsantiprenext"><<\/span><\/a><\/td>';
	calendarString += '<td bgcolor="'+nextprebg+'"align="right" valign="center"><a href="#" onClick="changedate(\'nextmo\')"><span class="pulsantiprenext">><\/span><\/a><\/td>';
	calendarString += '<td bgcolor="'+nextprebg+'"align="right" valign="center"><a href="#" onClick="changedate(\'nextyr\')"><span class="pulsantiprenext">>><\/span><\/a><\/td>';
	calendarString += '<\/tr><\/table><table width="'+dimwtable+'" border="0" cellpadding="0" cellspacing="0">';
	calendarString += '<tr>';
	calendarString += '<td bgcolor="'+dayswk+'" align="center" valign="center" width="'+dimw+'" height="'+dimh+'"><span class="giorni">Dom<\/span><\/td>';
	calendarString += '<td bgcolor="'+dayswk+'" align="center" valign="center" width="'+dimw+'" height="'+dimh+'"><span class="giorni">Lun<\/span><\/td>';
	calendarString += '<td bgcolor="'+dayswk+'" align="center" valign="center" width="'+dimw+'" height="'+dimh+'"><span class="giorni">Mar<\/span><\/td>';
	calendarString += '<td bgcolor="'+dayswk+'" align="center" valign="center" width="'+dimw+'" height="'+dimh+'"><span class="giorni">Mer<\/span><\/td>';
	calendarString += '<td bgcolor="'+dayswk+'" align="center" valign="center" width="'+dimw+'" height="'+dimh+'"><span class="giorni">Gio<\/span><\/td>';
	calendarString += '<td bgcolor="'+dayswk+'" align="center" valign="center" width="'+dimw+'" height="'+dimh+'"><span class="giorni">Ven<\/span><\/td>';
	calendarString += '<td bgcolor="'+dayswk+'" align="center" valign="center" width="'+dimw+'" height="'+dimh+'"><span class="giorni">Sab<\/span><\/td>';
	calendarString += '<\/tr>';

	thisDate == 1;
	for (var i = 1; i <= 6; i++) {
		calendarString += '<tr>';
		for (var x = 1; x <= 7; x++) {
			daycounter = (thisDate - firstDay)+1;
			thisDate++;
			if ((daycounter > numbDays) || (daycounter < 1)) {
				calendarString += '<td align="center" bgcolor="#cccccc" height="'+dimh+'" width="'+dimw+'">&nbsp;<\/td>';
			} else {
				if (checkevents(daycounter,monthNum,yearNum,i,x) || ((todaysDay == x) && (todaysDate == daycounter) && (todaysMonth == monthNum))){
					if ((todaysDay == x) && (todaysDate == daycounter) && (todaysMonth == monthNum)) {
						calendarString += '<td align="center" bgcolor="'+todaybg+'" height="'+dimh+'" width="'+dimw+'"><a href=\"javascript:showevents('+ daycounter+','+monthNum+','+yearNum+','+i+','+x+')">'+daycounter+'<\/a><\/td>';
					}
 					else	calendarString += '<td align="center" bgcolor="'+daylink+'" height="'+dimh+'" width="'+dimw+'"><a href="javascript:showevents('+daycounter+','+monthNum+','+yearNum+','+i+','+x+')">'+daycounter+'<\/a><\/td>';
				} else {
					calendarString += '<td align="center" bgcolor="'+daysbg+'" height="'+dimh+'" width="'+dimw+'"><span class="giornimese">'+daycounter+'<\/span><\/td>';
				}
			}
		}
		calendarString += '<\/tr>';
	}
	calendarString += '<tr><td colspan="7" align="center" valign="center" bgcolor="'+cordatebg+'"><a href="javascript:changedate(\'return\')">Data corrente<\/a><\/td><\/tr><\/table><\/td><\/tr><\/table>';
	var object=document.getElementById('calendar');
	object.innerHTML= calendarString;
	thisDate = 1;
}

function checkevents(day,month,year,week,dayofweek) {
var numevents = 0;
var floater = 0;
	for (var i = 0; i < events.length; i++) {
		if (events[i][0] == "W") {
			if ((events[i][2] == dayofweek)) numevents++;
		}
		else if (events[i][0] == "Y") {
			if ((events[i][2] == day) && (events[i][1] == month)) numevents++;
		}
		else if (events[i][0] == "F") {
			if ((events[i][1] == 3) && (events[i][2] == 0) && (events[i][3] == 0) ) {
				easter(year);
				if (easterday == day && eastermonth == month) numevents++;
			} else {
				floater = floatingholiday(year,events[i][1],events[i][2],events[i][3]);
				if ((month == 5) && (events[i][1] == 5) && (events[i][2] == 4) && (events[i][3] == 2)) {
					if ((floater + 7 <= 31) && (day == floater + 7)) {
						numevents++;
					} else if ((floater + 7 > 31) && (day == floater)) numevents++;
				} else if ((events[i][1] == month) && (floater == day)) numevents++;
			}
		}
		else if ((events[i][2] == day) && (events[i][1] == month) && (events[i][3] == year)) {
			numevents++;
		}
	}
	if (numevents == 0) {
		return false;
	} else {
		return true;
	}
}

function showevents(day,month,year,week,dayofweek) {
var theevent = "";
var floater = 0;
	for (var i = 0; i < events.length; i++) {
		// First we'll process recurring events (if any):
		if (events[i][0] != "") {
			if (events[i][0] == "D") {
			}
			if (events[i][0] == "W") {
				if ((events[i][2] == dayofweek)) {
				theevent += "Data dell'evento: \n" + day +'/'+ month +'/'+ year + '\n';
				theevent += events[i][6] + '\n';
				if (events[i][4] !="") theevent += 'Inizio: ' + events[i][4] + '\n';
				if (events[i][5] !="") theevent += 'Fine: ' + events[i][5] + '\n';
				if (events[i][7] !="") theevent += 'Descrizione: ' + events[i][7] + '\n';
				theevent += '\n -------------- \n\n';
				document.forms.eventform.eventlist.value = theevent;
//				alert(theevent);
				}
			}
			if (events[i][0] == "M") {
			}
			if (events[i][0] == "Y") {
				if ((events[i][2] == day) && (events[i][1] == month)) {
				theevent += "Data dell'evento: \n" + day +'/'+ month +'/'+ year + '\n';
				theevent += events[i][6] + '\n';
				if (events[i][4] !="") theevent += 'Inizio: ' + events[i][4] + '\n';
				if (events[i][5] !="") theevent += 'Fine: ' + events[i][5] + '\n';
				if (events[i][7] !="") theevent += 'Descrizione: ' + events[i][7] + '\n';
				theevent += '\n -------------- \n\n';
				document.forms.eventform.eventlist.value = theevent;
//				alert(theevent);
				}
			}
			if (events[i][0] == "F") {
				if ((events[i][1] == 3) && (events[i][2] == 0) && (events[i][3] == 0) ) {
					if (easterday == day && eastermonth == month) {
						theevent += "Data dell'evento: \n" + day +'/'+ month +'/'+ year + '\n';
						theevent += events[i][6] + '\n';
				if (events[i][4] !="") theevent += 'Inizio: ' + events[i][4] + '\n';
				if (events[i][5] !="") theevent += 'Fine: ' + events[i][5] + '\n';
				if (events[i][7] !="") theevent += 'Descrizione: ' + events[i][7] + '\n';
						theevent += '\n -------------- \n\n';
						document.forms.eventform.eventlist.value = theevent;
//						alert(theevent);
					} 
				} else {
					floater = floatingholiday(year,events[i][1],events[i][2],events[i][3]);
					if ((month == 5) && (events[i][1] == 5) && (events[i][2] == 4) && (events[i][3] == 2)) {
						if ((floater + 7 <= 31) && (day == floater + 7)) {
							theevent += "Data dell'evento: \n" + day +'/'+ month +'/'+ year + '\n';
							theevent += events[i][6] + '\n';
				if (events[i][4] !="") theevent += 'Inizio: ' + events[i][4] + '\n';
				if (events[i][5] !="") theevent += 'Fine: ' + events[i][5] + '\n';
				if (events[i][7] !="") theevent += 'Descrizione: ' + events[i][7] + '\n';
							theevent += '\n -------------- \n\n';
							document.forms.eventform.eventlist.value = theevent;
//							alert(theevent);
						} else if ((floater + 7 > 31) && (day == floater)) {
							theevent += "Data dell'evento: \n" + day +'/'+ month +'/'+ year + '\n';
							theevent += events[i][6] + '\n';
				if (events[i][4] !="") theevent += 'Inizio: ' + events[i][4] + '\n';
				if (events[i][5] !="") theevent += 'Fine: ' + events[i][5] + '\n';
				if (events[i][7] !="") theevent += 'Descrizione: ' + events[i][7] + '\n';
							theevent += '\n -------------- \n\n';
							document.forms.eventform.eventlist.value = theevent;
//							alert(theevent);
						}
					} else if ((events[i][1] == month) && (floater == day)) {
						theevent += "Data dell'evento: \n" + day +'/'+ month +'/'+ year + '\n';
						theevent += events[i][6] + '\n';
				if (events[i][4] !="") theevent += 'Inizio: ' + events[i][4] + '\n';
				if (events[i][5] !="") theevent += 'Fine: ' + events[i][5] + '\n';
				if (events[i][7] !="") theevent += 'Descrizione: ' + events[i][7] + '\n';
						theevent += '\n -------------- \n\n';

						document.forms.eventform.eventlist.value = theevent;
//						alert(theevent);
					}
				}
		}
		}
		// Now we'll process any One Time events happening on the matching month, day, year:
		else if ((events[i][2] == day) && (events[i][1] == month) && (events[i][3] == year)) {
			theevent += "Data dell'evento: \n" + day +'/'+ month +'/'+ year + '\n';
			theevent += events[i][6] + '\n';
				if (events[i][4] !="") theevent += 'Inizio: ' + events[i][4] + '\n';
				if (events[i][5] !="") theevent += 'Fine: ' + events[i][5] + '\n';
				if (events[i][7] !="") theevent += 'Descrizione: ' + events[i][7] + '\n';
			theevent += '\n -------------- \n\n';
//			alert(theevent);
			document.forms.eventform.eventlist.value = theevent;
		}
	}
	if (theevent == "") document.forms.eventform.eventlist.value = noMessage;
}

function floatingholiday(targetyr,targetmo,cardinaloccurrence,targetday) {
var firstdate = new Date(String(targetmo)+"/1/"+String(targetyr));	// Object Storing the first day of the current month.
var firstday = firstdate.getUTCDay();	// The first day (0-6) of the target month.
var dayofmonth = 0;	// zero out our calendar day variable.

	targetday = targetday - 1;

	if (targetday >= firstday) {
		cardinaloccurrence--;	// Subtract 1 from cardinal day.
		dayofmonth = (cardinaloccurrence * 7) + ((targetday - firstday)+1);
	} else {
		dayofmonth = (cardinaloccurrence * 7) + ((targetday - firstday)+1);
	}
return dayofmonth;
}
