65 lines
1.1 KiB
Markdown
65 lines
1.1 KiB
Markdown
```pascal
|
|
// Block Type: FC
|
|
// Block Number: 1968
|
|
// Original Network Languages: STL
|
|
|
|
FUNCTION "Instrument_Scanner" : Void
|
|
{ S7_Optimized_Access := 'TRUE' }
|
|
VERSION : 0.1
|
|
|
|
VAR_TEMP
|
|
mAirPressureOk : Bool;
|
|
Dim_HMI_Instrument : Int;
|
|
PDim_HMI_Instrument : DWord;
|
|
END_VAR
|
|
|
|
BEGIN
|
|
|
|
// Network 1: MIX - SAFETIES (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 1 ---
|
|
|
|
AUF "HMI_Instrument"
|
|
L_DBLG
|
|
T "Dim_HMI_Instrument"
|
|
L P#0.0
|
|
L "Dim_HMI_Instrument"
|
|
SLD 3
|
|
ADD_D
|
|
T "PDim_HMI_Instrument"
|
|
|
|
// --- END STL Network 1 ---
|
|
|
|
// Network 2: MIX - SAFETIES (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 2 ---
|
|
|
|
A "gIN_VoltageOk"
|
|
JCN M012
|
|
SET
|
|
R "gInstrumentFault"
|
|
AUF "HMI_Instrument"
|
|
L P#0.0
|
|
LAR1_ACCU1
|
|
M010: SET
|
|
AN DBX[AR1,P#0.7]
|
|
O DBX[AR1,P#0.4]
|
|
JC M011
|
|
A DBX[AR1,P#0.7]
|
|
AN DBX[AR1,P#0.4]
|
|
A DBX[AR1,P#0.3]
|
|
S "gInstrumentFault"
|
|
M011: NOP_0
|
|
ADDAR1 P#26.0
|
|
TAR1_ACCU1
|
|
L "PDim_HMI_Instrument"
|
|
LT_D
|
|
JC M010
|
|
M012: NOP_0
|
|
|
|
// --- END STL Network 2 ---
|
|
|
|
END_FUNCTION
|
|
|
|
```
|