F301_BCOS

BCD形実数余弦

BCDコードの角度データ(入力s)の COS を演算します。演算結果(出力d)は、3つの要素を持つ配列にBCD値として格納されます。

パラメータ

入力

s (WORD): 角度データを格納する16ビットエリア

出力

d ARRAY [0..2] of (WORD): 結果を3ワードで格納

解説

入力sのBCD値は、0～360度 (16#0～16#360) の範囲で、1度単位で指定します。出力dの結果は、-1.0000～1.0000の範囲となります。演算結果は、以下のように出力されます。

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

エラーフラグ

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

s の入力値がBCDデータでないときON
s の入力値が 0～360度の範囲でないときON

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

s の入力値がBCDデータでないときON
s の入力値が 0～360度の範囲でないときON

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

結果が“0”のときON

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

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

例

POUヘッダ

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

	VAR
		start: BOOL:=FALSE;
			(*activates the function*)
		input_value: WORD:=16#60;
			(*corresponds to 60Â°*)
		output_value: ARRAY [0..2] OF WORD:=[3(0)];
			(*result after a 0->1 leading
edge from start:
[0,1,7321]*)
	END_VAR

この例では、入力変数input_valueが宣言されています。ファンクションの入力ピンに、定数を直接記述することもできます。(例: 45度の場合: 16#45)

LDボディ

この例では、値16#45°が変数input_valueに入力されています。変数startがON (TRUE)のとき、このファンクションが実行されます。出力dに格納される値は、output_value[0] = 0、output_value[1] = 0、output_value[2] = 7071となります。

BODY
    WORKSPACE
        NETWORK_LIST_TYPE := NWTYPELD ;
        ACTIVE_NETWORK := 0 ;
    END_WORKSPACE
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 3 ;
        NETWORK_BODY
B(B_VARIN,,16#45,8,0,10,2,);
B(B_VAROUT,,input_value,10,0,12,2,);
L(1,0,1,3);
        END_NETWORK_BODY
    END_NET_WORK
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 6 ;
        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,F301_BCOS,,9,0,18,4,,?DEN?D@'s'?AENO?Cd);
B(B_COMMENT,,output_value[0] = 1ø^if input_valueø^between 91° and 269°,26,0,38,3,);
B(B_COMMENT,,output_value[1] = 1ø^if input_valueø^0° or 180°,26,3,38,6,);
L(1,0,1,6);
        END_NETWORK_BODY
    END_NET_WORK
END_BODY

STボディ

input_value:=16#45;
IF start THEN         
    F301_BCOS( input_value, output_value );
END_IF;