Calcola la somma e la media dei numeri nella tabella dati dei numeri DINT
Questa istruzione FP calcola la somma e la media aritmetica dei numeri DINT positivi e negativi nella tabella dati specificata da s1_Start e s2_End. La somma di tutti gli elementi nella tabella dati viene restituita all'uscita d1_Sum, mentre la media aritmetica di tutti gli elementi nella tabella dati viene restituita all'uscita d2_Mean. Se non è un numero intero, la media aritmetica viene arrotondata.
Ingresso
Inizio della tabella dati
Fine della tabella dati
Uscita
Somma di tutti gli elementi nell'area della tabella dati specificata
Media di tutti gli elementi nell'area della tabella dati specificata
se l'area specificata utilizzando il registro indice eccede il limite.
se 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 s1_Start>s2_End
se s1_Start e s2_End appartengono ad aree dati diverse
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
diMean: DINT:=0;
(*the arithmetic mean of all elements of data_array; here: 2*)
adiSum: ARRAY [0..1] OF DINT:=[2(0)];
(*the sum of all elements of data_array; here: 6*)
adiDataField: ARRAY [0..2] OF DINT:=[3,-1,4];
bStart: BOOL:=FALSE;
(*activates the function*)
END_VAR
Quando la variabile bStart è impostata su TRUE, la funzione viene eseguita.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 5 ;
NETWORK_BODY
B(B_CONTACT,,bStart,4,1,6,3,);
B(B_F,FP_DATA_MEAN_SUM_DINT0!,,14,0,28,5,,?DEN?Ds1_Start?Ds2_End?AENO?Cd1_Sum?Cd2_Mean);
B(B_VARIN,,adiDataField[0],12,2,14,4,);
B(B_VAROUT,,adiSum,28,2,30,4,);
B(B_VARIN,,adiDataField[2],12,3,14,5,);
B(B_VAROUT,,diMean,28,3,30,5,);
L(1,0,1,5);
L(1,2,4,2);
L(6,2,14,2);
END_NETWORK_BODY
END_NET_WORK
END_BODY
if (bStart) then
FP_DATA_MEAN_SUM_DINT0(s1_Start := adiDataField[0],
s2_End := adiDataField[2],
d1_Sum => diSum,
d2_Mean => diMean);
End_if;