Код:
PROCEDURE INIT;
VAR     ADDR    : INTEGER;
        VALUE   : INTEGER;
BEGIN
        ADDR:= 36;
        VALUE:= IPEEK(ADDR) OR 4160;
        POKE(ADDR, VALUE);
        SCCA(CTRLC);
END;
form, возвращаясь к твоей шпоре, можно вот эту
процедуру подробнее описать для танкистов-паскалистов )))
Меня конструкции типа ПЕРЕМЕННАЯ:=ЗНАЧЕНИЕ OR КОНСТАНТА
всегда в ступор приводят (я видимо мыслью иначе устроен иначе
был бы системщиком однозначно!) ADDR:= 36; и 4160 это ведь не от балды цифры, а про вызов SCCA(CTRLC); - я так понял надо
описание SCCA читать, но вот CTRLC переменная - что то я не понимаю её судьбу и значение? PEEK,POKE - это же бейсик !!! )))

---------- Post added at 21:48 ---------- Previous post was at 21:47 ----------

Цитата Сообщение от hobot Посмотреть сообщение
ПЕРЕМЕННАЯ:=ЗНАЧЕНИЕ OR КОНСТАНТА
если это записать на ассемблере или как то развернуть как это выглядит для прямой как рельсы логики ?