//
// JavaScript Event Calendar
//
// Version: 1.0
// Date: November 15, 1998
// For information: http://members.aol.com/kevinilsen or kilsen@m-vation.com
//
// Configurable values are set to defaults here; can override them before calling Calendar( ) from the HTML page
var SpecialDay=1; // 1=Sunday, 2=Monday, . . . 7=Saturday
var FontSize=5;
var DateFontSize=3;
var EventFontSize=1;
var ColorBackground="#CCFFFF";
var HeadColorBackground="#CCCCFF";
var ColorToday = "lightgreen";
var BGColorEvent ="#CCFFFF";
var CSBGColorEvent ="#AAEEEE";
var ColorSpecialDay = "red";
var ColorHoliday = "red";
var ColorEvent = "blue";
var CellWidth = 100;
// Initialize the range of the calendar to Jan - Dec of the current year. Calls to DefineEvent( ) will change this
// as needed; it is also possible to explicitly override the range before calling Calendar( ) from the HTML page.
var today = new Date();
var FirstMonth=GetFullYear(today) * 100 + 1;
var LastMonth=FirstMonth + 11;
// Events[] is a SPARSE array; Call DefineEvent( ) to populate it
var Events = new Array;
var Events2 = new Array;
var HolidayList = new Array;
// Each event is defined by calling the DefineEvent( ) routine with the following parameters:
//
// DefineEvent(EventDate, EventDescription, EventLink, Image, Width, Height)
// EventDate is a numeric value in the format YYYYMMDD
// EvenDescription is a string that can include embedded HTML tags (e.g., , , etc.)
// EventLink is the URL of the target page if a hyperlink is desired from this event entry
// Image is the URL of the image if you want to display an image with this event
// Width is the width of the image in pixels
// Height is the height of the image in pixels
function DefineEvent(EventDate, EventDescription, EventLink, Image, Width, Height, Type) {
var tmp;
// Build the HTML string for this event: image (optional), link (optional), and description
tmp = "";
if (Image != "")
tmp = tmp + '';
if (EventLink != "")
tmp = tmp + '';
tmp = tmp + EventDescription;
if (EventLink != "") tmp = tmp + '';
// If an event already exists for this date, append the new event to it.
if (Type=="E1")
{
if (Events[EventDate])
Events[EventDate] += "
" + tmp;
else
Events[EventDate] = tmp;
}
if (Type=="E2")
{
if (Events2[EventDate])
Events2[EventDate] += "
" + tmp;
else
Events2[EventDate] = tmp;
}
if (Type)
{
if (Type=="Holiday") HolidayList[EventDate] = 1;
}
// Adjust the minimum and maximum month & year to include this date
tmp = Math.floor(EventDate / 100);
if (tmp < FirstMonth) FirstMonth = tmp;
if (tmp > LastMonth) LastMonth = tmp;
}
// Utility function to populate an array with values
function arr() {
for (var n=0;nSun","Mon","Tue","Wed","Thu","Fri","Sat");
var thispage = window.location.pathname;
// Save current day and month for comparison
curdy = today.getDate();
curmo = today.getMonth()+1;
// Default to current month and year
mo = curmo;
yr = GetFullYear(today);
yearmonth = (yr * 100) + mo;
// If querystring parameter is present, get the month/year ("calendar.htm?YYYYMM")
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;
}
}
// Constrain to the range of months with events
if (yearmonth < FirstMonth) {
mo = FirstMonth % 100;
yr = (FirstMonth - mo) / 100;
yearmonth = FirstMonth;
}
if (yearmonth > LastMonth) {
mo = LastMonth % 100;
yr = (LastMonth - mo) / 100;
yearmonth = LastMonth;
}
// Create a datae object for the first day of the desired month
bgn = new Date(months[mo] + " 1," + yr);
// Get the day-of-week of the first day, and the # days in the month
dayofweek = bgn.getDay();
lastday = NumDaysIn(mo,yr);
document.write("
");
//1st row (Show Date)
dy = 1;
// Special handling for the first week of the month
for (var i=1;i<=7;i++) {
// If the day is less than the day of the
// week determined to be the first day
// of the month, print a space in
// this cell of the table.
if (i <= dayofweek){
document.write("
");
}
// Otherwise, write date and the event,
// if any, in this cell of the table.
else {
ShowDate(yr,mo,dy,i,curmo,curdy);
dy++;
}
}
document.write("
");
//2nd row (Show Event1)
dy = 1;
dy2nd=0;
for (var i=1;i<=7;i++) {
if (i <= dayofweek){
document.write("
");
// Rest of the weeks . . .
while (dy <= lastday) {
//1st row (Show Date)
dy2nd=dy;
for (var i=1;i<=7;i++) {
// If the day is greater than the last
// day of the month, print a space in
// this cell of the table.
if (dy > lastday) {
document.write("
");
}
// Otherwise, write date and the event,
// if any, in this cell of the table.
else {
ShowDate(yr,mo,dy,i,curmo,curdy);
dy++;
}
}
document.write("
");
//2nd Row (Show Event1)
dy=dy2nd;
ShowData(yr,mo,dy,lastday,yr*10000+curmo*100+curdy);
for (var i=1;i<=7;i++) {
if (dy > lastday) {
document.write("
");
}
else {
dy++;
}
}
document.write("
");
//3nd Row (Show Event2)
dy=dy2nd;
ShowData2(yr,mo,dy,lastday,yr*10000+curmo*100+curdy);
for (var i=1;i<=7;i++) {
if (dy > lastday) {
document.write("
");
}
else {
dy++;
}
}
document.write("
");
}
document.write("
");
}
function ShowData(yr,mo,dy,lastday,today)
{
var cs=new arr(1,1,1,1,1,1,1);
var weekend= dy+7-1;
if (weekend > lastday) weekend=lastday;
var cDay=weekend;
var ind = (((yr * 100) + mo) * 100);
for (var wCount=weekend-dy+1; wCount>1;wCount--)
{
if (cDay >= dy)
{
(Events[ind+cDay]) ? Events[ind+cDay]=Events[ind+cDay]:Events[ind+cDay]=" ";
(Events[ind+cDay-1]) ? Events[ind+cDay-1]=Events[ind+cDay-1]:Events[ind+cDay-1]=" ";
if ((Events[ind+cDay]==Events[ind+cDay-1]) && (Events[ind+cDay] != " "))
{
cs[wCount-1]=cs[wCount]+1;
cs[wCount]=0;
}
}
cDay--;
}
for (var i=1;i<=7;i++)
{
if ((cs[i]>0) && (dy+i-1 <=lastday))
{
(Events[ind+dy+i-1]) ? Events[ind+dy+i-1]=Events[ind+dy+i-1]:Events[ind+dy+i-1]=" ";
document.write("
");
}
}
}
// Display a date in the appropriate color, with events (if there are any)
function ShowDate(yr, mo, dy, dayofweek, currentmonth, currentday) {
var ind, HighlightEvent, tmp;
document.write("
";
//remove event
tmp="";
document.write(">"+dy+"
");
//document.write(""+tmp+"
");
}
// Remaining routines are utilities used above
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) {
if (((yr % 4 == 0) && yr % 100 != 0) || yr % 400 == 0) return true;
else return false;
}
// fixes a Netscape 2 and 3 bug
function GetFullYear(d) { // d is a date object
var yr;
yr = d.getYear();
if (yr < 1000)
yr +=1900;
return yr;
}
function PrevMonth(mth) {
if (mth == 1) return 12;
else return (mth-1);
}
function NextMonth(mth) {
if (mth == 12) return 1;
else return (mth+1);
}
function PrevYearMonth(yrmth) {
if ((yrmth % 100) == 1) return ((yrmth-100)+11);
else return (yrmth-1);
}
function NextYearMonth(yrmth) {
if ((yrmth % 100) == 12) return ((yrmth-11)+100);
else return (yrmth+1);
}
function JumpTo(calendar, thispage) {
var sel, yrmo;
sel = calendar.selectedIndex;
yrmo = calendar.form.jumpmonth[sel].value;
jumppage=window.location;
if (location.search.length > 1)
{
jumppage=window.location.pathname;
}
document.location = jumppage + "?" + yrmo;
}
function BuildSelectionList(current,thispage) {
var mo, yr, yearmonth;
yearmonth = FirstMonth;
document.write("");
}