Program Plc_prg
Var
A: Word; (*текущее положение механизма*)
B: Word; (*адрес назначения механизма*)
C: Bool; (*движение механизма в сторону с большими номерами датчиков + *)
D: Bool; (*движение механизма в сторону с меньшими номерами датчиков - *)
End_var
--------------------------------------------------------------------------
If B=a Then
C:=false; D:=false;
End_if;
If B>a And B>0 Then
D:=true;
Else
D:=false;
End_if;
If B<a And B>0 Then
C:=true;
Else
C:=false;
End_if;
If B=a Then
C:=false; D:=false;
End_if;