ПВК Электроника МС 0585 через призму творчества[+Скриншоты, +ПО]

[Manwe]

Вы демок хотели? Их есть у меня! https://youtu.be/ezsI-dbKee4

Спасибо, супер! Раритет-то какой
Моей первой работой было писать примерно такие демки для ГПНТБ СССР в 1990 году. Правда, уже под IBM PC. Сначала тоже на Бейсике, а в 1991-ом году мы придумали с помощью bat-файла чередовать анимацию на Fanta Vision, скомпилированные на QBasic заставки и анимационные ролики, порендеренные в 3D Studio 2.0.Тогда уровень уже стал покруче, хотя смысл всё равно похож

[Advertiser]

[Hunta]

ods1reader извлекает нормально

Возможно. Но у меня своя программа и более универсальная

[Radon17]

Кстати про демо. Есть уже упомянутая в данной теме демка с вращающимся шаттлом.
Лежит на одном из дисков тут - https://drive.google.com/file/d/0Bws...Npbi16TkUzT1U/
в Справочнике "Игры". Называется Space Shuttle. Сначала выводит вращающиеся буквы PRO 350, потом картинку шаттла.
Ей можно управлять нажимая на клавиши. Стрелки - перемещение. Z и X - вращение в разных плоскостях, B - увеличение



PRO 350 заменить на ЭЛЕКТРОНИКА, а Shuttle на Буран

[Hunta]

Немного поотлаживал ImageUtil

Directory [0,0]
 
INDEXF.SYS;1        (1,1)           48./48.          08-AUG-1988 08:48  [1,1]    [RWED,RWED,RWED,RWED]
BITMAP.SYS;1        (2,2)           2./2.            08-AUG-1988 08:48  [1,1]    [RWED,RWED,RWED,RWED]
BADBLK.SYS;1        (3,3)           1./1.            08-AUG-1988 08:48  [1,1]    [RWED,RWED,RWED,RWED]
000000.DIR;1        (4,4)           1./1.         C  08-AUG-1988 08:48  [1,1]    [RWED,RWED,RWED,RWED]
CORIMG.SYS;1        (5,5)           1./1.         C  08-AUG-1988 08:48  [1,1]    [RWED,RWED,RWED,RWED]
DEMOBASIC.DIR;1     (6,2)           1./1.         C  08-AUG-1988 08:51  [200,200][RWED,RWED,RWED,RWED]
 
Total of 54./54. blocks in 6. files
 
Directory [DEMOBASIC]
 
ZASTAWKA.BAS;1      (7,1)           3./3.            08-AUG-1988 08:53  [200,200][RWED,RWED,RWED,RWED]
GRAFIKA.BAS;1       (10,1)          27./27.          08-AUG-1988 08:53  [200,200][RWED,RWED,RWED,RWED]
T.BAS;1             (11,1)          1./1.            08-AUG-1988 08:53  [200,200][RWED,RWED,RWED,RWED]
ZWEZDA.DAT;1        (12,1)          7./7.            08-AUG-1988 08:53  [200,200][RWED,RWED,RWED,RWED] 08-AUG-1988 08:58(3.)
K.BAS;1             (13,1)          26./26.          08-AUG-1988 08:53  [200,200][RWED,RWED,RWED,RWED]
UK.BAS;1            (14,1)          25./25.          08-AUG-1988 08:54  [200,200][RWED,RWED,RWED,RWED]
UK.DAT;1            (15,1)          2./2.            08-AUG-1988 08:54  [200,200][RWED,RWED,RWED,RWED] 08-AUG-1988 09:03(2.)
UK1.DAT;1           (16,1)          2./2.            08-AUG-1988 08:54  [200,200][RWED,RWED,RWED,RWED] 08-AUG-1988 09:02(2.)
COMMUN.BAS;1        (17,1)          30./30.          08-AUG-1988 08:54  [200,200][RWED,RWED,RWED,RWED]
TIMER.BAS;1         (20,1)          1./1.            08-AUG-1988 08:54  [200,200][RWED,RWED,RWED,RWED]
PRINTER.BAS;1       (21,1)          3./3.            08-AUG-1988 08:54  [200,200][RWED,RWED,RWED,RWED]
NAKLON1.BAS;1       (22,1)          2./2.            08-AUG-1988 08:54  [200,200][RWED,RWED,RWED,RWED]
CUBRUB.BAS;1        (23,1)          11./11.          08-AUG-1988 08:55  [200,200][RWED,RWED,RWED,RWED]
 
Total of 140./140. blocks in 13. files
 
Grand Total of 194./194. blocks in 19. files in 1. directories
 

[2022-июл-27 14:27:50 info   ]  Files extracted from "E85_basic_demo.dsk" and written to "@E85_basic_demo.dsk".
00:00:00.1119466

Одна принципиальная ошибка (копи-паст ), одна ошибка - в предположении (похоже, структура битмапа индексного файла отличается от структуры bitmap.sys файла)
Теперь бы получить в руки диск с трёхуровневыми каталогами
Извлечённые файлы здесь

[Radon17]

Hunta, а вы свою программу будете куда-нибудь выкладывать?

[Hunta]

будете куда-нибудь выкладывать?

Пока (как и DisAsm-11) - только по запросу.
Она не сильно ошибко-защищенная - то есть если ошибка в структуре ФС носителя или в моих предположениях - от легкой записи в лог до тяжёлого падения
Ну и для работы нужна Windows с .NET 4.8 (по крайне мере пока) - то есть XP не пойдёт

[ra3qdp]

Теперь бы получить в руки диск с трёхуровневыми каталогами

бывает, что в составе системы (почему-то) PIP - от более старшей версии (в ПРОС 2 - именно так - v3), в нем можно создать структуру (Вы мне недавно напоминали ключ создания каталогов), и им же ей пользоваться (а DCL этого не понимает). Посмотрите версию своего PIP.
На сколько помню - на дискетах это не предусмотрено.

[Hunta]

Посмотрите версию своего PIP

У меня готовой системы нет и времени возиться с её созданием тоже нет, так что - если вдруг попадётся или кто-то даст

[ra3qdp]

а эмулятор есть ? могу дать образ винчестера с ПРОС2 и примером того о чем написал. Заодно попробую с дискетой.

[Hunta]

а эмулятор есть ?

Есть