Игра 100 (свинья) вдвоём с ПМК

Простая игра в кости против ПМК.

Задача

Бросая кубик, набрать 100 очков. Первым начинает игрок. Ход представляет собой серию бросков, и заключается в следующем: игрок бросает кость (кубик) неограниченное число раз и суммирует выпадающие значения. Однако если выпадает единица (свинья), вся сумма, набранная за ход, аннулируется и ход переходит к ПМК. Игрок может завершить свой ход в любой момент. То же самое делает ПМК.

Начало

В/О, С/П. Первым безусловно кидает кубик игрок.

Ход игры

После остановки в регистре X отображается число в виде: К.-СС-ООО-ББ, где:

К – значение кубика при броске (1…6),
СС – сумма очков за текущую серию (с ведущим нулём для малой суммы),
ООО – общая сумма очков, включая текущую серию (хвостовые нули не отображаются),
ББ – номер броска в серии (с ведущим нулём для малого числа).

Например: 5.-15-042-03, означает, что сейчас была выкинута пятёрка, за серию набрано 15 очков, всего вместе с текущими 42 очка, и это третий бросок в серии.

Для того чтобы ещё раз бросить кубик, просто нажимаем С/П. Если же считаем, что ход нужно завершить (нам хватит), то вводим ноль или Cx и далее С/П. После чего ход переходим к ПМК.

Если на кубике выпала единичка (свинья), то очки за серию сгорают и после С/П ход безусловно перейдёт к ПМК (даже если вы введёте не ноль). Например, после четвёртого броска вышла единица: 1.-00-022-04

ПМК за себя играет всю серию сразу. При остановке значение в том же виде, только отрицательное (-К.-СС-ООО-ББ).

После снова ход игрока. Поэтому, посмотрев на достижения ПМК, нажимаем С/П, чтобы кинуть кубик. На экране калькулятора последние нули в числе не отображаются, поэтому начальный промах ПМК будет выглядеть, например, так: -1.-00- -03.

Перед показом результата хода может отобразиться ЕГГ0Г , это значит, что ход победный. После С/П будет показан итог хода (как выше). А потом после С/П безусловно начнётся новая игра.

Параметрами игры ПМК можно управлять. Для этого используются следующие регистры:

Регистр	Значение	Пояснение
Ra	71	Если кто-то из участников (ПМК или игрок) набирает такую сумму, то ПМК кидает до победы. Можно поставить 100, если не хотите, чтобы ПМК так делал.
Rb	21	Это сумму ПМК будет пытаться выбросить за свой ход. Если задать меньше – ПМК осторожничает, больше – играет агрессивнее. В действительности ПМК использует скорректированное значение, в зависимости от разрыва в очках между игроком и ПМК. А это значение используется как базовое.

Далее только для тех, кто не только играет…

ПМК для игры использует стратегию Keep Pace and End Race, параметры которой и задаются в регистрах RA и RB.

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

R0	Флаг новой игры. Если не равно единице, то начнётся новая игра.
R1	Флаг хода игрока. Если равно единице, то ходит игрок, иначе ПМК.
R2	Константа 2200.2. Используется для генерации видеоизображения.
R3	Рабочий. Используется ПМК для установки максимума для серии и для цикла по уменьшению порядка числа.
R4	Число, выброшенное кубиком.
R5	Номер хода в серии.
R6	Сумма очков за серию.
R7	Общая сумма очков игрока. Обновляется после перехода хода к ПМК.
R8	Константа 88008000. Используется для генерации видеоизображения.
R9	Общая сумма очков ПМК. Обновляется сразу.
Ra	71 (параметр). Смысл объяснён ранее.
Rb	21 (параметр). Смысл объяснён ранее.
Rc	Случайное число в диапазоне (0…1). При одинаковом начальном значении выдаёт ту же последовательность случайных чисел (бросков кубика).
Rd	Константа 82. Адрес процедуры броска кубика.
Re	Константа 77. Адрес кода, выполняемого когда сумма превысит 71.

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

