Waterbomb with the red firefighter helicopter

На тренировке красный пожарный вертолет должен тушить костер. Вы должны просто выпустить воду, нажав любую клавишу. Игра состоит из 9 раундов. Чтобы набрать очко, вода должна упасть на вертикаль костра. Чтобы выпустить следующую водяную бомбу, нужно подождать, пока предыдущая коснется земли.

Waterbomb работает на Sinclair ZX Spectrum и его эмуляторах. Эта программа была разработана без GOTO с помощью эмуляторов (JPP, написанный Арнтом Гулбрандсеном с незапамятных времен 😊 и R80 и RSpec), работающих через DOSBox, установленный на моем 64-битном ноутбуке.

Эту работу я посвящаю Нику Щербине из Львова (Украина)

один из победителей конкурса 2021 года.

 

Описание и список программ

Переменные:

a = флаг (0 для пропущенного костра, 1 для пораженного костра)

a$ = строка для музыкальных тонов

b = текущий раунд

g = флаг игрового цикла

r = случайный костер по горизонтальной оси

s = показатель, увеличенный переменной a

u = рабочая переменная для циклов

v = рабочая переменная

w = горизонтальная ось воды, выпущенной вертолетом

x = горизонтальная ось вертолета

y = вертикальная ось водяной бомбы, выпущенной вертолетом.

Строки:

<р>10. подготовить экран, данные для пользовательских символов. Цикл заголовка по рабочей переменной u

<р>20. цикл по переменной u для создания UDG, рисования «луны», построения случайных звезд. Цикл заголовка для переменной g (игра), установить счет равным нулю

<р>30. цикл заголовка по переменной b (раунды). Отображать раунд и счет на экране, отображать желтый фон внизу

40. вычислить случайную ось костра в r, отобразить мигающий костер, установить a = 0, установить y = 0. Цикл заголовка по переменной x, отобразить вертолет

<р>50. звуковой эффект вертолета, если клавиша нажата и y = 0, тогда установите w = x + 1, установите флаг a. Если y <> 0, то вызовите подпрограмму на строку 100.

60. пустой вертолет, закончить петлю на х. Цикл по переменной u завершает спуск водяной бомбы. Инициализация $ (в зависимости от попадания в костер или нет)

70. цикл для звуковых эффектов, хранящихся в a$, обновление счета, очистка нижней части экрана, завершение цикла на b

<р>80. спецэффекты на запрос на повторную игру (известный маленький трюк Speccy с системной переменной)

90. ожидание нажатой клавиши. Если да, то цикл по g продолжается, иначе программа останавливается.

100.подпрограмма для отображения водяной бомбы в точке (y,w) на экране