Таблица рекордов: оба показа оригинала, ввод имени, переходы полосами
pop_hof.c был написан, но никуда не вызывался: после финала автомат уходил мимо него в title, а на титрах экран получался чёрным. Теперь это хвост end_sequence и шаг show_title между credits и attract-demo, как в оригинале. Два корня пустого экрана: - story.pal — 256 записей, и запись 0x3F (цвет глифов шрифта) в ней чёрная: текст рисовался, но был не виден. Генератор кладёт туда золотой 0xB7; - полосовой переход копирует страницу акселератором, а тот читает ОЗУ-копию, куда прозрачный блит текста не пишет. Строки рисуются после перехода, прямо в видимую страницу. Попутно: - s5 в архиве PV — фон таблицы (рамка story + логотип на y=24, HOF_POP); - отдельный индекс палитры под фон текстовой рамки: финал красит его в #800000, титры оставляют #100060 (load_title_images(bgcolor)). Прежний ремап в индекс 9 подменить было нельзя — им нарисована сама титульная картинка; - второй набор глифов в font.atl цветом 0x3E: у SDLPoP шрифт маска и show_hof_text рисует текст дважды разным цветом, у нас цвет запечён в пиксели. Каталог SPA1 держит счётчик в байте, поэтому набор обрезан по '_'; - общий pop_screen_present_ltr(): им теперь пользуются story-переход интро, титры, таблица и титульная картинка финала. Заодно вернулся пропущенный шаг show_title — экран с логотипом и Jordan Mechner между «свадьбой» и титрами (BUGS_CLOSED#cutscene-ltr). Формат POP.HOF — 6 записей, имя до 15 символов, версия 2. Проверено в MAME на сборке LEVEL=14: HAIL → титульная картинка → таблица с полосой ввода и временем справа → ввод имени → титульная картинка; на следующем запуске таблица показывается между credits и demo. Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>
This commit is contained in:
@@ -19,6 +19,8 @@
|
||||
#include "pv_arc.h"
|
||||
#include "pop_cutscene.h"
|
||||
#include "pop_intro.h"
|
||||
#include "pop_hof.h" /* таблица рекордов между credits и demo */
|
||||
#include "pop_title.h" /* титульная картинка в финале */
|
||||
#include "pop_pace.h" /* pop_wait_edge */
|
||||
#include "pop_pal.h"
|
||||
#include "pop_timer.h"
|
||||
@@ -78,6 +80,7 @@ enum {
|
||||
INTRO_STORY_CREDITS,
|
||||
INTRO_STORY_HAIL,
|
||||
INTRO_STORY_FRAME,
|
||||
INTRO_STORY_HOF, /* рамка + логотип: фон таблицы рекордов */
|
||||
INTRO_PV_WAITING,
|
||||
INTRO_PV_JAFFAR,
|
||||
INTRO_PV_MAGIC,
|
||||
@@ -90,7 +93,10 @@ enum {
|
||||
|
||||
enum {
|
||||
INTRO_PAL_STORY = 0,
|
||||
INTRO_PAL_PV = 1
|
||||
INTRO_PAL_PV = 1,
|
||||
/* Та же story.pal, но фон текстовой рамки красный:
|
||||
* load_title_images(0) в end_sequence (seg001:586). */
|
||||
INTRO_PAL_STORY_END = 2
|
||||
};
|
||||
|
||||
/* Экраны PV лежат в одном архиве по пять полос подряд, ровно в том же
|
||||
@@ -98,10 +104,10 @@ enum {
|
||||
* res41 + тексты 42/43/45/44 и чистая рамка), затем восемь стадий комнаты
|
||||
* принцессы (res951 + персонажи) и чистый фон b0. Поэтому имён здесь нет
|
||||
* — индекс первой полосы экрана считается умножением. */
|
||||
#if (ARC_PV_P0_0 - ARC_PV_S0_0) != 5 * INTRO_PARTS
|
||||
#if (ARC_PV_P0_0 - ARC_PV_S0_0) != 6 * INTRO_PARTS
|
||||
#error "экраны PV в архиве лежат не по пять полос подряд"
|
||||
#endif
|
||||
#define INTRO_SCENES 13
|
||||
#define INTRO_SCENES 14
|
||||
|
||||
/* Две текстовые половины show_title(). Между ними PV теперь идёт отдельным
|
||||
* покадровым renderer-ом, а не четырьмя полными статичными композициями. */
|
||||
@@ -151,10 +157,9 @@ static const pop_cs_cmd_t intro_marry[] = {
|
||||
{ POP_CS_END, 0 }
|
||||
};
|
||||
|
||||
static const pop_cs_cmd_t intro_credits[] = {
|
||||
{ POP_CS_WAIT, POP_T60(0x78) },
|
||||
{ POP_CS_SHOW, INTRO_STORY_CREDITS },
|
||||
{ POP_CS_WAIT, POP_T60(0x168) },
|
||||
/* Гашение — отдельным шагом: между credits и ним оригинал показывает
|
||||
* таблицу рекордов, если файл с ней есть (seg000:2060). */
|
||||
static const pop_cs_cmd_t intro_tail[] = {
|
||||
{ POP_CS_FADE_OUT, 0 },
|
||||
{ POP_CS_END, 0 }
|
||||
};
|
||||
@@ -201,16 +206,19 @@ static const pop_cs_cmd_t time_expired_script[] = {
|
||||
/* end_sequence_anim() — объятие/мышь — здесь сведён к отдельной PV-стадии;
|
||||
* затем end_sequence() SDLPoP показывает HAIL ровно 900 тиков. */
|
||||
/* Хвост финала после живой сцены встречи: только исходный story-экран. */
|
||||
/* FADE_OUT в конце НЕТ намеренно: оригинал не гасит HAIL, а проявляет
|
||||
* поверх него титульную картинку полосами (draw_full_image(TITLE_MAIN) +
|
||||
* transition_ltr, seg001:590). Гасит экран уже таблица рекордов. */
|
||||
static const pop_cs_cmd_t ending_hail_script[] = {
|
||||
{ POP_CS_PALETTE, INTRO_PAL_STORY }, { POP_CS_SHOW, INTRO_STORY_HAIL },
|
||||
{ POP_CS_FADE_IN, 0 }, { POP_CS_WAIT, 900 }, { POP_CS_FADE_OUT, 0 },
|
||||
{ POP_CS_PALETTE, INTRO_PAL_STORY_END }, { POP_CS_SHOW, INTRO_STORY_HAIL },
|
||||
{ POP_CS_FADE_IN, 0 }, { POP_CS_WAIT, 900 },
|
||||
{ POP_CS_END, 0 }
|
||||
};
|
||||
static const pop_cs_cmd_t ending_script[] = {
|
||||
{ POP_CS_PALETTE, INTRO_PAL_PV }, { POP_CS_SHOW, INTRO_PV_MOUSE },
|
||||
{ POP_CS_FADE_IN, 0 }, { POP_CS_WAIT, 54 }, { POP_CS_FADE_OUT, 0 },
|
||||
{ POP_CS_PALETTE, INTRO_PAL_STORY }, { POP_CS_SHOW, INTRO_STORY_HAIL },
|
||||
{ POP_CS_FADE_IN, 0 }, { POP_CS_WAIT, 900 }, { POP_CS_FADE_OUT, 0 },
|
||||
{ POP_CS_PALETTE, INTRO_PAL_STORY_END }, { POP_CS_SHOW, INTRO_STORY_HAIL },
|
||||
{ POP_CS_FADE_IN, 0 }, { POP_CS_WAIT, 900 },
|
||||
{ POP_CS_END, 0 }
|
||||
};
|
||||
|
||||
@@ -342,7 +350,7 @@ static void intro_prepare_palette(uint8_t pal)
|
||||
static void intro_commit_palette(void)
|
||||
{
|
||||
if (intro_pending_pal == INTRO_PAL_PV) pop_pal_pv_load();
|
||||
else pop_pal_story_load();
|
||||
else pop_pal_story_load((uint8_t)(intro_pending_pal == INTRO_PAL_STORY_END));
|
||||
pop_pal_apply(POP_PAL_DIM_BLACK);
|
||||
intro_pal_pending = 0;
|
||||
}
|
||||
@@ -1012,29 +1020,8 @@ static int intro_story_prepare(void)
|
||||
return intro_draw_page(INTRO_STORY_ABSENCE, target);
|
||||
}
|
||||
|
||||
/* Полосовой показ подготовленной страницы (transition_ltr оригинала). */
|
||||
static int intro_story_transition(void)
|
||||
{
|
||||
gfx_rect_t stripe;
|
||||
uint8_t visible = gfx_get_visible_page();
|
||||
int x;
|
||||
|
||||
gfx_set_draw_page(visible); /* source gfx_copy_page = target */
|
||||
stripe.y = 0;
|
||||
stripe.h = GFX_HEIGHT;
|
||||
for (x = 0; x < GFX_WIDTH; x += 4) {
|
||||
if (kbd_raw_any_down()) {
|
||||
stripe.x = 0; stripe.w = GFX_WIDTH;
|
||||
gfx_copy_page(&stripe, GFX_COPY_DIRECT);
|
||||
break;
|
||||
}
|
||||
stripe.x = x;
|
||||
stripe.w = (uint16_t)((GFX_WIDTH - x < 4) ? GFX_WIDTH - x : 4);
|
||||
gfx_copy_page(&stripe, GFX_COPY_DIRECT);
|
||||
gfx_wait_vsync();
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
/* Полосовой показ подготовленной страницы живёт в pop_ui: тем же приёмом
|
||||
* появляются титульная картинка финала и таблица рекордов. */
|
||||
|
||||
static void intro_flash(uint16_t ticks)
|
||||
{
|
||||
@@ -1511,6 +1498,35 @@ static uint8_t intro_run(const pop_cs_cmd_t *script)
|
||||
return aborted;
|
||||
}
|
||||
|
||||
|
||||
/* Ожидание кадров у шагов, которые показываются НЕ сценарием, а напрямую.
|
||||
* Оно не глушит поток: победная тема играет кольцом страниц, и дочитывать
|
||||
* её надо каждый кадр, иначе насос догонит загрузчика. Прерывается новым
|
||||
* нажатием (детектор фронта); 1 — прервано. */
|
||||
static uint8_t intro_wait_frames(uint16_t frames)
|
||||
{
|
||||
intro_skip_t skip;
|
||||
|
||||
intro_skip_begin(&skip);
|
||||
while (frames--) {
|
||||
if (intro_skip_requested(&skip)) return 1;
|
||||
pop_music_service();
|
||||
pop_wait_edge();
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
/* Титры проявляются полосами, как и всё остальное в show_title()
|
||||
* (draw_full_image(STORY_CREDITS) + transition_ltr, seg000:2055). */
|
||||
static uint8_t intro_credits_ltr(void)
|
||||
{
|
||||
uint8_t page = pop_screen_begin();
|
||||
|
||||
if (intro_draw_page(INTRO_STORY_CREDITS, page) == 0)
|
||||
pop_screen_present_ltr();
|
||||
return intro_wait_frames(POP_T60(0x168));
|
||||
}
|
||||
|
||||
uint8_t pop_intro_show(void) __banked
|
||||
{
|
||||
int pv_result;
|
||||
@@ -1543,7 +1559,7 @@ uint8_t pop_intro_show(void) __banked
|
||||
}
|
||||
(void)pop_sfx_start(); /* идемпотентно: титры его уже открыли */
|
||||
pop_music_play();
|
||||
(void)intro_story_transition();
|
||||
pop_screen_present_ltr();
|
||||
}
|
||||
if (intro_run(intro_before_pv)) {
|
||||
/* Пропуск по клавише. ГЛУШИМ ВЫВОД: сразу за возвратом пойдёт
|
||||
@@ -1599,7 +1615,27 @@ uint8_t pop_intro_show(void) __banked
|
||||
}
|
||||
pop_music_free();
|
||||
pop_sfx_pause();
|
||||
if (intro_run(intro_credits)) {
|
||||
/* ТИТУЛЬНЫЙ ЭКРАН МЕЖДУ «СВАДЬБОЙ» И ТИТРАМИ. show_title() рисует
|
||||
* TITLE_MAIN + логотип + Jordan Mechner и проявляет их полосами
|
||||
* (seg000:2045), и только через 0x78 тиков показывает credits — тоже
|
||||
* полосами. Раньше обе картинки возникали мгновенно. */
|
||||
if (pop_title_logo_ltr() == 0 && intro_wait_frames(POP_T60(0x78))) {
|
||||
intro_restore_game_palette();
|
||||
return 1;
|
||||
}
|
||||
if (intro_credits_ltr()) {
|
||||
intro_restore_game_palette();
|
||||
return 1;
|
||||
}
|
||||
/* ТАБЛИЦА РЕКОРДОВ между credits и attract-demo — ровно там же, где её
|
||||
* показывает show_title(): та же story-палитра, тот же полосовой
|
||||
* переход, никакого fade (seg000:2060). Пустой таблицы это не
|
||||
* касается: она просто не показывается. */
|
||||
if (pop_hof_show_title()) {
|
||||
intro_restore_game_palette();
|
||||
return 1;
|
||||
}
|
||||
if (intro_run(intro_tail)) {
|
||||
intro_restore_game_palette();
|
||||
return 1;
|
||||
}
|
||||
@@ -1696,6 +1732,14 @@ void pop_pre_cutscene_show(pop_pre_cutscene_t scene) __banked
|
||||
pre_cut_finish(intro_run(script));
|
||||
}
|
||||
|
||||
/* Фон таблицы рекордов — та же рамка story плюс логотип PRINCE OF PERSIA
|
||||
* (STORY_FRAME + HOF_POP оригинала). Рисуем в ЗАДАННУЮ страницу и её не
|
||||
* показываем: палитрой, строками и переходом распоряжается pop_hof. */
|
||||
int pop_intro_hof_bg(uint8_t page) __banked
|
||||
{
|
||||
return intro_draw_page(INTRO_STORY_HOF, page);
|
||||
}
|
||||
|
||||
void pop_time_expired_show(void) __banked
|
||||
{
|
||||
pop_sfx_pause();
|
||||
@@ -1724,6 +1768,7 @@ void pop_time_expired_show(void) __banked
|
||||
intro_restore_game_palette();
|
||||
}
|
||||
|
||||
|
||||
void pop_ending_show(void) __banked
|
||||
{
|
||||
pop_sfx_pause();
|
||||
@@ -1743,27 +1788,14 @@ void pop_ending_show(void) __banked
|
||||
(void)pop_sfx_start();
|
||||
(void)pop_music_ring_start(POP_MUS_WON);
|
||||
intro_run(ending_hail_script);
|
||||
/* ДОСЛУШАТЬ. Оригинал не обрывает победную тему переходом в меню:
|
||||
* `while (check_sound_playing() && !key_test_quit())` (seg001:637),
|
||||
* и лишь потом гасит экран. Клавишей прервать можно.
|
||||
*
|
||||
* У ОРИГИНАЛА между титрами и этим ожиданием стоит таблица рекордов
|
||||
* с вводом имени, и тема играет сквозь неё. Наша таблица пока без
|
||||
* ввода, поэтому ждём здесь; когда ввод появится — ожидание
|
||||
* переедет за него (задача HOF-ENTRY). */
|
||||
{
|
||||
intro_skip_t tail;
|
||||
|
||||
intro_skip_begin(&tail);
|
||||
while (pop_music_busy() && !intro_skip_requested(&tail)) {
|
||||
pop_music_service(); /* поток дочитывается по ходу */
|
||||
pop_wait_edge();
|
||||
}
|
||||
}
|
||||
} else {
|
||||
intro_run(ending_script);
|
||||
}
|
||||
pop_music_free();
|
||||
pop_sfx_pause();
|
||||
intro_restore_game_palette();
|
||||
/* ТИТУЛЬНАЯ КАРТИНКА ПОВЕРХ ТЕКСТА. end_sequence заводит таймер на 240
|
||||
* тиков, проявляет TITLE_MAIN полосами и ждёт его (seg001:590). Экран
|
||||
* при этом не гаснет: рамка HAIL просто переползает в рисунок дворца.
|
||||
* Дальше — состояние HALL_OF_FAME; тема продолжает звучать, и
|
||||
* освобождает её уже таблица рекордов, как в оригинале. */
|
||||
if (pop_title_main_ltr() == 0)
|
||||
(void)intro_wait_frames(POP_T60(240));
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user