-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
30. Aug 2016
... taucht ab und zu bei Amazon auf, so um die 45€
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
30. Aug 2016
... derzeit (leider) nicht.
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
26. Aug 2016
... ist zwar schon etwas her, aber . . .
zum Sonnenaufgang - habe heute mal im Netz die Werte für den Sonnenaufgang für Hamburg aufgerufen (Wetterdienste und andere),
Ergebnis : 10 verschiedene Zeiten in einem Zeitraum von 30 Minuten (ohne Angabe der Bezugsposition) - und genau hier liegt das Problem : ohne die Berechnungsparameter zu kennen, ist ein Vergleich nicht möglich, einige werden...
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
21. Dez 2013
Hallo,
in der Astro4.rar --> uAstro.pas war noch ein kleiner Fehler versteckt :
function NextEclipse(var Date : TDateTime; sun : Boolean): TEclipse;
var
temp_date: TDateTime;
begin
Result := ecNone;
temp_date := Date - 28 * 2;
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
21. Dez 2013
Hallo.
--> 21.12.2013 : Version 4 angefügt (Astro4.rar) :
hinzugekommen sind Berechnungen zum "Blue Moon":
function BlueMoon . . . - hier wird auf vier Vollmonde in einer Jahreszeit geprüft, der
dritte Vollmond ist dann der Blue Moon.
Im Aufruf der Funktion kann dann noch festgelegt werden, ob der
vergangene Winter oder der kommende Winter berücksichtigt wird,
geprüft wird über...
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
19. Feb 2011
diese Funktionen sind später hinzugekommen :
DateTimeReal liefert die (theoretische) Zeit (und Datum) auf Grund der Position,
DateTimeTZ liefert Datum/Zeit unter Angabe der Zeitzone
. . . ach ja, und EDrive war (bzw. ist) eine Hilfs-Funktion zur quantitativen
Darstellung der Mondposition in Abhängigkeit von Datum/Zeit (auf einer Kreisbahn,
nicht auf einer Ellipse) - ist also für diese Unit...
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
3. Aug 2010
anbei ausgegliederte Funktionen zur Berechnung von Ostern
als Funktion, Rückgabewert : TDateTime
1) Berechnung nach GAUSS für den gregorianischen Jalender
2) Berechnung nach GAUSS für den julianischen Kalender
3) Berechnung nach Lichtenberg (modifizierte Gauss-Formel)
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
25. Jan 2010
hier mal 'nen kleines Demo zur relativen Anzeige
von Mond- und Sonnen-Position
... soll nur als Beispiel dienen
falls Fragen auftauchen : nur zu.
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
12. Jan 2010
o.k., wie ist's damit :
TMoonPhase8 = (mp_NewMoon, mp_WaxingMoonFirstEighth, mp_WaxingMoonFirstQuarter, mp_WaxingMoonThirdEighth, mp_FullMoon, mp_WaningMoonFifthEighth, mp_WaningMoonLastQuarter, mpWaningMoonSevensEighth);
Funktion
function GetMoonPhaseConst(Age : extended):TMoonPhase8;
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
12. Jan 2010
@ Bernhard
o.k., werd' in der nächsten Version noch eine Funktion mit definierten Konstanten einfügen.
Die jetzige Funktion will ich so beibehalten, um diese eigenen Bedürfnissen anzupassen (z.B.
möchte jemand vielleicht 28 Bilder verarbeiten - statt 8, dann ist ein Integerwert sicher besser zu gebrauchen als 8 definierte Konstanten).
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
12. Jan 2010
Hallo,
Die Attachments wurden aktualisiert. Einige Vorschläge wurden umgesetzt.
neue Funktionen :
function GetMoonPhaseNum(Age : extended):Integer;
function DateTimeReal(DtTm : TDateTime; Long : extended):TDateTime;
function DateTimeTZ(DtTm : TDateTime; Hour : ShortInt):TDateTime;
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
7. Jan 2010
@sx2008
danke für die Tipps, werd' ich bei der nächsten Bearbeitung umsetzen
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
6. Jan 2010
Hallo
@Wolfgang : die Berechnungen basieren auf MEEUS (einfach mal googeln).
Viel der Berechnungen und Konstanten hab' ich mal bruchstückweise bekommen
und immer mal wieder (wenn ich mal Lust und Zeit hatte ...) vervollständigt.
Derzeit arbeite ich noch an einer Funktion zur Rückgabe von Positionswerten,
um Sonnen und Mondstand graphisch anzuzeigen (Kreisbahn, stimmt zwar nicht genau,...
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
6. Jan 2010
Hallo,
@JamesTKirk : Abhängigkeiten sind reduziert, hatte ich vergessen, da ich
(zur besseren Kontrolle) das ganze erst mal visuell gemacht habe (DEMO).
:zwinker:
-
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by markus5766h,
6. Jan 2010
Hallo,
im Laufe der Zeit haben sich bei mir einige Funktionen zur Berechnung astronomischer Daten gesammelt, die ich nun in eine Unit gepackt habe :
Tag im Jahr, Woche im jahr, Schaltjahr(boolean), Sommerzeit(boolean), Jahreszeit,
Feiertage (in Abhängigkeit vom Bundesland), Sternzeichen ...
Für Mond und Sonne : -Aufgang, Untergang, Höchststand,
Mondphase, Mondalter, nächste und vorige...