// Clocks: written by Marc Fluks. Version 03/01/2006
//
   var now        = new Date()
// Find day of the week for March 25 and October 25.
   var julianmar  = Math.round((30.6*4)-0.5)+Math.round((365.25*now.getUTCFullYear())-0.5)+25+1720981.5
   var julianoct  = Math.round((30.6*11)-0.5)+Math.round((365.25*now.getUTCFullYear())-0.5)+25+1720981.5
   var daymar     = (julianmar+1.5)/7
   var dayoct     = (julianoct+1.5)/7
   var daymar     = Math.round(7*(daymar-Math.round(daymar-.5)))
   var dayoct     = Math.round(7*(dayoct-Math.round(dayoct-.5)))
// Find the last Sunday in March and October.
   var array      = [25,31,30,29,28,27,26,25]
   var daymar     = array[daymar]
   var dayoct     = array[dayoct]
// Find Julian Day for last Sunday in March and October at 1:00 UTC.
   var julianmar  = Math.round((30.6*4)-0.5)+Math.round((365.25*now.getUTCFullYear())-0.5)+daymar+1720981.5
   var julianmar  = julianmar+1.00/24
   var julianoct  = Math.round((30.6*11)-0.5)+Math.round((365.25*now.getUTCFullYear())-0.5)+dayoct+1720981.5
   var julianoct  = julianoct+1.00/24
// Find SurfNetTimezone (values -2 for DST and -1 for standard time).
   var julian     = Math.round(30.6*((now.getUTCMonth()+1)+(((now.getUTCMonth()+1)<3)?13:1))-0.5)+Math.round(365.25*(now.getUTCFullYear()+(((now.getUTCMonth()+1)<3)?-1:0))-0.5)+now.getUTCDate()+1720981.5
   var julian     = julian+(now.getUTCHours()+now.getUTCMinutes()/60+now.getUTCSeconds()/3600)/24
   var SurfNetTimezone = (julian-julianmar)*(julian-julianoct)
   var SurfNetTimezone = -1.5+.5*(SurfNetTimezone/Math.sqrt(SurfNetTimezone*SurfNetTimezone))
// Find SurfNetDay.
   var SurfNetDay = (now.getUTCHours()+now.getUTCMinutes()/60+now.getUTCSeconds()/3600-SurfNetTimezone)/24
   var SurfNetDay = Math.round(SurfNetDay-0.5)
   var SurfNetDay = 7+now.getUTCDay()+SurfNetDay
// Redefine Days from 0 to 6.
   var array      = [0,1,2,3,4,5,6,0,1,2,3,4,5,6,0]
   var SurfNetDay = array[SurfNetDay]
// Find shiftday: is localday later/earlier than SurfNetDay ?
   var shiftday   = 7+(now.getDay()-SurfNetDay)
   var array      = [0,1,0,0,0,0,-1,0,1,0,0,0,0,-1]
   var shiftday   = array[shiftday]
// How many days are present in the local month ?
   var array      = [1,0,0,0]
   var shiftyear  = array[Math.round(4*((now.getFullYear()/4)-Math.round((now.getFullYear()/4)-.5)))]
   var array      = [31,28,31,30,31,30,31,31,30,31,30,31]
   var shiftyear  = shiftyear*((30-array[now.getMonth()])*(31-array[now.getMonth()])/6)
   var daysinmonth = array[now.getMonth()]+shiftyear
// Find shiftweek: is localweek later/earlier than SurfNetWeek ?
   var month28    = [0,1,0,0,0,0,0,1,1,0,0,0,0,0,1,1,0,0,0,0,0,1,1,0,0,0,0,0,1,0,0,0]
   var month29    = [0,1,0,0,0,0,0,1,1,0,0,0,0,0,1,1,0,0,0,0,0,1,1,0,0,0,0,0,1,1,0,0]
   var month30    = [0,1,0,0,0,0,0,1,1,0,0,0,0,0,1,1,0,0,0,0,0,1,1,0,0,0,0,0,1,1,1,0]
   var month31    = [0,1,0,0,0,0,0,1,1,0,0,0,0,0,1,1,0,0,0,0,0,1,1,0,0,0,0,0,1,1,0,1]
   var shiftweek28 = (month28[now.getDate()])*((29-daysinmonth)*(30-daysinmonth)*(31-daysinmonth)/6)
   var shiftweek29 = (month29[now.getDate()])*((daysinmonth-28)*(30-daysinmonth)*(31-daysinmonth)/2)
   var shiftweek30 = (month30[now.getDate()])*((daysinmonth-28)*(daysinmonth-29)*(31-daysinmonth)/2)
   var shiftweek31 = (month31[now.getDate()])*((daysinmonth-28)*(daysinmonth-29)*(daysinmonth-30)/6)
   var shiftweek  = shiftday*(shiftweek28+shiftweek29+shiftweek30+shiftweek31)
