//all modifications to the code of the original script contained herein copyright KulaDesign 2002
var ie=document.all
var ns6=document.getElementById&&!document.all
var n=document.layers


if (ie||ns6)    {fShow="visible";fHide="hidden";}
if (n) {fShow="show"; fHide="hide";}

var MonthNames = new Array("January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December");
var nCurrentYear = 0;
var nCurrentMonth = 0;

var nWidth  = 30;
var nHeight = 20;

var leftX;
var rightX
var topY;
var bottomY;


function Calendar()
{

var HTMLstr = "";

HTMLstr += "<table width='220' cellspacing='0' cellpadding='0' border='1' bgcolor='#f6f0f5'>\n";
HTMLstr += "<tr><td bgcolor='714d71'>\n";

	HTMLstr += "<table border='0' cols='3' width='100%'>\n";
	HTMLstr += "<tr><td width='32px'><b><font size=2 style='font-size:9pt;'><font  face=verdana color='#f6f0f5'>&nbsp;Year:</font></font></b></td>\n";
if (n)
{
	HTMLstr += "<td align='center' width='54px'>\n";
	HTMLstr += "<a href=\"javascript:prevYear();\"><font size=-2 style='font-size:6pt;'><font  face=verdana color='#f6f0f5'>PREV</font></font></a> <a href=\"javascript:nextYear();\"><font size=-2 style='font-size:6pt;'><font  face=verdana color='#f6f0f5'>NEXT</font></font></a>\n";
}
if (ie||ns6)
{
	HTMLstr += "<td align='center' width='54px'>\n";
HTMLstr += "<a href=\"javascript:prevYear();\" style='text-decoration: none;'><font size=-2 style='font-size:6pt;'><font  face=verdana color='#f6f0f5'>PREV</font></font></a>\n";
HTMLstr += "<a href=\"javascript:nextYear();\" style='text-decoration: none;'><font size=-2 style='font-size:6pt;'><font  face=verdana color='#f6f0f5'>NEXT</font></font></a>\n";
}
HTMLstr += "</td>\n";
HTMLstr += "<td align='left'>";

if (n) HTMLstr += "<ilayer id='main'><layer id='idYear' top='0' left='0'>\n";
if (ie||ns6)HTMLstr += "<div id='main' style='position: relative'>\n";
HTMLstr += "<font color='#682759'><b>1999</b></font>\n";
if (n) HTMLstr += "</layer></ilayer>\n";
if (ie||ns6)HTMLstr += "</div>\n";
HTMLstr += "</td></tr>\n";
HTMLstr += "<tr><td><b><font size=2 style='font-size:9pt;'><font  face=verdana color='#f6f0f5'>&nbsp;Month:</font></font></b></td>\n";
HTMLstr += "<td align='center'>\n";
if (n)
{
	HTMLstr += "<a href=\"javascript:prevMonth();\"><font size=-2 style='font-size:6pt;'><font  face=verdana color='#f6f0f5'>PREV</font></font></a> \n";
	HTMLstr += "<a href=\"javascript:nextMonth();\"><font size=-2 style='font-size:6pt;'><font  face=verdana color='#f6f0f5'>NEXT</font></font></a>\n";
}
if (ie||ns6)
{
HTMLstr += "<a href=\"javascript:prevMonth();\" style='text-decoration: none;'><font size=-2 style='font-size:6pt;'><font  face=verdana color='#f6f0f5'>PREV</font></font></a> \n";
	HTMLstr += "<a href=\"javascript:nextMonth();\" style='text-decoration: none;'><font size=-2 style='font-size:6pt;'><font  face=verdana color='#f6f0f5'>NEXT</font></font></a>\n";
}
HTMLstr += "</td>\n";

HTMLstr += "<td align='left' width='140'>\n";
if (ie||ns6)HTMLstr += "<div id='main2' style='position=relative;'>";
if (n) HTMLstr += "<ilayer id='main2'><layer id='idMonth' top='0' left='0'>\n";
HTMLstr += "<font color='#682759'><b>December</b></font>\n";
if (ie||ns6)HTMLstr += "<div>\n";
if (n) HTMLstr += "</layer></ilayer>\n";
HTMLstr += "</td></tr>\n";
	HTMLstr += "</table>\n";


HTMLstr += "\n";
HTMLstr += "</td></tr>\n";
HTMLstr += "\n";
HTMLstr += "<tr><td valign=middle bgcolor='#f6f0f5'>\n";
HTMLstr += "\n";
HTMLstr += "<table border='0' cols=8 width='220px' bgcolor='#f6f0f5'>\n";
HTMLstr += "<tr>\n";
HTMLstr += "<td width='1'><img src='images/cleardot.gif' width=1 height=1 border=0></td>\n";
HTMLstr += "<td width='26'><b><font size=2 style='font-size:12px;'><font  face=verdana>Mon</font></font></b></td>\n";
HTMLstr += "<td width='26'><b><font size=2 style='font-size:12px;'><font  face=verdana>Tue</font></font></b></td>\n";
HTMLstr += "<td width='26'><b><font size=2 style='font-size:12px;'><font  face=verdana>Wed</font></font></b></td>\n";
HTMLstr += "<td width='26'><b><font size=2 style='font-size:12px;'><font  face=verdana>Thur</font></font></b></td>\n";
HTMLstr += "<td width='26'><b><font size=2 style='font-size:12px;'><font  face=verdana>Fri</font></font></b></td>\n";
HTMLstr += "<td width='26'><b><font size=2 style='font-size:12px;'><font  face=verdana>Sat</font></font></b></td>\n";
HTMLstr += "<td width='26'><b><font size=2 style='font-size:12px;'><font  face=verdana>Sun</font></font></b></td>\n";
HTMLstr += "</tr>\n";
HTMLstr += "<tr>\n";
HTMLstr += "<td width='1'><img src='images/cleardot.gif' width=1 height=115 border=0></td>\n";
HTMLstr += "<td colspan=7 bgcolor='#f6f0f5' valign=top>\n";
if (ie||ns6)HTMLstr += "<div style='position: relative;'>";
if (n) HTMLstr += "<ilayer id='idMenuContainer' height='115px' width='220px'>\n";

  for (var date=1; date <= 31; date++)
  {
if (n)
{
	HTMLstr += "  <layer id=\"idDate"+date+"\" val="+date+" visibility=\"hide\">\n";
	HTMLstr += "  <layer><font size=1 face=verdana>"+date+"</font></layer>\n";
	HTMLstr += "  </layer>\n";
}
if (ie||ns6)
{
	HTMLstr += "  <div id=\"idDate"+date+"\" val="+date+" style=\"position: absolute; visibility: hidden\">\n";
	// HTMLstr += "  <font size=1 face=verdana>"+date+"</font>\n";
	HTMLstr += "  <font size=1 face=verdana>"+date+"</font>\n";
	HTMLstr += "  </div>\n";
}
  }

if (ie||ns6)HTMLstr += "</div>";
if (n) HTMLstr += "</ilayer>\n";
HTMLstr += "</td></tr>\n";
HTMLstr += "</table>\n";
HTMLstr += "\n";
HTMLstr += "</td></tr>\n";
HTMLstr += "</table>\n";

document.writeln(HTMLstr);
buildMonthMenu(HTMLstr);
}


