function julianDay( Y, M, D ){
	
	var y,m,d;
	y=parseInt(Y);
	m=parseInt(M);
	d=parseInt(D);
	var jy,ja,jm;
	
	if( y==0 ){
		alert("There was no year zero in the Julian calendar.");
		return "invalid";
	}
	
	// Don't permit the missing 10 days in October of 1582:
	if( y==1582 && m==10 && d>4 && d<15 ){
		alert("October 5th to 14th were skipped in October of 1582\nwhen Pope Gregory XIII implemented the calendar reforms\nof the commission headed by the Jesuit mathematician and astronomer\nChristoph Clavius.");
		return "invalid";
	}
	
	if(y<0) y++;

	if(m>2){
		jy=y;
		jm=m+1;
	}else{
		jy=y-1;
		jm=m+13;
	}
	
	var julian = Math.floor( Math.floor(365.25*jy) + Math.floor(30.6001*jm) + d + 1720995 );
	
	// Check for the switch to the Gregorian calendar:
	var gregorianStart = 15 + 31*( 10 + 12*1582 );
	
	if( d + 31*(m + 12*y) >= gregorianStart ){
		ja = Math.floor(0.01*jy);
		julian += 2 - ja + Math.floor(0.25*ja);
	}
	
	// return the Julian day number:
	return julian;
	
}

function julianGregorianDate( julian ){
	
	var j1, j2, j3, j4, j5;
	
	// This is of course the Julian day number
	// for October 15, 1582:
	var gregorianStart  = 2299161;
	if( julian >= gregorianStart ){
		var tmp = Math.floor( ( (julian - 1867216) - 0.25 ) / 36524.25 );
		j1 = julian + 1 + tmp - Math.floor(0.25*tmp);
	}else{
		j1 = julian;
	}
	
	j2 = j1 + 1524;
	j3 = Math.floor( 6680.0 + ( (j2 - 2439870) - 122.1 )/365.25 );
	j4 = Math.floor(j3*365.25);
	j5 = Math.floor( (j2 - j4)/30.6001 );
	
	var d = Math.floor(j2 - j4 - Math.floor(j5*30.6001));
	var m = Math.floor(j5 - 1);
	if( m > 12 ) m -= 12;
	var y = Math.floor(j3 - 4715);
	if( m > 2 ) y--;
	if( y <= 0 ) y--;
	
	return formatISODate(y,m,d);
	
}

function dayOfWeek( julian ){
	
	return (julian+1)%7;
	
}

function padWithZeros(number,length) {
	 var str = "" + number;
	 while( str.length < length ) str = '0' + str;
	 return str;
}

function formatISODate( year, month, day ){
	
	// Date delimiter:
	var delimiter="-";
	if(year<0){
		year= -year; year = "-" + padWithZeros(year,4);
	}else{
		year = padWithZeros(year,4);
	}
	return year + delimiter + padWithZeros(month,2) + delimiter + padWithZeros(day,2);
	
}

function setToday( objectId ){
	var today = new Date();
	document.getElementById( objectId ).value = formatISODate( today.getFullYear(), today.getMonth()+1, today.getDate() );
}

function callCalendar( objectId ){
	
	var dateString=document.getElementById( objectId ).value;
	// Normalize possibly variant delimiters to the ISO preferred delimiter:
	var re = new RegExp( '[/\.\ ]', 'gi' );
	dateString=dateString.replace( re, "-" );
	// Split the date string:
	dateComponents=dateString.split("-");
	var year,month,day;
	year=dateComponents[0];
	month=dateComponents[1];
	day=dateComponents[2];
	generateCalendar( year, month, day, objectId );
	
}

function setDate(day){
	
	// Format the date string:
	year =document.getElementById("currentYear").value;
	month=document.getElementById("currentMonth").value;
	isoDateString=formatISODate(year,month,day);
	// Get the destination object id:
	idString = document.getElementById("destinationId").value;
	// Store the value:
	window.opener.document.getElementById( idString ).value=isoDateString;
	window.close();
	
}

