Программы HELPER⦻ и COPY⦻ для Орион-128

Предисловие от 2013г.

Эти программы я написал еще в 1997-м году, и видимо в середине-конце года отправил в редакцию. Принтера (или печатной машинки) у меня конечно не было - потому 16-ричный дамп и текст статьи были написаны от руки, смотрелось чудовищно. В редакции статья пролежала почти год, пока её видимо из-за недостатка материалов не опубликовали в Июле 1998-го года. Редакторам пришлось немало поработать над корректурой, грамматические ошибки есть даже в самой программе

Сомневаюсь, что кто-либо пользовался этими программами - в 1998-м году активных пользователей Орион-128 уже было немного (у меня как раз тогда уже появился первый PC-компьютер), а те кто пользовались - сидели на CPM/80, а не на "устаревшей" ORDOS 4-5.0. Тем не менее, публикация для меня тогда стала приятным сюрпризом, прислали экземпляр журнала :-)

В процессе ремонта компьютера Орион-128 эти программы нашлись на ROM-диске в целости и сохранности, сделал скриншот для истории:




Предлагаю вашему вниманию две программы, написанные для ПК “Орион-128”:

Программа Helper⦻

Может помочь людям, пишущим программы на Ассемблере. Часто эти программы выходят из-под контроля, в результате чего данные на диске В могут быть испорчены и т.д. При запуске программы появляется меню из 5 элементов:

• “уборка" файлов, расположенных после указанного 1
  
• восстановление файлов, расположенных после стоп-байта 2
  
• восстановление стертого файла/диска В 3
  
• восстановление файла, считанного с ошибкой 4
  
• выход 5

Для выбора дальнейших действий следует нажать клавиши 1...5.

"Уборка" файлов после указанного: На запрос введите имя файла вместе с именем диска, и файлы, расположенные в списке после указанного, будут удалены. Эта функция может применяться, когда на диске появляются случайные файлы, которые нельзя удалить и с которых невозможно снять защиту.

Восстановление файлов, находящихся после стоп-байта. В ответ на запрос вводится имя файла вместе с именем диска. Helper⦻ пытается найти его на диске за стоп-байтом и записывает в конец занятой части диска.

Внимание! Поиск восстанавливаемого файла ведется по первым трем символам. Helper⦻ не проверяет у файла контрольную сумму, и, возможно, конечная часть файла будет затерта.

Восстановление стертого файла диска В: В отличие от функции 2, восстанавливает файлы, которые расположены сразу за стоп-байтом.

Восстановление файла, считанного с ошибкой: При считывании файла с магнитофона сначала записывают данные в память, и при наличии ошибки файл на диск не записывается. Данная функция позволяет записать файл принудительно. Это может помочь восстановить часть информации, если есть ошибка при чтении.

Программа Copy⦻

Как известно, DOS 5.0 не может копировать файлы, что может вызвать определенные трудности при написании пакетных файлов, поэтому приходится писать собственные копировщики.

Формат:

COPY⦻ [диск:]имя_файла1 [диск:]имя_файла2

Примеры:

A: COPY⦻ А:М128 В:MISHA
А: COPY⦻ А:M128 M128

Если файл не найден, выводится "?". Программа грузится с адреса 0000Н.

Внимание! Файл2 создается в обход DOS, поэтому Copy⦻ не проверяет наличие файлов с одинаковыми именами!

HELPER⦻