function setCurrentMonth()
{
  date = new Date();
  currentyear=date.getYear()
  if (currentyear < 1000)
  currentyear+=1900
  setYearMonth(currentyear, date.getMonth()+1);
}

function setMonth(nMonth)
{
	setYearMonth(nCurrentYear, nMonth);
}

function setYearMonth(nYear, nMonth)
{
  if (ie||ns6)
{
  nCurrentYear = nYear;
  nCurrentMonth = nMonth;
  var cross_obj=ns6? document.getElementById("main"): document.all["main"]
  var cross_obj2=ns6? document.getElementById("main2"): document.all["main2"]
  cross_obj.innerHTML  = "<font size=2 style='font-size:9pt;'><font  face=verdana color='#f6f0f5'><b>"+nCurrentYear+"</b></font></font>";
  cross_obj2.innerHTML = "<a href=\"javascript:showMonthMenu()\" style=\"text-decoration:none\"><font size=2 style='font-size:9pt;'><font  face=verdana color='#f6f0f5'><b>"+MonthNames[nCurrentMonth-1]+"</b></font></font></a>\n";

  var date   = new Date(nCurrentYear, nCurrentMonth-1, 1);
  var nWeek  = 1;
  var nDate;

  while (date.getMonth() == nCurrentMonth-1)
  {
	nDate = date.getDate();
	nLastDate = nDate;

	var posDay = date.getDay()-1;
	if (posDay == -1) posDay=6;
	var posLeft = posDay*(nWidth+3)+3;
	var posTop  = (nWeek-1)*nHeight;
        var cross_obj3=ns6? document.getElementById("idDate"+nDate).style : document.all["idDate"+nDate].style
	cross_obj3.left = posLeft;
	cross_obj3.top  = posTop;
	if (date.getDay() == 0 || date.getDay() == 6)
		cross_obj3.color  = "black";
	else
		cross_obj3.color  = "black";
	cross_obj3.visibility = "visible";
	// original:
	// date = new Date(currentyear, date.getMonth(), date.getDate()+1);
	// johan:
	date = new Date(nCurrentYear, date.getMonth(), date.getDate()+1);
	
	if (posDay == 6) nWeek++;
  }
  for (++nDate; nDate <= 31; nDate++){
        cross_obj3=ns6? document.getElementById("idDate"+nDate).style : document.all["idDate"+nDate].style
	cross_obj3.visibility = "hidden";
      }
}
  if (n)
{
  // Verify parameters
  if (nMonth < 1 || nMonth > 12) {alert("Function: setYearMonth()\nERROR: Incorrect month "+nMomth);}

  nCurrentYear = nYear;
  nCurrentMonth = nMonth;

  document.main.document.idYear.document.open();
  document.main.document.idYear.document.write("<font color=\"#f6f0f5\" face=verdana size=2 style=\"font-size:9pt;\"><b>"+nCurrentYear+"</b></font>");
  document.main.document.idYear.document.close();

  document.main2.document.idMonth.document.open();
  document.main2.document.idMonth.document.write("<a href=\"javascript:showMonthMenu()\" style=\"text-decoration:none\"><font color=\"#f6f0f5\" face=verdana size=2 style=\"font-size:9pt;\"><b>"+MonthNames[nCurrentMonth-1]+"</b></font></a>");
  document.main2.document.idMonth.document.close();

  var date   = new Date(nYear, nMonth-1, 1);
  var nWeek  = 1;
  var nDate;

  while (date.getMonth() == nMonth-1)
  {
	nDate = date.getDate();
	nLastDate = nDate;

	var posDay = date.getDay()-1;
	if (posDay == -1) posDay=6;
	var posLeft = posDay*(nWidth+3)+3;
	var posTop  = (nWeek-1)*nHeight;

	document.layers["idMenuContainer"].document.layers["idDate"+nDate].left = posLeft;
	document.layers["idMenuContainer"].document.layers["idDate"+nDate].top  = posTop;
	if (date.getDay() == 0 || date.getDay() == 6)
		document.layers["idMenuContainer"].document.layers["idDate"+nDate].color  = "black";
	else
		document.layers["idMenuContainer"].document.layers["idDate"+nDate].color  = "black";
	document.layers["idMenuContainer"].document.layers["idDate"+nDate].visibility = "visible";
	date = new Date(nCurrentYear, date.getMonth(), date.getDate()+1);
	if (posDay == 6) nWeek++;
  }
  for (++nDate; nDate <= 31; nDate++)
	document.layers["idMenuContainer"].document.layers["idDate"+nDate].visibility = "hidden";
}
}

