DRAW-CHAR: отрисовка одна на всех Char; разгрузка банка 2 (90.4% -> 72.9%)

DRAW-CHAR.  Отрисовка персонажа сведена к одному набору функций над Char —
как физика после GUARD-PHYS.  В оригинале add_kid_to_objtable (seg008:22F0) и
add_guard_to_objtable (seg008:2324) имеют идентичное тело и различаются
окном (loadkid/loadshad), набором спрайтов и типом объекта, а
redraw_at_char/redraw_at_char2 гейтов по charid не имеют вовсе.

  pop_gdraw.c -> pop_cdraw.c: pop_char_draw/heal/fore(who), слот
  POP_CH_KID / POP_CH_OPP; состояние слотов pop_cd[] в _DATA — читается из
  любого банка без трамплина.  Проход окклюзии тоже один
  (pop_fore_over_char), pop_fore_over_kid больше нет.

Починилось само (расхождения, которые и были ценой дублирования): у
соперника не было clip_char; у Кида не было клипа полем 192 и ветки брызг
«мёртв/падение»; char_width_half СТРАЖА считался по спрайту КИДА.

Замер: _CODE 24 881 -> 20 524 (куча 2023 -> 6333), BANK2 -265, итого -3.2 КБ.
Проверено пользователем в MAME; циан-полоса профиля подросла — оптимизация
заведена отдельной задачей DRAW-COST.

MEM-BANK2, шаг 1: общие «листья» слоя фона в РЕЗИДЕНТ (pop_tile.c/.h).
Ограничение платформы: писучие данные банка лежат в _DATA и видны всем, а
const-таблицы — в странице банка, из другого банка их не прочитать; трамплин
же выбирается объявлением, то есть __banked на листе бьёт и по горячим
вызывающим (654 такта).  W1 замаплено всегда — оттуда обе половины зовут
листья прямым call и читают таблицы напрямую.

MEM-BANK2, шаг 2: дедуп внутри банка.  wall_pattern 808 -> 394 и wall_rnd
786 -> 654: четыре ветки по виду стены отличались только набором кусков и
числами в одной серии prandom — сведены к таблицам WP_PARTS и WR_RULE,
порядок вызовов prandom сохранён дословно.

Заодно: kid_seq_off больше не static const в kid_data.h (230 Б мёртвой копии
в каждом из 9 модулей) — генератор pop_extract_kid_data.py отдаёт
макро-инициализатор, массив определяет один pop_kid.c.

Итог: BANK2 14 815 -> 11 942 (72.9 %, свободно 4442 Б), _CODE 22 556,
куча 4301 Б.  tests-host зелёные (65/39/53/1723/1); в MAME комната 1
совпала с дорефакторным снимком попиксельно (0 из 227 520), комната 3 —
та же раскладка кладки.

Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>

applications/PoP/roomtest/roomtest.c

@@ -18,6 +18,7 @@
 #include "pop_redraw.h"
 #include "pop_geom.h"    /* pop_y_to_row, TILE_SIZEX — тайл объекта */
 #include "pop_guard.h"
+#include "pop_cdraw.h"    /* общая отрисовка персонажей (слоты Кид/соперник) */
 #include "pop_cheat.h"
 #include "pop_tune.h"
 
@@ -50,7 +51,7 @@ __sfr __at (0xFE) io_border;
 
 /* Сколько банков грузит crt0_banked (читает его стартовый код).
  * 1 = guards (ИИ/боёвка), 2 = pop_bg (фон, fore, loose), 3 = pop_map
- * (коллизия/физика), 4 = pop_gdraw (отрисовка стража + полоса HP),
+ * (коллизия/физика), 4 = pop_cdraw (отрисовка персонажей + полоса HP),
  * 5 = pop_ctrl (диспетчер управления).
  * Отрисовка стража вынесена из банка 2 отдельно: тот подошёл к 16 КБ
  * вплотную (16 021 из 16 384), а расти ему ещё есть куда — тайлы поздних
@@ -127,7 +128,7 @@ static uint8_t kid_room;   /* РЕАЛЬНАЯ комната Kid (S1: == cur_ro
 
 /* Рендер-смещение Kid по логической X (порт xpos_in_drawn_room): комната Kid
  * слева от отрисованной → −140 (спрайт за левой кромкой), справа → +140, та
- * же → 0.  Звать каждый кадр перед kid_draw. */
+ * же → 0.  Звать каждый кадр перед отрисовкой персонажей. */
 static void update_kid_render_dx(void)
 {
     int dx = 0;
@@ -135,7 +136,7 @@ static void update_kid_render_dx(void)
         if (kid_room == pop_room_link(cur_room, 0)) dx = -140;      /* left neighbour */
         else if (kid_room == pop_room_link(cur_room, 1)) dx = 140;  /* right neighbour */
     }
