259 lines
5.1 KiB
Markdown
259 lines
5.1 KiB
Markdown
```pascal
|
|
// Block Type: FC
|
|
// Block Name (Original): CIP FlipFlop
|
|
// Block Number: 1812
|
|
// Original Network Languages: STL, LAD
|
|
|
|
FUNCTION "CIP_FlipFlop" : Void
|
|
{ S7_Optimized_Access := 'TRUE' }
|
|
VERSION : 0.1
|
|
|
|
VAR_INOUT
|
|
mStep : Int;
|
|
mTime : Int;
|
|
mTransition : Bool;
|
|
END_VAR
|
|
|
|
VAR_TEMP
|
|
Buffer : Bool;
|
|
mProdTankMinLevel : Bool;
|
|
mFlipFlop : Bool;
|
|
mOverPress : Bool;
|
|
mDummy : Bool;
|
|
mPresetTimer : Int;
|
|
sp : Real;
|
|
mUnderPress : Bool;
|
|
sp_1 : Real;
|
|
__PlcmigTempFillBits_14B0 : 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
|
|
JU ST03
|
|
JU ST04
|
|
JU ST05
|
|
JU ST06
|
|
JU ST07
|
|
JU ST08
|
|
JU ST09
|
|
JU ST10
|
|
JU ST11
|
|
JU ST12
|
|
JU ST13
|
|
JU ST14
|
|
JU ST15
|
|
LEND: JU FULL
|
|
FULL: L 0
|
|
T "mStep"
|
|
JU END
|
|
|
|
// --- END STL Network 1 ---
|
|
|
|
// Network 2: STEP 00 First Valve open Flip Flop (Original Language: LAD)
|
|
|
|
"gSP_AVN314" := TRUE;
|
|
|
|
// Network 3: STEP 00 First Valve open Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 3 ---
|
|
|
|
CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 3 ---
|
|
|
|
// Network 4: STEP 01 Pause Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 4 ---
|
|
|
|
|
|
ST01: CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 4 ---
|
|
|
|
// Network 5: STEP 02 Second Valve open Flip Flop (Original Language: LAD)
|
|
|
|
"gSP_AVM323" := TRUE;
|
|
|
|
// Network 6: STEP 02 Second Valve open Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 6 ---
|
|
|
|
CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 6 ---
|
|
|
|
// Network 7: STEP 03 Pause Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 7 ---
|
|
|
|
ST03: CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 7 ---
|
|
|
|
// Network 8: STEP 04 Third Valve open Flip Flop (Original Language: LAD)
|
|
|
|
"gSP_AVM322" := TRUE;
|
|
|
|
// Network 9: STEP 04 Third Valve open Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 9 ---
|
|
|
|
CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 9 ---
|
|
|
|
// Network 10: STEP 05 Pause Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 10 ---
|
|
|
|
ST05: CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 10 ---
|
|
|
|
// Network 11: STEP 06 Fourth Valve open Flip Flop (Original Language: LAD)
|
|
|
|
"gSP_AVP316" := TRUE;
|
|
|
|
// Network 12: STEP 06 Fourth Valve open Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 12 ---
|
|
|
|
CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 12 ---
|
|
|
|
// Network 13: STEP 07 Pause Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 13 ---
|
|
|
|
ST07: CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 13 ---
|
|
|
|
// Network 14: STEP 08 FifthValve open Flip Flop (Original Language: LAD)
|
|
|
|
"gSP_AVP344" := TRUE;
|
|
|
|
// Network 15: STEP 08 FifthValve open Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 15 ---
|
|
|
|
CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 15 ---
|
|
|
|
// Network 16: STEP 09 Pause Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 16 ---
|
|
|
|
ST09: CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 16 ---
|
|
|
|
// Network 17: STEP 10 Sixth Valve open Flip Flop (Original Language: LAD)
|
|
|
|
"gSP_AVM315" := TRUE;
|
|
|
|
// Network 18: STEP 10 Sixth Valve open Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 18 ---
|
|
|
|
CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 18 ---
|
|
|
|
// Network 19: STEP 11 Pause Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 19 ---
|
|
|
|
ST11: CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 19 ---
|
|
|
|
// Network 20: STEP 12 Seventh Valve open Flip Flop (Original Language: LAD)
|
|
|
|
"gSP_AVM353" := TRUE;
|
|
|
|
// Network 21: STEP 12 Seventh Valve open Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 21 ---
|
|
|
|
CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 21 ---
|
|
|
|
// Network 22: STEP 13 Pause Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 22 ---
|
|
|
|
ST13: CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 22 ---
|
|
|
|
// Network 23: STEP 14 Eighth Valve open Flip Flop (Original Language: LAD)
|
|
|
|
"gSP_AVM369" := TRUE;
|
|
|
|
// Network 24: STEP 14 Eighth Valve open Flip Flop (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 24 ---
|
|
|
|
CALL "_StepMove"
|
|
A _Statusword_?
|
|
JC END
|
|
|
|
// --- END STL Network 24 ---
|
|
|
|
// Network 25: STEP 13 done (Original Language: LAD)
|
|
|
|
"gCIP_FlipFlopDone" := "AUX FALSE";
|
|
|
|
// Network 26: END (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 26 ---
|
|
|
|
END: NOP_0
|
|
|
|
// --- END STL Network 26 ---
|
|
|
|
END_FUNCTION
|
|
|
|
```
|