2.4 KiB
2.4 KiB
// Block Type: FC
// Block Name (Original): Syrup MFM StartUp_Seq
// Block Number: 1811
// Original Network Languages: STL, LAD
FUNCTION "Syrup_MFM_StartUp_Seq" : Void
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1
VAR_INOUT
mStep : Int;
mTime : Int;
mTransition : Bool;
END_VAR
VAR_TEMP
__PlcmigTempFillBits_0B0 : Array[0..7] of Bool;
END_VAR
BEGIN
// Network 1: STEP CONTROL (Original Language: STL)
// --- BEGIN STL Network 1 ---
L "mStep"
JL LEND
JU ST00
JU ST01
JU ST02
LEND: JU FULL
FULL: L 0
T "mStep"
JU END
// --- END STL Network 1 ---
// Network 2: STEP 00 (Original Language: LAD)
// Step 0: Wait Syrup Tank Minimum Level
IF "AUX FALSE" THEN
"gSP_RVP303" := TRUE;
END_IF;
// Network 3: STEP 00 (Original Language: STL)
// --- BEGIN STL Network 3 ---
A_BRACK
O "HMI_Digital".LAL_S3.Filtered
O "gIN_SyrTank_MinLvl"
BRACKET
= "__PlcmigTempFillBits_0B0"[0]
BLD 103
A "AUX TRUE"
= "__PlcmigTempFillBits_0B0"[1]
BLD 103
A "Procedure_Variables".FTP302_StartUp.Wait
= "__PlcmigTempFillBits_0B0"[2]
BLD 103
A CLK_0.5S
= "__PlcmigTempFillBits_0B0"[3]
BLD 103
CALL "_StepMove"
A _Statusword_?
JC END
// --- END STL Network 3 ---
// Network 4: STEP 01 (Original Language: LAD)
// Step 1: Wait Syrup Tank Minimum Level
IF "AUX FALSE" THEN
"gSP_PPP302" := TRUE;
END_IF;
IF "AUX FALSE" THEN
"gSP_RVP303" := TRUE;
END_IF;
IF "AUX FALSE" THEN
"gSP_AVP324" := TRUE;
END_IF;
// Network 5: STEP 01 (Original Language: STL)
// --- BEGIN STL Network 5 ---
AN "gFTP302_EPD"
= "__PlcmigTempFillBits_0B0"[0]
BLD 103
A "AUX TRUE"
= "__PlcmigTempFillBits_0B0"[1]
BLD 103
A "Procedure_Variables".FTP302_StartUp.Wait
= "__PlcmigTempFillBits_0B0"[2]
BLD 103
A CLK_0.5S
= "__PlcmigTempFillBits_0B0"[3]
BLD 103
CALL "_StepMove"
A _Statusword_?
JC END
// --- END STL Network 5 ---
// Network 6: STEP 02 (Original Language: LAD)
"Procedure_Variables"."FTP302_StartUp"."Done" := "AUX FALSE";
// Network 7: END (Original Language: STL)
// --- BEGIN STL Network 7 ---
END: NOP_0
// --- END STL Network 7 ---
END_FUNCTION