BCD 형식 아크사인 연산
이 펑션은 입력 s에서 입력된 BCD 값의 아크사인을 세 개 요소가 있는 ARRAY로 계산합니다. 결과는 출력 BCD에서 0° ∼ 360°(16#0 ∼ 16#360) 범위의 d 각도 데이터로 반환됩니다.
입력
각도 데이터가 저장되는 영역
출력
워드 3개에 저장된 결과
입력 s의 BCD 값은 -1,0000 ∼ 1,0000 영역에 존재합니다. 이 값은 다음과 같이 입력됩니다.
선행 부호(입력이 +인 경우는 0, 입력이 -인 경우는 1)
소수점 앞 정수(0 또는 1)
4개 유효 숫자가 BCD 값인 소수점 뒤 수(16#0000 ∼16#9999).
s가 BCD 값이 아닌 경우
s가 -1,0000과 1,0000 사이가 아닌 경우.
s가 BCD 값이 아닌 경우
s가 -1,0000과 1,0000 사이가 아닌 경우.
결과가 0인 경우.
결과가 더 큰 경우.
이 펑션 프로그램 시 사용한 모든 입력과 출력 변수는 POU 헤더에서 선언되었습니다. 모든 프로그래밍 언어에 같은 POU 헤더를 사용합니다.
VAR
start: BOOL:=FALSE;
(*activates the function*)
input_value: ARRAY [0..2] OF WORD:=[2(0),16#5000];
(*corresponds to 0.5*)
output_value: WORD:=0;
(*result after a 0->1 leading
edge from start: 16#60
corresponds to 60°*)
END_VAR
ARRAY의 input_value의 첫 번째 요소에는 값 1(- 부호)이 부여됩니다. 두 번째 요소는 정수 값 0을 가지며 세 번째 요소에서는 16#4500을 소수점 뒤 값으로 씁니다. 변수 start가 TRUE로 설정되면 펑션이 실행됩니다.output_value의 결과는 16#333 (333°)입니다.
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,,1,8,0,10,2,);
B(B_VAROUT,,input_value[0],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 := 3 ;
NETWORK_BODY
B(B_VARIN,,0,8,0,10,2,);
B(B_VAROUT,,input_value[1],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 := 3 ;
NETWORK_BODY
B(B_VARIN,,16#4500,8,0,10,2,);
B(B_VAROUT,,input_value[2],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 := 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,F303_BASIN,,9,0,18,4,,?DEN?D@'s'?AENO?Cd);
L(1,0,1,5);
END_NETWORK_BODY
END_NET_WORK
END_BODY
input_value[0]:=1;
input_value[1]:=0;
input_value[2]:=16#4500;
IF start THEN
F303_BASIN(input_value, output_value);
END_IF;