82 lines
2.7 KiB
Plaintext
82 lines
2.7 KiB
Plaintext
FUNCTION_BLOCK "HWtoOB_Zylinder"
|
|
{ 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
|
|
DAMR_Bereich : Word; // war "DAMR_Bereich"
|
|
END_VAR
|
|
|
|
VAR_IN_OUT
|
|
MB3010 : Byte; // war "MB3010"
|
|
MB3012 : Byte; // war "MB3012"
|
|
MB3014 : Byte; // war "MB3014"
|
|
MB3070 : Byte; // war "MB3070"
|
|
MB3073 : Byte; // war "MB3073"
|
|
MB3546 : Byte; // war "MB3546"
|
|
MB3552 : Byte; // war "MB3552"
|
|
END_VAR
|
|
|
|
VAR
|
|
Schleuse_3546 : "MZylinder"; //
|
|
Schleuse_3552 : "MZylinder";
|
|
Schleuse_3014 : "MZylinder";
|
|
Schleuse_3012 : "MZylinder";
|
|
Schleuse_3010 : "MZylinder";
|
|
Schleuse_3070 : "MZylinder"; //
|
|
Schleuse_3073 : "MZylinder"; //
|
|
END_VAR
|
|
|
|
VAR_TEMP
|
|
Auto : Bool; // Automatik ist aktiv
|
|
Hand : Bool; // Hand ist aktiv
|
|
ZylAst : Bool; // Zylinder ansteuern
|
|
END_VAR
|
|
|
|
BEGIN
|
|
REGION Übergabe des Bereichstatus System UH06 / A01
|
|
#Auto := #DAMR_Bereich.A01_UH06.Automatik AND NOT (#DAMR_Bereich.A01_UH06.Handbetrieb);
|
|
IF #DAMR_Bereich.A01_UH06_Halle4.BereichErr THEN GOTO Next; END_IF;
|
|
END_REGION
|
|
|
|
REGION Schleuse_3546
|
|
#Schleuse_3546(Automatik := #Auto, Handbetrieb := FALSE, T_Ast := 0, T_Gst := 5, ZylAst := #MB3546);
|
|
END_REGION
|
|
|
|
REGION Schleuse_3552
|
|
#Schleuse_3552(Automatik := #Auto, Handbetrieb := FALSE, T_Ast := 0, T_Gst := 5, ZylAst := #MB3552);
|
|
END_REGION
|
|
|
|
REGION Schleuse_3014
|
|
#Schleuse_3014(Automatik := #Auto, Handbetrieb := FALSE, T_Ast := 0, T_Gst := 5, ZylAst := #MB3014);
|
|
END_REGION
|
|
|
|
REGION Übergabe des Bereichstatus System UC061/A01
|
|
#Auto := #DAMR_Bereich.A01_UH06.Automatik AND NOT (#DAMR_Bereich.A01_UH06.Handbetrieb);
|
|
#Hand := FALSE;
|
|
IF ((#DAMR_Bereich.A01_UC061.BereichErr OR #DAMR_Bereich.A01_UZ6102.Area_Stop) OR #DAMR_Bereich.A01_UZ6103.Area_Stop) OR #DAMR_Bereich.A01_UZ6104.Area_Stop THEN GOTO Next2; END_IF;
|
|
END_REGION
|
|
|
|
REGION Schleuse_3012
|
|
#Schleuse_3012(Automatik := #Auto, Handbetrieb := FALSE, T_Ast := 0, T_Gst := 5, ZylAst := #MB3012);
|
|
END_REGION
|
|
|
|
REGION Schleuse_3010
|
|
#Schleuse_3010(Automatik := #Auto, Handbetrieb := FALSE, T_Ast := 0, T_Gst := 5, ZylAst := #MB3010);
|
|
END_REGION
|
|
|
|
REGION Schleuse_3070
|
|
#Schleuse_3070(Automatik := #Auto, Handbetrieb := FALSE, T_Ast := 0, T_Gst := 5, ZylAst := #MB3070);
|
|
END_REGION
|
|
|
|
REGION Schleuse_3073
|
|
#Schleuse_3073(Automatik := #Auto, Handbetrieb := FALSE, T_Ast := 0, T_Gst := 5, ZylAst := #MB3073);
|
|
END_REGION
|
|
|
|
REGION Ende
|
|
RETURN;
|
|
END_REGION
|
|
|
|
END_FUNCTION_BLOCK
|