ATR!

Материал из ПМК вики
Перейти к: навигация, поиск

ATR! — системное слово Каллисто. Установить атрибуты вывода.

ATR!           ( c −− )                             Установить атрибут вывода на индикатор c (0..7).

Слово ATR! устанавливает атрибуты при выводе символов и других объектов на индикатор.

Реализация[править]

В Каллисто 1.0 слово ATR! засылает число из стека в регистр 9001, хранящий атрибуты вывода.

2052 JDROP:          1                               ; Да, это обработчик DROP
2053 NDROP:          RM3 + M3                        ; А сюда сваливается 2DROP
2054                 KGOTO9
…
2739 ;#ATRStore
2740 ; ATR!             ( c −− )                             Установить атрибут вывода на индикатор c (0..7).
2741 LATR:           .DB     4
2742                 .TEXT   "ATR!"                  ; ( −− 19001)
2743                 .DW     LRX
2744 ATR:            .DW JATR
2745 JATR:           PKRM03 PPM9001                  ; R9001  Программирование атрибутов вывода.
2746                 PGOTO JDROP                     ; 1 RM3 + M3 KGOTO9

Советская реализация[править]

Определение переменной ATR в FORTH ИТЭФ (атрибуты символов в IBM PC отличались от атрибутов вывода МК-161):

            HEAD     203Q,'AT',322Q,ATR,$USE              ; ATR
            DW 32Q          ;Атрибут

Ссылки[править]


  Nopictures-icon.png У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их.


  Stub-icon-48px.png Это заготовка статьи. Вы можете помочь проекту, дополнив её.