// Find SurfNetWeek and SurfNetYear.
   var array      = [0,1,1,1,1,1,1,1,2,2,2,2,2,2,2,3,3,3,3,3,3,3,4,4,4,4,4,4,4,5,5,5]
   var SurfNetWeek = (array[now.getDate()]+5*(now.getMonth()))-shiftweek
   var array      = [60,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,1]
   var shiftyear  = (array[SurfNetWeek]-SurfNetWeek)/60
   var SurfNetWeek = array[SurfNetWeek]
   var firstdate   = SurfNetWeek
   var SurfNetWeek = ((SurfNetWeek<10)?"0":"")+SurfNetWeek
   var SurfNetYear = now.getFullYear()-shiftyear
// Find SurfNetMonth (0=january, 11=december).
   var SurfNetMonth = Math.round(((SurfNetWeek-1)/5)-.5)
   var array      = ['January','February','March','April','May','June','July','August','September','October','November','December']
   var months     = array[SurfNetMonth]
// Find SurfNetLeapYear: is SurfNetYear a leap year ? (0=no, 1=yes)
   var array      = [1,0,0,0]
   var SurfNetLeapYear = array[Math.round(4*((now.getFullYear()/4)-Math.round((now.getFullYear()/4)-.5)))]
// Find first date of SurfNet week.
   var array      = [0,1,8,15,22,29,1,8,15,22,29,1,8,15,22,29,1,8,15,22,29,1,8,15,22,29,1,8,15,22,29,1,8,15,22,29,1,8,15,22,29,1,8,15,22,29,1,8,15,22,29,1,8,15,22,29,1,8,15,22,29]
   var firstdate  = array[firstdate]
// Find first day of SurfNet week.
   var firstday   = Math.round(30.6*((SurfNetMonth+1)+(((SurfNetMonth+1)<3)?13:1))-0.5)+Math.round(365.25*(SurfNetYear+(((SurfNetMonth+1)<3)?-1:0))-0.5)+firstdate+1720981.5
   var firstday   = (firstday+1.5)/7
   var firstday   = Math.round(7*(firstday-Math.round(firstday-.5)))
// Find shiftdate: how many days is SurfNetDay later than first day of SurfNet week ?
   var shiftdate  = 7+SurfNetDay-firstday
   var array      = [0,1,2,3,4,5,6,0,1,2,3,4,5,6]    
   var shiftdate  = array[shiftdate]
// Find SurfNet date.
   var SurfNetDate = firstdate+shiftdate
   var SurfNetDate = ((SurfNetDate<10)?"0":"")+SurfNetDate
// Find SurfNet time.
   var array      = [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,0,1,2]
   var SurfNetHours   = 24+now.getUTCHours()-SurfNetTimezone
   var SurfNetHours   = array[SurfNetHours]
   var SurfNetMinutes = now.getUTCMinutes()
   var SurfNetSeconds = now.getUTCSeconds()
   var SurfNetTime    = ((SurfNetHours<10)?"0":"")+SurfNetHours+((SurfNetMinutes<10)?":0":":")+SurfNetMinutes+((SurfNetSeconds<10)?":0":":")+SurfNetSeconds
// Reload page at 00:00:00 SurfNetTime.
   var reload = 24*3600-(3600*SurfNetHours+60*SurfNetMinutes+SurfNetSeconds)
   document.write("<header>")
   document.write("<META HTTP-EQUIV=Refresh CONTENT="+reload+" URL="+document.location.href+">")
   document.write("</header>")
