var SpecialDay=1;
var ColorBackground="ffffcc";
var ColorSpecialDay="red";
var ColorToday="green";
var ColorEvent="blue";
var showAltDate=false;
var showHolidays=false;
var showAltHoly=false;
var showMsgBox=true;
var showMini=true;
var showNav=true;
var showImages=true;
var showLinks=true;
var msgBoxColor="#ffcc99";
var navColor="#ffff99";
var imageAlign="left";
var imageScale=100;
var altAlign=true;
var DefaultFormat="custom";
var ExportPage="";
var PrintPage="";
var DateFontSize=5;
var AltDateFormat="<font color=#999999 size=2>|</font>";
var MonthFormat="<font size="+DateFontSize+"><b>|</b></font>";
var AltMonthFormat="<br><font color=#999999 size="+DateFontSize/2 + ">|</font>";
var HolidayFormat="<font color=#999999 size=2><b><center>|</center></b></font>";
var AltHolyFormat="<font  size=2><b><center>|</center></b></font>";
var DefaultLayerFormat="<font size=2>|</font>";
var defaultMsgBox="Note: The information here may not be current; please confirm dates and times.<p>";
var $a=new Date();
var FirstMonth=GetFullYear($a)*100+1;
var LastMonth=FirstMonth+11;
var $b=new Array;
var $z="|";
var $d=0;
var $e=false;
var $f=new Array;
var $g=new Array;

function Event($h,$i,$j,$k,$l,$m,$n,$o,$p){
this.description=$h;
if($k)this.link=$k;
if($l){this.image=$l;
if($m)this.width=$m;
if($n)this.height=$n;
if($o)this.align=$o;
if($p)this.alt=$p;
}
this.layer=($i?$i:"default");
if($j){if(CheckFormat($j))this.format=$j;
}
}

function DefineEvent(Date,$q,$r,Image,$s,$t){
AddEvent(Date,$q,"","",$r,Image,$s,$t,"","");
}

function AddEvent(Date,$q,Layer,$u,$r,Image,$s,$t,$v,$w){
var i;
if(!$g[Date])$g[Date]=new Array;
i=$g[Date].length;
$g[Date][i]=new Event($q,Layer,$u,$r,Image,$s,$t,$v,$w);
$x=Math.floor(Date/100);
if($x<FirstMonth)FirstMonth=$x;
if($x>LastMonth)LastMonth=$x;
if(Layer&&!$b[Layer])DefineLayer(Layer);
};

function Layer($j,$y){if($j){
if($j.indexOf("|")>0){
	this.format=$j;
	}
	else{
	alert("Invalid Calendar Format String: "+$j);
	}
	}
	else{this.format=DefaultLayerFormat;
	};
this.show=($y=="false"?"false":"true");
};

function DefineLayer($z,$A,$B){
	$b[$z]=new Layer($A,$B);
	$d++;
};

function arr(){
	for(var n=0;n<arr.arguments.length;n++){
		this[n+1]=arr.arguments[n];
	}
};

var $Z=new arr("January","February","March","April","May","June","July","August","September","October","November","December");
var cookieName="layerCalendar";
var $D,$E,$x,$F,$G,$H;

