Некромант

Распределение регистров

Текст программы

Объяснение работы программы

Сначала поясню несколько неочевидных моментов. Первое – зачем команда В/О перенесена в начало. Это чтобы можно было косвенно через 0 в регистре Re быстро перейти в конец подпрограммы.

Второе. Шестнадцатеричная цифра A в регистре R4 успешно заменяет десятку (если как множитель находится слева), но смотрится лучше как признак контакта.

Последнее, это хитрое сложение. Чтобы его понять, рекомендую почитать раздел про регистр X2 из статьи по недокументированным возможностям. Так вот, эта подпрограмма, состоящая всего из трёх команд по адресу 92 (R9), в регистре X2 заменяет первую значащую цифру, без изменения порядка числа, на первую цифру числа из регистра Y, знак, порядок и остальные цифры которого не имеют значение. Результат записывается в регистр X, а содержимое Y, как при обычном сложении, исчезает, с подтягиванием стека. Как так получается, можно узнать здесь. Остальные фишки по мере изложения.

По поводу зомби. Разделены на группы слева (R0) и справа (Ra). Каждая группа состоит из трёх цифр от 0 до 4. Хранится как дробное число вида 0.123. Цифра 1 ближе к центру (к игроку). После хода сдвигается влево, а правый (3-й) разряд пополняется новым монстром. Каждая цифра определяет силу монстра, где ноль – это его отсутствие. Если при сдвиге (умножении на 10) получается не нулевая целая часть, значит есть контакт игрока с монстром. При подготовке поля битвы цифры на экране инвертируются (в шестнадцатеричном представлении) для наглядности, а разряды из R0 ещё и разворачиваются в обратном порядке. В дальнейшем будем использовать термин число-группа.

Разберём вспомогательные процедуры. Про хитрое сложение уже сказали. Перейдём к генератору случайных чисел (псевдослучайных, конечно). Подпрограмма с адреса 96 (Rc) сначала генерит очередное случайное число по формуле N_i+1 = {7 * N_i + π}, а затем умножает его на множитель, которых до вызова был в RX. В программе используется только два варианта. Множитель 2 – результат 0, 1 для выбора группы зомби. Множитель 5 – результат 0…4 для уровня очередного монстра.

Подпрограмма сдвига монстров к центру по адресу 74 (R7). Индекс группы находится в Rd. Поэтому число просто умножается на 10, копируется временно в RY, дробная часть сохраняется обратно, а результат умножения, для анализа контакта, возвращается в RX. Тут не очевидна команда x→Пd по адресу 80. Так вот, сама подпрограмма точно вызывается дважды. Первый раз с RD = 10 (точнее = R4), и вот, чтобы записать ноль в RD для повторного вызова это и делается. Конечно, дробная часть может быть и не нулевая, но из той же статьи из раздела по косвенной адресации видно, что числа в степени −01 (или −02, −03) не меняются при косвенном использовании. А последние цифры мантиссы всегда остаются нулевыми: число-группа использует только три первых разряда.

Подпрограмма проведения удара с адреса 83 (R8). Как обычно, индекс группы в Rd. Сначала отсекается вариант, что группа целиком пустая (вот где нужен Re с возвратом через адрес 00). Потом используется хитрое сложение. Для этого просто единица заменяется на первую значащую цифру в группе (ближайший монстр). Потом от результата отнимается сила удара (1 или 2). А затем снова используем хитрое сложение, но уже чтобы результирующую цифру подставить на место первой значащей цифры в числе-группе. Может и ноль, кстати. Вот здесь и видно, как у монстра E работает иммунитет. Ему соответствует цифра 1, и при вычитании 1 − 2 = −1. А хитрое сложение знаки игнорирует, вот и получается, как по легенде, лишняя энергия используется для восстановления.

Возможно обратили внимание, что у предыдущей подпрограммы нет команды В/О, и код продолжает выполнять что-то другое с адреса 92. Это просто экономия одной команды. От процедуры проведения удара результат не ожидается, поэтому если что-то ещё сделает в стеке, то ничего страшного. А потом всё равно встретится В/О.

Ну вот, все процедуры рассмотрели, можно переходить к основному коду.

Адреса 01..07. Инициализация переменных игры начальными значениями.

Адреса 08..12. Запись индекса группы в Rd, в которую будет добавлен новый монстр. Как уже упоминалось про процедуру генерации случайного числа, на выходе будет 0 или 1. Умноженное на 10 и даст 0 или 10.

Адреса 03..19. Генерация нового монстра и добавление его в конец группы. К этому моменту в числе-группе точно нет последнего разряда, так что плюс безопасен.

Адреса 20..34. Этот фрагмент разворачивает разряды из регистра R0, добавляя ещё ноль справа, и одну цифру слева (какую не важно, т. к. инверсия всё равно эту цифру в 8 превратит, но в частности это всегда 4). Т. е. число 0.321 будет преобразовано в 41230. Как именно, оставляю как упражнение читателю. Тут нет ничего сложного или недокументированного.

Адреса 35..39. Добавление признака игрока (7 это инверсное 8) и второй группы. Не важно, что дробное число. Для инверсии важны только цифры. Вот, уже получилось почти то, что нужно. Только в RY нет счётчика дней и первый разряд 8, а не число жизней. Всё это добавляется далее.

Адреса 40..46. Вывод поля битвы. Тут делается ещё одно действие. Внесение цифры 2 в регистр R3, как значение силы удара по умолчанию. Делается это нестандартно. Команда Fπ, как побочный эффект, сбросит X в X1. Т. е. наша картинка пока отдохнёт там. В это время в стек догружаются другие нужные константы. И опять же вместо П→x2 используется КП→x3, чтобы в R3 тройку (да π при косвенном использования ведёт себя как тройка) заменить на два. И потом, используя хитрое сложение и тот факт, что при FВx картинка из X1 попадёт в X2, получим нужный результат.

Адреса 47..55. Проведение удара. Поясню, что для удара в обе стороны, нужно дважды вызвать процедуру в R8, но при значении R3 = 1. Если посмотреть код прямо, пока исключив вариант не ноль, то это именно и делается. Ноль заносится в Rd. R3 уменьшается, делается вызов. Затем в Rd заносится 10 (длинновато, конечно) и повторяется вызов. А теперь посмотрим на случай, если игрок указал не ноль. Тогда знак числа сразу (через Rb) попадёт на F10^x (так вот он зачем тут!), превращаясь в 0.1 (что фактически ноль) и 10. А R3 останется двойкой. И процедура будет вызвана только один раз. Как раз и есть концентрированный удар в одном направлении.

Адреса 56..59. Движение монстров. Саму процедуру мы уже рассмотрели, как и пояснение, почему второй раз индекс группы в Rd уже будет нулевым.

Адреса 60..67. Проверка на контакт, и если сумма целых чисел групп нулевая (нет контакта), то переход на начало с уменьшением счётчика минут. При исчерпании – вывод признака успешного окончания.

Адреса 68..73. Обработка контакта. Тут проще начать с адреса 70, куда идёт переход при контакте. C него в Rx готовиться признак контакта, а затем идёт обратный переход на финальный С/П. И только после него проверятся счётчик жизней. Вот такая хитрая карусель для сокращения одного С/П.

Вот и всё. Дальше в программе идут процедуры, которые мы уже рассмотрели.