Tag und Nachsimmulation mit Flash geschrieben am 5.5.2008

Ein Versuch ein kleines Panorama ja nach Tageszeit anders darzustellen. Im Bild wandert Sonne, Mond und Sterne über den Himmel. Der Mond hat entsprechend der Wirklichkeit eine Mondphase. Hin und wieder fährt noch ein Schiff oder Boot vorbei.

Die Mondphase berechne ich mit folgender Formel:

ActionScript
function getmonphase(tag,mon,jahr:int):int{//0..28 0=N 7=z 14=V 21=a
	var mydate:Date = new Date();
 	var Y1=jahr;
	var m=mon+1;//1..12
	var d=tag;//1..31
	
	var C=0.001;
	var M9 = (-1) * Math.floor(((14 - m) / 12) + C);
	var J1 = d - 2447095 + Math.floor((1461 * (Y1 + 4800 + M9) / 4) + C);
	var J2 = J1 + Math.floor((367 * (m - 2 - 12 * M9) / 12) + C);
	J2 = J2 - Math.floor((3 * (Y1 + 4900 + M9) / 400) + C);
	var M5 = J2 - 23743;
	var M6 = M5 / 29.530588;
	m = Math.floor(M5 - Math.floor(M6) * 29.530588);
	
	return m
}

Hierbei wird ein Wert von 0 bis 28 zurückgegeben. 0 bedeutet Neumond, 1 bis 13 zunehmender Mond, 14 Vollmond un der Rest abnehmender Mond.

Die Mondformel habe ich von http://www.herber.de/forum/... adaptiert.