Реализация алгоритма наполнения емкости с тремя стадиями

[kondor3000]

А может кто-нибудь PUTBIT в Лоджике на ST изобразить?
В биб-ке Util.lib код выглядит так 1 Код Путбит.jpg

А в Лоджике как то так, соответственно AND, OR и ROL не работают

function PUTBIT: udint; //имя функции и тип данных выхода
VAR_INPUT
    X: udint;   (* value to be manipulated *)
    N: udint;      (* position of bit to be changed *)
    B:BOOL;        (* value of specified bit *)
END_VAR    
    
    IF B=TRUE THEN
    PUTBIT:=(X OR SHL(1,N));
       ELSE
    PUTBIT:=(X AND ROL(4294967294,N));
    END_IF;
    
end_function