ParamManagerScripts/backend/script_groups/TwinCat/.example/VOID.EXP

25 lines
507 B
Plaintext

(* @PATH := '\/TASK0_VOID' *)
(* @SYMFILEFLAGS := '59392' *)
PROGRAM Void
VAR
mToggle : BOOL ;
mDummy : BOOL;
mMessage : MessageScroll;
mStatus : MessageScroll;
END_VAR
(* @END_DECLARATION := '0' *)
Clock_Signal();
Signal_Gen();
mMessage(msg_array := gH_Message, scroll_sec:= 1, msg_code=> gH_Message_code);
mStatus(msg_array := gH_Status, scroll_sec:= 1, msg_code=> gH_Status_code);
MFMAnalog_Values();
IF NOT mToggle THEN
mToggle := TRUE ;
ELSE
mToggle := FALSE ;
END_IF
END_PROGRAM