// Clock.js
// Functions that provide date, day or week, time, and liturgical day information for website
//
//  copyright 2008, 2009,2010 W. Austin
//
// Created: 11/1/2008  W. Austin
// Revised: 12/27/2008 W. Austin -- moved to stand alone file and added liturgical day information
// Revised: 11/8/2009  W. Austin -- updated for 2010

function startTime()
{
	var today = new Date();
	var timeString = today.toLocaleTimeString();
	var litDayString = litDay(today);
	var i = timeString.lastIndexOf(":");
    var hm = timeString.substring(0,i);
    var ap = timeString.substring(i + 3);
    document.getElementById('dttxt').innerHTML=litDayString;
	document.getElementById('tmtxt').innerHTML=(hm + ap);
	t=setTimeout('startTime()',10000)
}

function sodLink(today, txt, clr) 
{
    var dateString = today.toLocaleDateString();
    var dString = "<p style='margin-top: 0; margin-bottom: 0'>";
    dString = dString + "<a class='sodLink' target='_blank' title='Link to Saint of the Day' href='http://www.americancatholic.org/features/saintofday/default.aspx'>"
    dString = dString + "<font color='"
    dString = dString + clr
    dString = dString + "'>"
    dString = dString + dateString
    dString = dString + "</font></a></p>"
    dString = dString + "<p style='margin-top: 0; margin-bottom: 1px'>"
    dString = dString + "<a class='sodLink' target='_blank' title='Link to Saint of the Day' href='http://www.americancatholic.org/features/saintofday/default.aspx'>"
    dString = dString + "<font color='"
    dString = dString + clr
    dString = dString + "'>"
    dString = dString + txt
    dString = dString + "</font></a></p>";
    return (dString);
}

