function hppagelink(page, name)
{
document.writeln('<td width="120" align="center">'
+ '<font face="arial" color="green" size="-1">'
+ '[<a href="' + page + '">' + name + '</a>]</font></td>')
}

function hppages (base)
{
if (arguments.length <= 0)
base = ""
else
base += "/"
document.writeln('<table cellpadding="1" cellspacing="1" border="0" align="center"><tr>')

hppagelink(base + "index.html", "Home")
hppagelink(base + "hdirect.htm", "Directory")

hppagelink(base + "meetings.htm", "Schedule")
hppagelink(base + "events.htm", "Events")

hppagelink(base + "inform.htm", "Contacts")
hppagelink(base + "hpnews.htm", "News")
hppagelink(base + "links.htm", "Links")

document.writeln('</tr><tr><td>&nbsp;</td></tr></table>')
}


function pgtitle(text)
{
document.write('<h2 align="center"><font face="Verdana">'
+ '<script>setLitTxtClr()</script>'
+ text
+ '</font></font></h2>')
}





function fixup ()
{

fixAll(document.body)
}














function fixAll (node)
{
var result = -1
if (node.className) {
var classes = getClasses(node)
if (classes.upto || classes.onAfter || classes.during)
result = checkDates(node, classes)
else if (classes.EvCal)
node.style.backgroundColor = monthColour()
}

for (var i = 0; (result < 0) && (i < node.childNodes.length); ++i) {
var c = node.childNodes[i]
if (c.nodeName != "#text") {
result = fixAll(c)
if (result >= 0)
--i
}
}

return result - 1
}



function getClasses (node)
{
var result = new Array(0)
if (node && node.className) {
classes = node.className.split(" ")
for (var i = 0; i < classes.length; ++i)
result[classes[i]] = true
}
return result
}





function litText ()
{
return getColourCd(getLitColour(null, manyGreens + useGold))
}



function errMsg (txt)
{
var p = document.createElement("p")
p.className = "errmsg"
var t = document.createTextNode("ERROR: " + txt)
t.className = "errmsg"
p.appendChild(t)
document.body.insertBefore(p, document.body.firstChild)
}
















function checkDates (node, classes)
{
var result = 0
var follow = false
var v = node
while (v.nodeName != "#text")
v = v.firstChild
var strs = v.nodeValue.split(":")
var parinfo = strs[1]
if (parinfo && (parinfo == "follow")) {
follow = true
parinfo = ""
}
var dateStrs = strs[0].split(";")
var dates = new Array()
for (var i = 0; i < dateStrs.length; ++i) {
dates[i] = new Date(dateStrs[i])
if (dates[i] == "Invalid Date")
errMsg("Invalid date: " + dateStrs[i])
}
var curdt = new Date()
var keep = true
if (classes.upto)
keep = (curdt <= dates[0])
else if (classes.onAfter)
keep = (curdt >= dates[0])
else
keep = (curdt >= dates[0]) && (curdt <= dates[1])

var par = node.parentNode
if (keep) {
par.removeChild(node)
} else {
result = 1
if ((! parinfo) || (parinfo.length <= 0)) {
if (par.nodeName == "TD") {
result = 2
par = par.parentNode
}
} else {
while (par && (par.nodeName != parinfo)
&& (par.className != parinfo)
&& (par.id != parinfo)) {
++result
par = par.parentNode
}
}
if (par) {
if (follow) {
var sbl = null
for (i = 0 ; i < par.parentNode.childNodes.length-1; ++i) {
if (par.parentNode.childNodes[i] == par) {
sbl = par.parentNode.childNodes[i+1]


if (sbl.nodeName == "#text") {
par.parentNode.removeChild(sbl)
--i
}
}
}
par.parentNode.removeChild(sbl)
}
par.parentNode.removeChild(par)
}

}
return result
}



function EvLink(church) {
var result = makeMapLink(church)
+ "<br>" + churchPhone(church)
var mail = churchMail(church, "X")
if ((mail != undefined) && (mail.length > 0))
result += "<br>" + mail
var web = churchWeb(church)
if ((web != undefined) && (web.length > 0))
result += "<br>" + "<a href='http://" + web + "' target='_blank'>"
+ web + "<\/a>"
document.write(result)
}





var monthClrs = [
"#87CEEB",     // SkyBlue
"#FFFACD",     // LemonChiffon
"#F1CFD4",     // Pale Pink
"#FFD700",     // Gold
"#7FFFD4"      // Aquamarine
]
var monthcnt = (new Date()).getMonth() % monthClrs.length

function monthColour () {
if (monthcnt >= monthClrs.length)
monthcnt = 0
return monthClrs[monthcnt++]
}