// ===================================================================================================================
var egomooner = new mooner();
// -------------------------------------------------------------------------------------------------------------------
function mooner() {
	var c = new moonBox();
	c.offsetX = 60;
	c.offsetY = 0;
	c.autoHide();
	c.monthNames = new Array("Gennaio","Febbraio","Marzo","Aprile","Maggio","Giugno","Luglio","Agosto","Settembre","Ottobre","Novembre","Dicembre");
	c.dayHeaders = new Array("D","L","M","M","G","V","S");
	c.returnFunction = "moonInputFunction";
	c.weekStartDay = 1;
	c.currentDate = null;
	window.CalendarObject = null;
	window.TargetInput = null;
	c.showCalendar = moonShowCalendar;
	c.hideCalendar = moonHideCalendar;
	c.refreshCalendar = moonRefreshCalendar;
	c.getCalendar = moonGetCalendar;
	c.variable = moonSelect;
	return c;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonBox() {
	if (!window.moonBoxIdx) { window.moonBoxIdx = 0; }
	if (!window.moonBoxObj) { window.moonBoxObj = new Array(); }
	moonBoxEar();
	this.index = moonBoxIdx++;
	moonBoxObj[this.index] = this;
	this.boxName = "egolunario";
	this.boxPopulated = false;
	this.boxAutoHideEnabled = false;
	this.contents = "";
	this.boxPosition = moonBoxPosition;
	this.boxPopulate = moonBoxPopulate;
	this.refresh = moonBoxRefresh;
	this.boxShow = moonBoxShow;
	this.boxHidden = moonBoxHidden;
	this.boxClicked = moonBoxClicked;
	this.autoHide = moonBoxAutoHide;
	this.boxHideUnclick = moonBoxHideUnclick;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonBoxEar() {
	window.moonBoxOld = document.onmouseup;
	if (window.moonBoxOld != null) {
		document.onmouseup = new Function("window.moonBoxOld(); moonBoxHide();");
		}
	else {
		document.onmouseup = moonBoxHide;
		}
	}
// -------------------------------------------------------------------------------------------------------------------
function moonBoxHide(e) {
	for (var i=0; i<moonBoxObj.length; i++) {
		if (moonBoxObj[i] != null) {
			var p = moonBoxObj[i];
			p.boxHideUnclick(e);
			}
		}
	}
// -------------------------------------------------------------------------------------------------------------------
function moonBoxPosition(hrefName) {
	var coordinates;
	coordinates = moonHrefPosition(hrefName);
	this.x = coordinates.x;
	this.y = coordinates.y;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonHrefPosition(hrefName) {
	var coordinates = new Object();
	var x=0,y=0;
	var o=document.getElementById(hrefName);
	x=moonHrefPositionLeft(o);
	y=moonHrefPositionTop(o);
	coordinates.x=x;
	coordinates.y=y;
	return coordinates;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonHrefPositionLeft(el) {
	var ol=el.offsetLeft;
	while ((el=el.offsetParent) != null) { ol += el.offsetLeft; }
	return ol;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonHrefPositionTop(el) {
	var ot=el.offsetTop;
	while ((el=el.offsetParent) != null) { ot += el.offsetTop; }
	return ot;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonBoxPopulate(contents) {
	this.contents = contents;
	this.boxPopulated = false;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonBoxRefresh() {
	document.getElementById(this.boxName).innerHTML = this.contents;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonBoxShow(hrefName) {
	this.boxPosition(hrefName);
	this.x += this.offsetX;
	this.y += this.offsetY;
	if (!this.boxPopulated && (this.contents != "")) {
		this.boxPopulated = true;
		this.refresh();
		}
	document.getElementById(this.boxName).style.left = this.x + "px";
	document.getElementById(this.boxName).style.top = this.y + "px";
	document.getElementById(this.boxName).style.visibility = "visible";
	}
// -------------------------------------------------------------------------------------------------------------------
function moonBoxHidden() {
	document.getElementById(this.boxName).style.visibility = "hidden";
	}
// -------------------------------------------------------------------------------------------------------------------
function moonBoxClicked(e) {
	if (document.all) {
		var t = window.event.srcElement;
		while (t.parentElement != null) {
			if (t.id==this.boxName) {
				return true;
				}
			t = t.parentElement;
			}
		return false;
		}
	else if (e) {
		var t = e.originalTarget;
		while (t.parentNode != null) {
			if (t.id==this.boxName) {
				return true;
				}
			t = t.parentNode;
			}
		return false;
		}
	return false;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonBoxAutoHide() {
	this.boxAutoHideEnabled = true;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonBoxHideUnclick(e) {
	if (this.boxAutoHideEnabled && !this.boxClicked(e)) {
		this.boxHidden();
		}
	}
// -------------------------------------------------------------------------------------------------------------------
function moonInputFunction(y,m,d) { 
		var amg = new Date(y,m-1,d);
		window.TargetInput.value = moonEditDate(amg);
	}
// -------------------------------------------------------------------------------------------------------------------
function moonEditDate(amg) {
	var datefield="";
	var y=amg.getYear()+"";
	var m=amg.getMonth()+1;
	var d=amg.getDate();
	if (y.length < 4) {y=""+(y-0+1900);}
	datefield=datefield+moonLeftZero(d)+'/'+moonLeftZero(m)+'/'+y;
	return datefield;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonLeftZero(v) {
	return v>9?v:"0"+v;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonShowCalendar(hrefName) {
	this.boxPopulate(this.getCalendar());
	this.boxShow(hrefName);
	}
// -------------------------------------------------------------------------------------------------------------------
function moonHideCalendar() {
	if (arguments.length > 0) { window.moonBoxObj[arguments[0]].boxHidden(); }
	else { this.boxHidden(); }
	}
// -------------------------------------------------------------------------------------------------------------------
function moonRefreshCalendar(index) {
	var calObject = window.moonBoxObj[index];
	if (arguments.length>1) { 
		calObject.boxPopulate(calObject.getCalendar(arguments[1],arguments[2]));
		}
	else {
		calObject.boxPopulate(calObject.getCalendar());
		}
	calObject.refresh();
	}
// -------------------------------------------------------------------------------------------------------------------
function moonGetCalendar() {
	var moonstyTab1 = "width:auto; border:2px solid #a0a0a0; background-color: #f0f0f0; color:#070707;";
	var moonstyTab2 = "width:auto; border-bottom:1px solid #a0a0a0";
	var moonstyTab3 = "width:100%";
	var moonstyPad1 = "padding:0px 0px 5px 0px";
	var moonstyPad2 = "padding:0px 0px 0px 20px";
	var moonstyChr1 = "background-color: transparent; color:#070707; font-size:14px; font-family:verdana; text-decoration:none";
	var moonstyChr2 = "padding:0px 0px 0px 4px; background-color:#ffffff; color:#070707; font-size:11px; font-family:verdana";
	var moonstyChr3 = "background-color:#ffffff; color:#070707; font-size:11px; font-family:verdana";
	var moonstyChr4 = "background-color: transparent; color:#3c69b2; font-size:13px; font-family:arial";
	var moonstyChr5 = "background-color: transparent; color:#070707; font-size:13px; font-family:arial; text-decoration:none";
	var moonstyChr6 = "background-color: transparent; color:#808080; font-size:13px; font-family:arial; text-decoration:none";
	var moonstyChr7 = "background-color: transparent; color:#ffa0a0; font-size:13px; font-family:arial; text-decoration:none";
	var moonstyChr8 = "background-color: transparent; color:#ff0000; font-size:13px; font-family:arial; text-decoration:none";
	var moonstyChr9 = "background-color: transparent; color:#3c69b2; font-size:12px; font-family:arial; text-decoration:none";
	var moonstyCel1 = "text-align:center; border-bottom:1px solid #a0a0a0; width:14%";
	var moonstyCel2 = "text-align:center; border:2px solid #ff0000";
	var moonstyCel3 = "text-align:center";
	var moonstyCel4 = "text-align:center; border:2px solid #3c69b2";
	var moonstyCel5 = "text-align:center; border-top:1px solid #a0a0a0";
	var now = new Date();
	var windowref = "";
	var result = "";
	if (this.currentDate==null) { this.currentDate = now; }
	if (arguments.length > 0) { var month = arguments[0]; }
	else { var month = this.currentDate.getMonth()+1; }
	if (arguments.length > 1 && arguments[1]>0 && arguments[1]-0==arguments[1]) { var year = arguments[1]; }
	else { var year = this.currentDate.getFullYear(); }
	var daysinmonth= new Array(0,31,28,31,30,31,30,31,31,30,31,30,31);
	if ( ( (year%4 == 0)&&(year%100 != 0) ) || (year%400 == 0) ) {
		daysinmonth[2] = 29;
		}
	var current_month = new Date(year,month-1,1);
	var display_year = year;
	var display_month = month;
	var display_date = 1;
	var weekday= current_month.getDay();
	var offset = 0;
	offset = (weekday >= this.weekStartDay) ? weekday-this.weekStartDay : 7-this.weekStartDay+weekday ;
	if (offset > 0) {
		display_month--;
		if (display_month < 1) { display_month = 12; display_year--; }
		display_date = daysinmonth[display_month]-offset+1;
		}
	var next_month = month+1;
	var next_month_year = year;
	if (next_month > 12) { next_month=1; next_month_year++; }
	var last_month = month-1;
	var last_month_year = year;
	if (last_month < 1) { last_month=12; last_month_year--; }
	var date_class;
	var refresh = windowref+'moonRefreshCalendar';
	var refreshLink = 'javascript:' + refresh;
	result += '<table cellspacing=0 cellpadding=3 style="'+moonstyTab1+'">\n';
	result += '<tr><td style="'+moonstyCel3+'">\n';
	result += '<table cellspacing=0 cellpadding=0 style="'+moonstyTab2+'">\n';
	result += '<tr><td style="'+moonstyPad1+'">\n';
	result += '<a style="'+moonstyChr1+'" href="'+refreshLink+'('+this.index+','+month+','+(year-1)+');">&#171;</a>';
	result += ' <input name="cpYear" style="'+moonstyChr2+'" size="4" maxlength="4" value="'+year+'" onBlur="'+refresh+'('+this.index+','+month+',this.value-0);">';
	result += ' <a style="'+moonstyChr1+'" href="'+refreshLink+'('+this.index+','+month+','+(year+1)+');">&#187;</a>';
	result += '<span style="'+moonstyPad2+'">';
	result += '<select style="'+moonstyChr3+'" name="cpMonth" onmouseup="moonStop(event)" onChange="'+refresh+'('+this.index+',this.options[this.selectedIndex].value-0,'+(year-0)+');">';
	for( var monthCounter=1; monthCounter<=12; monthCounter++ ) {
		var selected = (monthCounter==month) ? 'selected' : '';
		result += '<option value="'+monthCounter+'" '+selected+'>'+this.monthNames[monthCounter-1]+'</option>';
		}
	result += '</select></span>';
	result += '</td></tr></table>\n';
	result += '</td></tr>\n';
	result += '<tr><td>\n';
	result += '<table cellspacing=0 cellpadding=2 style="'+moonstyTab3+'">\n';
	result += '<tr>\n';
	for (var j=0; j<7; j++) {
		result += '<td style="'+moonstyCel1+'"><span style="'+moonstyChr4+'">'+this.dayHeaders[(this.weekStartDay+j)%7]+'</span></td>\n';
		}
	result += '</tr>\n';
	for (var row=1; row<=6; row++) {
		result += '<tr>\n';
		for (var col=1; col<=7; col++) {
			var selected_date = display_date;
			var selected_month = display_month;
			var selected_year = display_year;
			if ((display_month == this.currentDate.getMonth()+1) && (display_date==this.currentDate.getDate()) && (display_year==this.currentDate.getFullYear())) {
				if (col==6  || col==7) {
					result += '<td style="'+moonstyCel4+'"><a href="javascript:'+windowref+this.returnFunction+'('+selected_year+','+selected_month+','+selected_date+');'+windowref+'moonHideCalendar(\''+this.index+'\');" style="'+moonstyChr8+'">'+display_date+'</a></td>\n';
					}
				else {
					result += '<td style="'+moonstyCel2+'"><a href="javascript:'+windowref+this.returnFunction+'('+selected_year+','+selected_month+','+selected_date+');'+windowref+'moonHideCalendar(\''+this.index+'\');" style="'+moonstyChr5+'">'+display_date+'</a></td>\n';
					}
				}
			else if (display_month == month) {
				if (col==6  || col==7) {
					result += '<td style="'+moonstyCel3+'"><a href="javascript:'+windowref+this.returnFunction+'('+selected_year+','+selected_month+','+selected_date+');'+windowref+'moonHideCalendar(\''+this.index+'\');" style="'+moonstyChr8+'">'+display_date+'</a></td>\n';
					}
				else {
					result += '<td style="'+moonstyCel3+'"><a href="javascript:'+windowref+this.returnFunction+'('+selected_year+','+selected_month+','+selected_date+');'+windowref+'moonHideCalendar(\''+this.index+'\');" style="'+moonstyChr5+'">'+display_date+'</a></td>\n';
					}
				}
			else {
				if (col==6  || col==7) {
					result += '<td style="'+moonstyCel3+'"><a href="javascript:'+windowref+this.returnFunction+'('+selected_year+','+selected_month+','+selected_date+');'+windowref+'moonHideCalendar(\''+this.index+'\');" style="'+moonstyChr7+'">'+display_date+'</a></td>\n';
					}
				else {
					result += '<td style="'+moonstyCel3+'"><a href="javascript:'+windowref+this.returnFunction+'('+selected_year+','+selected_month+','+selected_date+');'+windowref+'moonHideCalendar(\''+this.index+'\');" style="'+moonstyChr6+'">'+display_date+'</a></td>\n';
					}
				}
			display_date++;
			if (display_date > daysinmonth[display_month]) {
				display_date=1;
				display_month++;
				}
			if (display_month > 12) {
				display_month=1;
				display_year++;
				}
			}
		result += '</tr>';
		}
	var current_weekday = now.getDay() - this.weekStartDay;
	if (current_weekday < 0) {
		current_weekday += 7;
		}
	result += '<tr>\n';
	result += '<td colspan=7 style="'+moonstyCel5+'">\n';
	result += '<a style="'+moonstyChr9+'" href="javascript:'+windowref+this.returnFunction+'(\''+now.getFullYear()+'\',\''+(now.getMonth()+1)+'\',\''+(now.getDate()-1)+'\');'+windowref+'moonHideCalendar(\''+this.index+'\');">IERI</a>\n';
	result += '<span style="'+moonstyChr6+'"> - </span>\n';
	result += '<a style="'+moonstyChr9+'" href="javascript:'+windowref+this.returnFunction+'(\''+now.getFullYear()+'\',\''+(now.getMonth()+1)+'\',\''+now.getDate()+'\');'+windowref+'moonHideCalendar(\''+this.index+'\');">OGGI</a>\n';
	result += '</td></tr></table></td></tr></table>\n';
	return result;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonSelect(inputobj, linkname) {
	var selectedDate=(arguments.length>2)?arguments[2]:null;
	window.TargetInput = inputobj;
	window.CalendarObject = this;
	this.currentDate=null;
	var time=0;
	if (selectedDate!=null) {
		time = getDateFromFormat(selectedDate)
		}
	else if (inputobj.value!="") {
		time = getDateFromFormat(inputobj.value);
		}
	if (selectedDate!=null || inputobj.value!="") {
		if (time==0) { this.currentDate=null; }
		else { this.currentDate=new Date(time); }
		}
	this.showCalendar(linkname);
	}
// -------------------------------------------------------------------------------------------------------------------
function getDateFromFormat(val) {
	val = val+"";
	format = "dd/MM/yyyy"
	var i_val = 0;
	var i_format = 0;
	var c = "";
	var token = "";
	var token2 = "";
	var x,y;
	var now = new Date();
	var year = now.getYear();
	var month = now.getMonth()+1;
	var date = 1;
	while (i_format < format.length) {
		c=format.charAt(i_format);
		token="";
		while ((format.charAt(i_format)==c) && (i_format < format.length)) {
			token += format.charAt(i_format++);
			}
		if (token=="yyyy" || token=="yy" || token=="y") {
			if (token=="yyyy") { x=4;y=4; }
			if (token=="yy")   { x=2;y=2; }
			if (token=="y")    { x=2;y=4; }
			year=moonGetInt(val,i_val,x,y);
			if (year==null) { return 0; }
			i_val += year.length;
			if (year.length==2) {
				if (year > 70) { year=1900+(year-0); }
				else { year=2000+(year-0); }
				}
			}
		else if (token=="MM"||token=="M") {
			month=moonGetInt(val,i_val,token.length,2);
			if(month==null||(month<1)||(month>12)){return 0;}
			i_val+=month.length;}
		else if (token=="dd"||token=="d") {
			date=moonGetInt(val,i_val,token.length,2);
			if(date==null||(date<1)||(date>31)){return 0;}
			i_val+=date.length;}
		else {
			if (val.substring(i_val,i_val+token.length)!=token) {return 0;}
			else {i_val+=token.length;}
			}
		}
	if (i_val != val.length) { return 0; }
	if (month==2) {
		if ( ( (year%4==0)&&(year%100 != 0) ) || (year%400==0) ) { 
			if (date > 29){ return 0; }
			}
		else { if (date > 28) { return 0; } }
		}
	if ((month==4)||(month==6)||(month==9)||(month==11)) {
		if (date > 30) { return 0; }
		}
	var newdate=new Date(year,month-1,date);
	return newdate.getTime();
	}
// -------------------------------------------------------------------------------------------------------------------
function moonGetInt(str,i,minlength,maxlength) {
	for (var x=maxlength; x>=minlength; x--) {
		var token=str.substring(i,i+x);
		if (token.length < minlength) { return null; }
		if (moonInteger(token)) { return token; }
		}
	return null;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonInteger(val) {
	var digits="1234567890";
	for (var i=0; i < val.length; i++) {
		if (digits.indexOf(val.charAt(i))==-1) { return false; }
		}
	return true;
	}
// -------------------------------------------------------------------------------------------------------------------
function moonStop(e) { if (e && e.stopPropagation) { e.stopPropagation(); } }
// ===================================================================================================================