function Calendar(){
var $I,$J,yr,mo,dy,$K,yearmonth,$L,$M,$N;
var $O=new arr("Sun","Mon","Tue","Wed","Thu","Fri","Sat");
var thispage=window.location.pathname;
var $P="Put this FREE calendar script on your own site; see <a href=http://calendar.pikesys.com>calendar.pikesys.com</a>.<p>";
AddMsgBox(0,defaultMsgBox);
AddMsgBox(0,$P);
$I=$a.getDate();
$J=$a.getMonth()+1;
initCal($J);
mo=$F;
yr=$G;
yearmonth=$H;
getLayersVisible();
$L=new Date($Z[mo]+" 1,"+yr);
$K=$L.getDay();
$M=NumDaysIn(mo,yr);
$Q=1+($K+$M-1)%7;
$R=$S="&nbsp;";
if(showNav){
	if(yearmonth>FirstMonth)$R='<a class="navlink" href="'+thispage+'?'+PrevYearMonth(yearmonth)+'">&lt;-- View '+$Z[PrevMonth(mo)]+'</a>';
	if(yearmonth<LastMonth)$S+='<a class="navlink" href="'+thispage+'?'+NextYearMonth(yearmonth)+'">View '+$Z[NextMonth(mo)]+' --&gt;</a>';
};
parseFormat(MonthFormat);
$x="<TABLE BORDER=2 BGCOLOR="+ColorBackground+"><TR BORDER=0 BGCOLOR="+navColor+">";
$x+="<TD ALIGN=CENTER BGCOLOR="+navColor+">"+$R+"</TD>";
$x+="<TD ALIGN=CENTER COLSPAN=5>"+$D+$Z[mo]+" "+yr+$E;
if(showAltDate){parseFormat(AltMonthFormat);
$T=getAltMonth(1,mo,yr,$M);$x+=$D+($T?$T:"")+$E;
};

$x+="</TD><TD ALIGN=CENTER BGCOLOR="+navColor+">"+$S+"</TD></TR>";
document.write($x);
document.write("<TR BGCOLOR="+navColor+">");
for(var i=1;i<=7;i++){
	document.write("<TD ALIGN=CENTER WIDTH=14%><FONT SIZE=2>"+$O[i]+"</FONT></TD>");
};
dy=1;
document.write("</TR><TR>");
while(dy<=$M){
	for(var i=1;i<=7;i++){
		if(dy==1&&i<=$K){
			if(i==1){
				if(showMini){
					document.write("<TD BGCOLOR="+ColorBackground+">");
					MiniMonth(PrevYearMonth(yearmonth));
				}else{
					document.write("<TD>&nbsp;");
				}
			}else if(showMsgBox&&i==2){
				$U=$K-1;document.write("<TD BGCOLOR="+navColor+" COLSPAN="+$U+">&nbsp;");
				DoMsgBox(yearmonth,$U);
			}else if(!showMsgBox){
				document.write("<TD>&nbsp;");
			};
		document.write("</TD>");
		}else if(dy>$M){
			if(i==7){
				if(showMini){
					document.write("<TD BGCOLOR="+ColorBackground+">");
					MiniMonth(NextYearMonth(yearmonth));
				}else{
					document.write("<TD>&nbsp;");
				}
			}else if(showMsgBox&&i==($Q+1)){
				$U=6-$Q;
				document.write("<TD BGCOLOR="+navColor+" COLSPAN="+$U+">&nbsp;");
				DoMsgBox(yearmonth,$U);
				}else if(!showMsgBox){
					document.write("<TD>&nbsp;");
				};
			document.write("</TD>");
		}else{
			document.write("<TD VALIGN=TOP>");
			ShowDate(yr,mo,dy,i,$J,$I);
			document.write("</TD>");
			dy++;
		}
	};
	document.write("</TR>");
};
if(showNav){
	$R=$S="&nbsp;";
	if(yearmonth>FirstMonth)$R='<a class="navlink" href="'+thispage+'?'+PrevYearMonth(yearmonth)+'">&lt;-- View '+$Z[PrevMonth(mo)]+'</a>';
	if(yearmonth<LastMonth)$S+='<a class="navlink" href="'+thispage+'?'+NextYearMonth(yearmonth)+'">View '+$Z[NextMonth(mo)]+' --&gt;</a>';
		$x="<TR BGCOLOR="+navColor+"><TD ALIGN=CENTER BGCOLOR="+navColor+">"+$R+"</TD>";$x+="<TD colspan=5 align=center valign=middle><FORM>";
		if(ExportPage)$x+='<a class="navlink" href="'+ExportPage+'?'+yearmonth+'">Export Events Displayed</a>&nbsp;&nbsp;|&nbsp;&nbsp;';
			$x+='Jump to month:&nbsp;&nbsp;';document.write($x);
			BuildSelectionList(yearmonth,thispage);
			if(PrintPage)document.write('&nbsp;&nbsp;|&nbsp;&nbsp;<a class="navlink" href="'+PrintPage+'?'+yearmonth+'">Print-friendly</a>');
				$x="</FORM></TD><TD ALIGN=CENTER BGCOLOR="+navColor+">"+$S+"</TD>";
				document.write($x+"</TR>");
				if($d>1){
					document.write("<TR BGCOLOR="+navColor+"><TD colspan=7 align=center>");
					ChooseLayers(yearmonth,thispage);
					document.write("</TD></TR>");
				}
			};
			document.write("</TABLE>");
		};


