{
    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
