I8080 TO Z80 SOURCE TRANSLATOR

Борясь на работе со стрессом, набросал примитивненький транслятор иcходного текста на ассемблере Intel 8080 в текст для Z80.
Прошу прощения, но на REXX.

Сохранение исходного форматирования не обеспечивается.
Исходный текст:

Код:

---

spcash: push psw
    call spcs2
    pop psw
    ret
spcs2:  lhld svv1  ;if INFO1 is the constant:
    shld sr0    ;<constant value> into sr0
    call cmh
    shld sr2    ;-<constant value> into sr2
    dcx h
    shld sr4    ;-<constant value + 1> into sr4

---

Текст после трансляции:

Код:

---

spcash:          push af
        call  spcs2
          pop  af
        ret
spcs2:        ld  hl,(svv1)        ;if INFO1 is the constant:
        ld  (sr0),hl        ;<constant value> into sr0
        call  cmh
        ld  (sr2),hl        ;-<constant value> into sr2
        dec  hl
        ld  (sr4),hl        ;-<constant value + 1> into sr4

---

Цитата:

---

Сообщение от Sergey

Прошу прощения, но на REXX

---

Кто такой Рекс?

https://ru.wikipedia.org/wiki/REXX

Тот не знает Рекс, кому не довелось написать хотя бы один командный файл для больших машин, списанных в 90е.
И для диалоговых панелей очень удобный инструментарий был и тоже опирался на Рекс.

И сейчас развивается Рекс,, хотя всякие поделия, лоббируемые руководствами оазличных ТНК, оттеснили Рекс.

Но в любом случае, Рекс не самый оптимальный выбор для написания транслятора.

Цитата:

---

Сообщение от krt17

Ха ХА ХА, я же говорил. Спасибо Ewgeny7, за такой лютый вин.
Немного объясню, недавно с пол года назад, Sergey, мне заливал что рекскс знает последний ... ну а коли я его не знаю то я вообще пропащий индивид для всего прогрессивного человечества, что как бы не исключает одно другого тем не менее не является показателем.

---

:v2_laugh: :v2_lol:

Добавил в первый пост новую версию транслятора. Теперь числовые шестнадцатеричные аргументы команд, в т.ч. операторов "DB" и "DW" переводятся из вида "0xxh" в принятый на спектруме "#xx". Исключение составляют аргументы, представляющие собой арифметические выражения, - пока не осилил. :(

Простите, а можно повыпендриваться не совсем по теме?

Ломаю голову над этой записью:
mov ax,020h shl 8
Это что? Догадываюсь что можно было проще 2000h написать, но зачем так людей гнобить?

из контекста неясно где используется.

Цитата:

---

Сообщение от Sergey

примитивненький транслятор иcходного текста на ассемблере Intel 8080 в текст для Z80

---

Интересный транслятор, иногда нужный. Но крови немножко он мне попиль.
'sub e' транслирует в 'sub a,e', возможно в каких то ассемблерах такая запись и правильная, возможно, но ужасм это понимает как две команды ((((((
Ну и немного меньшая головная боль с DB
было _END: DB 0,0,0E6h
стало _END: DB 0,#,0E6
Так то жи правильно??
А так да, спасибо )

Цитата:

---

Сообщение от jerri

из контекста неясно где используется.

---

Да ладно, задача то нередкая - какой-нить листинг из ужасных интеловских мнемоник (а листингов немало - разных билиотечек полезных понаписано) перевести в нормальный вид (у Z80 самый красивый ассемблер на мой вкус, в особенности в классических реализациях, например пакете M80 от Microsoft). Эта задачка очень давняя и популярная - от реализаций в CP/M, например XLATE5 (а также XIZ/XZI - соответственно в обе стороны, еще ZCON и ITOZ были - тоже аналогичные) в прошлом веке, до сравнительно современных - например в компиляторе Z88dk

Кстати, и обратная задача тоже интересная, в частности для проверки совместим ли бинарно с 8080 код, написанный в мнемониках Z80. Т.е. запустится ли он, собранный ассемблером Z80, на 8080.