(NEXT)

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

(NEXT) — стандартное слово Каллисто.

Конец цикла со счётчиком в шитом коде.

Это служебное слово, которое компилирует в шитый код слово NEXT. Нет ни малейшей необходимости использовать слово (NEXT) в прикладных программах.

Ввод слова (NEXT)

В режиме NUM последовательно нажмите клавиши  ШГ→     Р-ГРД-Г   4   ИП   0   2     P   ШГ← 

Реализация

Для реализации цикла со счётчиком в ФОРТ-ЕС служили примитивы (LOOP) и (+LOOP)

Вот их описания и определения:

  (LOOP)    * ->                      ТЕСТ НА ЗАВЕРШЕНИЕ ЦИКЛА "DO LOOP"   5

                      Экран номер 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


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


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