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

Ссылки

• Исходный текст слова BLK в Каллисто Классик 1.0
• См. слова LOAD, >IN и BUFFER
• Cм. также встроенную переменную BUFBLK
• Слово BLK (b-l-k) в стандарте ANS Forth (англ.)
• Слово BLK (b-l-k) в черновике Forth 200x (англ.)
• ВВОД-ВЫВОД в книге Л.Броуди «Начальный курс программирования на языке Форт»
• Under the Hood в книге Leo Brodie Starting Forth (англ.)

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

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