Как люди писали

[spamsink]

Я пытаюсь довести систему Паскаль-Автокод до состояния, которое позволяло бы по ее образцу писать произвольные компиляторы в автокод ИТМ. В процессе разборки с запускалкой компилятора, которая также упрощала печать инструкции, я декомпилировал и программу печати в две колонки (БИЛИСТ) - это заняло всего несколько часов, потому программа с очень похожей функциональностью уже была готова (система ТИРАЖ).

Оказалось достаточно лишь выдрать процедуру, делающую собственно печать в две колонки и разобраться с режимами компиляции и разбиением на строки; правки кода как таковые были минимальные. Разница заключалась в том, что БИЛИСТ была скомпилирована с неполной оптимизацией: проверки на выход индексов за границы массивов оставались, и в вызовах сообщений об ошибках были номера строк. Это позволило примерно подогнать программу к исходному виду, отчего она получилась весьма кирпичеобразной почти везде, кроме самого конца, где уже нет обращений к массивам.

https://github.com/besm6/pasauto-re/blob/main/bilist.pas

Comments

[vak]

Радует глаз однако!
Где-то так код в Пульте и выглядел тогда, да. Только отступов не делали и буквы все были большие.

[spamsink]

Такая плотность кода понятна - в 16 строках одного экрана хочется видеть как можно больше смысла.

Интересно, что если не делать отступов и минимизировать пробелы, то все плотные строки, кроме одной (25), влезают в 80 символов.

[x86128]

Красота!

ЙЬ := [9,27];

https://github.com/besm6/pasauto-re/blob/9d4b06de669e0a7ff59a2a4702f0fb828a6fec46/bilist.pas#L219

[spamsink]

Самое мнемоничное имя переменной в мире!

[vak]

Я ещё ы люблю выбирать в качестве переменной цикла.