FP_COMPARE_BLOCKDatenblöcke vergleichen
Die Daten des Datenblocks von s3_StartBlock1 werden mit den Daten des Datenblocks von s4_StartBlock2 verglichen. Dazu muss der Trigger EN auf TRUE gesetzt sein. s1_Control gibt die Bytepositionen an und n_Bytes die Anzahl der Bytes.

Eingang
Steuercode, der die Bytepositionen angibt
Anzahl der Bytes, die verglichen werden sollen. Werte: 1–99
Anfangsadresse von Datenblock 1, der mit s4_StartBlock2 verglichen werden soll
Anfangsadresse von Datenblock 2, der mit s3_StartBlock1 verglichen werden soll
Ausgang
Verknüpfungsergebnis vergleichen
TRUE wenn s3_StartBlock1 = s4_StartBlock2
Spezifikationen für den Steuercodes1_Control
1: Start vom höherwertigen Byte
0: Start vom niederwertigen Byte
1: Start vom höherwertigen Byte
0: Start vom niederwertigen Byte
Die Variablen s3_StartBlock1 und s4_StartBlock2 müssen vom gleichen Datentyp sein.

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:=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_VARWenn 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 := 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;