1.5 KiB
1.5 KiB
// 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