//--------------------------------------------------------------------//
// All code and graphics (C) Silver Circle / Merlin Sythove 2003-2011 //
// No off-site hosting or copying allowed. All rights reserved        //
//--------------------------------------------------------------------//
var gLanguage="";
var gCookieName="sc_moon_data";
var sCookie = '';
var nToday = new Date();
var nNextSabbathName = "";
var nNextSabbathDate = "";
var nThisNewMoonName = "";
var nThisNewMoonDate = "";
var nNextNewMoonName = "";
var nNextNewMoonDate = "";
var nNextFullMoonName = "";
var nNextFullMoonDate = "";
var nMoonAge = 0;
var nMoonPhase = 0;
var nMoonPicture = 0;
var glText = new Array();
var gWrite = new Array();

//new Date: Months are zero-based !!!
//Sunset calculations 52N 5E: http://aa.usno.navy.mil/data/docs/RS_OneYear.html
//Equinoxes: http://aa.usno.navy.mil/data/docs/EarthSeasons.html
//Samhain is still summertime in 2004 and 2010, last saturday in october MAY just fall on 31st (checked up to 2020)
//Beltane is always summertime, after last saturday in March, which is always after Ostara anyway
//Summertime: http://www.phys.uu.nl/~vgent/wettijd/wt_text4d.htm

t=1; //GMT offset
s=2; //GMT summer time offset
sNames = ['', 'Imbolc', 'Ostara', 'Beltane', 'Litha', 'Lughnasadh', 'Mabon', 'Samhain', 'Yule'];

