Rimuovi e comprimi i dati
Questa istruzione FP rimuove i dati diversi da zero memorizzati nell'indirizzo più alto della tabella spostandoli nell'area specificata e comprime i dati nella tabella verso l'indirizzo più significativo.
Uscita
Indirizzo iniziale (più basso) dei dati da comprimere
Indirizzo finale (più alto) dei dati da comprimere, i dati in d2_End vengono rimossi
Riceve i dati rimossi da d2_End
I dati nella tabella specificati da d1_Start e d2_End vengono ridisposti come segue:
I contenuti di d2_End (indirizzo più alto) vengono rimossi nell'area specificata da d3.
I dati diversi da zero vengono spostati (compressi) in ordine sequenziale, nella direzione dell'indirizzo più significativo nell'intervallo specificato.
L'area iniziale d1_Start e l'area finale d2_End devono presentare lo stesso tipo di operando.
d1_Start deve essere £d2_End
se l'area specificata utilizzando il registro indice eccede il limite.
se l'indirizzo della variabile all'ingresso s1_Start > s2_End.
se s1_Start e s2_End appartengono ad aree dati diverse
se l'area specificata utilizzando il registro indice eccede il limite.
se l'indirizzo della variabile all'ingresso s1_Start > s2_End.
se s1_Start e s2_End appartengono ad aree dati diverse
Istruzioni F corrispondenti: F98_CMPR Istruzione ridondante
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
bStart: BOOL:=FALSE;
aiDataField: ARRAY [0..5] OF INT:=[555,444,0,11,0,10];
iShiftoutData: INT:=10;
END_VAR
Quando la variabile bStart è impostata su TRUE, la funzione viene eseguita.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 7 ;
NETWORK_BODY
B(B_F,FP_DATA_READ_COMPRESS!,,10,1,24,7,,?DEN?AENO?Cd1_Start?Cd2_End?Cd3);
B(B_CONTACT,,bStart,5,2,7,4,);
B(B_VAROUT,,aiDataField[0],24,3,26,5,);
B(B_VAROUT,,aiDataField[5],24,4,26,6,);
B(B_VAROUT,,iShiftoutData,24,5,26,7,);
L(1,3,5,3);
L(7,3,10,3);
L(1,0,1,7);
END_NETWORK_BODY
END_NET_WORK
END_BODY
If (bStart) then
FP_DATA_READ_COMPRESS(d1_Start => aiDataField[0],
d2_End => aiDataField[5],
d3 => iShiftoutData);
End_if;