(NEXT): различия между версиями

Материал из ПМК вики
Перейти к навигации Перейти к поиску
Нет описания правки
Нет описания правки
Строка 7: Строка 7:
== Ввод слова (NEXT) ==
== Ввод слова (NEXT) ==
В [[Режим NUM|режиме NUM]] последовательно нажмите клавиши [[Клавиша ШГ вправо|{{Чёрная клавиша|ШГ→}}]]   [[Клавиша Р-ГРД-Г|{{Чёрная клавиша|Р-ГРД-Г}}]] [[Клавиша 4|{{Серая клавиша|4}}]] [[Клавиша ИП|{{Чёрная клавиша|ИП}}]] [[Клавиша 0|{{Серая клавиша|0}}]] [[Клавиша 2|{{Серая клавиша|2}}]]   [[Клавиша P|{{Синяя клавиша|P}}]] [[Клавиша ШГ влево|{{Чёрная клавиша|ШГ←}}]]
В [[Режим NUM|режиме NUM]] последовательно нажмите клавиши [[Клавиша ШГ вправо|{{Чёрная клавиша|ШГ→}}]]   [[Клавиша Р-ГРД-Г|{{Чёрная клавиша|Р-ГРД-Г}}]] [[Клавиша 4|{{Серая клавиша|4}}]] [[Клавиша ИП|{{Чёрная клавиша|ИП}}]] [[Клавиша 0|{{Серая клавиша|0}}]] [[Клавиша 2|{{Серая клавиша|2}}]]   [[Клавиша P|{{Синяя клавиша|P}}]] [[Клавиша ШГ влево|{{Чёрная клавиша|ШГ←}}]]
== Реализация ==
Для реализации цикла со счётчиком в ФОРТ-ЕС служили [[примитив]]ы (LOOP) и (+LOOP)
Вот их определения:
<PRE>
                      Экран номер 5
( 09.09.86  BRANCH  ?BRANCH  (LOOP/  (+LOOP/ )
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
</PRE>


{{нет иллюстраций}}
{{нет иллюстраций}}

Версия от 07:37, 26 марта 2016

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

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

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

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

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

Реализация

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

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

                      Экран номер 5
( 09.09.86  BRANCH  ?BRANCH  (LOOP/  (+LOOP/ )

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


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


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