F304_BACOS

BCD形実数逆余弦

3つの要素を持つ配列 ARRAY s で指定されたBCD値の逆余弦を演算します。演算結果は、0 ～ 360度 (16#0～16#360) のBCD形式の角度データとして、dに格納されます。

パラメータ

入力

s ARRAY [0..2] of (WORD): 角度データを3ワードで格納するエリア

出力

d (WORD): 演算結果

解説

入力sは、-1.0000 ～ 1.0000のBCDデータで、以下のように指定します。

ARRAY[0]: 符号(正のとき0、負のとき1)
ARRAY[1]: 整数部(0または1)
ARRAY[2]: 小数点以下の値を4桁のBCD値として入力 (16#0000～16#9999)

エラーフラグ

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

s の入力値がBCDデータでないときON
s の入力値が-1.0000～1.0000の範囲内でないときON

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

s の入力値がBCDデータでないときON
s の入力値が-1.0000～1.0000の範囲内でないときON

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

結果が“0”のときON

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

結果がオーバーフローしたときON

例

POUヘッダ

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

	VAR
		output: BOOL:=FALSE;
			(*activates the function*)
		input_value: ARRAY [0..2] OF WORD:=[3(0)];
			(*number between -9999.9999 and 9999.9999
input_value[0] = +/- sign
input_value[1] = pre-decimal point values
input_value[2] = post-decimal point values*)
		output_value: WORD:=0;
			(*BCD value between
16#0 and 16#360 (0° and 360°)
result: here 16#20*)
	END_VAR
	VAR
		output: BOOL:=FALSE;
			(*activates the function*)
		input_value: ARRAY [0..2] OF WORD:=[3(0)];
			(*number between -9999.9999 and 9999.9999
input_value[0] = +/- sign
input_value[1] = pre-decimal point values
input_value[2] = post-decimal point values*)
		output_value: WORD:=0;
			(*BCD value between
16#0 and 16#360 (0° and 360°)
result: here 16#20*)
	END_VAR

LDボディ

変数startがON (TRUE)のとき、このファンクションが実行されます。

input_valueの最初の要素には、0 (正の符号)が入力されています。2番目の要素には0 (整数部)、3番目の要素には8660 (小数部)が入力されています。演算結果として、output_value に16#30 (30度)が格納されます。

BODY
    WORKSPACE
        NETWORK_LIST_TYPE := NWTYPELD ;
        ACTIVE_NETWORK := 0 ;
    END_WORKSPACE
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 5 ;
        NETWORK_BODY
B(B_VARIN,,output,7,1,9,3,);
B(B_VARIN,,input_value,7,2,9,4,);
B(B_VAROUT,,output_value,18,2,20,4,);
B(B_F,F304_BACOS,,9,0,18,4,,?DEN?D@'s'?AENO?Cd);
L(1,0,1,5);
        END_NETWORK_BODY
    END_NET_WORK
END_BODY

STボディ

IF start THEN         
    F304_BACOS(input_value, output_value);
END_IF;