Soustraction des données BCD
Cette instruction FP soustrait les données BCD spécifiées par s2 de celles spécifiées par s1 lorsque le déclencheur EN est TRUE. Le résultat est sauvegardé dans d.
Entrée
Diminuende, diminuteur
Sortie
Différence
Toutes les variables d’entrée et de sortie utilisées pour programmer cette fonction ont été déclarées dans l’en-tête du POU. Le même en-tête de POU est utilisé pour tous les langages de programmation.
VAR
bStart: BOOL:=FALSE;
(*activates the function*)
dwMinuend: DWORD:=16#23210044;
dwSubtrahend: DWORD:=16#00210011;
(*this value will be subtracted
from the value at s1*)
dwResult: DWORD;
(*result after 0->1 leading
edge from start:
16#23000033*)
END_VAR
La fonction est exécutée lorsque la variable bStart passe de FALSE à TRUE.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 6 ;
NETWORK_BODY
B(B_F,FP_SUB_BCD!,,17,1,25,6,,?DEN?D@'s1'?Ds2?AENO?Cd);
B(B_CONTACT,,bStart,11,2,13,4,R);
B(B_VARIN,,dwMinuend,15,3,17,5,);
B(B_VARIN,,dwSubtrahend,15,4,17,6,);
B(B_VAROUT,,dwResult,25,3,27,5,);
L(1,3,11,3);
L(13,3,17,3);
L(1,0,1,6);
END_NETWORK_BODY
END_NET_WORK
END_BODY
IF DF(start) then
FP_SUB_BCD(s1 := dwMinuend, s2 := dwSubtrahend, d => dwResult);
END_IF;