function litDay(today)
{
	var month = today.getMonth();
	var day = today.getDate();
	var year = today.getFullYear();
	var feast = "white";
	var ordTime = "#008000";
	var martyr = "#DF0000";
	// var lent = "#8010FF";
	var lent = "#901080";
	var advent = "#A010C0";
	var litday = sodLink(today, "Weekday in Ordinary Time", ordTime);
		
	switch (year)
	{
	    case 2009:
	        switch (month) {
	            case 10: // November 2009
	                switch (day) {
	                    case 1:
	                        litday = sodLink(today, "All Saints", feast);
	                        break;
	                    case 2:
	                        litday = sodLink(today, "Commemoration of all the Faithful Departed", feast);
	                        break;
	                    case 4:
	                        litday = sodLink(today, "St. Charles Borromeo", feast);
	                        break;
	                    case 8:
	                        litday = sodLink(today, "32nd Sunday in Ordinary Time", ordTime);
	                        break;
	                    case 9:
	                        litday = sodLink(today, "The Dedication of the Lateran Bassilica", feast);
	                        break;
	                    case 10:
	                        litday = sodLink(today, "St. Leo the Great", feast);
	                        break;
	                    case 11:
	                        litday = sodLink(today, "St. Martin of Tours", feast);
	                        break;
	                    case 12:
	                        litday = sodLink(today, "St. Josaphat", martyr);
	                        break;
	                    case 13:
	                        litday = sodLink(today, "St. Frances Xavier Cabrini", feast);
	                        break;
	                    case 15:
	                        litday = sodLink(today, "33rd Sunday in Ordinary Time", ordTime);
	                        break;
	                    case 17:
	                        litday = sodLink(today, "St. Elizabeth of Hungary", feast);
	                        break;
	                    case 21:
	                        litday = sodLink(today, "The Presentation of Mary", feast);
	                        break;
	                    case 22:
	                        litday = sodLink(today, "Christ the King", feast);
	                        break;
	                    case 24:
	                        litday = sodLink(today, "St. Andrew Dung-Lac and companions", martyr);
	                        break;
	                    case 29:
	                        litday = sodLink(today, "First Sunday of Advent", advent);
	                        break;
	                    case 30:
	                        litday = sodLink(today, "St. Andrew", martyr);
	                        break;
	                } // switch day
	                break;
	            case 11: // December 2009
	                if (day < 25) {
	                    litday = sodLink(today, "Advent Weekday", advent);
	                } // if(day < 25)
	                else {
	                    litday = sodLink(today, "Octave of Christmas", feast);
	                } // else
	                switch (day) {
	                    case 3:
	                        litday = sodLink(today, "St. Francis Xavier", feast);
	                        break;
	                    case 6:
	                        litday = sodLink(today, "Second Sunday of Advent", advent);
	                        break;
	                    case 7:
	                        litday = sodLink(today, "St. Ambrose", feast);
	                        break;
	                    case 8:
	                        litday = sodLink(today, "The Immaculate Conception of Mary", feast);
	                        break;
	                    case 12:
	                        litday = sodLink(today, "Our Lady of Gaudalupe", feast);
	                        break;
	                    case 13:
	                        litday = sodLink(today, "Third Sunday of Advent", advent);
	                        break;
	                    case 14:
	                        litday = sodLink(today, "St. John of the Cross", feast);
	                        break;
	                    case 20:
	                        litday = sodLink(today, "Fourth Sunday of Advent", advent);
	                        break;
	                    case 25:
	                        litday = sodLink(today, "The Nativity of the Lord", feast);
	                        break;
	                    case 26:
	                        litday = sodLink(today, "St. Stephen", martyr);
	                        break;
	                    case 27:
	                        litday = sodLink(today, "Feast of the Holy Family", feast);
	                        break;
	                    case 28:
	                        litday = sodLink(today, "The Holy Innocents", martyr);
	                        break;
	                } // switch(day)
	                break;
	        } // switch(month)
	        break;	
	case 2010:
		switch (month)
		{
			case 0:  // January 2010
				if (day < 10)
				{
				litday = sodLink(today, "Christmas Weekday", feast);
				} // if (day < 10)		
				switch (day)
				{
					case 1:
						litday = sodLink(today, "Feast of Mary, Mother of God", feast);
						break;
					case 2:
						litday = sodLink(today, "Sts. Basil and Gregory", feast);
						break;
					case 3:
						litday = sodLink(today, "The Epiphany of the Lord", feast);
						break;
					case 4:
						litday = sodLink(today, "St. Elizabeth Ann Seton", feast);
						break;
					case 5:
						litday = sodLink(today, "St. John Neumann", feast);
						break;
					case 7:
						litday = sodLink(today, "St. Raymond of Penyafort", feast);
						break;
					case 10:
						litday = sodLink(today, "The Baptism of the Lord", feast);
						break;
					case 13:
						litday = sodLink(today, "St. Hilary of Poitiers", feast);
						break;
					case 17:
						litday = sodLink(today, "Second Sunday in Ordinary Time", ordTime);
						break;
					case 21:
						litday = sodLink(today, "St. Agnes", martyr);
						break;
					case 24:
						litday = sodLink(today, "Third Sunday in Ordinary Time", ordTime);
						break;
					case 25:
						litday = sodLink(today, "Conversion of St. Paul", feast);
						break;
					case 26:
						litday = sodLink(today, "Sts. Timothy and Titus", feast);
						break;
					case 28:
						litday = sodLink(today, "St. Thomas Aquinas", feast);
						break;
					case 31:
						litday = sodLink(today, "Fourth Sunday in Ordinary Time", ordTime);
						break;
				} // switch(day)
				break;
			case 1: // February 2010
				if(day > 17)
				{
					litday = sodLink(today, "Leten Weekday", lent);
				} // if(day > 17)	
				switch(day)
				{
					case 2:
						litday = sodLink(today, "Presentation of the Lord", feast);
						break;
					case 5:
						litday = sodLink(today, "St. Agatha", martyr);
						break;
					case 6:
						litday = sodLink(today, "St. Paul Miki & companions", martyr);
						break;
					case 7:
						litday = sodLink(today, "Fifth Sunday in Ordinary Time", ordTime);
						break;
					case 10:
						litday = sodLink(today, "St. Scholastica", feast);
						break;
					case 14:
						litday = sodLink(today, "Sixth Sunday in Ordinary Time", ordTime);
						break;
					case 17:
						litday = sodLink(today, "Ash Wednesday", lent);
						break;
					case 21:
						litday = sodLink(today, "First Sunday of Lent", lent);
						break;
					case 22:
						litday = sodLink(today, "The Chair of Peter", feast);
						break;
					case 28:
						litday = sodLink(today, "Second Sunday of Lent", lent);
						break;
				} // swithc(day)
				break;
			case 2: // March 2010
				litday = sodLink(today, "Lenten Weekday", lent);
				if(day > 28)
				{
					litday = sodLink(today, "HolyWeek", martyr);
				} // if(day > 28)
				switch(day)
				{
					case 7:
						litday = sodLink(today, "Third Sunday of Lent", lent);
						break;
					case 14:
						litday = sodLink(today, "Fourth Sunday of Lent", lent);
						break;
					case 19:
						litday = sodLink(today, "St. Joseph", feast);
						break;
					case 21:
						litday = sodLink(today, "Fifth Sunday of Lent", lent);
						break;
					case 25:
						litday = sodLink(today, "The Annunciation of the Lord", feast);
						break;
					case 28:
						litday = sodLink(today, "Palm Sunday", martyr);
						break;
				} // switch(day)								
				break;
			case 3: // April 2010
				if(day < 11)
				{
					litday = sodLink(today, "Octave of Easter", feast);
				} // if(day < 11)
				else
				{
					litday = sodLink(today, "Easter Weekday", feast);
				} // else
				switch(day)
				{
					case 1:
						litday = sodLink(today, "Holy Thursday", feast);
						break;
					case 2:
						litday = sodLink(today, "Good Friday", martyr);
						break;
					case 3:
						litday = sodLink(today, "Holy Saturday", lent);
						break;
					case 4:
						litday = sodLink(today, "Easter Sunday", feast);
						break;
					case 11:
						litday = sodLink(today, "Second Sunday of Easter", feast);
						break;
					case 18:
						litday = sodLink(today, "Third Sunday of Easter", feast);
						break;
					case 25:
						litday = sodLink(today, "St. Athanasius", feast);
						break;
					case 29:
						litday = sodLink(today, "St. Catherine of Siena", feast);
						break;
				} // switch(day)
				break;
			case 4: // May 2010
				if(day < 23)
				{
					litday = sodLink(today, "Easter Weekday", feast);
				}
				switch(day)
				{
					case 2:
						litday = sodLink(today, "Fifth Sunday of Easter", feast);
						break;
					case 3:
						litday = sodLink(today, "Sts. Philip & James", feast);
						break;
					case 9:
						litday = sodLink(today, "Sixth Sunday of Easter", feast);
						break;
					case 13:
						litday = sodLink(today, "The Ascension of the Lord", feast);
						break;
					case 14:
						litday = sodLink(today, "St. Matthias", martyr);
						break;
					case 16:
						litday = sodLink(today, "Seventh Sunday of Easter", feast);
						break;
					case 23:
						litday = sodLink(today, "Pentecost", martyr);
						break;
					case 26:
						litday = sodLink(today, "St. Philip Neri", feast);
						break;
					case 30:
						litday = sodLink(today, "Most Holy Trinity", feast);
						break;
					case 31:
						litday = sodLink(today, "Visitation of the Blessed Virgin Mary", feast);
						break;
				} // switch(day)
				break;
			case 5: // June 2010
				switch(day)
				{
					case 1:
						litday = sodLink(today, "St. Justin", martyr);
						break;
					case 3:
						litday = sodLink(today, "St. Charles Lwanga & companions", martyr);
						break;
					case 5:
						litday = sodLink(today, "St. Boniface", martyr);
						break;
					case 6:
						litday = sodLink(today, "Body and Blood of Christ", feast);
						break;
					case 11:
						litday = sodLink(today, "Most Sacred Heart of Jesus", feast);
						break;
					case 12:
						litday = sodLink(today, "Imaculate Heart of Mary", martyr);
						break;
					case 13:
						litday = sodLink(today, "Eleventh Sunday in Ordiary Time", ordTime);
						break;
					case 20:
						litday = sodLink(today, "Twelfth Sunday in Ordinary Time", ordTime);
						break;
					case 21:
						litday = sodLink(today, "Aloysius Gonzaga", feast);
						break;
					case 24:
						litday = sodLink(today, "Nativity of John the Baptist", feast);
						break;
					case 27:
						litday = sodLink(today, "Thirteenth Sunday in Ordinary Time", ordTime);
						break;
					case 28:
						litday = sodLink(today, "St. Iranaeus",martyr);
						break;
					case 29:
						litday = sodLink(today, "Sts. Peter and Paul", martyr);
						break;
				} // switch(day)
				break;
			case 6: // July 2010
				switch(day)
				{
					case 3:
						litday = sodLink(today, "St. Thomas", martyr);
						break;
					case 4:
						litday = sodLink(today, "Fourteenth Sunday in Ordinry Time", ordTime);
						break;
					case 11:
						litday = sodLink(today, "Fifteenth Sunday in Ordinary Time", ordTime);
						break;
					case 14:
						litday = sodLink(today, "Blessed Kateri Tekakwitha", feast);
						break;
					case 15:
						litday = sodLink(today, "St. Bonaventure", feast);
						break;
					case 18:
						litday = sodLink(today, "Sixteenth Sunday in Ordinary Time", ordTime);
						break;
					case 22:
						litday = sodLink(today, "Mary Magdalene", feast);
						break;
					case 25:
						litday = sodLink(today, "Seventeenth Sunday in Ordinary Time", ordTime);
						break;
					case 29:
						litday = sodLink(today, "St. Martha", feast);
						break;
					case 31:
						litday = sodLink(today, "St. Ignatius of Loyola", feast);
						break;
				} // switch(day)
				break;
			case 7: // August 2010
				switch(day)
				{
					case 1:
						litday = sodLink(today, "Eighteenth Sunday in Ordinary Time", ordTime);
						break;
					case 4:
						litday = sodLink(today, "St. John Mary Vianney", feast);
						break;
					case 6:
						litday = sodLink(today, "The Transfiguration of the Lord", feast);
						break;
					case 8:
						litday = sodLink(today, "Nineteenth Sunday in Ordinary Time", ordTime);
						break;
					case 10:
						litday = sodLink(today, "St. Lawrence", martyr);
						break;
					case 11:
						litday = sodLink(today, "St. Clare", feast);
						break;
					case 14:
						litday = sodLink(today, "St. Maximilian Mary Kolbe", martyr);
						break;
					case 15:
						litday = sodLink(today, "The Assumption of the Blessed Virgin Mary", feast);
						break;
					case 20:
						litday = sodLink(today, "St. Bernard", feast);
						break;
					case 21:
						litday = sodLink(today, "St. Pius X", feast);
						break;
					case 22:
						litday = sodLink(today, "Twenty-first Sunday in Ordinary Time", ordTime);
						break;
					case 24:
						litday = sodLink(today, "St. Bartholomew", martyr);
						break;
					case 27:
						litday = sodLink(today, "St. Monica", feast);
						break;
					case 28:
						litday = sodLink(today, "St. Augustine", feast);
						break;
					case 29:
						litday = sodLink(today, "Twenty-second Sunday in Ordinary Time", ordTime);
						break;
				} // switch(day)
				break;
			case 8: // September 2010
				switch(day)
				{
					case 3:
						litday = sodLink(today, "St. Gregory", feast);
						break;
					case 5:
						litday = sodLink(today, "23rd Sunday in Ordinary Time", ordTime);
						break;
					case 8:
						litday = sodLink(today, "The Nativity of Mary", feast);
						break;
					case 9:
						litday = sodLink(today, "St. Peter Claver", feast);
						break;
					case 12:
						litday = sodLink(today, "24th Sunday in Ordinary Time", ordTime);
						break;
					case 13:
						litday = sodLink(today, "St. John Chrysostom", feast);
						break;
					case 14:
						litday = sodLink(today, "The Exaltation of the Holy Cross", martyr);
						break;
					case 15:
						litday = sodLink(today, "Our Lady of Sorrows", feast);
						break;
					case 16:
						litday = sodLink(today, "St. Cornelius", martyr);
						break;
					case 19:
						litday = sodLink(today, "25th Sunday in Ordinary Time", ordTime);
						break;
					case 20:
						litday = sodLink(today, "St. Andrew Kim Taegon, Paul Chong Hasang & Companions", martyr);
						break;
					case 21:
						litday = sodLink(today, "St. Matthew", martyr);
						break;
					case 23:
						litday = sodLink(today, "St. Pio of Pietrelcina", feast);
						break;
					case 26:
						litday = sodLink(today, "26th Sunday in Ordinary Time", ordTime);
						break;
					case 27:
						litday = sodLink(today, "St. Vincent de Paul", feast);
						break;
					case 29:
						litday = sodLink(today, "Archangles Michael, Gabriel and Raphael", feast);
						break;
					case 30:
						litday = sodLink(today, "St. Jerome", feast);
						break;
				} // switch(day)
				break;
			case 9: // October 2010
				switch(day)
				{
					case 1:
						litday = sodLink(today, "St. Therese of the Child Jesus", feast);
						break;
					case 2:
						litday = sodLink(today, "Guardian Angeles", feast);
						break;
					case 3:
						litday = sodLink(today, "27th Sunday in Ordinary Time", ordTime);
						break;
					case 4:
						litday = sodLink(today, "Francis of Assisi", feast);
						break;
					case 7:
						litday = sodLink(today, "Our Lady of the Rosary", feast);
						break;
					case 10:
						litday = sodLink(today, "28th Sunday in Ordinary Time", ordTime);
						break;
					case 15:
						litday = sodLink(today, "St. Teresa of Jesus", feast);
						break;
					case 17:
						litday = sodLink(today, "29th Sunday in Ordinary Time", ordTime);
						break;
					case 18:
						litday = sodLink(today, "St. Luke", martyr);
						break;
					case 19:
						litday = sodLink(today, "Sts. John de Brebeuf and Issac Jogues and companions", martyr);
						break;
					case 24:
						litday = sodLink(today, "Thirtieth Sunday in Ordinary Time", ordTime);
						break;
					case 28:
						litday = sodLink(today, "Sts. Simon and Jude", martyr);
						break;
					case 31:
						litday = sodLink(today, "31st Sunday in Ordinary Time", ordTime);
						break;
				} // switch(day)
				break;
			case 10: // November 2010
				switch(day)
				{
					case 1:
						litday = sodLink(today, "All Saints", feast);
						break;
					case 2:
						litday = sodLink(today, "Commemoration of all the Faithful Departed", feast);
						break;
					case 4:
						litday = sodLink(today, "St. Charles Borromeo", feast);
						break;
					case 7:
						litday = sodLink(today, "32nd Sunday in Ordinary Time", ordTime);
						break;
					case 9:
						litday = sodLink(today, "The Dedication of the Lateran Bassilica", feast);
						break;
					case 10:
						litday = sodLink(today, "St. Leo the Great", feast);
						break;
					case 11:
						litday = sodLink(today, "St. Martin of Tours", feast);
						break;
					case 12:
						litday = sodLink(today, "St. Josaphat", martyr);
						break;
					case 13:
						litday = sodLink(today, "St. Frances Xavier Cabrini", feast);
						break;
					case 14:
						litday = sodLink(today, "33rd Sunday in Ordinary Time", ordTime);
						break;
					case 17:
						litday = sodLink(today, "St. Elizabeth of Hungary", feast);
						break;
					case 21:
						litday = sodLink(today, "Christ the King", feast);
						break;
					case 22:
						litday = sodLink(today, "St. Cecilia", martyr);
						break;
					case 24:
						litday = sodLink(today, "St. Andrew Dung-Lac and companions", martyr);
						break;
					case 28:
						litday = sodLink(today, "First Sunday of Advent", advent);
						break;
					case 30:
						litday = sodLink(today, "St. Andrew", martyr);
						break;
				} // switch(day)
				break;
			case 11: // December 2010
				if(day < 25)
				{
					litday = sodLink(today, "Advent Weekday", advent);
				} // if(day < 25)
				else
				{
					litday = sodLink(today, "Octave of Christmas", feast);
				} // else
				switch(day)
				{
					case 3:
						litday = sodLink(today, "St. Francis Xavier", feast);
						break;
					case 5:
						litday = sodLink(today, "Second Sunday of Advent", advent);
						break;
					case 7:
						litday = sodLink(today, "St. Ambrose", feast);
						break;
					case 8:
						litday = sodLink(today, "The Immaculate Conception of Mary", feast);
						break;
					case 12:
						litday = sodLink(today, "Third Sunday of Advent", advent);
						break;
					case 13:
						litday = sodLink(today, "St. Lucy", martyr);
						break;
					case 14:
						litday = sodLink(today, "St. John of the Cross", feast);
						break;
					case 19:
						litday = sodLink(today, "Fourth Sunday of Advent", advent);
						break;
					case 25:
						litday = sodLink(today, "The Nativity of the Lord", feast);
						break;
					case 26:
						litday = sodLink(today, "Feast of the Holy Family", feast);
						break;
					case 27:
						litday = sodLink(today, "St. John, Apostle", feast);
						break;
					case 28:
						litday = sodLink(today, "The Holy Innocents", martyr);
						break;
				} // switch(day)
				break;
		} // switch(month)
		break;
default:
    litday = sodLink(today, "-", ordTime);
    break;
} // switch(year)
    return litday;
} // furnction litday