// The html.
   document.write("<br><a name=archives></a><center><table bgcolor=white border=0><tr><td width=150 valign=center>")
   document.write("<img src=http://www.me-net.combidom.com/graphics/helsetsir.gif alt=[logo] align=left border=0 width=150 hspace=25></td>")
   document.write("<td valign=center bgcolor=#531C21><table border=0><tr>")
   document.write("<td valign=center bgcolor=#531C21><center><font size=6 color=white>")
   document.write("&nbsp;&nbsp;&nbsp;<b>ME-NET&nbsp;&nbsp;&nbsp;<hr>&nbsp;&nbsp;&nbsp;List</b>&nbsp;&nbsp;&nbsp;</font>")
   document.write("<br><br><b style='color:white;font-size:12px;font-weight:bold;background-color:#ff6600'>&nbsp;&nbsp;password=public&nbsp;</b></center>")
   document.write("</td><td>")
   document.write("<table border=0 bgcolor=#531C21 link=white vlink=white>")
   // Archives.
   var colour    = ['#b38f91','white','white','white','white','white','white']
   var year      = SurfNetYear-100*Math.round((SurfNetYear/100)-.5)
   var year      = ((year<10)?"0":"")+year
   var month     = SurfNetMonth+1
   var month     = ((month<10)?"0":"")+month
   var archive   = "https://listserv.surfnet.nl/scripts/WA.EXE?A1=ind"+year+month+"&L=me-net&O=D&H=1&D=0&T=1"
   document.write("<tr><td colspan=2 width=150 align=left >")
   document.write("<table width=100% border=1><tr><td bgcolor=#b38f91 width=49%>")
   // Today.
   document.write("<a href=https://listserv.surfnet.nl/scripts/wa.exe?S2=me-net&I=1&X=-&Y=public@combidom.com&a=today&b=today&0=S&q=From: target=_content style='text-decoration:none'><font size=2 color=#531C21><b>Today</b></font></a>")
   document.write("</td><td bgcolor=#b38f91>")
   // Yesterday.
   document.write("<a href=https://listserv.surfnet.nl/scripts/wa.exe?S2=me-net&I=1&X=-&Y=public@combidom.com&a=today-1&b=today-1&0=S&q=From: target=_content style='text-decoration:none'><font size=2 color=#531C21><b>Yesterday</b></font></a>")
   document.write("</td></tr><tr><td>")
   // Sunday.
   var array     = [0,1,2,3,4,5,6]
   var back      = array[SurfNetDay]
   var archive   = "https://listserv.surfnet.nl/scripts/WA.EXE?S2=me-net&I=1&X=-&Y=public@combidom.com&a=today-"+back+"&b=today-"+back+"&q=From:"
   document.write("<a href="+archive+" target=_content style='text-decoration:none'><font size=2 color="+colour[back]+"><b>Sunday</b></font></a>")
   document.write("</td><td>")
   // Monday.
   var array     = [6,0,1,2,3,4,5]
   var back      = array[SurfNetDay]
   var archive   = "https://listserv.surfnet.nl/scripts/WA.EXE?S2=me-net&I=1&X=-&Y=public@combidom.com&a=today-"+back+"&b=today-"+back+"&q=From:"
   document.write("<a href="+archive+" target=_content style='text-decoration:none'><font size=2 color="+colour[back]+"><b>Monday</b></font></a>")
   document.write("</td></tr><tr><td>")
   // Tuesday.
   var array     = [5,6,0,1,2,3,4]
   var back      = array[SurfNetDay]
   var archive   = "https://listserv.surfnet.nl/scripts/WA.EXE?S2=me-net&I=1&X=-&Y=public@combidom.com&a=today-"+back+"&b=today-"+back+"&q=From:"
   document.write("<a href="+archive+" target=_content style='text-decoration:none'><font size=2 color="+colour[back]+"><b>Tuesday</b></font></a>")
   document.write("</td><td>")
   // Wednesday.
   var array     = [4,5,6,0,1,2,3]
   var back      = array[SurfNetDay]
   var archive   = "https://listserv.surfnet.nl/scripts/WA.EXE?S2=me-net&I=1&X=-&Y=public@combidom.com&a=today-"+back+"&b=today-"+back+"&q=From:"
   document.write("<a href="+archive+" target=_content style='text-decoration:none'><font size=2 color="+colour[back]+"><b>Wednesday</b></font></a>")
   document.write("</td></tr><tr><td>")
   // Thursday.
   var array     = [3,4,5,6,0,1,2]
   var back      = array[SurfNetDay]
   var archive   = "https://listserv.surfnet.nl/scripts/WA.EXE?S2=me-net&I=1&X=-&Y=public@combidom.com&a=today-"+back+"&b=today-"+back+"&q=From:"
   document.write("<a href="+archive+" target=_content style='text-decoration:none'><font size=2 color="+colour[back]+"><b>Thursday</b></font></a>")
   document.write("</td><td>")
   // Friday.
   var array     = [2,3,4,5,6,0,1]
   var back      = array[SurfNetDay]
   var archive   = "https://listserv.surfnet.nl/scripts/WA.EXE?S2=me-net&I=1&X=-&Y=public@combidom.com&a=today-"+back+"&b=today-"+back+"&q=From:"
   document.write("<a href="+archive+" target=_content style='text-decoration:none'><font size=2 color="+colour[back]+"><b>Friday</b></font></a>")
   document.write("</td></tr><tr><td>")
   // Saturday.
   var array     = [1,2,3,4,5,6,0]
   var back      = array[SurfNetDay]
   var archive   = "https://listserv.surfnet.nl/scripts/WA.EXE?S2=me-net&I=1&X=-&Y=public@combidom.com&a=today-"+back+"&b=today-"+back+"&q=From:"
   document.write("<a href="+archive+" target=_content style='text-decoration:none'><font size=2 color="+colour[back]+"><b>Saturday</b></font></a>")
   // All.
   document.write("</td><td bgcolor=#b38f91>")
   document.write("<a href=https://listserv.surfnet.nl/scripts/WA.EXE?A0=me-net&X=-&Y=public%40combidom.com target=_content style='text-decoration:none'><font size=2 color=#531C21><b>All</b></font></a>")
   // End table past week.
   document.write("</td></tr></table>")
   document.write("</td></tr>")
   // RSS/XML/HOME.
   document.write("<tr><td colspan=2 align=center width=150><a href=https://listserv.surfnet.nl/scripts/WA.EXE?RSS&L=me-net&v=1.0 style='text-decoration:none' target=_content><b style='color:white;font-size:10px;font-weight:bold;background-color:#ff6600'>&nbsp;&nbsp;RSS&nbsp;&nbsp;</b></a>&nbsp;<a href=https://listserv.surfnet.nl/scripts/WA.EXE?RSS&L=me-net&v=ATOM1.0 style='text-decoration:none' target=_content><b style='color:white;font-size:10px;font-weight:bold;background-color:#ff6600'>&nbsp;XML&nbsp;</b></a>&nbsp;<a href=http://www.lsoft.com/scripts/WL.EXE?SL1=me-net&H=NIC.SURFNET.NL style='text-decoration:none' target=_content><b style='color:white;font-size:10px;font-weight:bold;background-color:#ff6600'>&nbsp;HOME&nbsp;</b></a></td></tr>")
   // Search past week.
   document.write("<tr><td colspan=2 align=center width=150><font size=2 color=white><b>Search Past Week's List</b></font></td></tr>")
   document.write("<tr><td width=150 colspan=2 align=left valign=center>")
   document.write("<FORM action=https://listserv.surfnet.nl/scripts/WA.EXE TARGET=_content>")
   document.write("<INPUT TYPE=HIDDEN NAME=S2 VALUE=me-net>")
   document.write("<INPUT TYPE=HIDDEN NAME=a  VALUE=today-6>")
   document.write("<INPUT TYPE=HIDDEN NAME=b  VALUE=today>")
   document.write("<INPUT TYPE=HIDDEN NAME=I  VALUE=1>")
   document.write("<INPUT TYPE=TEXT   NAME=q style=width:100%;background-color:#b38f91;font-weight:bold;font-size:15px;color:#531C21;border:0 VALUE=''>")
   document.write("</FORM>")
   document.write("</td></tr></table>")
   document.write("</td></tr></table></td></tr></table></center><br><br>")
   document.write("<center><table border=0><tr><td>")
   document.write("<a href=http://www.me-net.combidom.com><b><font color=#531C21 size=2>Home page</font></b></a>")
   document.write("</td><td><font size=2 color=#531C21><b>-</b></font></td><td>")
   document.write("<a href=http://www.me-net.combidom.com/dutch/><b><font color=#531C21 size=2>Dutch</font></b></a>")
   document.write("</td><td><font size=2 color=#531C21><b>-</b></font></td><td>")
   document.write("<a href=http://www.me-net.combidom.com/library/><b><font color=#531C21 size=2>Library</font></b></a>")
   document.write("</td><td><font size=2 color=#531C21><b>-</b></font></td><td>")
   document.write("<a href=http://www.me-net.combidom.com/melist/><b><font color=#531C21 size=2>List</font></b></a>")
   document.write("</td><td><font size=2 color=#531C21><b>-</b></font></td><td>")
   document.write("<a href=http://www.me-net.combidom.com/myME-NET/><b><font color=#531C21 size=2>myME-NET</font></b></a>")
   document.write("</td><td><font size=2 color=#531C21><b>-</b></font></td><td>")
   document.write("<a href=http://www.me-net.combidom.com/cemsep/><b><font color=#531C21 size=2>Search</font></b></a>")
   document.write("</td><td><font size=2 color=#531C21><b>-</b></font></td><td>")
   document.write("<a href=http://www.me-net.combidom.com/meweb/><b><font color=#531C21 size=2>WebSites</font></b></a>")
   document.write("</td><td><font size=2 color=#531C21><b>-</b></font></td><td>")
   document.write("<a href=http://www.me-net.combidom.com/webtv/><b><font color=#531C21 size=2>WebTV</font></b></a>")
   document.write("</td></tr></table</center>")
   document.write("<br>")