BLK

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

BLK (номер блока, читается «би-эл-кэй») — стандартная переменная Каллисто.

BLK            ( −− a )                             Переменная, номер интерпретируемого блока.

Переменная, номер входного блока-экрана при интерпретации.

BLK переключает ввод информации на терминальный буфер (BLK=0, пультовый режим) или на экранный (BLK, равный номеру экрана).

Ввод слова BLK[править]

В режиме ЛАТ последовательно нажмите три клавиши  В/О      9 

BLK в стандарте ANS Forth[править]

 7.6.1.0790   BLK                            "b-l-k"                       BLOCK
            ( -- a-addr )
            a-addr - адрес ячейки, содержащей нуль или номер интерпретируемого 
            блока запоминающего устройства. Если BLK содержит нуль, входной 
            источник - не блок и может быть идентифицирован SOURCE-ID, если 
            SOURCE-ID является доступным. Неопределенная ситуация существует 
            если программа непосредственно изменяет содержание BLK.

        См.: 7.3.3 Области блочного буфера.

История[править]

BLK в предыдущем стандарте Forth-83 (англ.)[править]

     BLK          -- addr                       U,79           "b-l-k"
          The address of a variable containing the number of the mass
          storage block being interpreted as the input stream.  If the
          value of BLK is zero the input stream is taken from the text
          input buffer.  {0..the number of blocks available -1}
          See:  TIB  "input stream"

BLK в стандарте Forth-79 (англ.)[править]

BLK            -- addr                       U,132          "b-l-k"
    Leave  the address of a variable containing the number of  the
    mass storage block being interpreted as the input stream.   If
    the  content  is  zero,  the input stream is  taken  from  the
    terminal.

BLK в fig-FORTH Release 1 glossary, май 1979 (англ.)[править]

BLK           ---  addr                      U,L0
       A user variable containing the block number being interpreted. If
       zero, input is being taken from the terminal input buffer.

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

  84 rrBLK           .EQU     1098                   ; 11098  BLK − BLK=0, работа Каллисто с пульта (TIB)
  85 pBLK            .EQU       98                   ;              BLK!=0, работа с блоком номер BLK @
…
2816 ;#BLK
2817 ; BLK              ( −− a )                             Переменная, номер интерпретируемого блока.
2818 ; Переменная BLK переключает ввод информации на терминальный буфер ввода (BLK=0) или на экранный (BLK равнен номеру экрана).
2819 LBLK:           .DB     3
2820                 .TEXT   "BLK"
2821                 .DW     LFONT
2822 BLK:            .DW     SUSE
2823                 .DB pBLK

Реализация из SP-Forth 4.20:

USER BLK

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

Описание и определение переменной BLK в ядре ФОРТ-ЕС:

BLK      П->А ПЕРЕМЕННАЯ - НОМЕР ВХОДНОГО БЛОКА-ЭКРАНА          8

                      Экран номер 8
( 09.09.86   СИСТЕМНЫЕ ПЕРЕМЕННЫЕ -   ОКОНЧАНИЕ)

VARIABLE   BLK  (  НОМЕР ВХОДНОГО ЭКРАНА ИЛИ НОЛЬ)

Определение переменной BLK в FORTH ИТЭФ:

            HEAD     203Q,'BL',313Q,BLK,$USE              ; BLK
            DW 36Q

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


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


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