function ShowDate(yr,mo,dy,$V,$W,$X){
var $Y,$Z,$x,$t,event;
$x="<TABLE><TR VALIGN=TOP><TD ALIGN=LEFT WIDTH=10%>";
$x+="<FONT SIZE="+DateFontSize;
$Z=false;
if((mo==$W)&&(dy==$X)){
	$x+=" COLOR="+ColorToday;
	$t=ColorToday;
	$Z=true;
}else if($V==SpecialDay){
$x+=" COLOR="+ColorSpecialDay;
$t=ColorSpecialDay;
$Z=true;
};
$Y=(((yr*100)+mo)*100)+dy;
if($g[$Y]){
	if(!$Z)$x+=" COLOR="+ColorEvent;
  	$t=ColorEvent;
};
$x+="><B><a href='test.php?day="+dy+"&month="+mo+"&year="+yr+"' STYLE='text-decoration: none; color: "+$t+";'>"+dy+(dy<10?"&nbsp;":"")+"&nbsp;</a></B></FONT></TD>";
document.write($x);
if(showAltDate){
	$00=getAltDate(dy,mo,yr);
	parseFormat(AltDateFormat);
	document.write("<TD ALIGN=RIGHT>"+$D+$00+$E+"</TD>");
};
document.write("</TR></TABLE>");
if(showAltHoly){
	$x=getAltHoly(dy,mo,yr);
	if($x){
		parseFormat(AltHolyFormat);
		document.write($D+$x+$E+"<BR>");
	}
};

if(showHolidays){
	$x=holidays(dy,mo,yr);
	if($x){
		parseFormat(HolidayFormat);
		document.write($D+$x+$E+"<BR>");
	}
};
$01=0;
for(j in $g[$Y]){
	ev=$g[$Y][j];
	$x="";
	if($b[ev.layer].show=="true"){
		$x+=(j>0?"<br>":"");
		if(ev.image&&showImages){
			if(ev.align){
				$o=ev.align;
			}else if(altAlign&&$01>0){
				$o=($02=="left"?"right":"left");
			}else{
				$o=imageAlign;
			};
		$x+='<img src="'+ev.image+(ev.width?'"  width="'+ev.width*imageScale/100:'')+(ev.height?'" height="'+ev.height*imageScale/100:'')+(ev.alt?'" alt="'+ev.alt:'')+'" align="'+$o+'" valign="top">';
		$02=$o;$01++;
	};
	$j="";if(ev.format=="layer"){$j=$b[ev.layer].format;}else if(ev.format=="custom"){$j="";}else if(ev.format){if(CheckFormat(ev.format))$j=ev.format;}else if(DefaultFormat=="layer"){$j=$b[ev.layer].format;};parseFormat($j);$x+=$D+(ev.link&&showLinks?"<a class=\"eventlink\" href="+ev.link+">"+ev.description+"</a>":ev.description)+$E+"<br>";}else{};document.write("<FONT SIZE=1>"+$x+"</FONT>");}};function exportCal(){var $I,$J,yr,mo,dy,$K,yearmonth,$M;$I=$a.getDate();$J=$a.getMonth()+1;initCal($J);mo=$F;yr=$G;yearmonth=$H;getLayersVisible();$M=NumDaysIn(mo,yr);$x="<textarea NAME=\"txt\"  ROWS=20 COLS=75 WRAP=VIRTUAL>";$x+='"Subject","Start Date","Start Time","End Date","End Time","All day event","Description","Show time as","Location"\n';document.write($x);for(dy=1;dy<=$M;dy++){$Y=(((yr*100)+mo)*100)+dy;$03=mo+"/"+dy+"/"+yr;for(j in $g[$Y]){ev=$g[$Y][j];if($b[ev.layer].show=="true"){$x=qw(ev.description)+","+qw($03)+",,,,"+qw("true")+",,"+qw("3")+","+qw("CalendarScript");if(ev.description)document.write($x+"\n");}else{}}};document.write("</textarea>");};function getLayersVisible(){$04=cookieName+"|";$05=unescape(document.cookie);$06=$05.indexOf($04);if($06>=0){$06+=$04.length;$07=$05.indexOf(";");if($07==-1)$07=$05.length;var $08=$05.substring($06,$07).split("|");for(i=0;i<$08.length;i++){$07=$08[i].indexOf("=");name=$08[i].substring(0,$07);$09=$08[i].substring($07+1,$08[i].length);if($b[name])$b[name].show=$09;}}};function initCal($J){if(!$b["default"])DefineLayer("default",DefaultLayerFormat);mo=$J;yr=GetFullYear($a);yearmonth=(yr*100)+mo;if(location.search.length>1){yearmonth=parseInt(location.search.substring(1,location.search.length));if((""+yearmonth).length==6){mo=yearmonth%100;yr=(yearmonth-mo)/100;}}if(yearmonth<FirstMonth){mo=FirstMonth%100;yr=(FirstMonth-mo)/100;yearmonth=FirstMonth;};if(yearmonth>LastMonth){mo=LastMonth%100;yr=(LastMonth-mo)/100;yearmonth=LastMonth;}$F=mo;$G=yr;$H=yearmonth;}function qw($0a){return "&quot;"+$0a+"&quot;";}function MiniMonth(yearmonth){var $L,$K,$M,$0b;var $0z=new arr("S","M","T","W","T","F","S");mo=yearmonth%100;yr=(yearmonth-mo)/100;$L=new Date($Z[mo]+" 1,"+yr);$K=$L.getDay();$M=NumDaysIn(mo,yr);document.write("<b><tt><Font Size=2><div align=center>&nbsp;"+$Z[mo]+"</div></font>");$0b="<font size=1>&nbsp;<u>";for(d in $0z){$0b+="&nbsp;"+$0z[d]+"&nbsp;";};document.write($0b,"</u>");dy=1;while(dy<=$M){$0b="<br>";for(var i=1;i<=7;i++){if(dy==1&&i<=$K){$0b+="&nbsp;&nbsp;&nbsp;";}else if(dy>$M){break;}else{$0b+="&nbsp;"+(dy<10?"&nbsp;":"")+dy;dy++;}};document.write($0b);};document.write("</font></tt></b>");};function NumDaysIn(mo,yr){if(mo==4||mo==6||mo==9||mo==11)return 30;else if((mo==2)&&LeapYear(yr))return 29;else if(mo==2)return 28;else return 31;};function LeapYear(yr){return((yr%4==0&&yr%100!=0)||yr%400==0?true:false);};function GetFullYear(d){var yr=d.getYear();return(yr<1000?yr+1900:yr);};function PrevMonth($0d){return($0d==1?12:$0d-1);};function NextMonth($0d){return($0d==12?1:$0d+1);};function PrevYearMonth($0e){return($0e%100==1?$0e-100+11:$0e-1);};function NextYearMonth($0e){return($0e%100==12?$0e-11+100:$0e+1);};function JumpTo($0f,thispage){var $0g,$0h;$0g=$0f.selectedIndex;$0h=$0f.form.jumpmonth[$0g].value;document.location=thispage+"?"+$0h;};function BuildSelectionList($0i,thispage){var mo,yr,yearmonth;yearmonth=FirstMonth;$x="<select name=\"jumpmonth\" size=1 onchange=\"JumpTo(this,'" + thispage + "')\">";while(yearmonth<=LastMonth){mo=yearmonth%100;yr=(yearmonth-mo)/100;$0j=(yearmonth==$0i?" selected":"");$x+="<option value="+yearmonth+$0j+">"+$Z[mo]+" "+yr;yearmonth=NextYearMonth(yearmonth);}document.write($x+"</select>");}function DoMsgBox(yearmonth,$U){if($f[yearmonth]){for(j in $f[yearmonth]){$0k=$f[yearmonth][j];if(!$0k.shown){if(!$0k.minspan||$0k.minspan<=$U){$x="<table border=2 bgcolor="+msgBoxColor+" align=center>";$x+="<TR><TD>"+$0k.message+"</TD></TR></table>";document.write($x);$0k.shown=true;return;}}}}if($f[0]){for(j in $f[0]){$0k=$f[0][j];if(!$0k.shown){if(!$0k.minspan||$0k.minspan<=$U){$x="<table border=2 bgcolor="+msgBoxColor+" align=center>";$x+="<TR><TD>"+$0k.message+"</TD></TR></table>";document.write($x);$0k.shown=true;return;}}}}}function escramVal(j,k){var a,b,c,d,e;a='<a href=\"mai';c='\">';a+='lto:';b=j+'@';e='</a>';b+=k;d=b;return(a+b+c+d+e);}function parseFormat($j){$D=$E="";if($j){var $07=$j.indexOf("|");if($07>0){$D=$j.substring(0,$07);$E=$j.substring(1+$07,$j.length);}}}function CheckFormat(String){var $0l;$0l=(String=="layer"||String=="custom"||String.indexOf("|")>0);if(!$0l)alert("Invalid Calendar Format String: "+String);return $0l;}function MsgBox($0m,$0n,$0o){this.message=$0m;this.minspan=($0n?$0n:1);if($0o)this.maxspan=$0o;}function AddMsgBox(yearmonth,$0m,$0n,$0o){var i;if(!$f[yearmonth])$f[yearmonth]=new Array;i=$f[yearmonth].length;$f[yearmonth][i]=new MsgBox($0m,$0n,$0o);}function ChooseLayers(yearmonth,thispage){var i,$0p;$x='<form name="layerform"><b>Filter Events:</b>&nbsp;';for(i in $b){if(i!="default"){$0p=($b[i].show=="true"?" checked":"");parseFormat($b[i].format);$x+=$D+'<input type="checkbox" name="'+i+'" value="'+i+'"'+$0p+' onClick="ChangeLayer(\''+i+'\')">'+i+"&nbsp;"+$E;}}$x+='&nbsp;<input type="button" name="ApplyChanges" value="Apply Changes"'+'onClick="ApplyLayerChange(\'' + thispage + '\',\'' + yearmonth + '\')">';document.write($x+"</form>");}function ChangeLayer($i){$e=true;$b[$i].show=document.layerform[$i].checked;}function ApplyLayerChange(thispage,yearmonth){$e=false;$05=cookieName;for($i in $b){if($i!="default"){$05+="|"+$i+"="+$b[$i].show;}}document.cookie=escape($05);document.location=thispage+(yearmonth?"?"+yearmonth:"");}