Дизасм демонстрационных программ для ИОН ПК-11/12 и Союз-Неон ПК-11/16

Для компьютеров ИОН ПК-11/12 и Союз-Неон ПК-11/16 были написаны демонстрационные программы, которые показывали возможности оконной системы, поддерживаемой встроенным программным обеспечением (ВПО). Как оказалось, обе эти программы написаны на Паскале. Дизасм этих программ упростился, т.к. они были написаны на основе одного шаблона и весьма совпадали с программой теста оконной подсистемы WTEST.PAS. Сами исходники WTEST можно найти на Github - https://github.com/troosh/pk11-16/tr...er/Soft/PASCAL участника форума troosh.
Для начало перевод обратно на Паскаль демонстрационной программы для ИОН ПК-11/12. Хотя она была написана для ИОН, но кто-то уже в надписи поставил ИОН-11/16, но картинка осталась старая. Сама демка оказалась на дисках без двух файлов - IC.DAT и SHAR.DAT. IC.DAT размером 100х100 пикселей должен отображать блок-схему ПЭВМ, а SHAR.DAT 100х180, судя по названию, изображение шара. Эти файлы заменены изображениями 16 вертикальных полос цветов с номерами от 0 до 15.
В приложенном архиве:
VD.PAS - восстановленный исходник на Паскале;
TP.COM - командный файл трансляции с Паскаля на MACRO-11;
TM.COM - командный файл трансляции с MACRO-11;
TL.COM - командный файл линковки;
TD.COM - командный файл для сравнения с оригиналом;
PASSM4.SAV и PFSSM4.OBJ - компилятор Паскаля с библиотекой;
VD.SAV - сам оригинал, при линковке получается VD1.SAV.
Каталог LIB - сборка модулей для библиотеки PASFIS v1.2 из библиотеки PASSIM v1.2.
Для работы программы нужны файлы IC.DAT, SHAR.DAT, BOX.GE5, CAR.GE5, GORILA.GE5, SATURN.GE5, VENUS.GE5. Файлы GE5 - картинки с MSX размером 256х212 с 16 цветами и описанием палитры для рисунка.
Работу программы можно посмотреть в эмуляторе NEONBTL.

Демонстрационная программа для Союз-Неон ПК-11/16. В отличии от предыдущей программы в ней демонстрируется расширенная палитра и 256-цветный режим, которые появились в ПК-11/16.
Для работы требуются файлы рисунков с PIC1.ATR по PIC5.ATR (прилагаются в архиве). Т.к. программа использует для вывода кириллицу и псевдографику, а в Союз-Неон используется основная кодировка, то так же прилагается образ диска, в которой программа уже сконвертирована. В самом архиве текст программы в кодировке DOS-866. Так же прилагается патченный компилятор PASSIM.SAV, который поддерживает 8-битную кодировку. В каталоге PLIB15 - улучшенная библиотека PLIB11, в которую внесены дополнения для работы с расширенной палитрой (PLCREx, PLMODx, PLSAVx, PLFREx). Каталог LIB - моя попытка собрать модули библиотеки Паскаля для этой демонстрационной программы. Ну и собственно DEMO.PAS - восстановленный исходник на Паскале.