FP_DIV_MOD_BCD

BCDデータ除算(余り演算あり)

このFP命令は、実行条件ENがTRUEのとき、s1とs2によって指定されたBCDデータを除算します。整数の商がd1_Divに格納され、余りはd2_Modに格納されます。

パラメータ

入力

s1 (WORD, DWORD): 被除数データ
s2 (WORD, DWORD): 除数データ

出力

d1_Div (WORD, DWORD): 整数の商
d2_Mod (WORD, DWORD): 余り

エラーフラグ

sys_bIsOperationErrorHold (TRUEになり、TRUEを保持)

インデックス修飾時にエリアを超えたとき
s2に0が指定されたとき
BCDデータ以外のデータが指定されたとき

sys_bIsOperationErrorNonHold (1回のスキャンに対してTRUE)

インデックス修飾時にエリアを超えたとき
s2に0が指定されたとき
BCDデータ以外のデータが指定されたとき

例

POUヘッダ

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

	VAR
		bStart: BOOL:=FALSE;
			(*activates the fuction*)
		dwDividend: DWORD:=16#442201;
			(*dividend*)
		dwDivisor: DWORD:=16#2;
			(*divisor*)
		dwResult: DWORD:=0;
			(*result after a 0->1 leading
edge from start: 16#221100*)
		dwRemainder: DWORD:=0;
			(*remainder: 16#1*)
	END_VAR

LDボディ

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

BODY
    WORKSPACE
        NETWORK_LIST_TYPE := NWTYPELD ;
        ACTIVE_NETWORK := 0 ;
    END_WORKSPACE
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 7 ;
        NETWORK_BODY
B(B_CONTACT,,bStart,4,2,6,4,);
B(B_VAROUT,,dwDividend,9,4,11,6,);
B(B_VARIN,,dwDivisor,6,4,8,6,);
B(B_VAROUT,,dwResult,18,3,20,5,);
B(B_F,FP_DIV_MOD_BCD!,,8,1,18,6,,?DEN?D@'s1'?Ds2?AENO?Cd1_Div?Cd2_Mod);
B(B_VAROUT,,dwRemainder,18,4,20,6,);
B(B_VARIN,,dwDividend,6,3,8,5,);
L(1,3,4,3);
L(6,3,8,3);
L(1,0,1,7);
        END_NETWORK_BODY
    END_NET_WORK
END_BODY

STボディ

IF (bStart) then
    FP_DIV_MOD_BCD(s1 := dwDividend, 
                   s2 := dwDivisor, 
                   d1_Div => dwResult, 
                   d2_Mod => dwRemainder);
END_IF;