//Date sabbat in UTC yyyy mm-1 dd hh+t mm
var aSabbaths=[["Begin",new Date(2000,0,1,0,0)],
	[sNames[1],new Date(2000,1,1,16+t,07)],
	[sNames[2],new Date(2000,2,2,7+t,35)],
	[sNames[3],new Date(2000,3,30,18+s,44)],
	[sNames[4],new Date(2000,5,21,01+s,48)],
	[sNames[5],new Date(2000,6,31,19+s,11)],
	[sNames[6],new Date(2000,8,22,17+s,27)],
	[sNames[7],new Date(2000,9,31,15+t,53)],
	[sNames[8],new Date(2000,11,21,13+t,37)],
		[sNames[1],new Date(2001,1,1,16+t,8)],
		[sNames[2],new Date(2001,2,20,13+t,31)],
		[sNames[3],new Date(2001,3,30,18+s,43)],
		[sNames[4],new Date(2001,5,21,07+s,38)],
		[sNames[5],new Date(2001,6,31,19+s,11)],
		[sNames[6],new Date(2001,8,22,23+s,04)],
		[sNames[7],new Date(2001,9,31,15+t,53)],
		[sNames[8],new Date(2001,11,21,19+t,21)],
	[sNames[1],new Date(2002,1,1,16+t,8)],
	[sNames[2],new Date(2002,2,20,19+t,16)],
	[sNames[3],new Date(2002,3,30,18+s,43)],
	[sNames[4],new Date(2002,5,21,13+s,24)],
	[sNames[5],new Date(2002,6,31,19+s,12)],
	[sNames[6],new Date(2002,8,23,04+s,55)],
	[sNames[7],new Date(2002,9,31,15+t,54)],
	[sNames[8],new Date(2002,11,22,01+t,14)],
		[sNames[1],new Date(2003,1,1,16+t,07)],
		[sNames[2],new Date(2003,2,21,01+t,00)],
		[sNames[3],new Date(2003,3,30,18+s,43)],
		[sNames[4],new Date(2003,5,21,19+s,10)],
		[sNames[5],new Date(2003,6,31,19+s,12)],
		[sNames[6],new Date(2003,8,23,10+s,47)],
		[sNames[7],new Date(2003,9,31,15+t,54)],
		[sNames[8],new Date(2003,11,22,07+t,04)],
	[sNames[1],new Date(2004,1,1,16+t,07)],
	[sNames[2],new Date(2004,2,20,06+t,49)],
	[sNames[3],new Date(2004,3,30,18+s,44)],
	[sNames[4],new Date(2004,5,21,00+s,57)],
	[sNames[5],new Date(2004,6,31,19+s,11)],
	[sNames[6],new Date(2004,8,22,16+s,30)],
	[sNames[7],new Date(2004,9,31,15+s,53)],
	[sNames[8],new Date(2004,11,21,12+t,42)],
		[sNames[1],new Date(2005,1,1,16+t,8)],
		[sNames[2],new Date(2005,2,20,12+t,33)],
		[sNames[3],new Date(2005,3,30,18+s,43)],
		[sNames[4],new Date(2005,5,21,06+s,46)],
		[sNames[5],new Date(2005,6,31,19+s,11)],
		[sNames[6],new Date(2005,8,22,22+s,23)],
		[sNames[7],new Date(2005,9,31,15+t,53)],
		[sNames[8],new Date(2005,11,21,18+t,35)],
	[sNames[1],new Date(2006,1,1,16+t,8)],
	[sNames[2],new Date(2006,2,20,18+t,26)],
	[sNames[3],new Date(2006,3,30,18+s,43)],
	[sNames[4],new Date(2006,5,21,12+s,26)],
	[sNames[5],new Date(2006,6,31,19+s,12)],
	[sNames[6],new Date(2006,8,23,04+s,03)],
	[sNames[7],new Date(2006,9,31,15+t,54)],
	[sNames[8],new Date(2006,11,22,00+t,22)],
		[sNames[1],new Date(2007,1,1,16+t,07)],
		[sNames[2],new Date(2007,2,21,00+t,07)],
		[sNames[3],new Date(2007,3,30,18+s,43)],
		[sNames[4],new Date(2007,5,21,18+s,06)],
		[sNames[5],new Date(2007,6,31,19+s,12)],
		[sNames[6],new Date(2007,8,23,9+s,51)],
		[sNames[7],new Date(2007,9,31,15+t,54)],
		[sNames[8],new Date(2007,11,22,06+t,8)],
	[sNames[1],new Date(2008,1,1,16+t,07)],
	[sNames[2],new Date(2008,2,20,05+t,48)],
	[sNames[3],new Date(2008,3,30,18+s,44)],
	[sNames[4],new Date(2008,5,20,23+s,59)],
	[sNames[5],new Date(2008,6,31,19+s,11)],
	[sNames[6],new Date(2008,8,22,15+s,44)],
	[sNames[7],new Date(2008,9,31,15+t,53)],
	[sNames[8],new Date(2008,11,21,12+t,04)],
		[sNames[1],new Date(2009,1,1,16+t,8)],
		[sNames[2],new Date(2009,2,20,11+t,44)],
		[sNames[3],new Date(2009,3,30,18+s,43)],
		[sNames[4],new Date(2009,5,21,05+s,45)],
		[sNames[5],new Date(2009,6,31,19+s,11)],
		[sNames[6],new Date(2009,8,22,21+s,18)],
		[sNames[7],new Date(2009,9,31,15+t,53)],
		[sNames[8],new Date(2009,11,21,17+t,47)],
	[sNames[1],new Date(2010,1,1,16+t,8)],
	[sNames[2],new Date(2010,2,20,17+t,32)],
	[sNames[3],new Date(2010,3,30,18+s,43)],
	[sNames[4],new Date(2010,5,21,11+s,28)],
	[sNames[5],new Date(2010,6,31,19+s,12)],
	[sNames[6],new Date(2010,8,23,03+s,9)],
	[sNames[7],new Date(2010,9,31,15+s,54)],
	[sNames[8],new Date(2010,11,21,23+t,38)],
		[sNames[1],new Date(2011,1,1,16+t,07)],
		[sNames[2],new Date(2011,2,20,23+t,21)],
		[sNames[3],new Date(2011,3,30,18+s,43)],
		[sNames[4],new Date(2011,5,21,17+s,16)],
		[sNames[5],new Date(2011,6,31,19+s,12)],
		[sNames[6],new Date(2011,8,23,9+s,05)],
		[sNames[7],new Date(2011,9,31,15+t,54)],
		[sNames[8],new Date(2011,11,22,05+t,30)],
	[sNames[1],new Date(2012,1,1,16+t,07)],
	[sNames[2],new Date(2012,2,20,05+t,14)],
	[sNames[3],new Date(2012,3,30,18+s,44)],
	[sNames[4],new Date(2012,5,20,23+s,9)],
	[sNames[5],new Date(2012,6,31,19+s,11)],
	[sNames[6],new Date(2012,8,22,14+s,49)],
	[sNames[7],new Date(2012,9,31,15+t,53)],
	[sNames[8],new Date(2012,11,21,11+t,12)],
		[sNames[1],new Date(2013,1,1,16+t,8)],
		[sNames[2],new Date(2013,2,20,11+t,02)],
		[sNames[3],new Date(2013,3,30,18+s,43)],
		[sNames[4],new Date(2013,5,21,05+s,04)],
		[sNames[5],new Date(2013,6,31,19+s,11)],
		[sNames[6],new Date(2013,8,22,20+s,44)],
		[sNames[7],new Date(2013,9,31,15+t,53)],
		[sNames[8],new Date(2010,11,21,17+t,11)],
	[sNames[1],new Date(2014,1,1,16+t,8)],
	[sNames[2],new Date(2014,2,20,16+t,57)],
	[sNames[3],new Date(2014,3,30,18+s,43)],
	[sNames[4],new Date(2014,5,21,10+s,51)],
	[sNames[5],new Date(2014,6,31,19+s,12)],
	[sNames[6],new Date(2014,8,23,02+s,29)],
	[sNames[7],new Date(2014,9,31,15+t,54)],
	[sNames[8],new Date(2014,11,21,23+t,03)],
		[sNames[1],new Date(2015,1,1,16+t,07)],
		[sNames[2],new Date(2015,2,20,22+t,45)],
		[sNames[3],new Date(2015,3,30,18+s,43)],
		[sNames[4],new Date(2015,5,21,16+s,38)],
		[sNames[5],new Date(2015,6,31,19+s,12)],
		[sNames[6],new Date(2015,8,23,8+s,21)],
		[sNames[7],new Date(2015,9,31,15+t,54)],
		[sNames[8],new Date(2015,11,22,04+t,48)],
	[sNames[1],new Date(2016,1,1,16+t,07)],
	[sNames[2],new Date(2016,2,20,04+t,30)],
	[sNames[3],new Date(2016,3,30,18+s,44)],
	[sNames[4],new Date(2016,5,20,22+s,34)],
	[sNames[5],new Date(2016,6,31,19+s,11)],
	[sNames[6],new Date(2016,8,22,14+s,21)],
	[sNames[7],new Date(2016,9,31,15+t,53)],
	[sNames[8],new Date(2016,11,21,10+t,44)],
		[sNames[1],new Date(2017,1,1,16+t,8)],
		[sNames[2],new Date(2017,2,20,10+t,29)],
		[sNames[3],new Date(2017,3,30,18+s,43)],
		[sNames[4],new Date(2017,5,21,04+s,24)],
		[sNames[5],new Date(2017,6,31,19+s,11)],
		[sNames[6],new Date(2017,8,22,20+s,02)],
		[sNames[7],new Date(2017,9,31,15+t,53)],
		[sNames[8],new Date(2017,11,21,16+t,28)],
	[sNames[1],new Date(2018,1,1,16+t,8)],
	[sNames[2],new Date(2018,2,20,16+t,15)],
	[sNames[3],new Date(2018,3,30,18+s,43)],
	[sNames[4],new Date(2018,5,21,10+s,07)],
	[sNames[5],new Date(2018,6,31,19+s,12)],
	[sNames[6],new Date(2018,8,23,01+s,54)],
	[sNames[7],new Date(2018,9,31,15+t,54)],
	[sNames[8],new Date(2018,11,21,22+t,23)],
		[sNames[1],new Date(2019,1,1,16+t,07)],
		[sNames[2],new Date(2019,2,20,21+t,58)],
		[sNames[3],new Date(2019,3,30,18+s,43)],
		[sNames[4],new Date(2019,5,21,15+s,54)],
		[sNames[5],new Date(2019,6,31,19+s,12)],
		[sNames[6],new Date(2019,8,23,07+s,50)],
		[sNames[7],new Date(2019,9,31,15+t,54)],
		[sNames[8],new Date(2019,11,22,04+t,19)],
	[sNames[1],new Date(2020,1,1,16+t,07)],
	[sNames[2],new Date(2020,2,20,03+t,50)],
	[sNames[3],new Date(2020,3,30,18+s,44)],
	[sNames[4],new Date(2020,5,20,21+s,44)],
	[sNames[5],new Date(2020,6,31,19+s,11)],
	[sNames[6],new Date(2020,8,22,13+s,31)],
	[sNames[7],new Date(2020,9,31,15+t,53)],
	[sNames[8],new Date(2020,11,21,10+t,02)],
		["End",new Date(2020,11,31,23,59)]];