function nextMonth()
{
  nCurrentMonth++;
  if (nCurrentMonth > 12)
  {
	nCurrentMonth -= 12;
	nextYear();
  }
  
  setYearMonth(nCurrentYear, nCurrentMonth);
}


function prevMonth()
{
  nCurrentMonth--;
  if (nCurrentMonth < 1)
  {
	nCurrentMonth += 12;
	prevYear();
  }
  setYearMonth(nCurrentYear, nCurrentMonth);

}

function prevYear()
{
  nCurrentYear--;
  setYearMonth(nCurrentYear, nCurrentMonth);
}

function nextYear()
{
  nCurrentYear++;
  setYearMonth(nCurrentYear, nCurrentMonth);
}

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

function updateIt(e)
{
//  var x = e.pageX;
//  var y = e.pageY;

//  if (x > rightX || x < leftX) hideMonthMenu();
//  else if (y > bottomY || y < topY) hideMonthMenu();
}

function hideMonthMenu()
{
  document.layers["idMonthMenu"].visibility="hide";
}

function showMonthMenu()
{
if (!n) return;
  topY    = document.layers["main2"].pageY-50;
  bottomY = document.layers["main2"].pageY + document.layers["idMonthMenu"].clip.height+50;
  leftX   = document.layers["main2"].pageX-32;
  rightX  = document.layers["main2"].pageX + document.layers["idMonthMenu"].clip.width+32;

  document.layers["idMonthMenu"].top = document.layers["main2"].pageY+document.layers["main2"].clip.height;
  document.layers["idMonthMenu"].left = document.layers["main2"].pageX;
  document.layers["idMonthMenu"].visibility="show";
}

function buildMonthMenu()
{
if (!n) return;
  var HTML = "";
  HTML += "<layer id=\"idMonthMenu\" visibility=\"hide\" width=\"140\" bgcolor=\"f6f0f5\">\n";
  HTML += "<table border=\"1\" cellspacing=\"0\" cellpading=\"0\" bgcolor=\"#f6f0f5\">\n";
  for (var month=0; month<12;)
  {
	HTML += "<tr>\n";
	for (var i = 0; i < 3; i++)
	{
		var nMonth = month+1;
		HTML += "<td><a href=\"javascript:hideMonthMenu();setMonth("+nMonth+");\"><font color=\"f6f0f5\" size=-1><b>"+MonthNames[month]+"</b></font></a></td>\n";
		month++;
	}
	HTML += "</tr>\n";
  }
  HTML += "</table>";
  HTML += "</layer>";
  document.writeln(HTML);
}