Unser Kalender: 6.1 Die Berechnung des Schaltjahres

Die hier aufgeführte Funktion ermittelt für ein gegebenes Jahr, ob es sich dabei um ein Schaltjahr handelt. Zurückgegeben wird ein entsprechender Wahrheitswert; die Verwendung eines Integerwertes in dieser Funktion bietet den Vorteil das Ergebnis verrechnen zu können, z.B. TageFebruar := 28 + ist_Schaltjahr(jahr); Anhand des Vergleiches mit der Zahl 1582 wird ermittelt, ob die julianische oder gregorianische Schaltregel verwendet werden muss: Nach der julianischen Regel ist jedes vierte Jahr ein Schaltjahr, und nach der gregorianischen Regel ist jedes vierte Jahr nur dann ein Schaltjahr, wenn es nicht ohne Rest durch hundert teilbar ist, es sei denn, die Jahreszahl ist durch vierhundert ohne Rest teilbar. (vgl. Der Oktober 1582 auf dieser Homepage) function ist_Schaltjahr(jahr) { if (jahr % 4 == 0) if (jahr < 1582) return 1; else if (!(jahr % 100 == 0)) return 1; else if (jahr % 400 == 0) return 1; return 0; } Übrigens gilt diese Schaltjahrfunktion nur für die Jahre nach Christi Geburt. Da es kein Jahr 0 gab, und daher der Vorgänger des Jahres 1 n.Chr. das Jahr 1 v.Chr. ist, ist ein Jahr vor Christigeburt dann ein Schaltjahr, wenn die ganzzahlige Division durch vier als Rest 1 ergibt. (Jahre vor Christus werden in diesen Scripten an anderer Stelle blockiert.)