INDEX

INDEX (индекс, указатель; оглавление, содержание) — фортовское слово Каллисто.

INDEX          ( c1 c2 −− )                         Вывести начальную строку экранов с номерами от c1 до c2.

Пример работы слова INDEX

Выводит на индикатор верхние строчки экранов, номера блоков которых входят в диапазон от нач до кон. Для экономии места на индикаторе после номера экрана пробела нет.

Ввод слова INDEX

В режиме ЛАТ последовательно нажмите клавиши  7   4   K   ИП   0 

История

Слово INDEX переходило из стандарта в стандарт в неизменном виде, но было исключено из них в 1994 году. Оно полезно в любой системе, имеющей поддержку блоков.

INDEX в предыдущем стандарте Forth-83 (англ.)

     INDEX        u1 u2 --                      M
          Print the first line of each screen over the range {u1..u2}.
          This displays the first line of each screen of source text,
          which conventionally contains a title.

INDEX в стандарте Forth-79 (англ.)

INDEX          n1 n2 --
    Print  the first line of each screen over the range  {n1..n2}.
    This  displays  the first line of each screen of source  text,
    which conventionally contains a title.

INDEX в fig-FORTH Release 1 glossary, май 1979 (англ.)

INDEX          from to --
       Print the first line of each screen over the range from, to. This is
       used to view the comment lines of an area of text on disc screens.

Реализация

Юрий Семёнов приводит следующее определение слова INDEX (стр. 105):

 : INDEX   1+ OVER - FOR ↵ ↑ 3 I.R SPACE 0  ( указание на нулевую
                                         строку)
           OVER (LINE) TYPE NEXT DROP ; ( м. табл. 20 )

Опубликовано лишь следующее описание слова INDEX из ФОРТ-ЕС. Оно ссылается на определение, отсутствующее на экране № 46:

INDEX   + N1,N2-> РАСПЕЧАТАТЬ НАЧАЛЬНУЮ СТРОКУ ЭКРАНОВ          46
          С НОМЕРАМИ ОТ N1 ДО N2

Определение слова INDEX в FORTH ИТЭФ:

             HEAD    205Q,'INDE',330Q,INDEX,$COL          ; INDEX
             DW  ONEP,SWAP,XDO
   INDX:     DW  CR,I,THREE,DOTR,SPACE,ZERO,I,DLINE
             DW  XLOOP,INDX-$,SEMI

Ссылки

• Исходный текст слова INDEX в Каллисто Классик 1.0
• КАК РАБОТАТЬ НА ФОРТЕ в книге Л.Броуди «Начальный курс программирования на языке Форт»

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