LREAL in TIME
LREAL_TO_TIME wandelt einen Wert vom Datentyp LREAL in einen Wert vom Datentyp TIME um. 10ms des Datentyps TIME entsprechen 1.0 LREAL-Einheit, z.B. wenn LREAL = 1.0, TIME = 10ms; wenn LREAL = 100.0, TIME = 1s. Für die Umwandlung wird der Wert von dem Datentyp REAL auf die nächste ganze Zahl auf- bzw. abgerundet.
Ausgang
Im POE-Kopf werden alle Ein- und Ausgangsvariablen deklariert, die für die Programmierung dieser Funktion verwendet werden.Für alle Programmiersprachen wird der gleiche POE-Kopf verwendet.
VAR
lrValue: LREAL:=5.983e5;
bStart: BOOL:=FALSE;
tResult: TIME:=T#0s;
END_VAR
Wenn die Variable bStart auf TRUE gesetzt wird, wird die Funktion ausgeführt.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 6 ;
NETWORK_BODY
B(B_CONTACT,,bStart,3,2,5,4,);
B(B_F,E_LREAL_TO_TIME!,,10,1,19,5,,?DEN?Da_LReal?AENO?C);
B(B_VARIN,,lrValue,8,3,10,5,);
B(B_VAROUT,,tResult,19,3,21,5,);
L(1,0,1,6);
L(1,3,3,3);
L(5,3,10,3);
END_NETWORK_BODY
END_NET_WORK
END_BODY
if (bStart) then
tResult:=LREAL_TO_TIME(lrValue);
end_if;