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

This commit is contained in:
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
@@ -0,0 +1,21 @@
MultiLingualTexts:
- id: MLC_Qh
es-ES: DB5000_GNR_ALM
- id: MLC_3fq
es-ES: Alguna alarma activa
- id: MLC_4XV
es-ES: Nueva alarma detectada
- id: MLC_4Px
es-ES: Baliza roja (libre programacion)
- id: MLC_3YL
es-ES: Baliza ambar (libre programacion)
- id: MLC_5C9
es-ES: Baliza verde (libre programacion)
- id: MLC_4wQ
es-ES: Baliza Azul (libre programacion)
- id: MLC_3gf
es-ES: Baliza blanca (libre programacion)
- id: MLC_47V
es-ES: Baliza sonora (libre programacion)
- id: MLC_48M
es-ES: .
@@ -0,0 +1,127 @@
{
S7_Author := "ABH";
S7_BlockNumber := "5000";
S7_BlockTitle := "MLC_3jK";
S7_Family := "ZeusControl";
S7_Optimized := "TRUE";
S7_PreferredLanguage := "LAD";
S7_Version := "1.0"
}
FUNCTION "FC5000_GNR_ALM" : Void
{ S7_Language := "SCL" }
NETWORK
(*
###### (C)Copyright ZeusControl 2026 - 2026
---
### Información del Sistema
| Hardware Compatible | Entorno de Ingeniería |
|---------------------|-----------------------|
| PLC serie 1200/1500 | TIA Portal 18 |
---
> **Restricciones:** Ninguna.
---
### Descripción Funcional
Función para la gestion de alarmas.
En ella se realizan las siguientes acciones:
- Gestion logica alarmas.
- Llamadas a gestor de alarmas.
---
### Dependencias Requeridas
| Tipo | Elementos |
|------|-----------|
| FC | - |
| FB | - |
| DB | - |
| UDT | - |
---
### Historial de Cambios
| Versión | Fecha | Técnico | Cambios |
|----------|------------|---------|---------|
| 01.00.00 | 22.07.2026 | (ABH) | Primera version. |
*)
END_NETWORK
{
S7_Language := "LAD";
S7_NetworkTitle := "MLC_ni"
}
NETWORK
RUNG wire#powerrail
END_RUNG
END_NETWORK
{
S7_Language := "LAD";
S7_NetworkTitle := "MLC_49a"
}
NETWORK
RUNG wire#powerrail
END_RUNG
END_NETWORK
{
S7_Language := "LAD";
S7_NetworkTitle := "MLC_3fz"
}
NETWORK
RUNG wire#powerrail
Contact( "DB1_SYS".OFF )
Coil( "DB5000_GNR_ALM".BalizaVerde )
END_RUNG
END_NETWORK
{
S7_Language := "LAD";
S7_NetworkTitle := "MLC_3FM"
}
NETWORK
RUNG wire#powerrail
Contact( "DB1_SYS".OFF )
Coil( "DB5000_GNR_ALM".BalizaAmbar )
END_RUNG
END_NETWORK
{
S7_Language := "LAD";
S7_NetworkComment := "MLC_3rY";
S7_NetworkTitle := "MLC_3VN"
}
NETWORK
RUNG wire#powerrail
Contact( "DB5000_GNR_ALM".AlgunaAlarma )
Coil( "DB5000_GNR_ALM".BalizaRoja )
END_RUNG
END_NETWORK
{
S7_Language := "LAD";
S7_NetworkComment := "MLC_3jg";
S7_NetworkTitle := "MLC_3ej"
}
NETWORK
RUNG wire#powerrail
Contact( "DB5000_GNR_ALM".NuevaAlarma )
Contact( "DB1_SYS".FlipFlop1seg )
Coil( "DB5000_GNR_ALM".BalizaSonora )
END_RUNG
END_NETWORK
{
S7_Language := "LAD";
S7_NetworkTitle := "MLC_3ar"
}
NETWORK
RUNG wire#powerrail
"FC17_ZC_GEST_ALM"(
Pulso1Seg := "DB1_SYS".Pulso1seg,
Ack := "DB1_SYS".ACK,
AutoAck := FALSE,
ALM := "DB5000_GNR_ALM".ALM,
AlarmasHMI := "DB5000_GNR_ALM".AlarmasHMI,
NuevaAlarma := "DB5000_GNR_ALM".NuevaAlarma,
AlgunaAlarma := "DB5000_GNR_ALM".AlgunaAlarma
)
END_RUNG
END_NETWORK
END_FUNCTION
@@ -0,0 +1,21 @@
MultiLingualTexts:
- id: MLC_3jK
es-ES: FC5000_GNR_ALM
- id: MLC_ni
es-ES: 'COMUNES_ALM_001 - '
- id: MLC_49a
es-ES: =============== Gestion de baliza
- id: MLC_3fz
es-ES: Baliza verde
- id: MLC_3FM
es-ES: Baliza ambar
- id: MLC_3VN
es-ES: Baliza roja
- id: MLC_3rY
es-ES: Por norma general, poner la variable "Alguna alarma".
- id: MLC_3ej
es-ES: Baliza sonora
- id: MLC_3jg
es-ES: Por norma general, poner la variable "Nueva alarma" junto al Flip Flop de 1 segundo
- id: MLC_3ar
es-ES: =============== Gestion alarmas