-    pop_kid_set_render_dx(dx);
+    pop_char_set_render_dx(POP_CH_KID, dx);
 }
 
 /* ---- Порядок «Kid vs страж» (BUG-DRAWORDER-1) -----------------------
@@ -211,14 +212,14 @@ static uint8_t guard_over_kid(void)
     int kk, gk;
     if (Guard.charid == 0 || Guard.room != cur_room) return 0;
     objtile_at_char(&kr, &kc, &Kid, kid_cur_dx(), kid_cur_dy(),
-                    kid_cur_flags(), kid_fp_width());
+                    kid_cur_flags(), pop_cd[POP_CH_KID].fpw);
     objtile_at_char(&gr, &gc, &Guard, pop_gframe.dx, pop_gframe.dy,
-                    pop_gframe.flags, pop_guard_fp_width());
+                    pop_gframe.flags, pop_cd[POP_CH_OPP].fpw);
     kk = OBJ_ORDER_KEY(kr, kc);
     gk = OBJ_ORDER_KEY(gr, gc);
     if (gk != kk) return (uint8_t)(gk > kk);
     /* один тайл — ниже по obj_y рисуется позже (sort_curr_objs) */
-    return (uint8_t)((int)Guard.y + pop_gframe.dy > kid_fp_obj_y());
+    return (uint8_t)((int)Guard.y + pop_gframe.dy > pop_cd[POP_CH_KID].fpy);
 }
 
 /* Change-driven редрой ЛЕВОГО шва (ворота соседа room8 видны в col0): тяжёлый
@@ -461,7 +462,6 @@ int main(void)
      * по умолчанию (без мерцания); SPACE переключает в однобуфер для
      * отладки багов рисования (edge по sp_prev, чтоб не дёргать). */
     uint8_t front = 0, back, dbuf = 1, sp_prev = 0, frozen = 0;
-    uint8_t autofrz = 0;      /* ВРЕМЕННО: автостоп на падении уже сработал */
     uint16_t dead_frames = 0;
 #ifdef ROOMNAV
     uint8_t nav_prev = 0;
@@ -502,7 +502,7 @@ int main(void)
     /* Фон комнаты рисуется в ОБЕ графические страницы: у каждой своя
      * ОЗУ-копия/видео-ОЗУ, а heal берёт чистый фон из ОЗУ-копии ТОЙ
      * страницы, в которую рисуем.  Дальше каждый тик восстанавливаем
-     * ТОЛЬКО прямоугольник Кида (kid_heal), а не весь экран. */
+     * ТОЛЬКО прямоугольник Кида (pop_char_heal), а не весь экран. */
     /* Извлечь и отрисовать стартовую комнату (в обе страницы).  P0: сбросить
      * trob/room_modif (ленивая инициализация из уровня при первом входе). */
     /* Старт — ПО ДАННЫМ УРОВНЯ (комната/тайл/направление/поза входа), см.
@@ -510,10 +510,8 @@ int main(void)
      * Shift шаг, ESC — выход.  Карта коллизии задана внутри enter_room. */
     pop_start_level();
     gfx_set_draw_page(0);
