chore: Actualizacion de comentarios. Actualizacion de interfaces. Se añaden elementos.

2026-07-24 09:01:20 +02:00
parent e8d73901e4
commit 0cfcfd4555
19 changed files with 643 additions and 48 deletions
@@ -0,0 +1,57 @@
+{
+    S7_Author := "ABH";
+    S7_BlockNumber := "5000";
+    S7_BlockTitle := "MLC_Qh";
+    S7_Family := "ZeusControl";
+    S7_Optimized := "TRUE";
+    S7_StandardRetain := "FALSE";
+    S7_Version := "1.0"
+}
+DATA_BLOCK DB5000_GNR_ALM
+    VAR RETAIN
+        { S7_MLC := "MLC_3fq" }
+        AlgunaAlarma : Bool;
+    END_VAR
+
+    VAR
+        { S7_MLC := "MLC_4XV" }
+        NuevaAlarma : Bool;
+        { S7_MLC := "MLC_4Px" }
+        BalizaRoja : Bool;
+        { S7_MLC := "MLC_3YL" }
+        BalizaAmbar : Bool;
+        { S7_MLC := "MLC_5C9" }
+        BalizaVerde : Bool;
+        { S7_MLC := "MLC_4wQ" }
+        BalizaAzul : Bool;
+        { S7_MLC := "MLC_3gf" }
+        BalizaBlanca : Bool;
+        { S7_MLC := "MLC_47V" }
+        BalizaSonora : Bool;
+        PulsoBalizaSonora : Bool;
+    END_VAR
+
+    VAR RETAIN
+        {
+            S7_MLC := "MLC_48M";
+            S7_Setpoint := "False"
+        }
+        ALM : Array[1.._.N_MAX_GNR_ALARMAS] of _.UDT_ZC_ALARMA;
+    END_VAR
+
+    VAR
+        AlarmasHMI : Array[0.._.N_MAX_GNR_ALARMAS_HMI] of Word;
+    END_VAR
+
+    AlgunaAlarma := FALSE;
+    NuevaAlarma := FALSE;
+    BalizaRoja := FALSE;
+    BalizaAmbar := FALSE;
+    BalizaVerde := FALSE;
+    BalizaAzul := FALSE;
+    BalizaBlanca := FALSE;
+    BalizaSonora := FALSE;
+    PulsoBalizaSonora := TRUE;
+        AlarmasHMI[0] := 16#0000;
+
+END_DATA_BLOCK