GetBit

Функция GetBit() возвращает значение указанного бита заданного значения.

GetBit(Value, Bit): Integer
Value: Variant	Целочисленного значение
Bit: Integer	Номер бита (диапазон зависит от типа переменной)
Функция возвращает "1" или "0"

Пример вызова:

{Pascal Script}
Var
     valueNumber, valueBit, res: Word;

Begin
// valueNumber := ReadValue('Регистр');
// считываем значение регистра прибора
// (предположим оно равно "297" - в двоичной системе счисления 297 = 100101001)
// нумерация начинается с конца двоичного числа (для типа переменной Word с 0 по 15)
     valueNumber := 297;
     valueBit := 3;
     res := GetBit(valueNumber, valueBit);
     AddToDebugLog('Значение бита №' + IntToStr(valueBit) + ' = ' + IntToStr(res));
end.

Подробную информацию об "Окне отладочной информации" можно почитать здесь.

Пример использования функции GetBit() для формирования битовой маски в группе виртуальных каналов.