1.8 KiB
1.8 KiB
// Block Type: FC
// Block Number: 1824
// Original Network Languages: STL, LAD
FUNCTION "ProductPipeDrain_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
LEND: JU FULL
FULL: L 0
T "mStep"
JU END
// --- END STL Network 1 ---
// Network 2: STEP 00 (Original Language: LAD)
IF "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" THEN
"gSP_AVM369" := TRUE;
END_IF;
IF "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" THEN
"gSP_AVM353" := TRUE;
END_IF;
// Network 3: MIX - Procedure auxiliary variable (Original Language: LAD)
IF "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" THEN
"gSP_AVM315" := TRUE;
END_IF;
// Network 4: STEP 00 (Original Language: STL)
// --- BEGIN STL Network 4 ---
A "AUX TRUE"
= "__PlcmigTempFillBits_0B0"[0]
BLD 103
A "AUX TRUE"
= "__PlcmigTempFillBits_0B0"[1]
BLD 103
A "System_RunOut_Variables".ProdPipe_Drain.Wait
= "__PlcmigTempFillBits_0B0"[2]
BLD 103
A CLK_0.5S
= "__PlcmigTempFillBits_0B0"[3]
BLD 103
CALL "_StepMove"
A _Statusword_?
JC END
// --- END STL Network 4 ---
// Network 5: STEP 01 (Original Language: LAD)
IF "AUX FALSE" THEN
"System_RunOut_Variables"."ProdPipe_Drain"."Done" := TRUE;
END_IF;
// Network 6: (Original Language: STL)
// --- BEGIN STL Network 6 ---
END: NOP_0
// --- END STL Network 6 ---
END_FUNCTION