Re: Sonnenaufgangsberechnung Kategorie: Programmierung Basic (von Simon - 10.11.2015 22:49) | |
| |
Hallo Zusammen, ich habe ein Sub geschrieben, mit dem man den Sonnenaufgang und Untergang auf Basis von Tag und Monat berechnen kann. Die Variablen die vorkommen sind alle Single. Die Formeln stimmen, ich hab das im Excel nach geprüft. Leider ist das Ergebnis das mit die CCPRO liefert falsch (ca. 1 Monat verschoben). Kann mir jemand sagen, ob es evtl. "Rundungsfehler" der CCPRO sein könnten? Sub Sonnenaufgang_update() Tageszahl = Tag + ((Monat-1) * 30) Woz_moz = (-0.171 * sin(0.0337 * Tageszahl + 0.465)) - (0.1299 * sin(0.01787 * Tageszahl - 0.168)) 'Zeitgleichung /in Stunden Deklination = 0.4095 * sin((Tageszahl - 80.086) * 0.016906) 'Berechnung Deklination 'Berechnung Zeitdifferenz , 0.7459 für Mühldorf am Inn Zeitdiff = 3.8197 * acos((-0.0145 - (0.7459 * sin(Deklination))) / (0.6660 * cos(Deklination)) ) Sonnenaufgang = 12 - Zeitdiff - Woz_moz - 0.8355 + Stunden_korr 'Sonnenaufgang Sonnenuntergang = 12 + Zeitdiff - Woz_moz - 0.8355 + Stunden_korr 'Sonnenuntergang End Sub Danke, Simon | |
Antwort schreiben Antworten: ![]() ![]() ![]() ![]() |
Zur Übersicht - INFO - Neueste 50 Beiträge - Neuer Beitrag - Suchen - Zum C-Control-I-Forum - Zum C-Control-II-Forum