Comparaison des blocs de données
Cette instruction compare le contenu du bloc de données spécifié par s3_StartBlock1 avec le contenu du bloc de données spécifié par s4_StartBlock2 lorsque le déclencheur EN est TRUE. s1_Control indique les positions des octets et n_Bytes le nombre d’octets.
Entrée
Code de contrôle spécifiant les positions des octets
Nombre d’octets à comparer. Valeurs : 1–99
Adresse de départ du bloc de données 1 à comparer avec s4_StartBlock2
Adresse de départ du bloc de données 2 à comparer avec s3_StartBlock1
Sortie
Résultat de la comparaison
TRUE si s3_StartBlock1 = s4_StartBlock2
Paramétrer le code de contrôle s1_Control
1 : à partir de l’octet de poids fort
0 : à partir de l’octet de poids faible
1 : à partir de l’octet de poids fort
0 : à partir de l’octet de poids faible
Les variables s3_StartBlock1 et s4_StartBlock2 doivent être du même type de données.
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*)
wControlCode: WORD:=16#11;
(*s3 starting from upper byte
s4 starting from upper byte
compare 6 bytes*)
iNumberOfBytes: INT:=6;
(*number of bytes to be compared*)
awDataBlock1: ARRAY [0..2] OF WORD:=[3(0)];
aiDataBlock2: ARRAY [0..5] OF INT:=[6(1234)];
bCompareResult: BOOL:=FALSE;
END_VAR
La fonction est exécutée lorsque la variable bStart est définie sur TRUE.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 8 ;
NETWORK_BODY
B(B_F,FP_COMPARE_BLOCK!,,13,1,24,8,,?DEN?Ds1_Control?Dn_Bytes?Ds3_StartBlock1?Ds4_StartBlock2?AENO?Cd_IsEqual);
B(B_CONTACT,,bStart,5,2,7,4,);
B(B_VARIN,,wControlCode,11,3,13,5,);
B(B_VARIN,,iNumberOfBytes,11,4,13,6,);
B(B_VARIN,,awDataBlock1[0],11,5,13,7,);
B(B_VARIN,,aiDataBlock2[0],11,6,13,8,);
B(B_VAROUT,,bCompareResult,24,3,26,5,);
L(1,3,5,3);
L(7,3,13,3);
L(1,0,1,8);
END_NETWORK_BODY
END_NET_WORK
END_BODY
If (bStart) then
FP_COMPARE_BLOCK(s1_Control := wControlCode,
n_Bytes := iNumberOfBytes,
s3_StartBlock1[0] := awDataBlock1,
s4_StartBlock2[0] := aiDataBlock2,
d_IsEqual => bCompareResult);
End_if;