2102 92cd 18f8 cd03 f8fe 31ca 2590 fe32
ca8e 90fe 33ca fb90 fe34 ca08 91fe 35ca
fdbf c306 9021 0050 cd43 9021 0250 cdd0
bfcd e5bf feff c2cd 91cd cdbf ebcd e2bf
c300 9021 7991 cd18 f821 0050 cd03 f8cd
0ff8 fe0d ca81 90fe 08ca 6190 7723 c34c
902b 7cfe 4fca 7890 3e00 773e 20cd 0ff8
3e08 cd0f f8c3 4c90 3e20 23cd 0ff8 c34c
903e 2077 2377 2377 3a00 50c3 d6bf cd43
9021 0350 7e32 ac90 237e 32b6 9023 7e32
c090 cdb8 bf44 4d23 cddc bf1e 00bb c2c8
9023 cddc bf1e 00bb c2c8 9023 cddc bf1e
00bb c2c8 90c3 d790 6069 1110 0019 7cfe
c1ca cd91 c3a5 9069 60eb d5cd b8bf d1eb
cddc bfeb cddf bf23 137a fec0 caf2 90c3
df90 7bfe 00c2 df90 c3fb 90cd b8bf 3e01
0e41 cd39 f8c3 0090 cdc1 bfe5 3a0a 006f
3a0b 0067 1110 0019 ebe5 d5cd cabf d1e1
cd2a f8e1 110d 0019 3e01 cd39 f823 483e
01cd 39f8 219f 91cd 00bf cdf7 bffe 02ca
5591 fe03 ca61 913a 0900 673a 0800 6fcd
bebf c300 9021 aa91 cd18 f8cd 03f8 c300
9021 d291 cd18 f8cd 03f8 c300 9021 8e91
cd18 f8cd 03f8 c300 961f 7777 6564 6920
696d 7120 6661 6a6c 610d 0a00 0000 6661
6a6c 206e 6520 6e61 6a64 656e 0000 0045
5252 4f52 2420 2000 0000 1f66 616a 6c20
7320 696d 656e 656d 2022 4552 524f 5222
2075 7665 2073 757d 6573 7477 7565 7400
0000 6e61 2064 6973 6b65 206e 6568 7761
7461 6574 206d 6573 7461 2064 6c71 2072
617a 6d65 7d65 6e69 7120 6661 6a6c 6100
0000 1f48 414c 5045 522d 4f52 444f 5320
322e 342f 352e 3020 4d49 5348 4120 5357
4152 4943 4845 5653 4b59 2031 3939 372f
5631 2e30 0d0a 0a75 626f 726b 6120 6661
6a6c 6f77 2c72 6173 706f 6c6f 7665 6e79
6820 706f 736c 650d 0a75 6b61 7a61 6e6e
6f67 6f2e 2e2e 2e2e 2e2e 2e2e 2e2e 2e2e
2e2e 2e2e 2e2e 2e2e 2e2e 2e2e 2e2e 2e2e
2e2e 2e2e 310d 0a77 6f73 7461 6e6f 776c
656e 6965 2066 616a 6c6f 7720 6e61 686f
6471 7d69 6873 710d 0a70 6f73 6c65 2073
746f 702d 6261 6a74 612e 2e2e 2e2e 2e2e
2e2e 2e2e 2e2e 2e2e 2e2e 2e2e 2e2e 2e2e
2e2e 2e2e 320d 0a77 6f73 7461 6e6f 776c
656e 6965 2073 7465 7274 6f67 6f20 6661
6a6c 612f 6469 736b 6120 422e 2e2e 2e2e
2e2e 330d 0a77 6f73 7461 6e6f 776c 656e
6965 2066 616a 6c61 2073 7e69 7461 6e6e
6f67 6f20 7320 6f7b 6962 6b6f 6a2e 2e2e
340d 0a77 7968 6f64 2e2e 2e2e 2e2e 2e2e
2e2e 2e2e 2e2e 2e2e 2e2e 2e2e 2e2e 2e2e
2e2e 2e2e 2e2e 2e2e 2e2e 2e2e 2e2e 3500
434f 5059 2420 2020 0000 d000 0098 fb0f

COPY⦻

cdd3 bf23 7efe 20c2 0300 2323 7efe 3ac2
1900 2b7e 2323 c31c 002b 3e41 cdd6 bf32
9500 7d32 3f00 7c32 4000 cdd0 bfcd e5bf
feff c2c0 00cd cdbf 01f8 ff09 e5d5 2100
0023 7efe 20c2 4100 2323 7efe 3ac2 5700
2b7e 2323 c35a 002b 3e42 329f 00e5 cdd6
bfcd b8bf ebe1 0600 d57e fe0d ca7f 00eb
cddf bfeb 2313 04fe 08ca 8d00 c369 00eb
3e20 cddf bf23 0478 fe08 c280 00e1 0108
0009 c1d1 3e41 cdd6 bfeb cddc bff5 3e42
cdd6 bfeb f1cd dfbf 2313 7ab8 cab2 00c3
9400 7bb9 caba 00c3 9400 cde2 bfc3 fdbf
3e3f cd0f f8c3 fdbf 0000 0000 0000 0000

▶ Отсканированная страница журнала
.