// CREDITS:
// Moon Phase Clock
// by Urs Dudli and Peter Gehrig 
// Copyright (c) 2002 Peter Gehrig and Urs Dudli. All rights reserved.
// Permission given to use the script provided that this notice remains as is.
// Additional scripts can be found at http://www.24fun.com/fast/index.html
// info@24fun.com
// 6/25/2002

// IMPORTANT: 
// If you add this script to a script-library or a script-archive 
// you have to insert a link to http://www.24fun.com
// right into the webpage where the script will be displayed.

var pastdate
var pastyear=2002
var pastmonth=5
var pastday=11
var nowdate
var c
var pausenormal=60
var pausenowmoon=12000
var moonday
var i_mooncycle=1
var mooncycle=29.530589

var picture = new Array("moonitems/n1.gif","moonitems/n2.gif","moonitems/n3.gif","moonitems/n4.gif","moonitems/n5.gif","moonitems/n6.gif","moonitems/n7.gif","moonitems/n8.gif","moonitems/n9.gif","moonitems/n10.gif","moonitems/n11.gif","moonitems/n12.gif","moonitems/n13.gif","moonitems/n14.gif","moonitems/n15.gif","moonitems/n16.gif","moonitems/n17.gif","moonitems/n18.gif","moonitems/n19.gif","moonitems/n20.gif","moonitems/n21.gif","moonitems/n22.gif","moonitems/n23.gif","moonitems/n24.gif","moonitems/n25.gif","moonitems/n26.gif","moonitems/n27.gif","moonitems/n28.gif","moonitems/n29.gif")

var imgpreload=new Array()
for (i=0;i<=picture.length;i++) {
	imgpreload[i]=new Image()
	imgpreload[i].src=picture[i]
}

pastdate=new Date(pastyear,pastmonth,pastday,0,0,0)
nowdate=new Date()
resultdays=(Date.parse(nowdate)-Date.parse(pastdate))/1000/60/60/24
moonday=resultdays/mooncycle
moonday=(resultdays/mooncycle)-(Math.floor(resultdays/mooncycle))
moonday=Math.round(mooncycle*moonday)
c="<img src='moonitems/n"+moonday+".gif' name='moonimg'>"

//window.onload=animatemoon
//
function animatemoon() {
	if (i_mooncycle==moonday) {
		var pause=pausenowmoon
	}
	else {
		var pause=pausenormal
	}
	var mimg="moonitems/n"+i_mooncycle+".gif"
	document.moonimg.src=mimg
	i_mooncycle++
	if (i_mooncycle>29) {i_mooncycle=1}
	var timer=setTimeout("animatemoon()",pause)
}

var synodic = 29.53058867;
var bpcaldiario = 24 * 60 * 60 * 1000;
anyDate = new Date();
var fchcal = new Date();
fchcal.setUTCFullYear(1998);
fchcal.setUTCMonth(11);
fchcal.setUTCDate(18);
fchcal.setUTCHours(21);
fchcal.setUTCMinutes(36);
fchcal.setUTCSeconds(0);
var diff = anyDate - fchcal + bpcaldiario;
if(diff < 0 ) diff = -diff;
var phase = diff / (synodic * bpcaldiario);
phase *=100;
while(phase>100) { phase -= 100; }
if(phase >= 0 && phase <= 2.49)
{ var phaseName = "Nueva";}
else if(phase >= 2.5 && phase <= 22.49)
{ var phaseName = "Creciente";}
else if(phase >= 22.5 && phase <= 27.49)
{ var phaseName = "Cuarto Creciente";}
else if(phase >= 27.5 && phase <= 47.49)
{ var phaseName = "Gibosa Creciente";}
else if(phase >= 47.5 && phase <= 52.49)
{ var phaseName = "Llena";}
else if(phase >= 52.5 && phase <= 73.49)
{ var phaseName = "Gibosa Menguante";}
else if(phase >= 73.5 && phase <= 77.49)
{ var phaseName = "Cuarto Menguante";}
else if(phase >= 77.5 && phase <= 97.49)
{ var phaseName = "Menguante";}
else
{ var phaseName = "Nueva";}
//document.write(phaseName);