Scambio di un blocco di dati a 16 bit
La funzione scambia un blocco di dati a 16 bit per un altro. L'inizio del primo blocco di dati è specificato all'uscita d1_Start e la fine all'uscita d2_End. L'uscita d3_Start specifica l'inizio del secondo blocco di dati.
Uscita
area a 16 bit iniziale del blocco dati 1
area a 16 bit finale del blocco dati 1
area a 16 bit iniziale del blocco dati 2
se l'indirizzo delle variabili alle uscite d1_Start > d2_End.
se il blocco di dati da scambiare è più grande dell'area di destinazione.
se l'indirizzo delle variabili alle uscite d1_Start > d2_End.
se il blocco di dati da scambiare è più grande dell'area di destinazione.
Tutte le variabili di ingresso e uscita utilizzate per programmare questa funzione sono state dichiarate nell'intestazione del POU. La stessa intestazione del POU è utilizzata per tutti i linguaggi di programmazione.
VAR
start: BOOL:=FALSE;
(*activates the function*)
d1: ARRAY [0..5] OF INT:=[1,2,3,4,5,6];
(*result after a 0->1 leading
edge from start:
[1,2,8,9,10,6]*)
d2: ARRAY [0..5] OF INT:=[7,8,9,10,11,12];
(*result after a 0->1 leading
edge from start:
[7,3,4,5,11,12]*)
END_VAR
Quando la variabile start è impostata su TRUE, la funzione viene eseguita.
Scambia i dati dell'ARRAY data_field_1 (dal 2° al 5° elemento) con i dati dell'ARRAY data_field_2 (dal 3° elemento in avanti).BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 13 ;
NETWORK_BODY
B(B_VARIN,,output,5,1,7,3,);
B(B_VAROUT,,data_field_1[2],15,2,17,4,);
B(B_VAROUT,,data_field_1[5],15,3,17,5,);
B(B_VAROUT,,data_field_2[3],15,4,17,6,);
B(B_F,F18_BXCH,,7,0,15,6,,?DEN?AENO?Cd1?Cd2?Cd3);
B(B_COMMENT,,data_field_1[2] <----> data_field_2[3]ø^data_field_1[3] <----> data_field_2[4]ø^data_field_1[4] <----> data_field_2[5]ø^data_field_1[5] <----> data_field_2[6],24,4,41,8,);
B(B_COMMENT,,data_field_1[6] data_field_2[7]ø^data_field_1[7]ø^data_field_1[8]ø^data_field_1[9],24,8,41,12,);
B(B_COMMENT,, data_field_2[0]ø^data_field_1[0] data_field_2[1]ø^data_field_1[1] data_field_2[2],24,1,41,4,);
L(1,0,1,13);
END_NETWORK_BODY
END_NET_WORK
END_BODY
IF start then
F18_BXCH(
d1_Start=> d1[2], d2_End=> d1[4], d3_Start=> d2[1]);
END_IF;