I8080 TO Z80 SOURCE TRANSLATOR

[Sergey]

Борясь на работе со стрессом, набросал примитивненький транслятор и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

[Advertiser]

[Ewgeny7]

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

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

[perestoronin]

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

[perestoronin]

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

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

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

[Sergey]

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

[Sergey]

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

[creator]

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

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

[jerri]

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

[Error404]

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

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

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

[jerri]

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

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

там creator, в предыдущем сообщении выпендривался. вопрос ему как бы был