DisAsm-11

[Hunta]

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

K:\PDP\Soft.Not Recoded\0.WorkDir2>dir stalk.*
 Volume in drive K is Temp A
 Volume Serial Number is D289-BED8

 Directory of K:\PDP\Soft.Not Recoded\0.WorkDir2

06.04.2021  00:00               512 STALK.COM
04.04.2021  00:00            25 088 STALK.SRC
               2 File(s)         25 600 bytes
               0 Dir(s)  425 474 093 056 bytes free

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

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


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


K:\PDP\Soft.Not Recoded\0.WorkDir2>K:\PDP\Emul\RTP\RT11.exe DIFF/BIN STALK.SAV STALK.SRC

?BINCOM-I-No differences found

K:\PDP\Soft.Not Recoded\0.WorkDir2>dir stalk.*
 Volume in drive K is Temp A
 Volume Serial Number is D289-BED8

 Directory of K:\PDP\Soft.Not Recoded\0.WorkDir2

06.04.2021  00:00               512 STALK.COM
08.04.2021  22:53           472 209 STALK.LST
08.04.2021  22:53           151 380 STALK.MAC
08.04.2021  22:53            26 624 STALK.OBJ
08.04.2021  22:53            25 088 STALK.SAV
04.04.2021  00:00            25 088 STALK.SRC
               6 File(s)        700 901 bytes
               0 Dir(s)  425 473 409 024 bytes free

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

[Advertiser]

[Hunta]

DisAsm11.exe /cha ZKDJV2.BIC  /g
DisAsm11.exe /image dos_rk.bin /generate /base 0 /start 0
DisAsm11.exe /image "DEC-11-L2PC-PO Absolute Loader.ptap" /base 0 /start 6 /generate "DEC-11-L2PC-PO Absolute Loader.mac"

Ну и так далее

[Hunta]

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

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

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

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

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

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

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

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

[Hunta]

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

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

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

[Hunta]

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

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

[Hunta]

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

[Hunta]

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

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

[Hunta]

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

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

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

[Hunta]

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

[Woxem]

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