mNames = ['Ice Moon', 'Snow Moon', 'Death Moon', 'Awakening Moon', 'Grass Moon', 'Planting Moon',
	'Rose Moon', 'Lightning Moon', 'Harvest Moon', 'Hunters Moon', 'Blood Moon', 'Tree Moon', 'Long Night Moon'];
//Date new, date full moon in UTC yyyy mm-1 dd hh+t mm
var aEsbats=[[mNames[1],new Date(2000,0,6,18+t,14),new Date(2000,0,21,4+t,40)],
 	[mNames[2],new Date(2000,1,5,13+t,03),new Date(2000,1,19,16+t,27)],
	[mNames[3],new Date(2000,2,6,5+t,17),new Date(2000,2,20,4+t,44)],
	[mNames[4],new Date(2000,3,4,18+s,12),new Date(2000,3,18,17+s,42)],
	[mNames[5],new Date(2000,4,4,4+s,12),new Date(2000,4,18,7+s,34)],
	[mNames[6],new Date(2000,5,2,12+s,14),new Date(2000,5,16,22+s,27)],
	[mNames[7],new Date(2000,6,1,19+s,20),new Date(2000,6,16,13+s,55)],
	[mNames[8],new Date(2000,6,31,2+s,25),new Date(2000,7,15,5+s,13)],
	[mNames[9],new Date(2000,7,29,10+s,19),new Date(2000,8,13,19+s,37)],
	[mNames[10],new Date(2000,8,27,19+s,53),new Date(2000,9,13,8+s,53)],
	[mNames[11],new Date(2000,9,27,7+s,58),new Date(2000,10,11,21+t,15)],
	[mNames[12],new Date(2000,10,25,23+t,11),new Date(2000,11,11,9+t,03)],
	[mNames[0],new Date(2000,11,25,17+t,22),new Date(2001,0,9,20+t,24)],
 		[mNames[1],new Date(2001,0,24,13+t,07),new Date(2001,1,8,7+t,12)],
		[mNames[2],new Date(2001,1,23,8+t,21),new Date(2001,2,9,17+t,23)],
		[mNames[3],new Date(2001,2,25,1+s,21),new Date(2001,3,8,3+s,22)],
		[mNames[4],new Date(2001,3,23,15+s,26),new Date(2001,4,7,13+s,53)],
		[mNames[5],new Date(2001,4,23,2+s,46),new Date(2001,5,6,1+s,39)],
		[mNames[6],new Date(2001,5,21,11+s,58),new Date(2001,6,5,15+s,04)],
		[mNames[7],new Date(2001,6,20,19+s,44),new Date(2001,7,4,5+s,56)],
		[mNames[8],new Date(2001,7,19,2+s,55),new Date(2001,8,2,21+s,43)],
		[mNames[9],new Date(2001,8,17,10+s,27),new Date(2001,9,2,13+s,49)],
		[mNames[10],new Date(2001,9,16,19+s,23),new Date(2001,10,1,5+t,41)],
		[mNames[11],new Date(2001,10,15,6+t,40),new Date(2001,10,30,20+t,49)],
		[mNames[12],new Date(2001,11,14,20+t,47),new Date(2001,11,30,10+t,41)],
	[mNames[1],new Date(2002,0,13,13+t,29),new Date(2002,0,28,22+t,50)],
	[mNames[2],new Date(2002,1,12,7+t,41),new Date(2002,1,27,9+t,17)],
	[mNames[3],new Date(2002,2,14,2+t,03),new Date(2002,2,28,18+t,25)],
	[mNames[4],new Date(2002,3,12,19+s,21),new Date(2002,3,27,3+s,00)],
	[mNames[5],new Date(2002,4,12,10+s,45),new Date(2002,4,26,11+s,51)],
	[mNames[6],new Date(2002,5,10,23+s,47),new Date(2002,5,24,21+s,42)],
	[mNames[7],new Date(2002,6,10,10+s,26),new Date(2002,6,24,9+s,07)],
	[mNames[8],new Date(2002,7,8,19+s,15),new Date(2002,7,22,22+s,29)],
	[mNames[9],new Date(2002,8,7,3+s,10),new Date(2002,8,21,13+s,59)],
	[mNames[10],new Date(2002,9,6,11+s,18),new Date(2002,9,21,7+s,20)],
	[mNames[11],new Date(2002,10,4,20+t,34),new Date(2002,10,20,1+t,34)],
	[mNames[12],new Date(2002,11,4,7+t,34),new Date(2002,11,19,19+t,10)],
		[mNames[1],new Date(2003,0,2,20+t,23),new Date(2003,0,18,10+t,48)],
		[mNames[2],new Date(2003,1,1,10+t,48),new Date(2003,1,16,23+t,51)],
		[mNames[3],new Date(2003,2,3,2+t,35),new Date(2003,2,18,10+t,35)],
		[mNames[4],new Date(2003,3,1,19+s,19),new Date(2003,3,16,19+s,36)],
		[mNames[5],new Date(2003,4,1,12+s,15),new Date(2003,4,16,3+s,36)],
		[mNames[6],new Date(2003,4,31,4+s,20),new Date(2003,5,14,11+s,16)],
		[mNames[7],new Date(2003,5,29,18+s,39),new Date(2003,6,13,19+s,21)],
		[mNames[8],new Date(2003,6,29,6+s,53),new Date(2003,7,12,4+s,48)],
		[mNames[9],new Date(2003,7,27,17+s,26),new Date(2003,8,10,16+s,36)],
		[mNames[10],new Date(2003,8,26,3+s,9),new Date(2003,9,10,7+s,27)],
		[mNames[11],new Date(2003,9,25,12+s,50),new Date(2003,10,9,1+t,13)],
		[mNames[12],new Date(2003,10,23,22+t,59),new Date(2003,11,8,20+t,37)],
		[mNames[0],new Date(2003,11,23,9+t,43),new Date(2004,0,7,15+t,40)],
	[mNames[1],new Date(2004,0,21,21+t,05),new Date(2004,1,6,8+t,47)],
	[mNames[2],new Date(2004,1,20,9+t,18),new Date(2004,2,6,23+t,14)],
	[mNames[3],new Date(2004,2,20,22+t,41),new Date(2004,3,5,11+s,03)],
	[mNames[4],new Date(2004,3,19,13+s,21),new Date(2004,4,4,20+s,33)],
	[mNames[5],new Date(2004,4,19,4+s,52),new Date(2004,5,3,4+s,20)],
	[mNames[6],new Date(2004,5,17,20+s,27),new Date(2004,6,2,11+s,9)],
	[mNames[7],new Date(2004,6,17,11+s,24),new Date(2004,6,31,18+s,05)],
	[mNames[8],new Date(2004,7,16,1+s,24),new Date(2004,7,30,2+s,22)],
	[mNames[9],new Date(2004,8,14,14+s,29),new Date(2004,8,28,13+s,9)],
	[mNames[10],new Date(2004,9,14,2+s,48),new Date(2004,9,28,3+s,07)],
	[mNames[11],new Date(2004,10,12,14+t,27),new Date(2004,10,26,20+t,07)],
	[mNames[12],new Date(2004,11,12,1+t,29),new Date(2004,11,26,15+t,06)],
		[mNames[1],new Date(2005,0,10,12+t,03),new Date(2005,0,25,10+t,32)],
		[mNames[2],new Date(2005,1,8,22+t,28),new Date(2005,1,24,4+t,54)],
		[mNames[3],new Date(2005,2,10,9+t,10),new Date(2005,2,25,20+t,58)],
		[mNames[4],new Date(2005,3,8,20+s,32),new Date(2005,3,24,10+s,06)],
		[mNames[5],new Date(2005,4,8,8+s,45),new Date(2005,4,23,20+s,18)],
		[mNames[6],new Date(2005,5,6,21+s,55),new Date(2005,5,22,4+s,14)],
		[mNames[7],new Date(2005,6,6,12+s,02),new Date(2005,6,21,11+s,00)],
		[mNames[8],new Date(2005,7,5,3+s,05),new Date(2005,7,19,17+s,53)],
		[mNames[9],new Date(2005,8,3,18+s,45),new Date(2005,8,18,2+s,01)],
		[mNames[10],new Date(2005,9,3,10+s,28),new Date(2005,9,17,12+s,14)],
		[mNames[11],new Date(2005,10,2,1+t,25),new Date(2005,10,16,0+t,58)],
		[mNames[12],new Date(2005,11,1,15+t,01),new Date(2005,11,15,16+t,16)],
		[mNames[1],new Date(2005,11,31,3+t,12),new Date(2006,0,14,9+t,48)],
	[mNames[2],new Date(2006,0,29,14+t,15),new Date(2006,1,13,4+t,44)],
	[mNames[3],new Date(2006,1,28,0+t,31),new Date(2006,2,14,23+t,35)],
	[mNames[4],new Date(2006,2,29,10+s,15),new Date(2006,3,13,16+s,40)],
	[mNames[5],new Date(2006,3,27,19+s,44),new Date(2006,4,13,6+s,51)],
	[mNames[6],new Date(2006,4,27,5+s,26),new Date(2006,5,11,18+s,03)],
	[mNames[7],new Date(2006,5,25,16+s,05),new Date(2006,6,11,3+s,02)],
	[mNames[8],new Date(2006,6,25,4+s,31),new Date(2006,7,9,10+s,54)],
	[mNames[9],new Date(2006,7,23,19+s,10),new Date(2006,8,7,18+s,42)],
	[mNames[10],new Date(2006,8,22,11+s,45),new Date(2006,9,7,3+s,13)],
	[mNames[11],new Date(2006,9,22,5+s,14),new Date(2006,10,5,12+t,58)],
	[mNames[12],new Date(2006,10,20,22+t,18),new Date(2006,11,5,0+t,25)],
	[mNames[0],new Date(2006,11,20,14+t,01),new Date(2007,0,3,13+t,57)],
		[mNames[1],new Date(2007,0,19,4+t,01),new Date(2007,1,2,5+t,45)],
		[mNames[2],new Date(2007,1,17,16+t,14),new Date(2007,2,3,23+t,17)],
		[mNames[3],new Date(2007,2,19,2+t,43),new Date(2007,3,2,17+s,15)],
		[mNames[4],new Date(2007,3,17,11+s,36),new Date(2007,4,2,10+s,9)],
		[mNames[6],new Date(2007,4,16,19+s,27),new Date(2007,5,1,1+s,04)],
		[mNames[6],new Date(2007,5,15,3+s,13),new Date(2007,5,30,13+s,49)],
		[mNames[7],new Date(2007,6,14,12+s,04),new Date(2007,6,30,0+s,48)],
		[mNames[8],new Date(2007,7,12,23+s,02),new Date(2007,7,28,10+s,35)],
		[mNames[9],new Date(2007,8,11,12+s,44),new Date(2007,8,26,19+s,45)],
		[mNames[10],new Date(2007,9,11,5+s,01),new Date(2007,9,26,4+s,52)],
		[mNames[11],new Date(2007,10,9,23+t,03),new Date(2007,10,24,14+t,30)],
		[mNames[12],new Date(2007,11,9,17+t,40),new Date(2007,11,24,1+t,16)],
	[mNames[1],new Date(2008,0,8,11+t,37),new Date(2008,0,22,13+t,35)],
	[mNames[2],new Date(2008,1,7,3+t,44),new Date(2008,1,21,3+t,30)],
	[mNames[3],new Date(2008,2,7,17+t,14),new Date(2008,2,21,18+t,40)],
	[mNames[4],new Date(2008,3,6,3+s,55),new Date(2008,3,20,10+s,25)],
	[mNames[5],new Date(2008,4,5,12+s,18),new Date(2008,4,20,2+s,11)],
	[mNames[6],new Date(2008,5,3,19+s,23),new Date(2008,5,18,17+s,30)],
	[mNames[7],new Date(2008,6,3,2+s,19),new Date(2008,6,18,7+s,59)],
	[mNames[8],new Date(2008,7,1,10+s,13),new Date(2008,7,16,21+s,16)],
	[mNames[9],new Date(2008,7,30,19+s,58),new Date(2008,8,15,9+s,13)],
	[mNames[10],new Date(2008,8,29,8+s,12),new Date(2008,9,14,20+s,02)],
	[mNames[11],new Date(2008,9,28,23+t,14),new Date(2008,10,13,6+t,17)],
	[mNames[12],new Date(2008,10,27,16+t,55),new Date(2008,11,12,16+t,37)],
	[mNames[1],new Date(2008,11,27,12+t,22),new Date(2009,0,11,3+t,27)],
		[mNames[2],new Date(2009,0,26,7+t,55),new Date(2009,1,9,14+t,49)],
		[mNames[3],new Date(2009,1,25,1+t,35),new Date(2009,2,11,2+t,38)],
		[mNames[4],new Date(2009,2,26,16+t,06),new Date(2009,3,9,14+s,56)],
		[mNames[5],new Date(2009,3,25,3+s,23),new Date(2009,4,9,4+s,01)],
		[mNames[6],new Date(2009,4,24,12+s,11),new Date(2009,5,7,18+s,12)],
		[mNames[7],new Date(2009,5,22,19+s,35),new Date(2009,6,7,9+s,21)],
		[mNames[8],new Date(2009,6,22,2+s,35),new Date(2009,7,6,0+s,55)],
		[mNames[9],new Date(2009,7,20,10+s,02),new Date(2009,8,4,16+s,03)],
		[mNames[10],new Date(2009,8,18,18+s,44),new Date(2009,9,4,6+s,10)],
		[mNames[11],new Date(2009,9,18,5+s,33),new Date(2009,10,2,19+t,14)],
		[mNames[12],new Date(2009,10,16,19+t,14),new Date(2009,11,2,7+t,30)],
		[mNames[0],new Date(2009,11,16,12+t,02),new Date(2009,11,31,19+t,13)],
	[mNames[1],new Date(2010,0,15,7+t,11),new Date(2010,0,30,6+t,18)],
	[mNames[2],new Date(2010,1,14,2+t,51),new Date(2010,1,28,16+t,38)],
	[mNames[3],new Date(2010,2,15,21+t,01),new Date(2010,2,30,2+s,25)],
	[mNames[4],new Date(2010,3,14,12+s,29),new Date(2010,3,28,12+s,18)],
	[mNames[5],new Date(2010,4,14,1+s,04),new Date(2010,4,27,23+s,07)],
	[mNames[6],new Date(2010,5,12,11+s,15),new Date(2010,5,26,11+s,30)],
	[mNames[7],new Date(2010,6,11,19+s,40),new Date(2010,6,26,1+s,36)],
	[mNames[8],new Date(2010,7,10,3+s,8),new Date(2010,7,24,17+s,05)],
	[mNames[9],new Date(2010,8,8,10+s,30),new Date(2010,8,23,9+s,17)],
	[mNames[10],new Date(2010,9,7,18+s,44),new Date(2010,9,23,1+s,36)],
	[mNames[11],new Date(2010,10,6,4+t,52),new Date(2010,10,21,17+t,27)],
	[mNames[12],new Date(2010,11,5,17+t,36),new Date(2010,11,21,8+t,13)],
		[mNames[1],new Date(2011,0,4,9+t,03),new Date(2011,0,19,21+t,21)],
		[mNames[2],new Date(2011,1,3,2+t,31),new Date(2011,1,18,8+t,36)],
		[mNames[3],new Date(2011,2,4,20+t,46),new Date(2011,2,19,18+t,10)],
		[mNames[4],new Date(2011,3,3,14+s,32),new Date(2011,3,18,2+s,44)],
		[mNames[5],new Date(2011,4,3,6+s,51),new Date(2011,4,17,11+s,9)],
		[mNames[6],new Date(2011,5,1,21+s,03),new Date(2011,5,15,20+s,14)],
		[mNames[7],new Date(2011,6,1,8+s,54),new Date(2011,6,15,6+s,40)],
		[mNames[8],new Date(2011,6,30,18+s,40),new Date(2011,7,13,18+s,57)],
		[mNames[9],new Date(2011,7,29,3+s,04),new Date(2011,8,12,9+s,27)],
		[mNames[10],new Date(2011,8,27,11+s,9),new Date(2011,9,12,2+s,06)],
		[mNames[11],new Date(2011,9,26,19+s,56),new Date(2011,10,10,20+t,16)],
		[mNames[12],new Date(2011,10,25,6+t,10),new Date(2011,11,10,14+t,36)],
		[mNames[0],new Date(2011,11,24,18+t,06),new Date(2012,0,9,7+t,30)],
	[mNames[1],new Date(2012,0,23,7+t,39),new Date(2012,1,7,21+t,54)],
	[mNames[2],new Date(2012,1,21,22+t,35),new Date(2012,2,8,9+t,39)],
	[mNames[3],new Date(2012,2,22,14+t,37),new Date(2012,3,6,19+s,19)],
	[mNames[4],new Date(2012,3,21,7+s,18),new Date(2012,4,6,3+s,35)],
	[mNames[5],new Date(2012,4,20,23+s,47),new Date(2012,5,4,11+s,12)],
	[mNames[6],new Date(2012,5,19,15+s,02),new Date(2012,6,3,18+s,52)],
	[mNames[7],new Date(2012,6,19,4+s,24),new Date(2012,7,2,3+s,27)],
	[mNames[8],new Date(2012,7,17,15+s,54),new Date(2012,7,31,13+s,58)],
	[mNames[9],new Date(2012,8,16,2+s,11),new Date(2012,8,30,3+s,19)],
	[mNames[10],new Date(2012,9,15,12+s,02),new Date(2012,9,29,19+t,49)],
	[mNames[11],new Date(2012,10,13,22+t,8),new Date(2012,10,28,14+t,46)],
	[mNames[12],new Date(2012,11,13,8+t,42),new Date(2012,11,28,10+t,21)],
		[mNames[1],new Date(2013,0,11,19+t,44),new Date(2013,0,27,4+t,38)],
		[mNames[2],new Date(2013,1,10,7+t,20),new Date(2013,1,25,20+t,26)],
		[mNames[3],new Date(2013,2,11,19+t,51),new Date(2013,2,27,9+t,27)],
		[mNames[4],new Date(2013,3,10,9+s,35),new Date(2013,3,25,19+s,57)],
		[mNames[5],new Date(2013,4,10,0+s,28),new Date(2013,4,25,4+s,25)],
		[mNames[6],new Date(2013,5,8,15+s,56),new Date(2013,5,23,11+s,32)],
		[mNames[7],new Date(2013,6,8,7+s,14),new Date(2013,6,22,18+s,15)],
		[mNames[8],new Date(2013,7,6,21+s,51),new Date(2013,7,21,1+s,45)],
		[mNames[9],new Date(2013,8,5,11+s,36),new Date(2013,8,19,11+s,13)],
		[mNames[10],new Date(2013,9,5,0+s,34),new Date(2013,9,18,23+s,38)],
		[mNames[11],new Date(2013,10,3,12+t,50),new Date(2013,10,17,15+t,16)],
		[mNames[12],new Date(2013,11,3,0+t,22),new Date(2013,11,17,9+t,28)],
	[mNames[1],new Date(2014,0,1,11+t,14),new Date(2014,0,16,4+t,52)],
	[mNames[2],new Date(2014,0,30,21+t,38),new Date(2014,1,14,23+t,53)],
	[mNames[3],new Date(2014,2,1,8+t,00),new Date(2014,2,16,17+t,8)],
	[mNames[4],new Date(2014,2,30,18+s,45),new Date(2014,3,15,7+s,42)],
	[mNames[5],new Date(2014,3,29,6+s,14),new Date(2014,4,14,19+s,16)],
	[mNames[6],new Date(2014,4,28,18+s,40),new Date(2014,5,13,4+s,11)],
	[mNames[7],new Date(2014,5,27,8+s,8),new Date(2014,6,12,11+s,25)],
	[mNames[8],new Date(2014,6,26,22+s,42),new Date(2014,7,10,18+s,9)],
	[mNames[9],new Date(2014,7,25,14+s,13),new Date(2014,8,9,1+s,38)],
	[mNames[10],new Date(2014,8,24,6+s,14),new Date(2014,9,8,10+s,51)],
	[mNames[11],new Date(2014,9,23,21+s,57),new Date(2014,10,6,22+t,23)],
	[mNames[12],new Date(2014,10,22,12+t,32),new Date(2014,11,6,12+t,27)],
	[mNames[0],new Date(2014,11,22,1+t,36),new Date(2015,0,5,4+t,53)],
		[mNames[1],new Date(2015,0,20,13+t,14),new Date(2015,1,3,23+t,9)],
		[mNames[2],new Date(2015,1,18,23+t,47),new Date(2015,2,5,18+t,05)],
		[mNames[3],new Date(2015,2,20,9+t,36),new Date(2015,3,4,12+s,05)],
		[mNames[4],new Date(2015,3,18,18+s,57),new Date(2015,4,4,3+s,42)],
		[mNames[5],new Date(2015,4,18,4+s,13),new Date(2015,5,2,16+s,19)],
		[mNames[6],new Date(2015,5,16,14+s,05),new Date(2015,6,2,2+s,20)],
		[mNames[7],new Date(2015,6,16,1+s,24),new Date(2015,6,31,10+s,43)],
		[mNames[8],new Date(2015,7,14,14+s,53),new Date(2015,7,29,18+s,35)],
		[mNames[9],new Date(2015,8,13,6+s,41),new Date(2015,8,28,2+s,50)],
		[mNames[10],new Date(2015,9,13,0+s,06),new Date(2015,9,27,12+t,05)],
		[mNames[11],new Date(2015,10,11,17+t,47),new Date(2015,10,25,22+t,44)],
		[mNames[12],new Date(2015,11,11,10+t,29),new Date(2015,11,25,11+t,11)],
	[mNames[1],new Date(2016,0,10,1+t,30),new Date(2016,0,24,1+t,46)],
	[mNames[2],new Date(2016,1,8,14+t,39),new Date(2016,1,22,18+t,20)],
	[mNames[3],new Date(2016,2,9,1+t,54),new Date(2016,2,23,12+t,01)],
	[mNames[4],new Date(2016,3,7,11+s,24),new Date(2016,3,22,5+s,24)],
	[mNames[5],new Date(2016,4,6,19+s,29),new Date(2016,4,21,21+s,14)],
	[mNames[6],new Date(2016,5,5,2+s,59),new Date(2016,5,20,11+s,02)],
	[mNames[7],new Date(2016,6,4,11+s,01),new Date(2016,6,19,22+s,56)],
	[mNames[8],new Date(2016,7,2,20+s,44),new Date(2016,7,18,9+s,26)],
	[mNames[9],new Date(2016,8,1,9+s,03),new Date(2016,8,16,19+s,05)],
	[mNames[10],new Date(2016,9,1,0+s,11),new Date(2016,9,16,4+s,23)],
	[mNames[11],new Date(2016,9,30,17+t,38),new Date(2016,10,14,13+t,52)],
	[mNames[12],new Date(2016,10,29,12+t,18),new Date(2016,11,14,0+t,05)],
	[mNames[1],new Date(2016,11,29,6+t,53),new Date(2017,0,12,11+t,34)],
		[mNames[2],new Date(2017,0,28,0+t,07),new Date(2017,1,11,0+t,33)],
		[mNames[3],new Date(2017,1,26,14+t,58),new Date(2017,2,12,14+t,54)],
		[mNames[4],new Date(2017,2,28,2+s,57),new Date(2017,3,11,6+s,8)],
		[mNames[5],new Date(2017,3,26,12+s,16),new Date(2017,4,10,21+s,42)],
		[mNames[6],new Date(2017,4,25,19+s,44),new Date(2017,5,9,13+s,10)],
		[mNames[7],new Date(2017,5,24,2+s,31),new Date(2017,6,9,4+s,06)],
		[mNames[8],new Date(2017,6,23,9+s,45),new Date(2017,7,7,18+s,11)],
		[mNames[9],new Date(2017,7,21,18+s,30),new Date(2017,8,6,7+s,03)],
		[mNames[10],new Date(2017,8,20,5+s,30),new Date(2017,9,5,18+s,40)],
		[mNames[11],new Date(2017,9,19,19+s,12),new Date(2017,10,4,5+t,23)],
		[mNames[12],new Date(2017,10,18,11+t,42),new Date(2017,11,3,15+t,47)],
		[mNames[0],new Date(2017,11,18,6+t,30),new Date(2018,0,2,2+t,24)],
	[mNames[1],new Date(2018,0,17,2+t,17),new Date(2018,0,31,13+t,27)],
	[mNames[2],new Date(2018,1,15,21+t,05),new Date(2018,2,2,0+t,51)],
	[mNames[3],new Date(2018,2,17,13+t,11),new Date(2018,2,31,12+s,37)],
	[mNames[4],new Date(2018,3,16,1+s,57),new Date(2018,3,30,0+s,58)],
	[mNames[5],new Date(2018,4,15,11+s,48),new Date(2018,4,29,14+s,19)],
	[mNames[6],new Date(2018,5,13,19+s,43),new Date(2018,5,28,4+s,53)],
	[mNames[7],new Date(2018,6,13,2+s,48),new Date(2018,6,27,20+s,20)],
	[mNames[8],new Date(2018,7,11,9+s,58),new Date(2018,7,26,11+s,56)],
	[mNames[9],new Date(2018,8,9,18+s,01),new Date(2018,8,25,2+s,52)],
	[mNames[10],new Date(2018,9,9,3+s,47),new Date(2018,9,24,16+s,45)],
	[mNames[11],new Date(2018,10,7,16+t,02),new Date(2018,10,23,5+t,39)],
	[mNames[12],new Date(2018,11,7,7+t,20),new Date(2018,11,22,17+t,48)],
		[mNames[1],new Date(2019,0,6,1+t,28),new Date(2019,0,21,5+t,16)],
		[mNames[2],new Date(2019,1,4,21+t,03),new Date(2019,1,19,15+t,53)],
		[mNames[3],new Date(2019,2,6,16+t,04),new Date(2019,2,21,1+t,43)],
		[mNames[4],new Date(2019,3,5,8+s,50),new Date(2019,3,19,11+s,12)],
		[mNames[5],new Date(2019,4,4,22+s,45),new Date(2019,4,18,21+s,11)],
		[mNames[6],new Date(2019,5,3,10+s,02),new Date(2019,5,17,8+s,31)],
		[mNames[7],new Date(2019,6,2,19+s,16),new Date(2019,6,16,21+s,38)],
		[mNames[8],new Date(2019,7,1,3+s,12),new Date(2019,7,15,12+s,29)],
		[mNames[9],new Date(2019,7,30,10+s,37),new Date(2019,8,14,4+s,33)],
		[mNames[10],new Date(2019,8,28,18+s,26),new Date(2019,9,13,21+s,8)],
		[mNames[11],new Date(2019,9,28,3+t,38),new Date(2019,10,12,13+t,34)],
		[mNames[12],new Date(2019,10,26,15+t,05),new Date(2019,11,12,5+t,12)],
		[mNames[0],new Date(2019,11,26,5+t,13),new Date(2020,0,10,19+t,21)],
	[mNames[1],new Date(2020,0,24,21+t,42),new Date(2020,1,9,7+t,33)],
	[mNames[2],new Date(2020,1,23,15+t,32),new Date(2020,2,9,17+t,48)],
	[mNames[3],new Date(2020,2,24,9+t,28),new Date(2020,3,8,2+s,35)],
	[mNames[4],new Date(2020,3,23,2+s,26),new Date(2020,4,7,10+s,45)],
	[mNames[5],new Date(2020,4,22,17+s,39),new Date(2020,5,5,19+s,12)],
	[mNames[6],new Date(2020,5,21,6+s,41),new Date(2020,6,5,4+s,44)],
	[mNames[7],new Date(2020,6,20,17+s,33),new Date(2020,7,3,15+s,59)],
	[mNames[8],new Date(2020,7,19,2+s,42),new Date(2020,8,2,5+s,22)],
	[mNames[9],new Date(2020,8,17,11+s,00),new Date(2020,9,1,21+s,05)],
	[mNames[10],new Date(2020,9,16,19+s,31),new Date(2020,9,31,14+t,49)],
	[mNames[11],new Date(2020,10,15,5+t,07),new Date(2020,10,30,9+t,30)],
	[mNames[12],new Date(2020,11,14,16+t,16),new Date(2020,11,30,3+t,28)]];

