(NEXT): различия между версиями
Перейти к навигации
Перейти к поиску
AtH (обсуждение | вклад) Нет описания правки |
AtH (обсуждение | вклад) |
||
Строка 15: | Строка 15: | ||
Экран номер 5 | Экран номер 5 | ||
( 09.09.86 BRANCH ?BRANCH (LOOP/ (+LOOP/ ) | ( 09.09.86 BRANCH ?BRANCH (LOOP/ (+LOOP/ ) | ||
CODE BRANCH M: ВRANСН# | |||
RI 0 (, RI RFORTH LH, RI RMASK NR, RNEXT BR, | |||
CODE (LOOP) RW1 1 LA, 1 =F B, | CODE (LOOP) RW1 1 LA, 1 =F B, |
Версия от 07:41, 26 марта 2016
(NEXT) — стандартное слово Каллисто.
Конец цикла со счётчиком в шитом коде.
Это служебное слово, которое компилирует в шитый код слово NEXT. Нет ни малейшей необходимости использовать слово (NEXT) в прикладных программах.
Ввод слова (NEXT)
В режиме NUM последовательно нажмите клавиши ШГ→ Р-ГРД-Г 4 ИП 0 2 P ШГ←
Реализация
Для реализации цикла со счётчиком в ФОРТ-ЕС служили примитивы (LOOP) и (+LOOP)
Вот их определения:
Экран номер 5 ( 09.09.86 BRANCH ?BRANCH (LOOP/ (+LOOP/ ) CODE BRANCH M: ВRANСН# RI 0 (, RI RFORTH LH, RI RMASK NR, RNEXT BR, CODE (LOOP) RW1 1 LA, 1 =F B, CODE (+LOOP) RW1 POP, 1 =H 0 RFIRST LH, 0 RSECOND SH, 0 RMASK NR, 0 RW1 AR, RW1 RFIRST AH, RW1 RFIRST STH, 0 RMASK CLR, BRANCH# BNH, RRET 6 (, 0 RRET LA, RI RTWO AR, RNEXT BR, END-CODE
У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их. |
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |