var xwidth = 220;
var xheight = 180;
var browser = document.layers ? 0 : document.all ? 1 : 2;


// colori
var backtable = '#D5D0BC';
var calendback = '#f9f4de';
var lines = '#404040';
var bright = '#000000';
var festa = '#D5B369';

// ------ Non cambiare ----------
var mesi = new Array('Gennaio', 'Febbraio', 'Marzo', 'Aprile', 'Maggio', 'Giugno',
               'Luglio', 'Agosto', 'Settembre', 'Ottobre', 'Novembre', 'Dicembre');

var days = new Array('Lu', 'Ma', 'Me', 'Gi', 'Ve', 'Sa', 'Do');
var dd = new Array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);

var today = new Date();
var anno = today.getFullYear();
var mese = today.getMonth();
var currday = today.getDate();
var cellwidth = Math.floor(xwidth / 7);
xwidth = cellwidth * 7;
var xmese = 0;
var aboutx = false;
var isOn = false;


function action(g, m , a) {
   function format(x) {
      return x > 9 ? x : "0" + x;
   }
   getId().showIt(false);

   if (tipo == 0) {
      source[0].value = format(g);
      source[1].value = format(m + 1);
      source[2].value = a;
   }
   else
      source.value = format(g) + '/' + format(m + 1) + '/' + a;
}

document.write('<style type="text/css">\n<!--');
document.write('.cal { font-family: Arial, Helvetica, sans-serif; font-size: 10px; font-weight: bold; color: #4B4942}');
document.write('.num { font-family: Arial, Helvetica, sans-serif; font-size: 10px; text-decoration:none;}');
document.write('.mese {  font-family: Arial, Helvetica, sans-serif; font-size: 11px; font-weight: bold; color: #990000}');
document.write('.butto {  font-family: Arial, Helvetica, sans-serif; font-size: 10px; font-weight: bold; color: #000000}');
document.write('a.num u { color: #e00}');
document.write('-->\n</style>');


function comparedate(d1, d2) {
   if (d1.getFullYear() == d2.getFullYear() && d1.getMonth() == d2.getMonth() && d1.getDate() == d2.getDate()) 
      return true;
   return false;
}

function pasqua(aa) {
   var xx = new Array(22, 22, 23, 23, 24, 24);
   var yy = new Array(2, 2, 3, 4, 5, 5);
   var a = aa % 19;
   var b = aa % 4;
   var c = aa % 7;

   var i = Math.floor(aa / 100) - 15;
   var x = xx[i], y = yy[i];
   var d = (19*a + x) % 30;
   var e = (2*b + 4*c + 6 * d + y) % 7;

   var p = 22 + d + e;

   var m = 300;
   if (p > 31) {
      m = 400;
      p = p - 31;
   }
   return m + p;
}


function isfesta(d) {
   var feste = new Array(0, 101, 106, 425, 501, 602, 815, 1101, 1208, 1225, 1226);

   if (d.getDay() == 0)
      return true;

   var pp = pasqua(d.getFullYear()) + 1;     // Pasquetta
      if (pp % 100 > 31)
         pp = 401;

   feste[0] = pp;
   for (var i = 0; i < feste.length; i++)
      if (Math.floor(feste[i] / 100) == d.getMonth() + 1) {
         var gg = feste[i] % 100;
         if (gg == d.getDate())
            return true;
      }

   return false;
}


function calendar(currday, mese, anno) {

   var dx = 2 - (new Date(anno, mese, 1)).getDay();
   if (dx == 2)
      dx = -5;
   var daysInMonth = dd[mese];

   if (mese == 1) {
      if (anno % 4 == 0 && anno % 100 != 0  || anno % 400 == 0)
         daysInMonth++
   }

   var tx = '<div class="mese">&nbsp;&nbsp;' + mesi[mese] + ' ' + anno +'</div>\n';
   tx += '<table width="' + xwidth + '" border="0" cellspacing="1" cellpadding="1">\n';
   tx += '<tr align="right">\n';

   for (var i = 0; i < 7; i++)
      tx += '<td width="' + cellwidth+ '" class="cal">' + days[i] + '&nbsp;</td>\n';

   tx += '</tr>\n';
   for (var j = 0; j < 6; j++) {
      tx += '<tr bgcolor="' + calendback + '" align="right">\n';
      for (var i = 0; i < 7; i++) {
         var bgstring = "";
         var fgcol = lines;
         var fgstring = '&nbsp;';

         if (dx > 0 && dx <= daysInMonth) {
            fgstring = dx;
            var ddx = new Date(anno, mese, dx);
            if (isfesta(ddx)) {
               bgstring = ' bgcolor="' + festa + '"';
            }
            if (comparedate(ddx, today)) {
               fgcol = bright;
               fgstring = '<b><u>' + dx + '</u></b>\n';
            }
            var tempdate = ddx.getDate() + ", " + ddx.getMonth() + ", " + ddx.getFullYear();
            fgstring = '<a href="javascript:action(' + tempdate + ')" class = "num"><font color="' + fgcol + '">' + fgstring + '</font></a>\n';
         }
         tx += '<td width="' + cellwidth + '" class="num"' + bgstring + '>\n';
         tx += fgstring;
         tx += '</td>\n';
         dx++;
      }
      tx += '</tr>\n';
   }
   tx += '</table>\n';

   return tx;
}


