Спасибо, супер! Раритет-то какой :)Цитата:
Сообщение от Denkixot
Моей первой работой было писать примерно такие демки для ГПНТБ СССР в 1990 году. Правда, уже под IBM PC. Сначала тоже на Бейсике, а в 1991-ом году мы придумали с помощью bat-файла чередовать анимацию на Fanta Vision, скомпилированные на QBasic заставки и анимационные ролики, порендеренные в 3D Studio 2.0.Тогда уровень уже стал покруче, хотя смысл всё равно похож
:)
Возможно. Но у меня своя программа и более универсальнаяЦитата:
Сообщение от Radon17
Кстати про демо. Есть уже упомянутая в данной теме демка с вращающимся шаттлом.
Лежит на одном из дисков тут - https://drive.google.com/file/d/0Bws...Npbi16TkUzT1U/
в Справочнике "Игры". Называется Space Shuttle. Сначала выводит вращающиеся буквы PRO 350, потом картинку шаттла.
Ей можно управлять нажимая на клавиши. Стрелки - перемещение. Z и X - вращение в разных плоскостях, B - увеличение
https://pic.maxiol.com/thumbs2/16588...hotimage60.png https://pic.maxiol.com/thumbs2/16588...hotimage61.png
PRO 350 заменить на ЭЛЕКТРОНИКА, а Shuttle на Буран ;)
Немного поотлаживал ImageUtil
Одна принципиальная ошибка (копи-паст :( ), одна ошибка - в предположении (похоже, структура битмапа индексного файла отличается от структуры bitmap.sys файла)Код: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
Теперь бы получить в руки диск с трёхуровневыми каталогами :)
Извлечённые файлы здесь
Hunta, а вы свою программу будете куда-нибудь выкладывать?
Пока (как и DisAsm-11) - только по запросу.Цитата:
Сообщение от Radon17
Она не сильно ошибко-защищенная - то есть если ошибка в структуре ФС носителя или в моих предположениях - от легкой записи в лог до тяжёлого падения :)
Ну и для работы нужна Windows с .NET 4.8 (по крайне мере пока) - то есть XP не пойдёт
бывает, что в составе системы (почему-то) PIP - от более старшей версии (в ПРОС 2 - именно так - v3), в нем можно создать структуру (Вы мне недавно напоминали ключ создания каталогов), и им же ей пользоваться (а DCL этого не понимает). Посмотрите версию своего PIP.Цитата:
Сообщение от Hunta
На сколько помню - на дискетах это не предусмотрено.
У меня готовой системы нет и времени возиться с её созданием тоже нет, так что - если вдруг попадётся или кто-то дастЦитата:
Сообщение от ra3qdp
а эмулятор есть ? могу дать образ винчестера с ПРОС2 и примером того о чем написал. Заодно попробую с дискетой.
ЕстьЦитата:
Сообщение от ra3qdp