DisAsm-11

Некоторые шероховатости есть, но в целом - работает :)

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

Как теперь происходит тестирование :)

Код:

---

K:\PDP\Soft.Not Recoded\0.WorkDir2>test.cmd

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /SAV DAY.SRC /Generate

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@DAY

.MAC/LIST:DAY DAY

.LINK DAY

.DIFF/BIN DAY.SAV DAY.SRC
?BINCOM-I-No differences found

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /SAV DESS.SRC /Generate

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@DESS

.MACRO/LIST:DESS DESS

.LINK DESS

.DIFF/BIN DESS.SAV DESS.SRC
?BINCOM-I-No differences found

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /SAV DIG1.SRC /Generate

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@DIG1

.MAC/LIST:DIG1 DIG1

.LINK DIG1

.DIFF/BIN DIG1.SAV DIG1.SRC
?BINCOM-I-No differences found

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /SAV HAND.SRC /Generate

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@HAND

.MAC/LIST:HAND HAND

.LINK HAND

.DIFF/BIN HAND.SAV HAND.SRC
?BINCOM-I-No differences found

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /SAV STALK.SRC /Generate

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@STALK

.MACRO/LIST:STALK STALK

.LINK STALK

.DIFF/BIN STALK.SAV STALK.SRC
?BINCOM-I-No differences found

---

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

До возможного первого публичного тестирования осталась одна фича - переименование меток :)

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

Отшлифовал шерховатости :)

Программа отправилась в первое бета-тестирование :)

Но как обычно - на подсунутом файле (я его тоже гоняю, потому что) нашлись ошибки генерации кода, хотя и не катастрофичные.

Плохо, что файл .LDA и его я пока не могу после компиляции-сборки сделать что то типа исходного - то есть пока на идентичность не проверишь :(

Проблема с областью векторов - всякие загрузчики имеют в этой области всякие код и данные, обычные программы тоже напрямую с этой областью не сильно работают (особенно в RSX - там программа в этой области может что угодно держать), при поверхностном анализе я пока не придумал, как определять - используется ли ячейка как вектор или как просто ячейка, поэтому была реализована подсказка - пометить ячейку как вектор.

Из прикольного, выяснившегося на первом бета-тестировании - действие - пометить ячейку как вектор, я сделал, на шот-кат повесил, а вот кнопки... не нарисовал :) Так что пока это - тайное знание - кнопка V с клавиатуры делает эту подсказку :)

Пофиксил пару ошибок, слегка причесал работу с векторами, в автоматическое тестирование добавлены новые файлы - форматы - образ памяти и LDA

Некоторые файлы пока проверяются на - возникли ошибки при трансляции-сборке или нет.
Но вот есть одна ошибка, вывод которой я не знаю, как отключить...

Код:

---


K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /IMAGE ABSLDR.SRC /Base 0 /Start 6 /Gen ABSLDR.MAC

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@ABSLDR

.MAC/LIST:ABSLDR ABSLDR

.LINK/LDA ABSLDR

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /SAV DAY.SRC /Generate DAY.MAC

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@DAY

.MAC/LIST:DAY DAY

.LINK DAY

.DIFF/BIN DAY.SAV DAY.SRC
?BINCOM-I-No differences found

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /SAV DESS.SRC /Generate

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@DESS

.MACRO/LIST:DESS DESS

.LINK DESS

.DIFF/BIN DESS.SAV DESS.SRC
?BINCOM-I-No differences found

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /SAV DIG1.SRC /Generate

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@DIG1

.MAC/LIST:DIG1 DIG1

.LINK DIG1

.DIFF/BIN DIG1.SAV DIG1.SRC
?BINCOM-I-No differences found

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /IMAGE DOSRK.SRC /Base 0 /Start 0 /Gen DOSRK.MAC

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@DOSRK

.MAC/LIST:DOSRK DOSRK

.LINK/LDA DOSRK

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /SAV HAND.SRC /Generate

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@HAND

.MAC/LIST:HAND HAND

.LINK HAND

.DIFF/BIN HAND.SAV HAND.SRC
?BINCOM-I-No differences found

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /LDA JKDBD0.SRC /Start 0 /Gen JKDBD0.MAC

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@JKDBD0