# \|	00	01	02	03	04	05	06	07	08	09
00 \|	Cx	x→П7	x→П9	0	x→П5	x→П6	1	КППd	П→x7	+
10 \|	F10^x	1	x→П0	КП→x4	П→x5	x→П3	FВx	П→x8	+	П→x6
20 \|	П→x2	+	К∨	П→x4	<->	FL1	28	/-/	/-/	<->
30 \|	КНОП	ВП	1	/-/	FL3	30	С/П	FL0	00	FL1
40 \|	03	П→x6	×	Fx=0	06	x→П5	x→П6	П→xa	FВx	П→x7
50 \|	+	x→П7	−	Кx≥0e	П→x9	П→xa	−	Кx<0e	+	8
60 \|	÷	П→xb	−	x→П3	КППd	Fx≠0	72	П→x3	+	Fx≥0
70 \|	64	П→x6	П→x9	+	x→П9	БП	10	П→x9	2	F10^x
80 \|	БП	62	x→П1	КП→x5	КП→x6	П→xc	1	1	×	Fπ
90 \|	+	К{x}	x→Пc	6	×	К[x]	x→П4	В↑	П→x6	+
A0 \|	Кmax	x→П6	В/О

Используемые трюки в программе.

Использование единицы в конструкциях FLx. По сути используется проверка флага в регистре на да/нет, при этом единица остаётся в регистре без изменений, и не единица тоже остаётся не единицей. Удобство в том, что текущее состояние стека (например, ввод игрока), при такой проверке, не меняется. По адресу 37 проверка перехода на новую игру. По адресу 39 проверка перехода хода игроку. По адресу 25 ветвление в зависимости от того, чей сейчас ход.
Недокументированное использование команды ВП по адресу 32 для объединения значений из регистров X и Y. При пошаговой отладке в регистре X будет значение кубика и номер хода (отрицательная степень), а в регистре Y – суммы серии и общая сумма. В режиме исполнения они объединятся в одно число. Детально описано на странице Недокументированные возможности. Ещё момент – полученное число содержит шестнадцатеричные цифры (минус = A), поэтому степень числа (указание на количество бросков) меняется по одному в цикле (по счётчику в R3), иначе деление на всю степень сразу уберёт шестнадцатеричные цифры.
Использование неверного исполнения функции Кmax при значении Y равным нулю. ПМК считает ноль максимальным. Дело в том, что когда мы вычисляем значение кубика на шаге 95, то получаем значение 0…5, которое нужно увеличить на единицу для отображения пользователю, но в то же время ноль должен остаться нулём для серии. Поэтому увеличение на единицу значения кубика производится только перед отображением (шаг 13), сумма серии тоже заранее увеличивается на 1 на шаге 84. Но если будет ноль, то с помощью Кmax на шаге A0 сумма серии обнулится. В других случаях её значение не измениться, т. к. сумма не меньше, чем её последнее слагаемое.
Пропуск команды при ошибке. На шаге 10 при проверке суммы, когда значение будет 100 или более, возникнет ошибка переполнения (ЕГГ0Г), при этом в режиме выполнения программы одна команда (по адресу 11) будет пропущена. Т. е. в обычном случае в R1 попадёт единица, а при ошибке то число ≥ 100, что вызвало переполнение. Поэтому на шаге 37 при R1 ≠ 1 будет переход на начало новой игры.
Флага хода игрока устанавливается проще. На шаге 06 он задаётся явно (первая команда подпрограммы с адреса 82 сохранит его значение), а случае хода ПМК на шаге 64 используется отрицательность значения регистра R3 (сумма серии, которую ПМК пытается выбросить, храниться в отрицательном значении для оптимизации – нет необходимости в минусе по адресу 80), либо отрицательность X, после проверки на шаге 69.

Подпрограмму генерации случайного числа по адресам 85…92 можно, при желании, поменять. Тем более, что есть резерв ещё в две команды.