Звук: насос CBL качает через W3 — вход в BIOS ломал W0
СИМПТОМ: затемнение (fade) хрипело — одинаково с играющей музыкой и в тишине. Ключевое наблюдение пользователя: повтор тишины обязан звучать тишиной, значит дело не в недоливе буфера. ПОИСК: отладочные клавиши, каждая делала ровно один кусок fade. Ожидание кадров — чисто; чтение палитры, запись палитры и 512 вызовов bios_get_place() (видео вообще не трогает) — скрежет во всех трёх. Последнее и решило: виновата не палитра, а ЛЮБОЙ вызов BIOS. ПРИЧИНА: `rst 8` раскрывается в `out ($7C),a`, который включает системное ПЗУ и перестраивает окно 0 (MAME sprinter.cpp, update_memory: m_pages[0] + m_bank_view0.select). ПЗУ ложится ПОВЕРХ страничного регистра, поэтому запись в порт 0x82 из прерывания бесполезна — OTIR вычитывает ПЗУ и отдаёт его в звук. Отсюда же старое правило «глушить CBL на время загрузки файлов»: причина была не в том, что ESTEX долго занимает CPU. РЕШЕНИЕ (идея пользователя): качать через W3. Он управляется только портом 0xE2, подмену из прерывания никто не перекрывает, а BIOS во время нашего ISR не исполняется — окно возвращается до выхода, и для него подмена невидима. После этого BIOS безопасен везде. * pop_sfx.c — насос берёт взаймы W3 вместо W0, чтение по 0xC000 + смещение. * pop_ui.c — буфер палитры по фиксированному 0x4000 (эти 256 байт DSS занимает только при загрузке программы): 256 байт со стека долой. * libbgi/common/gfx_pal_write.c — запись палитры прямо в видеопамять, минуя BIOS. Писалась как обход скрежета, после переноса насоса не нужна; оставлена как более быстрый примитив (2,5 тыс. тактов на 64 цвета против 10,8 тыс. у BIOS) с честной шапкой. Адресация разобрана по исходникам BIOS (FUNC_SCREEN.ASM): Port_Y = индекс цвета, адрес 0xC3E0 + pal*4, порядок R/G/B/Y. * libc/video/pal_get.c, pal_load.c — в шапках зафиксировано, что BIOS выбирает окно ПО АДРЕСУ БУФЕРА (`BIT 7,H`). * pop_intro.c — при пропуске интро клавишей не глушился CBL, и следующая загрузка уровня шла с открытым буфером; добавлен pop_sfx_pause. * pop_ctrl.c — убраны отладочные «осторожные шаги» на J/L (эмуляция Shift+стрелка для MAME), у них и стоял TODO. Разбор целиком — docs/sound_plan.md §5. Бюджет: _CODE 23966, куча 245 Б. Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>
This commit is contained in:
@@ -39,6 +39,7 @@ extern uint8_t pop_cheats; /* 0 = выключены, иначе включ
|
||||
#define KBD_CHEAT_TIME_SUB 0x83 /* F7 (PS/2 set 2) — отнять минуту */
|
||||
#define KBD_CHEAT_TIME_ADD 0x0A /* F8 (PS/2 set 2) — добавить минуту */
|
||||
|
||||
|
||||
/* Старое имя оставлено для обработчика Shift+L; граница одна — pop_level.h. */
|
||||
#define POP_LAST_LEVEL POP_LEVEL_LAST
|
||||
|
||||
|
||||
@@ -24,12 +24,6 @@
|
||||
#include "pop_map.h"
|
||||
#include "pop_guard.h" /* charid, состояние меча, seq стража */
|
||||
|
||||
/* Отладочные клавиши осторожного шага (эмуляция Shift+стрелка) для тестов в
|
||||
* MAME, где Shift трудно подать: J = шаг влево, L = шаг вправо. PS/2 set2
|
||||
* scancodes. TODO: убрать после отладки. */
|
||||
#define KBD_DBG_STEPL 0x3B /* J */
|
||||
#define KBD_DBG_STEPR 0x4B /* L */
|
||||
|
||||
/* ---- CONTROL_* и seq/frame id (подмножество types.h) --------------- */
|
||||
#define CONTROL_RELEASED 0
|
||||
#define CONTROL_IGNORE 1
|
||||
@@ -632,14 +626,9 @@ static void read_input(void)
|
||||
uint8_t r = kbd_raw_down(KBD_RIGHT);
|
||||
uint8_t u = kbd_raw_down(KBD_UP);
|
||||
uint8_t d = kbd_raw_down(KBD_DOWN);
|
||||
/* Отладочный осторожный шаг: J/L = Shift+влево/вправо (см. KBD_DBG_STEP*). */
|
||||
uint8_t sl = kbd_raw_down(KBD_DBG_STEPL);
|
||||
uint8_t sr = kbd_raw_down(KBD_DBG_STEPR);
|
||||
if (sl) l = 1;
|
||||
if (sr) r = 1;
|
||||
control_x = r ? CONTROL_HELD_RIGHT : (l ? CONTROL_HELD_LEFT : CONTROL_RELEASED);
|
||||
control_y = d ? CONTROL_HELD_DOWN : (u ? CONTROL_HELD_UP : CONTROL_RELEASED);
|
||||
control_shift = (sl || sr || kbd_raw_down(KBD_LSHIFT) || kbd_raw_down(KBD_RSHIFT))
|
||||
control_shift = (kbd_raw_down(KBD_LSHIFT) || kbd_raw_down(KBD_RSHIFT))
|
||||
? CONTROL_HELD : CONTROL_RELEASED;
|
||||
}
|
||||
|
||||
|
||||
@@ -1315,10 +1315,28 @@ uint8_t pop_intro_show(void) __banked
|
||||
pop_music_play();
|
||||
}
|
||||
if (intro_run(intro_before_pv)) {
|
||||
/* Пропуск по клавише. ГЛУШИМ ВЫВОД: сразу за возвратом пойдёт
|
||||
* загрузка уровня, а при открытом CBL ESTEX уходит в диск дольше,
|
||||
* чем играет буфер, и железо начинает крутить свои 256 байт по
|
||||
* кругу — на слух ровно тот скрежет, что ловится нажатием клавиши
|
||||
* на первом экране истории. В обычной ветке ниже pause уже есть,
|
||||
* а здесь его не было. */
|
||||
pop_music_free();
|
||||
pop_sfx_pause();
|
||||
intro_restore_game_palette();
|
||||
return 1;
|
||||
}
|
||||
/* ДОИГРАТЬ ПОД ЧЁРНЫМ ЭКРАНОМ. Оригинал не обрывает story-трек на
|
||||
* переходе к PV: fade уводит картинку, а музыка продолжается, и лишь
|
||||
* когда она смолкла, начинается сцена с принцессой (у SDLPoP это
|
||||
* общий приём — `while (check_sound_playing())`, seg000:2027).
|
||||
* Мы освобождали страницы сразу после fade, и трек обрывался на
|
||||
* полуслове — на слух это и был скрежет в конце затемнения. */
|
||||
{
|
||||
intro_skip_t tail;
|
||||
intro_skip_begin(&tail);
|
||||
while (pop_music_busy() && !intro_skip_requested(&tail)) pop_wait_edge();
|
||||
}
|
||||
pop_music_free();
|
||||
pop_sfx_pause();
|
||||
pv_result = intro_pv_animated();
|
||||
|
||||
@@ -59,10 +59,25 @@ static volatile uint16_t sfx_left; /* сколько байт осталось
|
||||
/* ---- насос ---------------------------------------------------------- *
|
||||
* Зовётся из ISR CBL раз в ~11,7 мс за очередными 128 байтами.
|
||||
*
|
||||
* ОКНО W0 БЕРЁМ ВЗАЙМЫ. Фон в этот момент может держать в W0 страницу
|
||||
* атласа (pop_blit_b делает map ... blit ... unmap), поэтому сохраняем
|
||||
* порт, подставляем свою страницу и возвращаем как было. Для фона
|
||||
* подмена невидима: прерывание для него атомарно. Тот же приём, что у
|
||||
* ОКНО БЕРЁМ ВЗАЙМЫ У W3, А НЕ У W0 — и это принципиально.
|
||||
*
|
||||
* Раньше насос занимал W0. Оказалось, что так звук рвёт ЛЮБОЙ вызов
|
||||
* BIOS: `rst 8` — это `out ($7C),a`, который включает системное ПЗУ и
|
||||
* перестраивает окно 0 (в MAME это update_memory: m_pages[0] +
|
||||
* m_bank_view0.select). ПЗУ ложится ПОВЕРХ страничного регистра, поэтому
|
||||
* запись в порт 0x82 из прерывания ничего не даёт — OTIR честно
|
||||
* вычитывает ПЗУ и отдаёт его в CBL. На слух это скрежет; поймано на
|
||||
* затемнении в PoP (2026-08-25), причём одинаково при чтении палитры,
|
||||
* записи палитры и вообще любой функции BIOS.
|
||||
*
|
||||
* W3 таким свойством не обладает: он управляется ТОЛЬКО портом 0xE2, и
|
||||
* подмену из прерывания никто не перекрывает. BIOS тоже двигает W3
|
||||
* (LP_OPEN_PG, PIC_SET_PAL), но во время нашего ISR он не исполняется —
|
||||
* мы возвращаем окно до выхода, и для него подмена невидима. Ровно так
|
||||
* же незаметна она и для фона с accel-блитом: их DI-банды прерывание не
|
||||
* рвёт, а между бандами W3 всегда восстановлен.
|
||||
*
|
||||
* Идея пользователя, 2026-08-25. Тот же приём заимствования окна, что у
|
||||
* трамплина с W1 (_irq_tramp.c).
|
||||
*
|
||||
* Заплатки ISR-стаба в 0x38/0x66 нашим страницам НЕ нужны (в отличие от
|
||||
@@ -91,10 +106,11 @@ int pop_sfx_fill(uint16_t n)
|
||||
phys = pop_snd_page[POP_SND_SILENCE_PAGE];
|
||||
ptr = POP_SND_SILENCE_OFF;
|
||||
}
|
||||
saved = _io_page_w0;
|
||||
_io_page_w0 = phys;
|
||||
cbl_push_otir((const void *)ptr, n);
|
||||
_io_page_w0 = saved;
|
||||
/* ОКНО БЕРЁМ ВЗАЙМЫ У W3, А НЕ У W0 — см. шапку файла. */
|
||||
saved = _io_page_w3;
|
||||
_io_page_w3 = phys;
|
||||
cbl_push_otir((const void *)(0xC000u + ptr), n);
|
||||
_io_page_w3 = saved;
|
||||
if (!sfx_left) {
|
||||
if (!pop_mus_left) return 1; /* тишина — курсор не двигаем */
|
||||
/* Длину трека считаем ПОРЦИЯМИ насоса, а не байтами: 169 КБ в
|
||||
|
||||
@@ -28,6 +28,12 @@ static const pop_font_desc_t font_desc[] = {
|
||||
static atlas_t font_at;
|
||||
static uint8_t font_ready;
|
||||
|
||||
/* БУФЕР ПАЛИТРЫ ПО ФИКСИРОВАННОМУ АДРЕСУ 0x4000. DSS занимает эти 256
|
||||
* байт только при загрузке программы, дальше они наши (код начинается с
|
||||
* 0x4100), и держать буфер здесь дешевле, чем класть 256 байт на стек в
|
||||
* каждом вызове — идея пользователя, 2026-08-25. */
|
||||
__at (0x4000) uint8_t pop_pal_buf[256];
|
||||
|
||||
static uint8_t text_index(const pop_font_desc_t *font, uint8_t ch)
|
||||
{
|
||||
if (ch < POP_FONT_FIRST || ch > POP_FONT_LAST) ch = '?';
|
||||
@@ -127,14 +133,18 @@ static void snapshot_chunk(uint8_t chunk, uint8_t *buf, uint8_t store)
|
||||
gfx_w0_unmap();
|
||||
}
|
||||
|
||||
/* Снимок палитры целиком: дробить на мелкие порции больше не нужно —
|
||||
* причина скрежета была не в длительности BIOS-вызова, а в том, какое окно
|
||||
* он под себя забирал (см. pop_pal_buf выше). */
|
||||
|
||||
void pop_ui_palette_snapshot(void) __banked
|
||||
{
|
||||
uint8_t chunk, buf[256];
|
||||
uint8_t chunk;
|
||||
|
||||
if (!font_ready) return;
|
||||
for (chunk = 0; chunk < 4; chunk++) {
|
||||
gfx_pal_get(0, (uint8_t)(chunk << 6), 64, buf);
|
||||
snapshot_chunk(chunk, buf, 1);
|
||||
gfx_pal_get(0, (uint8_t)(chunk << 6), 64, pop_pal_buf);
|
||||
snapshot_chunk(chunk, pop_pal_buf, 1);
|
||||
}
|
||||
}
|
||||
|
||||
@@ -143,7 +153,8 @@ void pop_ui_palette_snapshot(void) __banked
|
||||
* в постоянно вызываемый (во время fade) путь. */
|
||||
void pop_ui_palette_dim(uint8_t dim_step, uint8_t keep_ui) __banked
|
||||
{
|
||||
uint8_t chunk, i, start, buf[256];
|
||||
uint8_t chunk, i, start;
|
||||
uint8_t *buf = pop_pal_buf;
|
||||
|
||||
if (!font_ready) return;
|
||||
if (dim_step > 4) dim_step = 4;
|
||||
@@ -184,7 +195,7 @@ void pop_ui_palette_black(void) __banked
|
||||
{
|
||||
uint8_t chunk;
|
||||
uint16_t i;
|
||||
uint8_t black[256];
|
||||
uint8_t *black = pop_pal_buf;
|
||||
|
||||
/* BIOS принимает максимум 64 записи за вызов; одним буфером покрываем
|
||||
* все четыре четверти палитры, не занимая постоянную память. */
|
||||
|
||||
Reference in New Issue
Block a user