//--------------------------------//
function formLoad() {
  sCookie = CookieLoad(gCookieName);
	if (sCookie.indexOf(gCookieTAB) == -1) sCookie ='';
  if (sCookie.length) {
    gLanguage=CookieCrumble(CookiePart(sCookie,"Language"))[1];
    nToday=new Date(CookieCrumble(CookiePart(sCookie,"Date"))[1]);
  }
  glText = (gLanguage == 'UK') // 'NL'
    ? new Array('Date', 'Moon cycle','Next new moon','Next full moon',
      'Moon age','days','Next sabbath', 'New moon', 'Full moon', ' (sunset)')
    : new Array('Datum', 'Maancyclus','Volgende nieuwe maan','Volgende volle maan',
      'Maanleeftijd','dagen','Volgende sabbat', 'Nieuwe maan','Volle maan', ' (zonsondergang)');
	//Get next sabbath name, poss. add 'sunset'
  for (i=0;i<aSabbaths.length;i++) {
    if (aSabbaths[i][1] >= nToday) {
      nNextSabbathName = aSabbaths[i][0] + (i && 1 ? glText[9] : '');
      nNextSabbathDate = aSabbaths[i][1];
      break;
    }
  }
	//Get moon details
  for (i=0;i<aEsbats.length;i++) {
    if (aEsbats[i][1] >= nToday) { //new moon >= today
       nNextNewMoonName = aEsbats[i][0]; nNextNewMoonDate = aEsbats[i][1]; i--;
       nThisNewMoonName = aEsbats[i][0]; nThisNewMoonDate = aEsbats[i][1]; nThisFullMoonDate = aEsbats[i][2];
       if (aEsbats[i][2] < nToday) {i++}
       nNextFullMoonName = aEsbats[i][0]; nNextFullMoonDate = aEsbats[i][2];
       nMoonAge=(nToday-nThisNewMoonDate)/(100*60*60*24);
       nMoonPhase = (nToday<=nThisFullMoonDate)
        ? ((nToday-nThisNewMoonDate) / (nThisFullMoonDate-nThisNewMoonDate)) / 2
        : .5 + ((nToday-nThisFullMoonDate) / (nNextNewMoonDate-nThisFullMoonDate))/2;
       nMoonPicture = (Math.round(nMoonPhase*8)%8);
       break;
    }
  }
	//Save all in cookie for normal site pages
  i=0;
  gWrite[i] = glText[0] + ": "; i++;    gWrite[i] = fDate(nToday, 1); i++;    gWrite[i] = ''; i++;
  gWrite[i] = glText[1] + ": "; i++;    gWrite[i] = nThisNewMoonName; i++;    gWrite[i]= fDate(nThisNewMoonDate); i++;
  if (nNextFullMoonDate < nNextNewMoonDate)
  {
    gWrite[i] = glText[3] + ": "; i++;  gWrite[i]=nNextFullMoonName; i++;     gWrite[i]=fDate(nNextFullMoonDate); i++;
  }
  gWrite[i]= glText[2] + ": "; i++;     gWrite[i]=nNextNewMoonName; i++;      gWrite[i]=fDate( nNextNewMoonDate); i++;
  if (nNextFullMoonDate>nNextNewMoonDate)
  {
    gWrite[i]=glText[3] + ": "; i++;    gWrite[i]=nNextFullMoonName; i++;     gWrite[i]=fDate(nNextFullMoonDate); i++;
  }
  m = Math.round(nMoonAge) + "";
  m = m.substring(0, m.length-1) + "." + m.substring(m.length - 1);
  gWrite[i]=glText[4] + ": "; i++;      gWrite[i]= m + " "+glText[5]; i++;    gWrite[i]= Math.round(nMoonPhase * 100)+"%"; i++;
  gWrite[i]= glText[6]+": "; i++;       gWrite[i]= nNextSabbathName; i++;     gWrite[i]=fDate(nNextSabbathDate); i++;
  gWrite[i]="Moon picture: "; i++;      gWrite[i]= nMoonPicture; i++;         gWrite[i]=''; i++;
  sCookie = CookieCreate(gCookieName)
  var sPart="Data"; for(i=1;i<gWrite.length;i++) {sPart+=gCookieTAB+gWrite[i]};
  sCookie=CookieAdd(sCookie, sPart);
  sCookie=CookieAdd(sCookie, "Language"+gCookieTAB+gLanguage)
  sCookie=CookieAdd(sCookie, "Date"+gCookieTAB+nToday);
  CookieSave(gCookieName, sCookie);
  FormRefresh();
}
//--------------------------------//
function getYear1(nDate)
{
  yy = nDate.getYear();
  if (yy < 1900) {yy += 1900}
  return yy;
}
function fDate(nDate, nYear)
{
  var h = "0"+nDate.getHours();
  h = h.substring(h.length-2,h.length);
  var m = "0"+nDate.getMinutes();
  m = m.substring(m.length-2,m.length);
  var yy = getYear1(nDate);
  var y = ", ";if (nYear == 1) {y=" "+yy+y};
  if (gLanguage=="NL")
  {
    var nMonth=new Array("januari", "februari","maart","april","mei","juni","juli","augustus","september","oktober","november","december");
    var nDay=new Array("zondag","maandag","dinsdag","woensdag","donderdag","vrijdag","zaterdag");
    return nDay[nDate.getDay()]+" "+nDate.getDate()+" "+nMonth[nDate.getMonth()]+y+h+":"+m;
  }
  else
  {
    var nMonth=new Array("January", "February","March","April","May","June","July","August","September","October","November","December");
    var nDay=new Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
    return nDay[nDate.getDay()]+" "+nMonth[nDate.getMonth()]+" "+nDate.getDate()+y+h+":"+m;
  }
}
//--------------------------------//
function DialogInfo()
{
  ShowLayer('TDDate','hidden');
  ShowLayer('TDListing','hidden');
  ShowLayer('TDInfo','visible');
}
//--------------------------------//
function DialogDate()
{
  ShowLayer('TDInfo','hidden');
  ShowLayer('TDListing','hidden');
	getObject('Day').value=nToday.getDate();
	getObject('Month').value=nToday.getMonth();
	getObject('Year').value=getYear1(nToday);
  ShowLayer('TDDate','visible');
  getObject('Day').focus();
}