function previousYear(){
	
	year =parseInt(document.getElementById("currentYear").value);
	month=parseInt(document.getElementById("currentMonth").value);
	day  =parseInt(document.getElementById("currentDay").value);
	destination = document.getElementById("destinationId").value;
	year -= 1;
	// Remember that there was no year zero:
	if( year==0 ) year = -1;
	window.opener.generateCalendar(year,month,day,destination);
	
}

function previousMonth(){
	
	year =parseInt(document.getElementById("currentYear").value);
	month=parseInt(document.getElementById("currentMonth").value);
	day  =parseInt(document.getElementById("currentDay").value);
	destination = document.getElementById("destinationId").value;
	month -= 1;
	if(month<1){ 
		month = 12;
		year -= 1;
		if( year==0 ) year = -1;
	}
	window.opener.generateCalendar(year,month,day,destination);
	
}

function nextMonth(){
	
	year =parseInt(document.getElementById("currentYear").value);
	month=parseInt(document.getElementById("currentMonth").value);
	day  =parseInt(document.getElementById("currentDay").value);
	destination = document.getElementById("destinationId").value;
	month += 1;
	if(month>12){
		month = 1;
		year += 1;
		if( year==0 ) year = 1;
	}
	window.opener.generateCalendar(year,month,day,destination);
	
}

function nextYear(){
	
	year =parseInt(document.getElementById("currentYear").value);
	month=parseInt(document.getElementById("currentMonth").value);
	day  =parseInt(document.getElementById("currentDay").value);
	destination = document.getElementById("destinationId").value;
	year += 1;
	// Remember that there was no year zero:
	if( year==0 ) year = 1;
	window.opener.generateCalendar(year,month,day,destination);
	
}

