Сообщение от
nzeemin
Код:
; FOR I:=1 TO 10 DO BEGIN
MOV %5,-(6)
ADD #xxxx,%0
Скорей так
Код:
; FOR I:=1 TO 10 DO BEGIN
MOV R5,R0
ADD #xxxx,R0
MOV R0,-(SP)
И ещё бывает такой вариант
Код:
; FOR I:=1 TO 10 DO BEGIN
MOV SP,R0
ADD #xxxx,R0
MOV R0,-(SP)
Ну и ещё бывает
Код:
L1:
CMP @4(6),(6)
BGE .+6
...
DEC @4(6)
...
- - - Добавлено - - -
Из восстанавливаемого исходника DIGER-а
Код:
P.FOR IDXVAR R5 AT #3654 FROM #1 TO #7 BEGIN
...
P.END
- - - Добавлено - - -
Оттуда же
Код:
P.FOR IDXVAR SP AT #6 FROM #1 TO #17 BEGIN
P.FOR IDXVAR SP AT #16 FROM #1 TO #3 BEGIN
...
CHKARR INDEX R0 AT RANGE LOW #1 HIGH #20
...
CHKARR INDEX R1 AT RANGE LOW #1 HIGH #17
...
P.END
...
CHKARR INDEX R0 AT RANGE LOW #1 HIGH #20
...
CHKARR INDEX R0 AT RANGE LOW #1 HIGH #20
...
P.END
- - - Добавлено - - -
Ещё CASE под макрос убрать, а потом допилить макросы описания локальных переменных и вообще почти Паскаль получится 
Ответить с цитированием
