INDEX
Перейти к навигации
Перейти к поиску
INDEX (индекс, указатель; оглавление, содержание) — фортовское слово Каллисто.
INDEX ( c1 c2 −− ) Вывести начальную строку экранов с номерами от c1 до c2.
Выводит на индикатор верхние строчки экранов, номера блоков которых входят в диапазон от нач до кон. Для экономии места на индикаторе после номера экрана пробела нет.
Ввод слова 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.
Реализация
3876 ;#INDEX 3877 ; INDEX ( c1 c2 −− ) Вывести начальную строку экранов с номерами от c1 до c2. 3878 ; Вывести на индикатор верхние строчки экранов, номера блоков которых входят в диапазон от нач до кон. 3879 ; Для экономии места на индикаторе после номера экрана пробела нет. 3880 LINDEX: .DB 5 3881 .TEXT "INDEX" ; ( нач кон −− ) 3882 .DW USLIST 3883 INDEX: .DW CALL, OVER,SUB,ONEP, XFOR,INDX2 3884 INDX: .DW CR, DUP, LITB 3885 .DB 3 3886 .DW DOTR, QBREAK, ZERO, OVER, DLINE, TYPE1 3887 .DW ONEP, XNEXT,INDX 3888 INDX2: .DW DROP, EXIT
Советская реализация
Юрий Семёнов приводит следующее определение слова 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
- См. слово LIST
- КАК РАБОТАТЬ НА ФОРТЕ в книге Л.Броуди «Начальный курс программирования на языке Форт»
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |