<!-- Original:  James Thiele (mailto:jet@eskimo.com) -->
<!-- Modified:  George Todd  -->

var black = "images/black.gif";
var white = "images/white.gif";

var height = 1;
var size = 50;
var i;
var currentDate  = new Date();
var x = currentDate;
currentDate.setTime(currentDate.getTime() + (currentDate.getTimezoneOffset()*60000));
var blueMoonDate = new Date(96, 1, 3, 16, 15, 0);
var lunarPeriod  = 29*(24*3600*1000) + 12*(3600*1000) + 44.05*(60*1000);
var moonPhaseTime = (currentDate.getTime() - blueMoonDate.getTime()) % lunarPeriod;
var percentRaw = (moonPhaseTime / lunarPeriod);
var percent    = Math.round(100*percentRaw) / 100;
var percentBy2 = Math.round(200*percentRaw);
var left  = (percentRaw >= 0.5) ? black : white;
var right = (percentRaw >= 0.5) ? white : black;
var time = Math.round((lunarPeriod-moonPhaseTime)/(24*3600*1000));

if (percentBy2 > 100) {
 percentBy2 = percentBy2 - 100;
}

for (i = -(size-1); i < size; ++i) {
 var wid = 2*parseFloat(Math.sqrt((size*size)-(i*i)));
 if (percentBy2 != 100)
  document.write ("<img src="+left +" height=1 width="+(wid*((100-percentBy2)/100))+">");
 if (percentBy2 != 0)
  document.write("<img src="+right+" height=1 width="+(wid*((percentBy2)/100))+">");
  document.write("<br>");
}

if (time != 0) {
 document.write("Next full moon is in about ", time, " day");
 if (time > 1) document.write("s");
  if (Math.round(percentRaw * 100) < 25) {
   document.write(", Waning Gibbous (", Math.round(percentRaw * 100), "% complete)<br />")
  }
  else if (Math.round(percentRaw * 100) == 25) {
   document.write(", Last Quarter (", Math.round(percentRaw * 100), "% complete)<br />")
  }
  else if (Math.round(percentRaw * 100) < 50) {
   document.write(", Waning Crescent (", Math.round(percentRaw * 100), "% complete)<br />")
  }
  else if (Math.round(percentRaw * 100) == 50) {
   document.write(", New Moon! (", Math.round(percentRaw * 100), "% complete)<br />")
  }
  else if (Math.round(percentRaw * 100) < 75) {
   document.write(", Waxing Crescent (", Math.round(percentRaw * 100), "% complete)<br />")
  }
  else if (Math.round(percentRaw * 100) == 75) {
   document.write(", First Quarter (", Math.round(percentRaw * 100), "% complete)<br />")
  }
  else if (Math.round(percentRaw * 100) < 100) {
   document.write(", Waxing Gibbous (", Math.round(percentRaw * 100), "% complete)<br />")
  }
  else
  {
  }
}
else
{
 document.write("The Moon is Full!<br />");
}

//  End -->
