FP_COMPARE_BLOCK

ブロック一致検出

実行条件ENがTRUEのとき、s3_StartBlock1で指定したデータブロックの内容と、s4_StartBlock2で指定したデータブロックの内容を比較します。s1_Controlはバイト位置を指定し、n_Bytesはバイト数を指定します。

パラメータ

入力

s1_Control (WORD, INT, UINT): バイト位置を指定する制御コード
n_Bytes (WORD, INT, UINT): 比較するバイト数。値:1～99
s3_StartBlock1 (WORD, INT, UINT): s4_StartBlock2と比較されるデータブロック1の先頭アドレス
s4_StartBlock2 (WORD, INT, UINT): s3_StartBlock1と比較されるデータブロック2の先頭アドレス

出力

d_IsEqual (BOOL)

比較演算結果

s3_StartBlock1=s4_StartBlock2のときTRUE

解説

制御コードs2_Controlの指定s1_Control
1. (1) s3_StartBlock1で指定したデータブロックの先頭バイト位置
  1：上位バイトから開始
  
  0：下位バイトから開始
2. (2) s4_StartBlock2で指定したデータブロックの先頭バイト位置
  1：上位バイトから開始
  
  0：下位バイトから開始
変数s3_StartBlock1とs4_StartBlock2は同じデータ型を使用してください。

例

POUヘッダ

POUヘッダには、このプログラムで使用するすべての入力変数と出力変数を宣言します。 POUヘッダは全プログラム言語で使用できます。

	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

POUボディ

変数bStartがTRUEにセットされると、このファンクションが実行されます。

LDボディ

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

STボディ

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;