-    kid_draw();
-    pop_fore_over_kid(kid_fp_obj_x(), kid_fp_obj_y(),
-                      kid_fp_width(), kid_fp_height(),
-                      Kid.direction, Kid.frame, Kid.action);
+    pop_char_draw(POP_CH_KID);
+    pop_char_fore(POP_CH_KID);
 
     if (pop_ctrl_init() != 0) {        /* raw-канал клавиатуры (забирает ввод у DSS) */
         closegraph();
@@ -543,22 +541,6 @@ int main(void)
          * стоит, можно спокойно разбирать позу Kid и окклюзию. */
         if (kbd_raw_down(0x16)) frozen = 1;
         if (kbd_raw_down(0x1E)) frozen = 0;
-        /* ВРЕМЕННО: автостоп на падении соперника в провал — сцену «скелет
-         * просвечивает сквозь кладку» руками не поймать (падение длится
-         * несколько кадров).  Замирает сам, дальше снимок и чтение памяти.
-         *
-         * Срабатывает ОДИН раз на падение: пока стоит фриз, состояние
-         * персонажа не меняется, поэтому условие остаётся истинным — без
-         * этого флага снятие фриза клавишей '2' тут же гасилось повторным
-         * автостопом в той же итерации.  Взводится заново, когда падение
-         * кончилось (страж убран или вышел из freefall).
-         * Снять вместе с разбором. */
-        if (Guard.charid != 0 && Guard.action == 4 /* in_freefall */ &&
-            Guard.y > 150) {
-            if (!autofrz) { frozen = 1; autofrz = 1; }
-        } else {
-            autofrz = 0;
-        }
         {   /* Читы (seg000: switch под if (cheats_enabled)).  Все — по
              * ФРОНТУ нажатия, иначе срабатывали бы каждый кадр.
              *   K — убить стража;
@@ -661,8 +643,8 @@ int main(void)
         pop_check_skel();              /* спецсобытие ур.3: скелет встаёт */
         pop_check_can_guard_see_kid(); /* луч видимости — ДО логики персонажей */
         pop_ctrl_tick();               /* ввод -> control(): смена seq */
-        kid_heal();                    /* стереть прошлый кадр ЭТОЙ страницы */
-        pop_guard_heal();              /* и прошлый кадр стража */
+        pop_char_heal(POP_CH_KID);     /* стереть прошлый кадр ЭТОЙ страницы */
+        pop_char_heal(POP_CH_OPP);     /* и прошлый кадр соперника */
         pop_fore_heal();               /* + следы оверлея (шире прямоугольника Kid) */
         PROF(2);                       /* логика (тот же синий) */
         kid_tick();                    /* play_seq: следующий кадр */
@@ -680,7 +662,7 @@ int main(void)
             pop_fell_out = 0;
             if (down) {                /* L2: переход в комнату снизу — продолжает падать */
                 enter_room(down);      /* координаты Kid уже репроецированы pop_map */
-                gfx_set_draw_page(back);   /* вернуть текущую back для kid_draw */
+                gfx_set_draw_page(back);   /* вернуть текущую back для отрисовки */
             } else {                   /* выпал из уровня (нет комнаты снизу) — рестарт */
                 pop_start_level();
                 gfx_set_draw_page(back);
@@ -832,35 +814,31 @@ int main(void)
         update_kid_render_dx();        /* straddle: смещение спрайта, если kid_room≠cur_room */
         PROF(6);                       /* спрайты: страж, Kid, fore поверх */
         {   /* Кто позже — тот поверх; порядок задаёт обход тайлов, а не роль
-             * персонажа (см. guard_over_kid). */
+             * персонажа (см. guard_over_kid).  Отрисовка одна на всех Char
+             * (pop_cdraw.c), различает их только слот. */
             uint8_t g_after = guard_over_kid();
-            if (!g_after) pop_guard_draw();
-            PROF(6);                   /* kid_draw (тот же циан) */
-            kid_draw();                /* нарисовать новый кадр (детект выхода за поле) */
-            if (g_after) pop_guard_draw();
-            /* Брызги стража рисует сам pop_guard_draw (порядок objtable), а
-             * флаг снимаем здесь: стража могло не оказаться в отрисованной
-             * комнате — тогда брызги просто пропадают, как в оригинале.
-             * Снимаем ПО ФАКТУ, а не безусловно: запись в кадре удара —
-             * готовая точка останова для отладки в MAME (watchpoint), и
-             * лишней записи каждый кадр нет. */
+            if (!g_after) { pop_char_draw(POP_CH_OPP); pop_char_fore(POP_CH_OPP); }
+            PROF(6);                   /* кадр Кида (тот же циан) */
+            pop_char_draw(POP_CH_KID); /* спрайт + брызги + клинок */
+            if (g_after) { pop_char_draw(POP_CH_OPP); pop_char_fore(POP_CH_OPP); }
+            /* Брызги урона рисует сама отрисовка персонажа (порядок objtable:
+             * сразу после него и до клинка), а флаги снимаем здесь: соперника
+             * могло не оказаться в отрисованной комнате — тогда брызги просто
+             * пропадают, как в оригинале.  Снимаем ПО ФАКТУ, а не безусловно:
+             * запись в кадре удара — готовая точка останова для отладки в
+             * MAME (watchpoint), и лишней записи каждый кадр нет. */
             if (pop_guard_hurt) pop_guard_hurt = 0;
+            if (pop_kid_hurt)   pop_kid_hurt = 0;
         }
         pop_loose_mob_draw_over();     /* падающая плита НИЖЕ Kid → поверх него (y-порядок) */
-        if (pop_kid_hurt) {            /* HP убавилось → «брызги» удара (draw_hurt_splash) */
-            kid_draw_splash();
-            pop_kid_hurt = 0;
-        }
         pop_hp_draw();                 /* полоса HP — только при изменении */
         PROF(6);                       /* fore поверх Kid + борта */
-        /* Окно fore-клипа общее, и pop_guard_draw ставит своё.  При «страж
-         * поверх» он отрабатывает ПОСЛЕ kid_draw, поэтому окно Кида
-         * восстанавливаем явно — иначе передние грани у Кида отсекаются и
-         * он рисуется поверх столбов. */
-        kid_fore_clip_restore();
-        pop_fore_over_kid(kid_fp_obj_x(), kid_fp_obj_y(),
-                          kid_fp_width(), kid_fp_height(),
-                          Kid.direction, Kid.frame, Kid.action);
+        /* Fore-слой Кида — В КОНЦЕ, после плиты и полосы HP: окно fore-клипа
+         * одно на всех, и его ставит каждый, кто рисовал персонажа, поэтому
+         * pop_char_fore(KID) заодно возвращает окно Кида (при «соперник
+         * поверх» в нём остался бы соперник, и передние грани у Кида
+         * отсеклись бы целиком — он рисовался бы поверх столбов). */
+        pop_char_fore(POP_CH_KID);
         pop_room_clip_borders();       /* почистить борта — только в кадрах падения (гейт) */
 
         /* Пейсинг 3 кадра, затем tear-free флип на vblank: draw уже