PROGRAM Demo
VAR
  a int16 := 0;
END_VAR

WHILE a < 5 DO
    a := a + 1;
END_WHILE;

END_PROGRAM