Ну, т.е.

Код:
VAR
Light : INT; (*яркость в %*)
Light_temp : INT; (*яркость в % для запоминания*)
OUT : INT; (*это то, что передается в лампочку*)
EN : BOOL; (* Включалка *)
END_VAR

==========================================================
Light_temp := Light;
IF EN THEN
  IF Light < 70 THEN
    Light := Light + 30;
    Out := Light;
  ELSIF Light >= 70 THEN
    Light := Light - 30;
    Out := Light;
   END_IF
OUT := Light_temp;
==========================================================
Но, поскольку это происходит в пределах одного цикла, то ничего не происходит. А как это растянуть во времени - не понимаю...