Подключение инкрементального энкодера

[lara197a]

IF A=B THEN
.....;
ELSIF A>B THEN
.......;
ELSIF A< B THEN

........;
END_IF
A:=B;