function generateCalendar( Y, M, D, targetId ){
	
	// Names of the Months:
	//var Month = new Array("January","February","March","April","May","June","July","August","September","October","November","December");
	var Month = new Array("janvier","f&eacute;vrier","mars","avril","mai","juin","juillet","ao&ucirc;t","septembre","octobre","novembre","d&eacute;cembre");
	// Days of the Week:
	//var Day = new Array("Sun","Mon","Tue","Wed","Thu","Fri","Sat");
	var Day = new Array("dim.","lun.","mar.","mer.","jeu.","ven.","sam.");
	// Digits (if you want to use something other than Arabic-Indic digits):
	// var Digits = new Array("0","1","2","3","4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19","20","21","22","23","24","25","26","27","28","29","30","31");
	
	var daysInMonth = new Array(31,28,31,30,31,30,31,31,30,31,30,31);
	var daysInAWeek=7;
	var OutputString;
	
	// Guard against arguments that are really passed as strings:
	// Get year:
	var today = new Date();
	if( Y=="" || isNaN(Y) ){
		thisYear=today.getFullYear();
	}else{
		thisYear=parseInt(Y);
	}
	// Get month:
	if( M=="" || isNaN(M) ){
		thisMonth=today.getMonth()+1;
	}else{
		thisMonth=parseInt(M);
		if(thisMonth<1) thisMonth=1;
		if(thisMonth>12) thisMonth=12;
	}
	// Get day:
	if( D=="" || isNaN(D) ){
		thisDay=today.getDate();
	}else{
		thisDay=parseInt(D);
		if(thisDay<0) thisDay=1;
		if(thisDay>31) thisDay=31;
	}
	
	// Calculate the number of days in February:
	if ((thisYear % 4) == 0){
		daysInMonth[ 1 ] = 29;
		if((thisYear % 100) == 0 && (thisYear % 400) != 0){
			daysInMonth[ 1 ] = 28;
		}
	}
	
	// Document header:
	OutputString = "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0//EN\"\n";
	OutputString += "   \"http://www.w3.org/TR/REC-html40/strict.dtd\">\n";
	OutputString += "<html>\n <head>\n";
	OutputString += "  <title>Calendrier Gladiator</title>\n";
	OutputString += "  <meta http-equiv=\"Content-Type\" content=\"text/html; charset=utf-8\">\n";
		OutputString += "  <link rel=\"stylesheet\" title=\"Odebi Style\" href=\"http://www.assosports.com/club/outils/calendar/css/odebi.css\" type=\"text/css\" media=\"screen\">\n";
	OutputString += "  <script type=\"text/javascript\" src=\"http://www.assosports.com/club/outils/calendar/javascript/calendar.js\"></script>\n";
	OutputString += " </head>\n <body id=\"mycal\">\n";
	
	// Start the calendar table with day headings:
	OutputString += "<table border='1'>\n <tr>\n";
	OutputString += " <td class=\"calendarheading\"><div class=\"cssleftstretcharrow\" onclick=\"previousYear()\"><!-- left arrow --></div></td>\n";
	OutputString += " <td class=\"calendarheading\"><div class=\"cssleftarrow\" onclick=\"previousMonth()\"><!-- left arrow --></div></td>\n";
	// Print the month heading:
	OutputString += " <td class=\"calendarheading\" colspan=\"3\">" + Month[ thisMonth-1 ] + "<br>";
	// Print the year heading: If year<0, negate and print "BCE"; if 0<year<1000, print "CE":
	if( thisYear < 0 ) yearString = -thisYear + " BCE";
	else if( thisYear < 1000 ) yearString = thisYear + " CE";
	else yearString = thisYear;
	OutputString += yearString + "</td>\n";
	OutputString += " <td class=\"calendarheading\"><div class=\"cssrightarrow\" onclick=\"nextMonth()\"><!-- right arrow --></div></td>\n";
	OutputString += " <td class=\"calendarheading\"><div class=\"cssrightstretcharrow\" onclick=\"nextYear()\"><!-- right arrow --></div></td>\n";
	OutputString += "</tr>\n <tr>\n";
	for(i=0;i<daysInAWeek;i++){
		OutputString += "  <th>" + Day[i] + "</th>\n";
	}
	OutputString += " </tr>\n <tr>\n";
	
	// Get the day of week of the first of the month:
	var firstDay=dayOfWeek( julianDay( thisYear, thisMonth, 1 ) ); 
	//alert( Day[ firstDay ] );
	
	// First week:
	for(i=0;i<firstDay;i++){
		OutputString += "  <td onclick=\"previousMonth()\">&nbsp;</td>\n";
	}
	for(d=1;i<daysInAWeek;i++,d++){
		// Special handling for October of 1582:
		if( d==5 && thisMonth==10 && thisYear==1582 ) d+=10;
		OutputString += "  <td";
		if(d==thisDay) OutputString += " class='thisday'";
		OutputString += " onclick=\"setDate(" + d + ")\">" + d + "</td>\n";
	}
	
	// Subsequent weeks;
	var lastDayOfMonth=daysInMonth[thisMonth-1];
	for(j=1;j<6 && d<=lastDayOfMonth;j++){
		OutputString += " </tr>\n <!-- Week " + (j+1) + " -->\n<tr>\n";
		// Days in this month:
		for( i=0; i<daysInAWeek && d<=lastDayOfMonth;i++,d++){  
			OutputString += "  <td";
			if(d==thisDay) OutputString += " class='thisday'";
			OutputString += " onclick=\"setDate(" + d + ")\">" + d + "</td>\n";
		}
		// Finish out the row:
		for(;i<daysInAWeek;i++){
			OutputString += "  <td onclick=\"nextMonth()\">&nbsp;</td>\n";      
		}
	}
	// Finish the HTML, with hidden vars:
	OutputString += "  </tr>\n";
	OutputString += " </table>\n";
	OutputString += " <p>\n";
	OutputString += "  <input type=\"hidden\" id=\"currentYear\" value=\"" + thisYear + "\">\n";
	OutputString += "  <input type=\"hidden\" id=\"currentMonth\" value=\"" + thisMonth + "\">\n";
	OutputString += "  <input type=\"hidden\" id=\"currentDay\" value=\"" + thisDay + "\">\n";
	OutputString += "  <input type=\"hidden\" id=\"destinationId\" value=\"" + targetId + "\">\n";   
	OutputString += " </p>\n </body>\n</html>\n";
	
	var calendarWindow;
	if( !calendarWindow || calendarWindow.closed() ){
		calendarWindow = window.open("","Calendar","screenX=50, screenY=50, width=325, height=275,resizable=no");
	}   
	calendarWindow.document.write(OutputString);
	calendarWindow.document.close();
	
}