6 Software-Programmierung
JetSym ST
76
TASK tMainTask
...
WHILE TRUE DO
...
IF biStartButton THEN
bfAutomaticMode := TRUE;
END_IF;
...
END_WHILE;
END_TASK;
TASK tAutomaticMode
...
LABEL lAutomaticMode
WHEN bfAutomaticMode CONTINUE;
...
GOTO lAutomaticMode
...
END_TASK;
JetWeb
Jetter AG