var ns6=document.getElementById&&!document.all
var ie4=document.all

var Current_Date = new Date();
var Current_Month = Current_Date.getMonth();

var Days_in_Month = new Array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
var Month_Label = new Array('January', 'February', 'March', 'April', 'May', 'June', 'July', 'August', 'September', 'October', 'November', 'December');

var Current_Year = Current_Date.getYear();
if (Current_Year < 1000)
Current_Year+=1900


var Today = Current_Date.getDate();

function Header(Year, Month) {

   if (Month == 1) {
   Days_in_Month[1] = ((Year % 400 == 0) || ((Year % 4 == 0) && (Year % 100 !=0))) ? 29 : 28;
   }
   var Header_String = Month_Label[Month] + ' ' + Year;
   return Header_String;
}



function Make_Calendar(Year, Month) {
   document.when.month.selectedIndex = Month;
   document.when.year.value = Year;
   Selected_Month = Month;
   Selected_Year = Year;
   var First_Date = new Date(Year, Month, 1);
   var Heading = Header(Year, Month);
   var First_Day = First_Date.getDay() + 1;
   if (((Days_in_Month[Month] == 31) && (First_Day >= 6)) ||
	   ((Days_in_Month[Month] == 30) && (First_Day == 7))) {
	  var Rows = 6;
   }
   else if ((Days_in_Month[Month] == 28) && (First_Day == 1)) {
	  var Rows = 4;
   }
   else {
	  var Rows = 5;
   }

	var HTML_String = '<center><table BORDER=0 CELLSPACING=1 cellpadding=2 FRAME="box" BGCOLOR="C0C0C0" BORDERCOLORLIGHT="808080">'; 
	HTML_String += ''+ '\n' + '	<tr>'+ '\n' + '		<td bordercolor="000000" align="center" bgcolor="#ffffff">S</td>'+ '\n' + '		<td bordercolor="000000" align="center" bgcolor="#ffffff">M</td>'+ '\n' + '			<td bordercolor="000000" align="center" bgcolor="#ffffff">T</td>'+ '\n' + '			<td bordercolor="000000" align="center" bgcolor="#ffffff">W</td>';
	HTML_String += ''+ '\n' + '			<td bordercolor="000000" align="center" bgcolor="#ffffff">T</td>'+ '\n' + '			<td bordercolor="000000" align="center" bgcolor="#ffffff">F</td>'+ '\n' + '			<td bordercolor="000000" align="center" bgcolor="#ffffff">S</td>'+ '\n' + '		</tr>';
   var Day_Counter = 1;
   var Loop_Counter = 1;
   for (var j = 1; j <= Rows; j++) {
   	  HTML_String += '		<tr>';
	  for (var i = 1; i < 8; i++) {
	  	TMonth = Month+1;
	  	if(TMonth < 10){
	  		TMonth = '0'+TMonth;
	  	}
		 if ((Loop_Counter >= First_Day) && (Day_Counter <= Days_in_Month[Month])) {
			if ((Day_Counter == Today) && (Year == Current_Year) && (Month == Current_Month)) {
			   HTML_String += ''+ '\n' + '			<td BGCOLOR="FFFFFF" BORDERCOLOR="000000">'+ '\n' + '				<strong>'+ '\n' + '						<font color="red" style="font-family:Arial; font-size:10px;">'+ '\n' + '						<a href="http://www.dublinks.com/index.cfm?'+Year+TMonth+'&loc=1&pt=22&evdt='+Year+'-'+TMonth+'-'+Day_Counter+'">' + Day_Counter + '</a>'+ '\n' + '					</font>'+ '\n' + '				</strong>'+ '\n' + '			</td>';
			}
			else {
			   HTML_String += ''+ '\n' + '			<td BGCOLOR="FFFFFF" BORDERCOLOR="000000">'+ '\n' + '				<font style="font-family:Arial; font-size:10px;">'+ '\n' + '					<a href="http://www.dublinks.com/index.cfm?'+Year+TMonth+'&loc=1&pt=22&evdt='+Year+'-'+TMonth+'-'+Day_Counter+'">' + Day_Counter + '</a>'+ '\n' + '				</font>'+ '\n' + '			</td>';
			}
			
			Day_Counter++;    
		 }
		 else {
			HTML_String += ''+ '\n' + '			<td BORDERCOLOR="C0C0C0"></td>';
		 }
		 Loop_Counter++;
	  }
	  HTML_String += ''+ '\n' + '		</tr>';
   }
   HTML_String += ''+ '\n' + '							</table></center>';
   cross_el=ns6? document.getElementById("Calendar") : document.all.Calendar
   cross_el.innerHTML = HTML_String;
}


function Check_Nums() {
   if ((event.keyCode < 48) || (event.keyCode > 57)) {
	  return false;
   }
}



function On_Year() {
   var Year = document.when.year.value;
   if (Year.length == 4) {
	  Selected_Month = document.when.month.selectedIndex;
	  Selected_Year = Year;
	  Make_Calendar(Selected_Year, Selected_Month);
   }
}

function On_Month() {
   var Year = document.when.year.value;
   if (Year.length == 4) {
	  Selected_Month = document.when.month.selectedIndex;
	  Selected_Year = Year;
   }
   else {
	  Selected_Year = Current_Date.getYear();
   }
   Make_Calendar(Selected_Year, Selected_Month);
   document.when.month.selectedIndex = Selected_Month;
   document.when.year.value = Selected_Year;
}


function Defaults() {
   var Mid_Screen = Math.round(document.body.clientWidth / 2);
   document.when.month.selectedIndex = Current_Month;
   document.when.year.value = Current_Year;
   Selected_Month = Current_Month;
   Selected_Year = Current_Year;
   Make_Calendar(Current_Year, Current_Month);
}


function Skip(Direction) {
   if (Direction == '+') {
	  if (Selected_Month == 11) {
		 Selected_Month = 0;
		 Selected_Year++;
	  }
	  else {
		 Selected_Month++;
	  }
   }
   else {
	  if (Selected_Month == 0) {
		 Selected_Month = 11;
		 Selected_Year--;
	  }
	  else {
		 Selected_Month--;
	  }
   }
   Make_Calendar(Selected_Year, Selected_Month);
   document.when.month.selectedIndex = Selected_Month;
   document.when.year.value = Selected_Year;
}