.MAC/LIST:JKDBD0 JKDBD0

.LINK/LDA JKDBD0

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /Session JKDBD0.BIC.session /gen JKDBD1.MAC

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@JKDBD1

.MAC/LIST:JKDBD1 JKDBD1
?MACRO-E-Errors detected:  59
DK:JKDBD1,DK:JKDBD1=DK:JKDBD1

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe MACRO JKDBD1

Z  3976 016164  000120                          JMP    (R0)+
Z  4129 016616  004120                          JSR    R1, (R0)+
Z  6210 026126  060020                          ADD    R0, (R0)+
Z  6236 026206  060040                          ADD    R0, -(R0)
Z  6266 026300  060030                          ADD    R0, @(R0)+
Z  6312 026430  060050                          ADD    R0, @-(R0)
Z  6368 026576  010760  000004                  MOV    PC, 4(R0)
Z  6388 026644  010770  000004                  MOV    PC, @4(R0)
Z  6407 026706  010777  177166                  MOV    PC, @K26100
Z  6425 026746  010767  177126                  MOV    PC, K26100
Z  9572 042610  010767  135356                  MOV    PC, V.170+2
Z  9610 042716  010767  135250                  MOV    PC, V.170+2
Z  9628 042756  010767  135210                  MOV    PC, V.170+2
Z  9666 043064  010767  135102                  MOV    PC, V.170+2
Z  9684 043124  010767  135042                  MOV    PC, V.170+2
Z  9722 043232  010767  134734                  MOV    PC, V.170+2
Z  9740 043272  010767  134674                  MOV    PC, V.170+2
Z  9778 043400  010767  134566                  MOV    PC, V.170+2
Z  9795 043436  010767  134530                  MOV    PC, V.170+2
Z  9835 043550  010767  134416                  MOV    PC, V.170+2
Z  9852 043606  010767  134360                  MOV    PC, V.170+2
Z  9892 043720  010767  134246                  MOV    PC, V.170+2
Z 10041 044414  010767  133552                  MOV    PC, V.170+2
Z 10068 044476  010767  133470                  MOV    PC, V.170+2
Z 10095 044560  010767  133406                  MOV    PC, V.170+2
Z 10122 044642  010767  133324                  MOV    PC, V.170+2
Z 10148 044722  010767  133244                  MOV    PC, V.170+2
Z 10174 045002  010767  133164                  MOV    PC, V.170+2
Z 10200 045062  010767  133104                  MOV    PC, V.170+2
Z 10227 045144  010767  133022                  MOV    PC, V.170+2
Z 10254 045226  010767  132740                  MOV    PC, V.170+2
Z 10280 045306  010767  132660                  MOV    PC, V.170+2
Z 10306 045366  010767  132600                  MOV    PC, V.170+2
Z 10393 045634  010767  132332                  MOV    PC, V.170+2
Z 10463 046034  010767  132132                  MOV    PC, V.170+2
Z 10719 047040  010767  131126                  MOV    PC, V.170+2
Z 10752 047136  010767  131030                  MOV    PC, V.170+2
Z 10785 047234  010767  130732                  MOV    PC, V.170+2
Z 10820 047336  010767  130630                  MOV    PC, V.170+2
Z 10853 047434  010767  130532                  MOV    PC, V.170+2
Z 10886 047532  010767  130434                  MOV    PC, V.170+2
Z 10921 047634  010767  130332                  MOV    PC, V.170+2
Z 10954 047732  010767  130234                  MOV    PC, V.170+2
Z 11000 050060  010767  130106                  MOV    PC, V.170+2
Z 11037 050164  010767  130002                  MOV    PC, V.170+2
Z 11074 050270  010767  127676                  MOV    PC, V.170+2
Z 11105 050362  000120                          JMP    (R0)+
Z 11111 050374  010767  127572                  MOV    PC, V.170+2
Z 11126 050434  000121                          JMP    (R1)+
Z 11133 050450  000122                          JMP    (R2)+
Z 11141 050464  000123                          JMP    (R3)+
Z 11147 050476  010767  127470                  MOV    PC, V.170+2
Z 11162 050536  000124                          JMP    (R4)+
Z 11169 050552  000125                          JMP    (R5)+
Z 11177 050566  000126                          JMP    (SP)+
Z 11183 050600  010767  127366                  MOV    PC, V.170+2
Z 11199 050640  000127  022700                  JMP    #22700
Z 11219 050702  010767  127264                  MOV    PC, V.170+2
Z 11256 051006  010767  127160                  MOV    PC, V.170+2
?MACRO-E-Errors detected:  59
DK:JKDBD1=DK:JKDBD1

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe LINK/LDA JKDBD1


