Cette section initie et utilise les fonctions du mode compteur modulo (boucle) et les objets.

La section ci-dessous fait partie de la tâche MAST. Elle ne contient aucune condition définie et doit donc être exécutée en boucle :

(*Validation des fonctions*)

(*Autorise l'entrée SYNC à synchroniser et à démarrer la fonction de comptage*)

Encoder.VALID_SYNC:=Waiting_First_Part;

IF Waiting_First_Part

THEN nb_box := 0;

END IF;

(*Dès que le premier carton est passé sous le capteur, les autres fonctions sont validées*)

IF Waiting_Other_Parts

THEN

(*Autorise les captures dans le registre de capture 0*)

Encoder.VALID_CAPT_0:=1;

(*Autorise les comparateurs à générer les résultats*)

Encoder.COMPARE_ENABLE:=1;

(*Appelle l'événement en cas de franchissement du compteur*)

Encoder.EVT_MODULO_ENABLE:=1;

(*Validation des blocs fonction de sortie*)

Encoder.OUTPUT_BLOCK_0_ENABLE:=1;

Encoder.OUTPUT_BLOCK_1_ENABLE:=1;

ELSE

(*Désactivation de la fonction lors de l'arrêt du transporteur*)

Encoder.VALID_CAPT_0:=0

Encoder.COMPARE_ENABLE:=0

Encoder.EVT_MODULO_ENABLE:=0

Encoder.OUTPUT_BLOCK_0_ENABLE:=0

Encoder.OUTPUT_BLOCK_1_ENABLE:=0

END IF

(*Définition des valeurs des seuils inférieur et supérieur*)

Encoder.LOWER_TH_VALUE:=First_Labelling_Point;

Encoder.UPPER_TH_VALUE:=Second_Labelling_Point;

(*Surveillance du retard du procédé*)

IF Encoder.CAPT_0_VALUE>deflection_parameter=true

THEN last_box_late:=1; (*Voyant par défaut allumé*)

ELSE last_box_late:=0; (*Voyant par défaut éteint*)

END IF

(*Lorsque le carton suivant arrive au moment programmé, l'indicateur vert s'allume*)

IF Encoder.CAPT_0_VALUE = 0

THEN Last_Box_On_Target :=1 (*Voyant vert allumé*)

ELSE Last_Box_On_Target :=0 (*Voyant vert éteint*)

END IF