function DialogDateNew() {
  nToday = new Date(getObject('Year').value, getObject('Month').value, getObject('Day').value, nToday.getHours(), nToday.getMinutes());
  ChangeDate();
}

function DialogDateReset() {
  nToday=new Date();
	ChangeDate();
}

function ChangeDate() {
  if (sCookie.length) {
    if (nToday > aSabbaths[aSabbaths.length-1][1]) {nToday=aSabbaths[aSabbaths.length-1][1]};
    if (nToday < aSabbaths[0][1]) {nToday=aSabbaths[0][1] };
    sCookie=CookieUpdate(sCookie, "Date"+gCookieTAB+nToday);
    CookieSave(gCookieName, sCookie)
  }
  ShowLayer('TDDate', 'hidden');
  formLoad();
}

function NewLanguage(nLanguage) {
  sCookie = CookieUpdate(sCookie, "Language"+gCookieTAB+nLanguage)
  CookieSave(gCookieName, sCookie);
	formLoad();
}

function AddDay(nDays) {
  nToday=new Date(getYear1(nToday),nToday.getMonth(), nToday.getDate()+nDays, nToday.getHours(), nToday.getMinutes())
  ChangeDate();
}

function getObject(name) {
  var o = new Object;
  if (document.layers) {o = document.layers[name];}
  else if (document.all) {o = document.all(name);}
  else if (document.getElementById) {o = document.getElementById(name);}
  return o;
}
function ShowLayer(name, show) {
  var o = getObject(name);
  if (document.layers) {o.visibility = show;}
  else if (document.all) {o.style.visibility = show;}
  else if (document.getElementById) {o.style.visibility = show;}
}
//--------------------------------//
function FormRefresh() {
	//TDDate:
  for (i=0;i<=17;i++) {
		if (getObject('dd'+i)) getObject('dd'+i).innerHTML = gWrite[i];
  }
  getObject('dd0').innerHTML = gWrite[0] + ' ' + gWrite[1];
  getObject('dd12').innerHTML = gWrite[12] + ' ' + gWrite[13] + ', ' + gWrite[14];
  getObject('TDMoon').innerHTML = "<img src='images/moon" + nMoonPicture + ".jpg' style='border:none;' usemap='#ImageMap2'>";
  getObject('ddUpdated').innerHTML = (gLanguage == 'NL' ? 'Bijgewerkt' : 'Last updated' ) + ': ' + fDate(new Date(document.lastModified), 1);
}
//--------------------------------//
function Listing(Title)
{
	//do for current year
	var y = getYear1(nToday);
	getObject('tdh1').innerHTML = Title + '&nbsp;&nbsp;&nbsp;<span class=\'notes\'>(' + y + ')</span>';
  var html='';
  if (Title == "Sabbaths") {
    for (i=1;i<aSabbaths.length-1;i++) {
    	if (getYear1(aSabbaths[i][1]) == y) {
				html += '<tr><td>' + aSabbaths[i][0] + (i & 1 ? glText[9] : '') + '</td><td>' + fDate(aSabbaths[i][1]) + "</td></tr>\n";
			}
		}
  }
  else
  {
		html = '<tr><td ><h3>' + glText[1] + '</h3></td><td><h3>' + glText[7] + '</h3></td><td><h3>' + glText[8] + '</h3></td></tr>';
    for (i=0;i<aEsbats.length;i++) {
      if (getYear1(aEsbats[i][1]) == y || getYear1(aEsbats[i][2]) == y) {
				html += '<tr><td>' + aEsbats[i][0] + '</td><td>' + fDate(aEsbats[i][1]) + '</td><td>' + fDate(aEsbats[i][2]) + '</td></tr>';
      }
    }
  }
  getObject('TDTable').innerHTML = '<table border=\'0\' cellspacing=\'0\' width=\'100%\'>' + html + '</table>';
  ShowLayer('TDDate','hidden');
  ShowLayer('TDInfo','hidden');
  ShowLayer('TDListing', 'visible');
}