89 lines
1.5 KiB
Markdown
89 lines
1.5 KiB
Markdown
```pascal
|
|
// Block Type: FC
|
|
// Block Number: 2037
|
|
// Original Network Languages: STL
|
|
|
|
FUNCTION "BlenderCtrl_ManualActive" : Void
|
|
{ S7_Optimized_Access := 'TRUE' }
|
|
VERSION : 0.1
|
|
|
|
VAR_TEMP
|
|
Dim_HMI_Device : Int;
|
|
PDim_HMI_Device : DWord;
|
|
Dim_HMI_PID : Int;
|
|
PDim_HMI_PID : DWord;
|
|
END_VAR
|
|
|
|
BEGIN
|
|
|
|
// Network 1: Set manual active (Original Language: STL)
|
|
// DEVICE
|
|
|
|
// --- BEGIN STL Network 1 ---
|
|
|
|
SET
|
|
R "HMI_Alarms".gH_Message[3]
|
|
|
|
// --- END STL Network 1 ---
|
|
|
|
// Network 2: (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 2 ---
|
|
|
|
AUF "HMI_Device"
|
|
L_DBLG
|
|
T "Dim_HMI_Device"
|
|
L P#0.0
|
|
L "Dim_HMI_Device"
|
|
SLD 3
|
|
ADD_D
|
|
T "PDim_HMI_Device"
|
|
L P#0.0
|
|
LAR1_ACCU1
|
|
M100: NOP_0
|
|
AUF "HMI_Device"
|
|
A DBX[AR1,P#0.7]
|
|
AN DBX[AR1,P#0.0]
|
|
S "HMI_Alarms".gH_Message[3]
|
|
ADDAR1 P#2.0
|
|
TAR1_ACCU1
|
|
L "PDim_HMI_Device"
|
|
LT_D
|
|
JC M100
|
|
|
|
// --- END STL Network 2 ---
|
|
|
|
// Network 3: (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 3 ---
|
|
|
|
AUF "HMI_PID"
|
|
L_DBLG
|
|
T "Dim_HMI_PID"
|
|
L P#0.0
|
|
L "Dim_HMI_PID"
|
|
SLD 3
|
|
ADD_D
|
|
T "PDim_HMI_PID"
|
|
L P#0.0
|
|
LAR1_ACCU1
|
|
M101: NOP_0
|
|
AUF "HMI_PID"
|
|
A DBX[AR1,P#0.7]
|
|
A_BRACK
|
|
A DBX[AR1,P#2.0]
|
|
O DBX[AR1,P#3.0]
|
|
BRACKET
|
|
S "HMI_Alarms".gH_Message[3]
|
|
ADDAR1 P#76.0
|
|
TAR1_ACCU1
|
|
L "PDim_HMI_PID"
|
|
LT_D
|
|
JC M101
|
|
|
|
// --- END STL Network 3 ---
|
|
|
|
END_FUNCTION
|
|
|
|
```
|