Test der Kommunikation

Durch das Setzen der bExecuteCmd-Variable auf TRUE wird eine einfache Simulation der Befehle in Steuerungsrichtung aktiviert und mit FALSE deaktiviert. Bei einer aktiven Verbindung wird in verwendeten Beispiel ein Einzeln-Befehl (C_SC_NA_1, IOA = 10 ) zyklisch alle 10 Sekunden zur Unterstation übertragen.

PROGRAM MAIN
VAR
    ...

    bExecuteCmd : BOOL;
    timer : TON;

    ...
END_VAR

...

(* Simple command simulation *)
timer( IN := bExecuteCmd, PT := T#10s ); (* Send cyclic command *)
IF timer.Q THEN
    timer( IN := FALSE );
    cmdSingle_0 := NOT cmdSingle_0; (* toggle single command ON<->OFF *)

(*      cmdDouble_0 := SEL( cmdDouble_0 = 1, 1, 2 );

    cmdBitStr_0 := cmdBitStr_0 + 1;

    cmdNormalized_0 := cmdNormalized_0 + 2;

    cmdScaled_0 := cmdScaled_0 + 4;

    cmdFloating_0 := cmdFloating_0 + 1.2; *)
END_IF

...