function dataframe(x) {
   var s = '<table width="' + xwidth + '" border="1" cellspacing="0" cellpadding="0" bgcolor="' + backtable + '">';
   s += '<tr>\n<td class="mese" valign="middle">';

   s += x; // calendar(currday, mese, anno);  
   s += '</td></tr><tr><td>';
   s += '<form class="butt"><table width="100%" border="0" cellspacing="0" cellpadding="1">';
   s += '<td align="center"><input type="button" name="prev" value="Preced." class="butto" onclick="altro_mese(-1)">';
   s +=' <strong><font color="#990000" size="2" face="Arial, Helvetica, sans-serif">Mese </font></strong>';
   s += '<input type="button" name="next" value="Success." class="butto" onclick="altro_mese(1)">';
   s += '</tr></form></table>';

   s += '</td>\n</tr>\n</table>';
   return s;
}


function altro_mese(x) {
   xmese += x;
   if (x == 9)
      xmese = 0;
   var xday = (xmese == 0)? currday : 99;
   var mm = (mese + xmese) % 12;

   while (mm < 0)
      mm += 12;

   var s = dataframe(calendar(xday, mm, anno + Math.floor((mese + xmese) / 12)));
   writeLayer(s);
   aboutx = false;
}


function getId() {
   switch (browser) {
      case 0:
         return document.layers.calframe;
      case 1:
         return eval('calframe');
      case 2:
         return document.getElementById("calframe");
   }
}


function moveLayer(xPos, yPos) {
   switch (browser) {
   case 0:
      this.left = xPos;
      this.top = yPos;
      break;
   case 1:
      this.style.pixelLeft = xPos;
      this.style.pixelTop = yPos;
     break;
	case 2:
      this.style.left = xPos+'px';
	  this.style.top = yPos+'px';
	  break;
   default:
      this.style.left = xPos;
      this.style.top = yPos;
   }
}


function createlayer() {
   var s;
   if (document.layers)
      s = '<layer id="calframe" visibility="hide" z-index=1>';
   else
      s = '<div id="calframe" style="position:absolute; visibility: hidden">';
   if (document.layers)
      s += '</layer>';
   else
      s += '</div>';

   document.writeln(s);
}


function showIt(on) {
   isOn = on;
   if (browser)
      this.style.visibility = (on) ? "visible" : "hidden";
   else
      this.visibility = (on) ? "show" : "hide"
}


function writeLayer(s) {
   var id = getId();
   if (browser)
      id.innerHTML = s;
   else {
      id.document.open();
      id.document.write(s);
      id.document.close();
   }
}

function init() {
   var id = getId();
   id.moveLayer = moveLayer;
   id.showIt = showIt;
   id.showIt(false);
}


function showCalendar(d, xPos, yPos) {
   if (!isOn) {
           
      if (d) {
            anno = d.getFullYear();
            mese = d.getMonth();
            currday = d.getDate();
         } else {
			
            anno = today.getFullYear();
            mese = today.getMonth();
            currday = today.getDate();
      }
      if (arguments.length > 2) {
         var id = getId();
         id.moveLayer(xPos, yPos);
      }
      else
         getId().moveLayer(100, 100);

      xmese = 0;

      writeLayer(dataframe(calendar(currday, mese, anno)));
      
   }
   getId().showIt(!isOn);
}


//////////////

var source;
var tipo;
var campi = new Array();

function cal(val, e, t) {
	var dt = new Array();
	xPos = (document.layers) ? e.pageX : ((document.all) ? event.x : e.clientX);
	yPos = (document.layers) ? e.pageY : ((document.all) ? event.y : e.clientY);

	tipo = t;
	source = val;
	if (t == 0) {
		dt[0] = val[0].value;
		dt[1] = val[1].value;
		dt[2] = val[2].value;
	}
	else
		dt = val.value.split('/');
	
	var data_i = document.getElementById('data_p').value.split("/");
	if (isNaN(data_i)) var first_date = new Date(data_i[1]+"/"+data_i[0]+"/"+data_i[2]);
	else first_date = new Date();
	showCalendar(first_date, xPos, yPos);
	
	
}

function cal_r(val, e, t) {
	
	var dt = new Array();
	xPos = (document.layers) ? e.pageX : ((document.all) ? event.x : e.clientX);
	yPos = (document.layers) ? e.pageY : ((document.all) ? event.y : e.clientY);
	
	tipo = t;
	source = val;
	if (t == 0) {
		dt[0] = val[0].value;
		dt[1] = val[1].value;
		dt[2] = val[2].value;
	}
	else
		dt = val.value.split('/');
	

	var data_i = document.getElementById('data_p').value.split("/");
	
	if (isNaN(data_i)) var first_date = new Date(data_i[1]+"/"+data_i[0]+"/"+data_i[2]);
	else first_date = new Date();
	
	showCalendar(first_date, xPos, yPos);
}

function check() {	
		
		if (!ck())
		{
			return false;
		}	
		if (!checkDates())
		{
			return false;
		}
		return true;
						
	}
function ck()
{
if((document.form.data.value==null) || (document.form.data.value.length < 10))
 {  
 alert('Occorre specificare una data valida per il ritorno es: (10/06/2004)!\n');
				return false;
		}
			return true;
		}
function checkDates()
{	
			dt1 = document.form.datap.value.split("/");
			d1 = new Date(dt1[1]+"/"+dt1[0]+"/"+dt1[2]);
			dt2 = document.form.data.value.split("/");
			d2 = new Date(dt2[1]+"/"+dt2[0]+"/"+dt2[2]);
			if (d2 < d1) {
				alert('La data di ritorno non puņ essere antecedente a quella di partenza!');
				return false;
		}
			return true;
		}

createlayer(1);
onload = init;