<!--
var myPhaseName = "";
var forecastImage = new Array();
var moonPhaseIcon = new Image();

function moonPhasePercent( theDate )
{
  var synodic = 29.53058867;
  var msPerDay = 86400000;
  var baseDate = new Date();
  baseDate.setUTCFullYear(2005);
  baseDate.setUTCMonth(4);
  baseDate.setUTCDate(8);
  baseDate.setUTCHours(8);
  baseDate.setUTCMinutes(48);

  var diff = theDate - baseDate;
	diff=Math.abs(diff)
  var phase = diff / (synodic * msPerDay);
  phase *= 100;
  while ( phase > 100 )
    phase -= 100;
  if ( phase < 0 )
    phase = 50;

  return(phase);
}

function getMoonPhase( language )
{
  if ( ( language == "" ) || ( typeof language == "undefined" ) )
    language = "fr";
  var theDate = new Date();
  theDate.setFullYear(document.lunarcalculatorform.mp_year.options[document.lunarcalculatorform.mp_year.selectedIndex].value);
  theDate.setMonth(document.lunarcalculatorform.mp_month.options[document.lunarcalculatorform.mp_month.selectedIndex].value - 1);
  theDate.setDate(document.lunarcalculatorform.mp_day.options[document.lunarcalculatorform.mp_day.selectedIndex].value);

  var phasePercent = moonPhasePercent(theDate);
  if ( language == "fr" )
    var phaseNames = [
    "Nouvelle Lune", "Nouvelle Lune",
    "Premier Croissant", "Premier Croissant", "Premier Croissant", "Premier Croissant",
    "Premier Quartier", "Premier Quartier", "Premier Quartier",
    "Lune Gibbeuse Ascendante", "Lune Gibbeuse Ascendante", "Lune Gibbeuse Ascendante", "Lune Gibbeuse Ascendante", "Lune Gibbeuse Ascendante",
    "Pleine Lune", "Pleine Lune",
    "Lune Gibbeuse Descendante", "Lune Gibbeuse Descendante", "Lune Gibbeuse Descendante", "Lune Gibbeuse Descendante",
    "Dernier Quartier", "Dernier Quartier", "Dernier Quartier",
    "Dernier Croissant", "Dernier Croissant", "Dernier Croissant", "Dernier Croissant",
    "Nouvelle Lune"];
  else
    var phaseNames = [
    "Újhold", "Újhold",
    "Növekvõ Hold", "Növekvõ Hold", "Növekvõ Hold", "Növekvõ Hold",
    "Elsõ negyed", "Elsõ negyed", "Elsõ negyed",
    "Növekvõ Hold", "Növekvõ Hold", "Növekvõ Hold", "Növekvõ Hold", "Növekvõ Hold",
    "Holdtölte", "Holdtölte",
    "Fogyó Hold", "Fogyó Hold", "Fogyó Hold", "Fogyó Hold",
    "Utolsó negyed", "Utolsó negyed", "Utolsó negyed",
    "Fogyó Hold", "Fogyó Hold", "Fogyó Hold", "Fogyó Hold",
    "Újhold"];

  thePhase = Math.floor(phasePercent * 0.279);
  myPhaseName = phaseNames[thePhase];

  return(thePhase);
}

function calcMoonPhase( language, theDate )
{
  clearmpresults();
  if ( language == "fr" )
    moonPhaseIcon.src = "" + getMoonPhase(language) + ".png";
  else
    moonPhaseIcon.src = "" + getMoonPhase(language) + ".png";

  document.getElementById( "moonPhaseImage" ).innerHTML = "<img src=\"" + moonPhaseIcon.src + "\" border=\"0\" width=\"136\" height=\"136\" title=\"" + myPhaseName + "\" alt=\"\">";

  document.lunarcalculatorform.mp_day.focus();
}

function initMoonPhase ( language )
{
  calcMoonPhase(language);

  document.lunarcalculatorform.mp_day.focus();
}

// Clear the moon phase results
function clearmpresults ( )
{
  document.getElementById( "moonPhaseImage" ).innerHTML = "&nbsp;";
}
//-->