Ваши комментарии
Абсолютно правильно!
11 лет назад
k3.Status-busd реальный
k2.status-busd-bit00-15 виртуальный
k2.status-busd-bit00-15 виртуальный
[spoiler]
раскладываю два байта.
Может val2 брать не из первого а из оригинала разделив на 256?
var
val: word;
val2: word;
bit: byte;
begin
val := ReadValue('k2.Status-busd');
val2:=val div 256;
bit := GetBit(val, 0);
WriteValue('k2.status-busd-bit00', bit);
bit := GetBit(val, 1);
WriteValue('k2.status-busd-bit01', bit);
bit := GetBit(val, 2);
WriteValue('k2.status-busd-bit02', bit);
bit := GetBit(val, 3);
WriteValue('k2.status-busd-bit03', bit);
bit := GetBit(val, 4);
WriteValue('k2.status-busd-bit04', bit);
bit := GetBit(val, 5);
WriteValue('k2.status-busd-bit05', bit);
bit := GetBit(val, 6);
WriteValue('k2.status-busd-bit06', bit);
bit := GetBit(val, 7);
WriteValue('k2.status-busd-bit07', bit);
bit := GetBit(val2, 0);
WriteValue('k2.status-busd-bit08', bit);
bit := GetBit(val2, 1);
WriteValue('k2.status-busd-bit09', bit);
bit := GetBit(val2, 2);
WriteValue('k2.status-busd-bit10', bit);
bit := GetBit(val2, 3);
WriteValue('k2.status-busd-bit11', bit);
bit := GetBit(val2, 4);
WriteValue('k2.status-busd-bit12', bit);
bit := GetBit(val2, 5);
WriteValue('k2.status-busd-bit13', bit);
bit := GetBit(val2, 6);
WriteValue('k2.status-busd-bit14', bit);
bit := GetBit(val2, 7);
WriteValue('k2.status-busd-bit15', bit);
end.
[/spoiler]раскладываю два байта.
Может val2 брать не из первого а из оригинала разделив на 256?
Работа с битами прошла вроде успешно, но есть одно огромное но!
Дано:
Есть word равный 16
Раскладываем его на биты 00001000 00000000
скриптом
В мониторе выводим "текст" привязанный к каналу (тот самый битовый)
Клацаем по апплету текст и смотри график. он в виде гребенки.
Почему? При выполнении скрипта биты сбрасываются в нулевое значение и заново устанавливаются.
И получается гирлянда из битов. Как поправить?
Дано:
Есть word равный 16
Раскладываем его на биты 00001000 00000000
скриптом
В мониторе выводим "текст" привязанный к каналу (тот самый битовый)
Клацаем по апплету текст и смотри график. он в виде гребенки.
Почему? При выполнении скрипта биты сбрасываются в нулевое значение и заново устанавливаются.
И получается гирлянда из битов. Как поправить?
Да, правильно. Рисуешь например мнемосхему относительную по масштабу. Скорее всего это не сделаешь т.к. мнемосхемы растровые, а не векторные.Везде где есть текст.
Ок. Понятно.Полный экран.
Выравнивание в случае если размер полноэкранной мнемосхемы меньше размера экрана, правильно я понял? Автомасштаба в текущей версии не будет.
Везде где есть текст.3. Нет возможности выровнять текст по левому, правому краю.
Текст на элементах?
Полный экран.5. Выровнять мнемосхему по центру экрана и масштабируемость относительно экрана.
Речь про оконные мнемосхемы?
День добрый.Почта мояне могу найти ваш пример "Работа с битами". Напишите пожалуйста скрипт по расщеплению word`a на bit.
Если есть возможность напишите к нам на почту, я Вам вышлю рабочий пример по работе с битами.
**********
А лучше выложите здесь. Информации мало с примерами скриптов.
не могу найти ваш пример "Работа с битами". Напишите пожалуйста скрипт по расщеплению word`a на bit.
Сервис поддержки клиентов работает на платформе UserEcho