Ziffernverteilung
Dieser FP-Befehl zerlegt den Eingangswert am Eingang s in die durch n_Digits festgelegte Ziffernzahl und verteilt die Ziffern an die Adressen beginnend bei d_Start.
Eingang
Eingangswert
Anzahl der zu verteilenden Ziffern, Bereich: 0–4
Bei n_Bytes=0 wird der Befehl nicht ausgeführt.
Ausgang
Anfangsadresse des Datenbereichs für die Ergebnisse. Die Größe beträgt n_Bits * 2 Worte.
wenn der mit dem Index-Modifizierer definierte Bereich größer ist als der zulässige Bereich
wenn der Wert von n_Bytes außerhalb des zulässigen Bereichs liegt
wenn der Wert von n_Bytes ein Ergebnis liefert, das größer ist als der Speicherbereich mit der Anfangsadresse d_Start
wenn der mit dem Index-Modifizierer definierte Bereich größer ist als der zulässige Bereich
wenn der Wert von n_Bytes außerhalb des zulässigen Bereichs liegt
wenn der Wert von n_Bytes ein Ergebnis liefert, das größer ist als der Speicherbereich mit der Anfangsadresse d_Start
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
bStart: BOOL:=TRUE;
wData_input: WORD:=16#7310;
awOutput_distrib: ARRAY [0..3] OF WORD:=[4(0)];
END_VAR
Wenn die Variable bStart auf TRUE gesetzt wird, wird die Funktion ausgeführt.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 5 ;
NETWORK_BODY
B(B_F,FP_DIVIDE_DIGITS!,,9,0,19,5,,?DEN?D@'s'?Dn_Digits?AENO?Cd_Start);
B(B_CONTACT,,bStart,4,1,6,3,);
B(B_VARIN,,wData_input,7,2,9,4,);
B(B_VARIN,,4,7,3,9,5,);
B(B_VAROUT,,awOutput_distrib[0],19,2,21,4,);
L(6,2,9,2);
L(1,2,4,2);
L(1,0,1,5);
END_NETWORK_BODY
END_NET_WORK
END_BODY
If (bStart) then
FP_DIVIDE_DIGITS(s := wData_input, n_Digits := 4, d_Start => awOutput_distrib[0]);
End_if;