Деконструкция СП100

[Leo B.]

Насколько я могу судить, пресловутая СП100 ("вызов систем программирования")  образовалась так: в Д-68 (или раннем Диспаке тоже?) когда еще не было паспортов в привычном текстовом виде, а надо было всё делать вручную, Э66 N / 100 служила некоторым аналогом того, что мы сейчас знаем как ЗСN. 

Изменения работы с МБ в Диспаке, приведшие к необходимости раздела паспорта ФИЗО, появление дисков и т. п. привели к тому, что СП100 превратилась в страшную смесь чтений с дисков и барабанов, разнообразных хаков прочитанного, копирований из одного листа в другой и т.п. 

Известно три применения СП100 в стандартных паспортах: 1 - БЕМШ, 5 - МС "Дубна",

11 - АЛГОЛ-БЭСМ. 13 (последний валидный) - МС "Дубна" с листованием.

Остальное - загадка (причем вызова автокода ИТМ там нет, он был отдельной СП и грузился достаточно просто, чтобы стать стандартным паспортом без Э66). 

Причем в коде до сих пор остались следы работы с лент:

делается запрос номера тома, с которого читали, и если номер тома меньше 2048, то он освобождается.

Leo

[Leo B.]

Оптимальный вызов БЕМШа выглядит так:

...

ВХОД 1077^
Е В 1077
К 00 070 1100
С 0010 0000 0030 1747
В 14000 А1
...

А на запуск через атавизм Д-68 (К 00 066 0001 00 000 0100) уходит не менее 4500 команд (столько в эмуляторе Диспака, в настоящем, по-видимому, несколько больше) и два обмена с 2053 (каталог СП и собственно зона с СП100), итого где-то как минимум четверть секунды астрономического времени (работу на Диспаке на лентах за краткостью периода игнорируем). 

За всё время активного использования БЕМШа - грубо, 25 лет (с ~1970 по ~1995 год) во всех нескольких дюжинах организаций, где им пользовались, грубо, 250 рабочих дней в году,  запусков БЕМШа, в общей сложности, было, почитай, порядка нескольких сотен в день, и выходит, что было выброшено на ветер порядка нескольких человеко-недель. Такие дела.

Leo

[Leo B.]

До кучи. Алгол-БЭСМ:

ФИЗО МБ21^
ТРАК 32^
ЛИСТ 0-27^
ВХОД 37^
ЛЕНТ 57(2148-300)^
ЛЕНТ 30(1С)^
РОСП 0^
АВОС^
СПЕЦ^
Е
В 37
К 00 070 0040
С 0014 0000 0021 0015
EВ1A3
$АЛГО

...

Теперь СП100 можно забыть как страшный сон.

Leo