Somme et moyenne arithmétique d’un tableau de données de 16 bits
Cette fonction calcule la somme et la moyenne arithmétique de nombres (avec signes +/-) dans le tableau de données 16 bits indiqué.
Entrée
Zone de départ du tableau de données
Zone finale du tableau de données
Sortie
Somme de tous les éléments du tableau de données indiqué
Moyenne de tous les éléments du tableau de données indiqué
L’entrée s1_Start désigne la zone de départ du tableau de données et s2_End indique la fin. La somme de tous les éléments du tableau de données est renvoyée en sortie Sum et la moyenne arithmétique de tous les éléments du tableau de données est renvoyée en sortie Mean. La moyenne arithmétique est arrondie lorsque la valeur n’est pas un nombre entier.
Si la zone spécifiée à l’aide du modificateur d’adresse est en dehors des limites autorisées.
Si l’adresse de la variable en entrée s1_Start > s2_End.
Si s1_Start et s2_End appartiennent à différentes zones de données.
Si la zone spécifiée à l’aide du modificateur d’adresse est en dehors des limites autorisées.
Si l’adresse de la variable en entrée s1_Start > s2_End.
Si s1_Start et s2_End appartiennent à différentes zones de données.
Si le résultat est en dehors de l’intervalle de 16 bits.
Toutes les variables d’entrée et de sortie utilisées pour programmer cette fonction ont été déclarées dans l’en-tête du POU. Le même en-tête de POU est utilisé pour tous les langages de programmation.
VAR
start: BOOL:=FALSE;
(*activates the function*)
data_array: ARRAY [0..4] OF INT:=[4,7,-32,13,5];
sum: DINT:=0;
(*the sum of all elements of
data_array; here: -3*)
mean: INT:=0;
(*the arithmetic mean of all
elements of data_array;
here: 0*)
END_VAR
La fonction est exécutée lorsque la variable start est sur TRUE. La fonction calcule la somme de tous les éléments du tableau de données (somme = 4 + 3 + 8 + (-2) + 1 + (-6) = 8
) et écrit le résultat (dans ce cas 8) dans sum. De plus, la fonction calcule la moyenne arithmétique de tous les éléments du tableau de données (moyenne = somme/6 = (4 + 3 + 8 + (-2) + 1 + (-6)) / 6 = 1.333
) et écrit le nombre arrondi (dans ce cas 1) dans mean.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 6 ;
NETWORK_BODY
B(B_VARIN,,output,8,1,10,3,);
B(B_VARIN,,data field[0],8,2,10,4,);
B(B_VARIN,,data field[4],8,3,10,5,);
B(B_F,F275_MEAN,,10,0,19,5,,?DEN?D@'s1'?Ds2?AENO?Csum?Cmean);
B(B_VAROUT,,sum,19,2,21,4,);
B(B_VAROUT,,mean,19,3,21,5,);
L(1,0,1,6);
END_NETWORK_BODY
END_NET_WORK
END_BODY
IF start then
F275_MEAN( s1_Start:= data_field[0],
s2_End:= data_field[4],
Sum=> sum,
Mean=> mean);
END_IF;