F40_BADD

4桁BCD 加算

実行条件ENがONのとき、sで指定された4桁BCDデータを、dで指定された4桁BCDデータに加算します。結果はdに格納されます。

パラメータ

入力

s (WORD): 加算データ(4桁BCDデータを格納している16ビットエリア)

出力

d (WORD): 被加算データと演算結果(4桁BCDデータを格納している16ビットエリア)

例

(1) 値の例： 16#2111 (BCD)
(2) 値の例： 16#0011 (BCD)
(3) 実行条件がONになると、演算結果 16#2122 (BCD) が得られます

解説

F命令を使用する代わりに、対応するFP7命令を使用することをおすすめします。FP_ADD_BCD

注記

この命令を実行すると、被加算データを格納しているエリアdは、演算結果によって上書きされます。上書きせずに加算結果の格納先を直接指定する場合は、F41_DBADD命令を使用してください。

エラーフラグ

sys_bIsEqual (1回のスキャンに対してTRUE): 結果が "0"のとき
sys_bIsCarry (1回のスキャンに対してTRUE): 演算結果がオーバーフローしたときON

例

POUヘッダ

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

	VAR
		start: BOOL:=FALSE;
			(*activates the function*)
		summand: WORD:=16#2111;
			(*this value will be added
to the output_value*)
		output_value: WORD:=16#0011;
			(*result after 0->1 leading
edge from start: 16#2122*)
	END_VAR

LDボディ

変数startが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_CONTACT,,start,3,2,5,4,R);
B(B_F,F40_BADD!,Instance,9,1,15,5,,?DEN?D@'s'?AENO?Cd);
B(B_VARIN,,summand,7,3,9,5,);
B(B_VAROUT,,output_value,15,3,17,5,);
L(1,0,1,6);
L(1,3,3,3);
L(5,3,9,3);
        END_NETWORK_BODY
    END_NET_WORK
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 6 ;
        NETWORK_BODY
L(1,0,1,6);
        END_NETWORK_BODY
    END_NET_WORK
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 6 ;
        NETWORK_BODY
L(1,0,1,6);
        END_NETWORK_BODY
    END_NET_WORK
END_BODY

STボディ

IF start then
    F40_BADD(summand, output_value);
END_IF;

ILボディ

LD	start	(* EN = start; Starting signal for the F40_BADD function. *)
F40_BADD	summand, output_value	(* s = summand (source) ) ( d = output_value (destination) *)
		(* s + d = d *)
ST	out	(* option *)