2.0 KiB
2.0 KiB
// Block Type: OB
// Block Number: 1
// Original Network Languages: LAD
ORGANIZATION_BLOCK "_CYCL_EXC"
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1
VAR_TEMP
OB1_EV_CLASS : Byte;
OB1_SCAN_1 : Byte;
OB1_PRIORITY : Byte;
OB1_OB_NUMBR : Byte;
OB1_RESERVED_1 : Byte;
OB1_RESERVED_2 : Byte;
OB1_PREV_CYCLE : Int;
OB1_MIN_CYCLE : Int;
OB1_MAX_CYCLE : Int;
OB1_DATE_TIME : "Date_And_Time";
Aux_Word : Real;
Aux_Word_2 : Real;
t : Int;
END_VAR
BEGIN
// Network 1: Always OFF (Original Language: LAD)
// AUXILIARY MEMORY - FALSE Memory
IF "AUX FALSE" THEN
"AUX FALSE" := FALSE;
END_IF;
// Network 2: Always ON (Original Language: LAD)
// AUXILIARY MEMORY - TRUE Memory
IF "AUX TRUE" THEN
"AUX TRUE" := TRUE;
END_IF;
// Network 3: Blender CTRL (Original Language: LAD)
BlenderCtrl__Main();
// Network 4: Scroll Message for screen (Original Language: LAD)
MessageScroll(Code := "HMI_Alarms"."gH_Message_code", Data_B := "HMI_Alarms", First := 20, Last := 30, Time_Vis := "MessageScroll_Time");
// Network 5: Scroll Machine Status for screen (Original Language: LAD)
MessageScroll(Code := "HMI_Alarms"."gH_Status_code", Data_B := "HMI_Alarms", First := 34, Last := 43, Time_Vis := "StatusScroll_Time");
// Network 6: ITC Main Routine (Original Language: LAD)
ITC_MainRoutine();
// Network 7: CO2 Counters (Original Language: LAD)
"Co2_Counters_DB"();
// Network 8: ProdBrix Recovery (Original Language: LAD)
"ProdBrixRecovery_DB"();
// Network 9: Hmi Key (Original Language: LAD)
IF "Disable_Bit" THEN
"Key Read & Write Data"();
END_IF;
// Network 10: (Original Language: LAD)
// W.O. 08/07/2022 Modifica per ridurre la velocità di produzione legata al rapporto di proporzione
IF "AUX TRUE" THEN
"Blender_Constants"."gBlenderNominalSpeedAdj" := 1.05;
END_IF;
// Network 11: (Original Language: LAD)
GNS_PLCdia_MainRoutine();
// Network 12: (Original Language: LAD)
// Network 12 has no logic elements.
END_ORGANIZATION_BLOCK