137 lines
6.0 KiB
Plaintext
137 lines
6.0 KiB
Plaintext
FUNCTION_BLOCK "LPtoHW_Antriebe"
|
|
{ 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
|
|
DOutbound_Bereich : Word; // war "DOutbound_Bereich"
|
|
SGes : Word; // war "SGes"
|
|
T192 : Word; // war "T192"
|
|
T193 : Word; // war "T193"
|
|
T197 : Word; // war "T197"
|
|
END_VAR
|
|
|
|
VAR_IN_OUT
|
|
g_7_HMI_Err_UH07_OB : Word; // war "7_HMI_Err_UH07_OB"
|
|
FC0065 : Word; // war "FC0065"
|
|
FC0066 : Word; // war "FC0066"
|
|
FC0202 : Word; // war "FC0202"
|
|
FC0203 : Word; // war "FC0203"
|
|
FC0264 : Word; // war "FC0264"
|
|
FC0265 : Word; // war "FC0265"
|
|
FC0266 : Word; // war "FC0266"
|
|
FC0267 : Word; // war "FC0267"
|
|
FC0270 : Word; // war "FC0270"
|
|
MA0065 : Bool; // war "MA0065"
|
|
MA0066 : Bool; // war "MA0066"
|
|
MA0202 : Bool; // war "MA0202"
|
|
MA0203 : Bool; // war "MA0203"
|
|
MA0264 : Bool; // war "MA0264"
|
|
MA0265 : Bool; // war "MA0265"
|
|
MA0266 : Bool; // war "MA0266"
|
|
MA0267 : Bool; // war "MA0267"
|
|
MA0270 : Bool; // war "MA0270"
|
|
END_VAR
|
|
|
|
VAR
|
|
MA0065 : "MAntrieb_PowerSave";
|
|
MA0066 : "MAntrieb_PowerSave";
|
|
MA0264 : "MAntrieb_PowerSave";
|
|
MA0265 : "MAntrieb_PowerSave";
|
|
MA0266 : "MAntrieb_PowerSave";
|
|
MA0267 : "MAntrieb_PowerSave";
|
|
MA0270 : "MAntrieb_PowerSave";
|
|
MA0202 : "MAntrieb_PowerSave";
|
|
MA0203 : "MAntrieb_PowerSave";
|
|
END_VAR
|
|
|
|
VAR_TEMP
|
|
Auto : Bool; // Automatik Linie ist aktiv
|
|
Hand : Bool; // Hand Linie ist aktiv
|
|
BereichErr : Bool; // Bereichsstörung -> Antrieb stoppen
|
|
QKontroll : Bool; // Frequenzumrichter schon 3s Netz EIN
|
|
FuKontroll : Bool; // Frequenzumrichter schon 3s Netz EIN
|
|
Quit : Bool; // Motorschutz-Störung quittieren
|
|
Qok : Bool; // Motorschutz ok
|
|
Jog1 : Bool; // Geschwindigkeit 1
|
|
Jog2 : Bool; // Geschwindigkeit 2
|
|
Betrieb : Bool; // Betriebsart aktiv
|
|
FC105_RET : Word; // Returnwert von FC105
|
|
Antrieb1 : Bool; // Antrieb dazuschalten
|
|
Antrieb2 : Bool; // Antrieb dazuschalten
|
|
F1 : Bool; // Geschwindigkeit 1 aktiviert
|
|
F2 : Bool; // Geschwindigkeit 2 aktiviert
|
|
F3 : Bool; // Geschwindigkeit 3 aktiviert
|
|
END_VAR
|
|
|
|
BEGIN
|
|
REGION Übergabe des Bereichstatus System UH07/A01
|
|
#Auto := #DOutbound_Bereich.A01_UH07.Automatik AND NOT (#DOutbound_Bereich.A01_UH07.Handbetrieb);
|
|
#Hand := FALSE;
|
|
#BereichErr := #DOutbound_Bereich.A01_UH07.BereichErr AND NOT (#SGes.Simulation_ohne_HW_aktiv);
|
|
#QKontroll := #T197;
|
|
#FuKontroll := #T197;
|
|
#Quit := #DOutbound_Bereich.A01_UH07.StOk_aktiv;
|
|
END_REGION
|
|
|
|
REGION MA0065
|
|
#MA0065(Automatik := #Auto, Handbetrieb := #Hand, BereichErr := #BereichErr, Q := #FC0065, Ptc := TRUE, QKontroll := #QKontroll, ErrQuit := #Quit, Antriebvor := #MA0065, QErr := #g_7_HMI_Err_UH07_OB.QErr.MA0065);
|
|
END_REGION
|
|
|
|
REGION MA0066
|
|
#MA0066(Automatik := #Auto, Handbetrieb := #Hand, BereichErr := #BereichErr, Q := #FC0066, Ptc := TRUE, QKontroll := #QKontroll, ErrQuit := #Quit, Antriebvor := #MA0066, QErr := #g_7_HMI_Err_UH07_OB.QErr.MA0066);
|
|
END_REGION
|
|
|
|
REGION Übergabe des Bereichstatus System UC073/A01
|
|
#Auto := #DOutbound_Bereich.A01_UH07.Automatik AND NOT (#DOutbound_Bereich.A01_UH07.Handbetrieb);
|
|
#Hand := FALSE;
|
|
#BereichErr := #DOutbound_Bereich.A01_UC073.BereichErr AND NOT (#SGes.Simulation_ohne_HW_aktiv);
|
|
#QKontroll := #T193;
|
|
#FuKontroll := #T193;
|
|
#Quit := #DOutbound_Bereich.A01_UC073.StOk_aktiv;
|
|
END_REGION
|
|
|
|
REGION MA0264
|
|
#MA0264(Automatik := #Auto, Handbetrieb := #Hand, BereichErr := #BereichErr, Q := #FC0264, Ptc := TRUE, QKontroll := #QKontroll, ErrQuit := #Quit, Antriebvor := #MA0264, QErr := #g_7_HMI_Err_UH07_OB.QErr.MA0264);
|
|
END_REGION
|
|
|
|
REGION MA0265
|
|
#MA0265(Automatik := #Auto, Handbetrieb := #Hand, BereichErr := #BereichErr, Q := #FC0265, Ptc := TRUE, QKontroll := #QKontroll, ErrQuit := #Quit, T_Nachlauf := 90, Antriebvor := #MA0265, QErr := #g_7_HMI_Err_UH07_OB.QErr.MA0265);
|
|
END_REGION
|
|
|
|
REGION MA0266
|
|
#MA0266(Automatik := #Auto, Handbetrieb := #Hand, BereichErr := #BereichErr, Q := #FC0266, Ptc := TRUE, QKontroll := #QKontroll, ErrQuit := #Quit, Antriebvor := #MA0266, QErr := #g_7_HMI_Err_UH07_OB.QErr.MA0266);
|
|
END_REGION
|
|
|
|
REGION MA0267
|
|
#MA0267(Automatik := #Auto, Handbetrieb := #Hand, BereichErr := #BereichErr, Q := #FC0267, Ptc := TRUE, QKontroll := #QKontroll, ErrQuit := #Quit, Antriebvor := #MA0267, QErr := #g_7_HMI_Err_UH07_OB.QErr.MA0267);
|
|
END_REGION
|
|
|
|
REGION MA0270
|
|
#MA0270(Automatik := #Auto, Handbetrieb := #Hand, BereichErr := #BereichErr, Q := #FC0270, Ptc := TRUE, QKontroll := #QKontroll, ErrQuit := #Quit, Antriebvor := #MA0270, QErr := #g_7_HMI_Err_UH07_OB.QErr.MA0270);
|
|
END_REGION
|
|
|
|
REGION Übergabe des Bereichstatus System UC072/A01
|
|
#Auto := #DOutbound_Bereich.A01_UH07.Automatik AND NOT (#DOutbound_Bereich.A01_UH07.Handbetrieb);
|
|
#Hand := FALSE;
|
|
#BereichErr := ((#DOutbound_Bereich.A01_UC072.BereichErr OR #DOutbound_Bereich.A01_UZ7201.Area_Stop) OR #DOutbound_Bereich.A01_UZ7202.Area_Stop) AND NOT (#SGes.Simulation_ohne_HW_aktiv);
|
|
#QKontroll := #T192;
|
|
#FuKontroll := #T192;
|
|
#Quit := #DOutbound_Bereich.A01_UC072.StOk_aktiv;
|
|
END_REGION
|
|
|
|
REGION MA0202
|
|
#MA0202(Automatik := #Auto, Handbetrieb := #Hand, BereichErr := #BereichErr, Q := #FC0202, Ptc := TRUE, QKontroll := #QKontroll, ErrQuit := #Quit, Antriebvor := #MA0202, QErr := #g_7_HMI_Err_UH07_OB.QErr.MA0202);
|
|
END_REGION
|
|
|
|
REGION MA0203
|
|
#MA0203(Automatik := #Auto, Handbetrieb := #Hand, BereichErr := #BereichErr, Q := #FC0203, Ptc := TRUE, QKontroll := #QKontroll, ErrQuit := #Quit, Antriebvor := #MA0203, QErr := #g_7_HMI_Err_UH07_OB.QErr.MA0203);
|
|
END_REGION
|
|
|
|
REGION Ende
|
|
RETURN;
|
|
END_REGION
|
|
|
|
END_FUNCTION_BLOCK
|