Files

94 lines
2.6 KiB
Plaintext

FUNCTION "Arbeitsplätze" : Void
{ S7_Optimized_Access := 'FALSE' }
// Mechanische AWL->SCL-Konvertierung (awl2scl.py). Kontrollfluss per GOTO,
// wo im Original mit Sprungmarken gearbeitet wurde. Vor Uebernahme in TIA
// Portal pruefen/kompilieren (siehe SCL-Export/README.md).
VAR_INPUT
SGes : Word; // war "SGes"
END_VAR
VAR_OUTPUT
DMPS1_OmniFahren : Word; // war "DMPS1_OmniFahren"
DMPS2_OmniFahren : Word; // war "DMPS2_OmniFahren"
DMPS3_OmniFahren : Word; // war "DMPS3_OmniFahren"
DPS1_OmniFahren : Word; // war "DPS1_OmniFahren"
DPS2_OmniFahren : Word; // war "DPS2_OmniFahren"
DPS3_OmniFahren : Word; // war "DPS3_OmniFahren"
DPS4_OmniFahren : Word; // war "DPS4_OmniFahren"
DPS5_OmniFahren : Word; // war "DPS5_OmniFahren"
END_VAR
BEGIN
REGION Ohne PC sind alle ABPs aktiviert
IF #SGes.Ohne_PC_Fahren THEN
#DPS5_OmniFahren.Sks_Arbeitsplatz.Dyn.Status.Arbeitsplatz_aktiviert := TRUE;
#DPS4_OmniFahren.Sks_Arbeitsplatz.Dyn.Status.Arbeitsplatz_aktiviert := TRUE;
#DPS3_OmniFahren.Sks_Arbeitsplatz.Dyn.Status.Arbeitsplatz_aktiviert := TRUE;
#DPS2_OmniFahren.Sks_Arbeitsplatz.Dyn.Status.Arbeitsplatz_aktiviert := TRUE;
#DPS1_OmniFahren.Sks_Arbeitsplatz.Dyn.Status.Arbeitsplatz_aktiviert := TRUE;
#DMPS3_OmniFahren.Sks_Arbeitsplatz.Dyn.Status.Arbeitsplatz_aktiviert := TRUE;
#DMPS2_OmniFahren.Sks_Arbeitsplatz.Dyn.Status.Arbeitsplatz_aktiviert := TRUE;
#DMPS1_OmniFahren.Sks_Arbeitsplatz.Dyn.Status.Arbeitsplatz_aktiviert := TRUE;
END_IF;
END_REGION
REGION Sensoren
"DArbeitsplätze_Sensoren"();
END_REGION
REGION Simulation zum Ausfahren aus AMRs
"Simulation_AMR_Trolley_starten"();
END_REGION
REGION Zuführung
"DZuführung_OmniFahren"();
END_REGION
REGION Pickstation 5
"DPS5_OmniFahren"();
END_REGION
REGION Pickstation 4
"DPS4_OmniFahren"();
END_REGION
REGION Pickstation 3
"DPS3_OmniFahren"();
END_REGION
REGION Pickstation 2
"DPS2_OmniFahren"();
END_REGION
REGION Pickstation 1
"DPS1_OmniFahren"();
END_REGION
REGION MultiPurposestation 3
"DMPS3_OmniFahren"();
END_REGION
REGION MultiPurposestation 2
"DMPS2_OmniFahren"();
END_REGION
REGION MultiPurposestation 1
"DMPS1_OmniFahren"();
END_REGION
REGION Abführung
"DAbführung_OmniFahren"();
END_REGION
REGION Last
"DArbeitsplätze_Zylinder"();
"DArbeitsplätze_Antriebe"();
END_REGION
REGION Ende
RETURN;
END_REGION
END_FUNCTION