// 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=50
var pausenowmoon=3000
var moonday
var i_mooncycle=1
var mooncycle=29.530589

var picture = new Array("/fotos/moonitems/n1.gif","/fotos/moonitems/n2.gif","/fotos/moonitems/n3.gif","/fotos/moonitems/n4.gif","/fotos/moonitems/n5.gif","/fotos/moonitems/n6.gif","/fotos/moonitems/n7.gif","/fotos/moonitems/n8.gif","/fotos/moonitems/n9.gif","/fotos/moonitems/n10.gif","/fotos/moonitems/n11.gif","/fotos/moonitems/n12.gif","/fotos/moonitems/n13.gif","/fotos/moonitems/n14.gif","/fotos/moonitems/n15.gif","/fotos/moonitems/n16.gif","/fotos/moonitems/n17.gif","/fotos/moonitems/n18.gif","/fotos/moonitems/n19.gif","/fotos/moonitems/n20.gif","/fotos/moonitems/n21.gif","/fotos/moonitems/n22.gif","/fotos/moonitems/n23.gif","/fotos/moonitems/n24.gif","/fotos/moonitems/n25.gif","/fotos/moonitems/n26.gif","/fotos/moonitems/n27.gif","/fotos/moonitems/n28.gif","/fotos/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='/fotos/moonitems/n"+moonday+".gif' name='moonimg' border='0' alt='Fase de la Luna' title='Fase de la Luna'>"

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