ISaGRAF. Version 3.4


ST - 3


ELSE - .

:

(*ST , CASE*)

CASE error_code OF

255: err_msg := 'Division by zero';

fatal_error := TRUE;

1: err_msg := 'Overflow';

2, 3: err_msg := 'Bad sign';

ELSE

err_msg := 'Unknown error';

END_CASE;

WHILE

: WHILE... DO... END_WHILE

: ST ,

: WHILE <boolean_expression> DO

<statement> ;

<statement> ;

...

END_WHILE ;

:

ISaGRAF WHILE. WHILE.

:

(*ST , WHILE*)

(* "C" *)

(* *)

string := ''; (* empty string *)

nbchar := 0;

WHILE ((nbchar < 16) & ComIsReady ( )) DO

string := string + ComGetChar ( );

nbchar := nbchar + 1;

END_WHILE;

REPEAT

: REPEAT... UNTIL... END_REPEAT

: ST ,

: REPEAT

<statement> ;

<statement> ;

...

UNTIL <boolean_condition>