Trier des données dans un tableau de données
Cette instruction FP trie les valeurs (avec signes +/-) dans un tableau de données dans l’ordre croissant ou décroissant.
Cette instruction trie uniquement les valeurs de tableaux à 1 dimension. Elle ne fonctionne pas dans les tableaux à 2 ou 3 dimensions.
Entrée
Zone de départ du tableau des données qui doivent être triées
Zone finale du tableau des données qui doivent être triées
Indique l’ordre de tri :
0 = croissant
1 = décroissant
Les données sont triées, via un procédé de tri par permutation (tri à bulles), dans l’ordre indiqué par la valeur en entrée s3_Control. Puisque le nombre de comparaisons de mots correspond au nombre de mots au carré, le tri peut prendre quelque temps lorsqu’il y a un grand nombre de mots. Lorsque l’adresse de la variable en entrée s1_Start = s2_End, aucun tri n’a lieu.
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.
Instructions F correspondantes : F277_SORT, F278_DSORT, F353_FSORT
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
bStart: BOOL:=FALSE;
(*activates the function*)
adiDataField: ARRAY [0..4] OF DINT:=[4,7,-32,13,5];
(*result after a 0->1 leading
edge from start: [-32,4,5,7,13]*)
iOrder: INT:=0;
(*which way to sort:
0 means ascending order
1 means descending order*)
END_VAR
La fonction est exécutée lorsque la variable bStart est définie sur TRUE.
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_SORT!,,11,1,20,7,,?DEN?Ds1_Start?Ds2_End?Ds3_Control?AENO);
B(B_CONTACT,,bStart,5,2,7,4,);
B(B_VARIN,,adiDataField[0],9,3,11,5,);
B(B_VARIN,,adiDataField[4],9,4,11,6,);
B(B_VARIN,,iOrder,9,5,11,7,);
L(1,3,5,3);
L(7,3,11,3);
L(1,0,1,7);
END_NETWORK_BODY
END_NET_WORK
END_BODY
If (bStart) then
FP_DATA_SORT(s1_Start := adiDataField[0],
s2_End := adiDataField[4],
s3_Control := iOrder);
End_if;