K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /IMAGE MONITR.SRC /Base 0 /Start 0 /Gen MONITR.MAC

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@MONITR

.MAC/LIST:MONITR MONITR

.LINK/LDA MONITR

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /SAV STALK.SRC /Generate

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@STALK

.MACRO/LIST:STALK STALK

.LINK STALK

.DIFF/BIN STALK.SAV STALK.SRC
?BINCOM-I-No differences found

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /LDA SYSLD1.SRC /Gen SYSLD1.MAC

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@SYSLD1.COM

.MAC/LIST:SYSLD1 SYSLD1

.LINK/LDA SYSLD1

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /LDA SYSLD2.SRC /Gen SYSLD2.MAC

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@SYSLD2.COM

.MAC/LIST:SYSLD2 SYSLD2

.LINK/LDA SYSLD2

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /LDA SYSLD3.SRC /Gen SYSLD3.MAC

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@SYSLD3.COM

.MAC/LIST:SYSLD3 SYSLD3

.LINK/LDA SYSLD3

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /LDA SYSLD4.SRC /Gen SYSLD4.MAC

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@SYSLD4.COM

.MAC/LIST:SYSLD4 SYSLD4

.LINK/LDA SYSLD4

K:\PDP\Soft.Not Recoded\0.WorkDir2>DisAsm11.exe /ChainedLDA ZKDJV2.SRC /Gen ZKDJV2.MAC /Start 200

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe $@ZKDJV2

.MAC/LIST:ZKDJV2 ZKDJV2
?MACRO-E-Errors detected:  13
DK:ZKDJV2,DK:ZKDJV2=DK:ZKDJV2

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe MACRO ZKDJV2

Z  350 001156  000123                          JMP    (R3)+
Z  384 001262  020040                          CMP    R0, -(R0)
Z  1373 004540  000120                          JMP    (R0)+
Z  1385 004562  000121                          JMP    (R1)+
Z  1393 004576  000122                          JMP    (R2)+
Z  1417 004652  000123                          JMP    (R3)+
Z  1425 004666  000124                          JMP    (R4)+
Z  1433 004704  000125                          JMP    (R5)+
Z  1452 004742  000126                          JMP    (SP)+
Z  1464 004766  000127  001127                  JMP    #1127
Z  2919 011626  000121                          JMP    (R1)+
Z  3148 012470  000127  000401                  JMP    #401
Z  3433 013532  004427  000240                  JSR    R4, #240
?MACRO-E-Errors detected:  13
DK:ZKDJV2=DK:ZKDJV2

K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe LINK/LDA ZKDJV2

---

Помимо исправление некоторого количества ошибок и неточностей в отслеживании ссылок...

Я решил, что запоминание местоположений во всех трёх окнах при сохранении сеанса - полезная фича (ибо вспоминать ещё и - где я там прервался - даже через полчаса - не комильфо) и...

Добавил это :) Теперь прога запоминает текущий адрес в каждом окне при сохранении сеанса и восстанавливает его при загрузке сеанса :)

В процессе дизасма прошивки для Зелакс-Секунды пофиксино некоторое количество ошибок, опять была попытка сделать правильный "парсинг" строк (не сильно удачно), а потом добавлен дизасм команд FPP (долго ленился сделать это). Сделал на основе описания дизасма команд FPP в FullODT :) До этого было наоборот - на основании описания в DisAsm-е делал описание для FullODT :)

А можно ссылку на программу

Цитата:

---

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

А можно ссылку на программу

---

Сейчас идёт тестирование, как только - пришлю.

А все таки можно промежуточный вариант