Es tut mir Leid, dass ich nochmals nachaken muss.
Mir ist das noch nicht ganz klar was der Vorteil und der Sinn vom Calendar ist. Habe das Manual und dieverse Beiträge im Forum gelesen. Leider habe ich immer noch diverse
ich habe folgendes gemacht:
VAR_GLOBAL
mein_calendar : calendar;
END_VAR
Programmiert ist folgendes:
(*Systemzeit aus dem CX lesen *)
System_zeit_CX
( NETID:=,
Start:=tackt4 ,
TMOUT:=tmount ,
BUSY=> ,
ERR=> ,
ERRID=> ,
TIMESTR=> );
(*Systemzeit kovertiereb auf zusammengesetztes Zeitdatum *)
System_date_time:= SET_DT(
year:= SYSTEM_ZEIT_CX.TIMESTR.wYear,
month:= SYSTEM_ZEIT_CX.TIMESTR.wMonth,
day:= SYSTEM_ZEIT_CX.TIMESTR.wDay,
HOUR:= SYSTEM_ZEIT_CX.TIMESTR.wHour,
MINUTE:= SYSTEM_ZEIT_CX.TIMESTR.wMinute,
SECOND:= SYSTEM_ZEIT_CX.TIMESTR.wSecond);
(*Systemzeit In "Wellzeit umwandeln *)
Utc_CX:= LTIME_TO_UTC (System_date_time, TRUE, 180);
(*Berechung der Position der Sonne zur aktuellen Zeit *)
SUN_POS_Schongau(
latitude:= Ort_lat,
longitude:= Ort_long,
utc:= UTC_CX,
B=> SUN_AZI ,
H=> sun_high2,
HR=> SUN_high);
;
(*Berechung Sonnenaufgang, Sonnenuntergang, Höststand der Sonne *)
SUN_TIME_Schongau(
latitude:=Ort_lat ,
longitude:=Ort_long ,
utc:=System_date_time ,
sun_midday=> sun_midday,
sun_rise=> sun_rise ,
sun_set=> sun_set ,
sun_declination=> sun_declination );
(* Offet von UTC auf Local Time addieren *)
sun_midday_schongau := sun_midday + t#2h;
sun_rise_schongau := sun_rise + t#2h;
sun_set_schongau := sun_set + t#2h;
;
Muss ich jetzt alle mein_calendar.xxx zuweisen was ich berechnet habe?
mein_calendar.UTC := UTC_CX;
mein_calendar.SUN_RISE :=sun_rise ;
...
usw.
Wie weiss ich, was BLIND_SHADE beim CX eingang alles benötigt?
Besten Dank für Eure Hilfe.
[gelöscht durch Administrator]