Внимание: Вы не вошли в систему. Ваш IP-адрес будет общедоступен, если вы запишете какие-либо изменения. Если вы
войдёте или
создадите учётную запись, её имя будет использоваться вместо IP-адреса, наряду с другими преимуществами.
Правка может быть отменена.
Пожалуйста, просмотрите сравнение версий ниже, чтобы убедиться, что это нужная вам правка, и запишите страницу ниже, чтобы отменить правку.
Текущая версия |
Ваш текст |
Строка 143: |
Строка 143: |
| 2 =H RSTACK 6 (, 0 RSTACK LA, RNEXT BR, | | 2 =H RSTACK 6 (, 0 RSTACK LA, RNEXT BR, |
| 3 =H 0 (, 1 RW1 ), 0 (, 1 MVC, END-CODE | | 3 =H 0 (, 1 RW1 ), 0 (, 1 MVC, END-CODE |
| </PRE>
| |
| В FORTH ИТЭФ слово CMOVE также было [[примитив]]ом, вот его определение:
| |
| <PRE>
| |
| ; ** Работа с памятью **
| |
|
| |
| HEAD 205Q,'CMOV',305Q,CMOVE ; CMOVE
| |
| POP CX ; Счетчик
| |
| CMP CX, 0
| |
| JLE PRO
| |
| MOV AX, DI ; Сохранение содержимого DI,SI
| |
| MOV BX, SI
| |
| POP DI ; Куда
| |
| POP SI ; Откуда
| |
| REP MOV ES: BYTE PTR [DI], DS:[SI]
| |
| MOV DI, AX ; Восстановление DI,SI
| |
| MOV SI, BX
| |
| NEXT
| |
| </PRE> | | </PRE> |
|
| |
|