var SpecialDay=1;var ColorBackground="FFFFFF";var ColorSpecialDay="000000";var ColorToday="000000";var ColorEvent="000000";var showAltDate=false;var showHolidays=false;var showAltHoly=false;var showMsgBox=false;var showMini=false;var showNav=true;var showImages=true;var showLinks=true;var msgBoxColor="#FFFFFF";var navColor="#2060A7";var $a="#000000";var imageAlign="left";var imageScale=100;var altAlign=true;var DefaultFormat="layer";var ExportPage="";var PrintPage="";var DateFontSize=3;var AltDateFormat="<font color=#999999 size=2>|</font>";var MonthFormat="<font size="+DateFontSize+"><b>|</b></font>";var AltMonthFormat="<br><font color=#999999 size="+DateFontSize+">|</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="";var $b=new Date();var FirstMonth=GetFullYear($b)*100+1;var LastMonth=FirstMonth+11;var $z=new Array;var $d="|";var $e=0;var $f=false;var $g=new Array;var $h=new Array;function Event($i,$j,$k,$l,$m,$n,$o,$p,$q){this.description=$i;if($l)this.link=$l;if($m){this.image=$m;if($n)this.width=$n;if($o)this.height=$o;if($p)this.align=$p;if($q)this.alt=$q;};this.layer=($j?$j:"default");if($k){if(CheckFormat($k))this.format=$k;}};function DefineEvent(Date,$r,$s,Image,$t,$u){AddEvent(Date,$r,"","",$s,Image,$t,$u,"","");};function AddEvent(Date,$r,Layer,$v,$s,Image,$t,$u,$w,$x){var i;if(!$h[Date])$h[Date]=new Array;i=$h[Date].length;$h[Date][i]=new Event($r,Layer,$v,$s,Image,$t,$u,$w,$x);$y=Math.floor(Date/100);if($y<FirstMonth)FirstMonth=$y;if($y>LastMonth)LastMonth=$y;if(Layer&&!$z[Layer])DefineLayer(Layer);}function Layer($k,$z){if($k){if($k.indexOf("|")>0){this.format=$k;}else{alert("Invalid Calendar Format String: "+$k);}}else{this.format=DefaultLayerFormat;}this.show=($z=="false"?"false":"true");}function DefineLayer($A,$B,$Z){$z[$A]=new Layer($B,$Z);$e++;}function arr(){for(var n=0;n<arr.arguments.length;n++){this[n+1]=arr.arguments[n];}}var $D=new arr("January","February","March","April","May","June","July","August","September","October","November","December");var cookieName="layerCalendar";var $E,$F,$y,$G,$H,$I;function Calendar(){var $J,$K,yr,mo,dy,$L,yearmonth,$M,$N,$O;var $P=new arr("Sun","Mon","Tue","Wed","Thu","Fri","Sat");var thispage=window.location.pathname;var $Q="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,$Q);$J=$b.getDate();$K=$b.getMonth()+1;initCal($K);mo=$G;yr=$H;yearmonth=$I;getLayersVisible();$M=new Date($D[mo]+" 1,"+yr);$L=$M.getDay();$N=NumDaysIn(mo,yr);$R=1+($L+$N-1)%7;$S=$T="&nbsp;";if(showNav){if(yearmonth>FirstMonth)$S='<a class="navlink" href="'+thispage+'?'+PrevYearMonth(yearmonth)+'">'+$D[PrevMonth(mo)]+'</a>';if(yearmonth<LastMonth)$T+='<a class="navlink" href="'+thispage+'?'+NextYearMonth(yearmonth)+'">'+$D[NextMonth(mo)]+'</a>';}parseFormat(MonthFormat);$y="<TABLE id=calendar BORDER=1 BGCOLOR="+ColorBackground+"><TR BORDER=0 BGCOLOR="+navColor+">";$y+="<TD ALIGN=CENTER BGCOLOR="+navColor+">"+$S+"</TD>";$y+="<TD ALIGN=CENTER COLSPAN=5><font color="+$a+">"+$E+$D[mo]+" "+yr+$F;if(showAltDate){parseFormat(AltMonthFormat);$U=getAltMonth(1,mo,yr,$N);$y+=$E+($U?$U:"")+$F;}$y+="</FONT></TD><TD ALIGN=CENTER BGCOLOR="+navColor+">"+$T+"</TD></TR>";document.write($y);document.write("<TR BGCOLOR="+navColor+">");for(var i=1;i<=7;i++){document.write("<TD ALIGN=CENTER WIDTH=14%><FONT SIZE=2 color="+$a+">"+$P[i]+"</FONT></TD>");}dy=1;document.write("</TR><TR>");while(dy<=$N){for(var i=1;i<=7;i++){if(dy==1&&i<=$L){if(i==1){if(showMini){document.write("<TD BGCOLOR="+ColorBackground+">");MiniMonth(PrevYearMonth(yearmonth));}else{document.write("<TD>&nbsp;");}}else if(showMsgBox&&i==2){$V=$L-1;document.write("<TD BGCOLOR="+navColor+" COLSPAN="+$V+">&nbsp;");DoMsgBox(yearmonth,$V);}else if(!showMsgBox){document.write("<TD>&nbsp;");}document.write("</TD>");}else if(dy>$N){if(i==7){if(showMini){document.write("<TD BGCOLOR="+ColorBackground+">");MiniMonth(NextYearMonth(yearmonth));}else{document.write("<TD>&nbsp;");}}else if(showMsgBox&&i==($R+1)){$V=6-$R;document.write("<TD BGCOLOR="+navColor+" COLSPAN="+$V+">&nbsp;");DoMsgBox(yearmonth,$V);}else if(!showMsgBox){document.write("<TD>&nbsp;");}document.write("</TD>");}else{document.write("<TD VALIGN=TOP>");ShowDate(yr,mo,dy,i,$K,$J);document.write("</TD>");dy++;}}document.write("</TR>");}if(showNav){$S=$T="&nbsp;";if(yearmonth>FirstMonth)$S='<a class="navlink" href="'+thispage+'?'+PrevYearMonth(yearmonth)+'">'+$D[PrevMonth(mo)]+'</a>';if(yearmonth<LastMonth)$T+='<a class="navlink" href="'+thispage+'?'+NextYearMonth(yearmonth)+'">'+$D[NextMonth(mo)]+'</a>';$y="<TR BGCOLOR="+navColor+"><TD ALIGN=CENTER BGCOLOR="+navColor+"></TD>";$y+="<TD colspan=5 align=center valign=middle><FORM>";if(ExportPage)$y+='<a class="navlink" href="'+ExportPage+'?'+yearmonth+'">Export Events Displayed</a>&nbsp;&nbsp;|&nbsp;&nbsp;';document.write($y);BuildSelectionList(yearmonth,thispage);if(PrintPage)document.write('&nbsp;&nbsp;|&nbsp;&nbsp;<a class="navlink" href="'+PrintPage+'?'+yearmonth+'">Printer Version</a>');$y="</FORM></TD><TD ALIGN=CENTER BGCOLOR="+navColor+"></TD>";document.write($y+"</TR>");if($e>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,$W,$X,$Y){var $Z,$00,$y,event;$y="<TABLE><TR VALIGN=TOP><TD ALIGN=LEFT WIDTH=10%>";$y+="<FONT SIZE="+DateFontSize;$00=false;if((mo==$X)&&(dy==$Y)){$y+=" COLOR="+ColorToday;$00=true;}else if($W==SpecialDay){$y+=" COLOR="+ColorSpecialDay;$00=true;}$Z=(((yr*100)+mo)*100)+dy;if($h[$Z]){if(!$00)$y+=" COLOR="+ColorEvent;}$y+="><B>"+dy+(dy<10?"&nbsp;":"")+"&nbsp;</B></FONT></TD>";document.write($y);if(showAltDate){$01=getAltDate(dy,mo,yr);parseFormat(AltDateFormat);document.write("<TD ALIGN=RIGHT>"+$E+$01+$F+"</TD>");}document.write("</TR></TABLE>");if(showAltHoly){$y=getAltHoly(dy,mo,yr);if($y){parseFormat(AltHolyFormat);document.write($E+$y+$F+"<BR>");}}if(showHolidays){$y=holidays(dy,mo,yr);if($y){parseFormat(HolidayFormat);document.write($E+$y+$F+"<BR>");}}$02=0;for(j in $h[$Z]){ev=$h[$Z][j];$y="";if($z[ev.layer].show=="true"){$y+=(j>0?"<br>":"");if(ev.image&&showImages){if(ev.align){$p=ev.align;}else if(altAlign&&$02>0){$p=($03=="left"?"right":"left");}else{$p=imageAlign;}$y+='<img src="'+ev.image+(ev.width?'"  width="'+ev.width*imageScale/100:'')+(ev.height?'" height="'+ev.height*imageScale/100:'')+(ev.alt?'" alt="'+ev.alt:'')+'" align="'+$p+'" valign="top">';$03=$p;$02++;}$k="";if(ev.format=="layer"){$k=$z[ev.layer].format;}else if(ev.format=="custom"){$k="";}else if(ev.format){if(CheckFormat(ev.format))$k=ev.format;}else if(DefaultFormat=="layer"){$k=$z[ev.layer].format;}parseFormat($k);$y+=$E+(ev.link&&showLinks?"<a class=\"eventlink\" href="+ev.link+">"+ev.description+"</a>":ev.description)+$F+"<br>";}else{}document.write("<FONT SIZE=1>"+$y+"</FONT>");}}function exportCal(){var $J,$K,yr,mo,dy,$L,yearmonth,$N;$J=$b.getDate();$K=$b.getMonth()+1;initCal($K);mo=$G;yr=$H;yearmonth=$I;getLayersVisible();$N=NumDaysIn(mo,yr);$y="<textarea NAME=\"txt\"  ROWS=20 COLS=75 WRAP=VIRTUAL>";$y+='"Subject","Start Date","Start Time","End Date","End Time","All day event","Description","Show time as","Location"\n';document.write($y);for(dy=1;dy<=$N;dy++){$Z=(((yr*100)+mo)*100)+dy;$04=mo+"/"+dy+"/"+yr;for(j in $h[$Z]){ev=$h[$Z][j];if($z[ev.layer].show=="true"){$y=qw(ev.description)+","+qw($04)+",,,,"+qw("true")+",,"+qw("3")+","+qw("CalendarScript");if(ev.description)document.write($y+"\n");}else{}}}document.write("</textarea>");}function getLayersVisible(){$05=cookieName+"|";$06=unescape(document.cookie);$07=$06.indexOf($05);if($07>=0){$07+=$05.length;$08=$06.indexOf(";");if($08==-1)$08=$06.length;var $09=$06.substring($07,$08).split("|");for(i=0;i<$09.length;i++){$08=$09[i].indexOf("=");name=$09[i].substring(0,$08);$0a=$09[i].substring($08+1,$09[i].length);if($z[name])$z[name].show=$0a;}}}function initCal($K){if(!$z["default"])DefineLayer("default",DefaultLayerFormat);mo=$K;yr=GetFullYear($b);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;};$G=mo;$H=yr;$I=yearmonth;};function qw($0b){return "&quot;"+$0b+"&quot;";};function MiniMonth(yearmonth){var $M,$L,$N,$0z;var $0d=new arr("S","M","T","W","T","F","S");mo=yearmonth%100;yr=(yearmonth-mo)/100;$M=new Date($D[mo]+" 1,"+yr);$L=$M.getDay();$N=NumDaysIn(mo,yr);document.write("<b><tt><Font Size=2><div align=center>&nbsp;"+$D[mo]+"</div></font>");$0z="<font size=1>&nbsp;<u>";for(d in $0d){$0z+="&nbsp;"+$0d[d]+"&nbsp;";}document.write($0z,"</u>");dy=1;while(dy<=$N){$0z="<br>";for(var i=1;i<=7;i++){if(dy==1&&i<=$L){$0z+="&nbsp;&nbsp;&nbsp;";}else if(dy>$N){break;}else{$0z+="&nbsp;"+(dy<10?"&nbsp;":"")+dy;dy++;}}document.write($0z);}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($0e){return($0e==1?12:$0e-1);}function NextMonth($0e){return($0e==12?1:$0e+1);}function PrevYearMonth($0f){return($0f%100==1?$0f-100+11:$0f-1);}function NextYearMonth($0f){return($0f%100==12?$0f-11+100:$0f+1);}function JumpTo($0g,thispage){var $0h,$0i;$0h=$0g.selectedIndex;$0i=$0g.form.jumpmonth[$0h].value;document.location=thispage+"?"+$0i;}function BuildSelectionList($0j,thispage){var mo,yr,yearmonth;yearmonth=FirstMonth;$y="<select name=\"jumpmonth\" size=1 onchange=\"JumpTo(this,'" + thispage + "')\">";while(yearmonth<=LastMonth){mo=yearmonth%100;yr=(yearmonth-mo)/100;$0k=(yearmonth==$0j?" selected":"");$y+="<option value="+yearmonth+$0k+">"+$D[mo]+" "+yr;yearmonth=NextYearMonth(yearmonth);};document.write($y+"</select>");};function DoMsgBox(yearmonth,$V){if($g[yearmonth]){for(j in $g[yearmonth]){$0l=$g[yearmonth][j];if(!$0l.shown){if(!$0l.minspan||$0l.minspan<=$V){$y="<table border=2 bgcolor="+msgBoxColor+" align=center>";$y+="<TR><TD>"+$0l.message+"</TD></TR></table>";document.write($y);$0l.shown=true;return;}}}};if($g[0]){for(j in $g[0]){$0l=$g[0][j];if(!$0l.shown){if(!$0l.minspan||$0l.minspan<=$V){$y="<table border=2 bgcolor="+msgBoxColor+" align=center>";$y+="<TR><TD>"+$0l.message+"</TD></TR></table>";document.write($y);$0l.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($k){$E=$F="";if($k){var $08=$k.indexOf("|");if($08>0){$E=$k.substring(0,$08);$F=$k.substring(1+$08,$k.length);}}};function CheckFormat(String){var $0m;$0m=(String=="layer"||String=="custom"||String.indexOf("|")>0);if(!$0m)alert("Invalid Calendar Format String: "+String);return $0m;};function MsgBox($0n,$0o,$0p){this.message=$0n;this.minspan=($0o?$0o:1);if($0p)this.maxspan=$0p;};function AddMsgBox(yearmonth,$0n,$0o,$0p){var i;if(!$g[yearmonth])$g[yearmonth]=new Array;i=$g[yearmonth].length;$g[yearmonth][i]=new MsgBox($0n,$0o,$0p);};function ChooseLayers(yearmonth,thispage){var i,$0q;$y='<form name="layerform"><b>Filter Events:</b>&nbsp;';for(i in $z){if(i!="default"){$0q=($z[i].show=="true"?" checked":"");parseFormat($z[i].format);$y+=$E+'<input type="checkbox" name="'+i+'" value="'+i+'"'+$0q+' onClick="ChangeLayer(\''+i+'\')">'+i+"&nbsp;"+$F;}};$y+='&nbsp;<input type="button" name="ApplyChanges" value="Apply Changes"'+'onClick="ApplyLayerChange(\'' + thispage + '\',\'' + yearmonth + '\')">';document.write($y+"</form>");};function ChangeLayer($j){$f=true;$z[$j].show=document.layerform[$j].checked;};function ApplyLayerChange(thispage,yearmonth){$f=false;$06=cookieName;for($j in $z){if($j!="default"){$06+="|"+$j+"="+$z[$j].show;}};document.cookie=escape($06);document.location=thispage+(yearmonth?"?"+yearmonth:"");}

