데이터 블록을 오른쪽으로 시프트
이 FP 명령은 트리거 EN이 TRUE이면 n_Words에서 지정한 워드 수만큼 d1_Start와 d2_End에서 지정한 데이터 범위를 오른쪽(하위 위치)으로 시프트합니다.
비어 있는 위치는 0으로 채웁니다.
입력
워드 수 (허용 범위: 0–255)
출력
시작 어드레스
끝 어드레스
d1_Start >d2_End인 경우
d1_Start >d2_End인 경우
이 펑션 프로그램 시 사용한 모든 입력과 출력 변수는 POU 헤더에서 선언되었습니다. 모든 프로그래밍 언어에 같은 POU 헤더를 사용합니다.
VAR
bStart: BOOL:=FALSE;
(*activates the function*)
awDataField: ARRAY [0..3] OF WORD:=[16#1001,16#1000,16#0011,16#1010];
(*result after a 0->1 leading edge
from start: [2,0,3,4]*)
iNumWords: INT:=0;
END_VAR
변수 bStart가 FALSE에서 TRUE로 변경되면 함수가 실행됩니다.
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_VAROUT,,awDataField[3],19,3,21,5,);
B(B_VARIN,,iNumWords,7,2,9,4,);
B(B_CONTACT,,bStart,4,1,6,3,R);
B(B_F,FP_WSHR_BLOCK!,,9,0,19,5,,?DEN?Dn_Words?AENO?Cd1_Start?Cd2_End);
B(B_VAROUT,,awDataField[1],19,2,21,4,);
L(1,2,4,2);
L(6,2,9,2);
L(1,0,1,5);
END_NETWORK_BODY
END_NET_WORK
END_BODY
IF DF(bStart) then
FP_WSHR_BLOCK(d1_Start := awDataField[1],
d2_End => awDataField[3],
n_Words => iNumWords);
END_IF;