I8080 TO Z80 SOURCE TRANSLATOR

[jerri]

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

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

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

[denpopov]

вроде бы есть такой:
http://forum.tslabs.info/viewtopic.php?f=9&t=621

пока в разработке.

[zebest]

пока в разработке.

Проверял твой конвертер на том же самом исходнике, Вычисление числа Пи на ассемблере,
что и транслятор повыше.
Теперь то я знал, что должно получится в итоге, так что было чуточку побыстрее.
Комменты на великом и могучем игнорирует напрочь, ладно.
С комментами совсем бяда. Без зазрения совести вставляет их в аргументы. Например:
Было

        ld  (NINES),a     ;NINES = 0;
cpl     
        ld  (DIGIT),a     ;DIGIT = -1;
        ld  (DOT),a     ;DOT = true;
        ld  bc,N    ;for(j=0;j<N;j++) {

стало

    ld (NINES ; NINES = 0;),a    
             cpl
    ld (DIGIT ; DIGIT = -1;),a
    ld (DOT ; DOT = true;),a
    ld bc,N ; for(j=0;j<N;j++) {

было cp h
стало call p,h
И желательно чтобы метки не выравнивал вместе с кодом, хотя это меньшая проблема.
Масштабирование окна тоже желательно включить.

[denpopov]

спасибо, отправил g0blinish'у. сказал, пофиксит.

[Sergey]

'sub e' транслирует в 'sub a,e', возможно в каких то ассемблерах такая запись и правильная, возможно, но ужасм это понимает как две команды ((((((

Ну, тут просто: поправь скрипт в текстовом редакторе, строки 235 и 239:
Так сейчас:

I2Z_13:
if upper(cargs) = "M" then do
				      cargs = "(hl)"
				      end
oline = label||" sub a,"||cargs||" "||comment
return

I2Z_14:
oline = label||" sub a,"||cargs||" "||comment
return

будет:

I2Z_13:
if upper(cargs) = "M" then do
				      cargs = "(hl)"
				      end
oline = label||" sub "||cargs||" "||comment
return

I2Z_14:
oline = label||" sub "||cargs||" "||comment
return

Ну и немного меньшая головная боль с DB
было _END: DB 0,0,0E6h
стало _END: DB 0,#,0E6
Так то жи правильно??
А так да, спасибо )

А здесь сложнее. Знаю что глючит, пофиксить пока ума не хватает. Придётся ручками дату переносить. Да и в NP++ это достаточно удобно.
Если, действительно, есть спрос на мой скрипт, постараюсь довести до ума.

[zebest]

Если, действительно, есть спрос на мой скрипт, постараюсь довести до ума.

Ну у меня как бы есть, мне Z80 мнемоники понятнее и ужасм привычнее, но комуу-то - наеборот....
Upd
Еще какая-то заморочка с псевдооператорами HIGH\LOW
такой вариант
mvi m,low(SCR_BUF)
mvi m,high(SCR_BUF)
транслирует в
ld (hl),low(SCR_BUF)
ld (hl),high(SCR_BUF)
и получается как метка, а надо с пробелом между
ld (hl),low (SCR_BUF)
ld (hl),high (SCR_BUF)

Или он их вообще чистаа как метки транслирует?
Тут скорее проблемы исходного асма, который допускает слитное написание псевдооператора и аргумента, а ужасм это понимает по своему...тогда только ручками править ((((

[Advertiser]

[Sergey]

Или он их вообще чистаа как метки транслирует?

Естественно, как метки.

тогда только ручками править ((((

Целью написания скрипта было избавиться от рутинной работы по трансляции мнемоник. Можно, конечно, допилить скрипт.
Но, по-моему, для трансляции high/low достаточно двух операций замены в любом текстовом редакторе:
"заменить всё" "high(" на "high (" и "low(" на "low (".

[denpopov]

Нашелся еще один

[Shiny]

Проверял твой конвертер на том же самом исходнике, Вычисление числа Пи на ассемблере,
что и транслятор повыше.
Теперь то я знал, что должно получится в итоге, так что было чуточку побыстрее.
Комменты на великом и могучем игнорирует напрочь, ладно.
С комментами совсем бяда. Без зазрения совести вставляет их в аргументы. Например:
Было

        ld  (NINES),a     ;NINES = 0;
cpl     
        ld  (DIGIT),a     ;DIGIT = -1;
        ld  (DOT),a     ;DOT = true;
        ld  bc,N    ;for(j=0;j<N;j++) {

стало

    ld (NINES ; NINES = 0;),a    
             cpl
    ld (DIGIT ; DIGIT = -1;),a
    ld (DOT ; DOT = true;),a
    ld bc,N ; for(j=0;j<N;j++) {

было cp h
стало call p,h
И желательно чтобы метки не выравнивал вместе с кодом, хотя это меньшая проблема.
Масштабирование окна тоже желательно включить.

А ты точно брал последнюю версию?
cp h исправил

[zebest]

было cp h
стало call p,h

Где ты был два дня назад (
а5 я на эти "ср" напнулся. Посмотрю на исправленной версии как

- - - Добавлено - - -

Неее, пока все плохо

0+

[свернуть]

Слева код после твоего конвертера, справа - после правильного. Красным соответственно различия.
Ну и табуляцию как бы желательно, после твоего много ручной работы