4.2 KiB
4.2 KiB
// Block Type: OB
// Block Number: 35
// Original Network Languages: STL, LAD
// Block Comment:
// OB35_EXC_FREQ = 50ms
ORGANIZATION_BLOCK "CYC_INT5"
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1
VAR_TEMP
OB35_EV_CLASS : Byte;
OB35_STRT_INF : Byte;
OB35_PRIORITY : Byte;
OB35_OB_NUMBR : Byte;
OB35_RESERVED_1 : Byte;
OB35_RESERVED_2 : Byte;
OB35_PHASE_OFFSET : Word;
OB35_RESERVED_3 : Int;
OB35_EXC_FREQ : Int;
OB35_DATE_TIME : "Date_And_Time";
END_VAR
BEGIN
// Network 1: Cycles Counter (Original Language: LAD)
// PID Control Time Bit (300ms)
"MW1968" := "MW1968" + 1;
IF "MW1968" >= 7 THEN
"MW1968" := 1;
END_IF;
// Network 2: Signal Gen (Original Language: LAD)
"Signal_Gen_Data"();
// Network 3: Analog Values (PV) (Original Language: LAD)
"MFM_Analog_Value_Data"();
// Network 4: PIDs Call (Original Language: LAD)
IF Eq("MW1968", 6) THEN
"BlenderPID__Main_Data"();
END_IF;
// Network 5: Meas Fill Speed Call (Original Language: LAD)
IF Eq("MW1968", 4) THEN
"BlenderRun_MeasFil_Data"();
END_IF;
// Network 6: Brix Tracking (Original Language: LAD)
IF Eq("MW1968", 3) THEN
"BrixTracking_Data"();
END_IF;
// Network 7: Co2 Tracking Data (Original Language: LAD)
IF Eq("MW1968", 6) THEN
"CO2Tracking_Data"();
END_IF;
// Network 8: Water Totalizer Reset (Original Language: STL)
// Reset Totalizer
// --- BEGIN STL Network 8 ---
O "gBlenderCIPMode"
O "gBlenderRinseMode"
O "SLIM_Variables".ResetCounter
JCN nore
L 0.0
T "Blender_Variables_Pers".gWaterTotal
T "Blender_Variables_Pers".gWaterTempTot
nore: NOP_0
// --- END STL Network 8 ---
// Network 9: Syrup Totalizer Reset (Original Language: STL)
// Reset Totalizer
// --- BEGIN STL Network 9 ---
O "gBlenderCIPMode"
O "gBlenderRinseMode"
O "SLIM_Variables".ResetCounter
JCN nore_1
L 0.0
T "Blender_Variables_Pers".gSyrupTotal
T "Blender_Variables_Pers".gSyrupTempTot
T "HMI_Variables_Status".Analog_Values.SyrupTotalizerLt
nore_1: NOP_0
// --- END STL Network 9 ---
// Network 10: CO2 Totalizer Reset (Original Language: STL)
// Reset Totalizer
// --- BEGIN STL Network 10 ---
O "gBlenderCIPMode"
O "gBlenderRinseMode"
O "SLIM_Variables".ResetCounter
JCN nore_2
L 0.0
T "Blender_Variables_Pers".gWaterTotal
T "Blender_Variables_Pers".gSyrupTotal
T "Blender_Variables_Pers".gCO2Total
T "Blender_Variables_Pers".gProductVFMTotal
T "Blender_Variables_Pers".gWaterTempTot
T "Blender_Variables_Pers".gSyrupTempTot
T "Blender_Variables_Pers".gCO2TempTot
T "Blender_Variables_Pers".gProductVFMTempTot
T "HMI_Variables_Status".Analog_Values.SyrupTotalizerLt
nore_2: NOP_0
// --- END STL Network 10 ---
// Network 11: Product Totalizer Reset (Original Language: STL)
// Reset Totalizer
// --- BEGIN STL Network 11 ---
O "gBlenderCIPMode"
O "gBlenderRinseMode"
O "SLIM_Variables".ResetCounter
JCN nore_3
L 0.0
T "Blender_Variables_Pers".gProductVFMTotal
T "Blender_Variables_Pers".gProductVFMTempTot
nore_3: NOP_0
// --- END STL Network 11 ---
// Network 12: PID Main Data (Original Language: LAD)
"PID MAIN Data"();
// Network 13: 1 Cycle OB35 in msec (Original Language: STL)
// 50ms Task (See FB29)
// --- BEGIN STL Network 13 ---
L "OB35_EXC_FREQ"
ITD
DTR
L 1000.0
DIV_R
T "Time_50ms"
// --- END STL Network 13 ---
// Network 14: 5 Cycle OB35 in msec (Original Language: STL)
// 250ms Task (See FB29)
// --- BEGIN STL Network 14 ---
L "OB35_EXC_FREQ"
L 5
MUL_I
ITD
DTR
L 1000.0
DIV_R
T "Time_250ms"
// --- END STL Network 14 ---
// Network 15: 6 Cycle OB35 in msec (Original Language: STL)
// 300ms Task (See FB29)
// --- BEGIN STL Network 15 ---
L "OB35_EXC_FREQ"
L 6
MUL_I
ITD
DTR
L 1000.0
DIV_R
T "Time_300ms"
// --- END STL Network 15 ---
END_ORGANIZATION_BLOCK