Как в RSL можно выполнить побитовые операции

Автор:Izmajlov
Дата:14.11.2006
Просмотров:2536
Скачиваний:1734
Оценка: - , Оценок - 0
Сохранить в файле

Обсудить в форуме

Описание

При решении некоторых задач можно столкнуться с необходимостью битовых операций. К примеру - программировании контрольно-кассовых машин в среде РСЛ через порт или предоставленны API, математических задачах, при которых преобразование числе быстрее будет сделать побитовыми сдвигами. Вот пример, как можно воспользоваться функциональностью WindowsScriptHost

Текст примера

 import rslx;
obj=ActiveX("MSScriptControl.ScriptControl");
obj.language  =  "JScript";
s1 = 14;
s2 = 7;
/* Перечень бинарных операторов
 - бинарный AND - &
 - бинарный XOR - ^
 - бинарный сдвиг влево - <<
 - бинарный сдвиг вправо - >>
 - бинарный OR - | 
*/
arg = String(s1)+"&"+String(s2);
result = obj.eval(arg);
msgBox(result);