roomtest: L1 — данные уровня из сырого res2001.bin вместо хардкода

Отказ от room1_data.h: уровень читается из сырого blueprnt DAT 1.0
(applications/PoP/SDLPoP/data/LEVELS/res2001.bin, формат — Table 6 POP-DAT).

- pop_level.c/.h: уровень грузится ОДИН раз в отдельную EMM-страницу (данные
  с offset 0x100, ISR-стаб в первых байтах — страница безопасна для W0-маппинга,
  как атласы).  pop_room_load(room) извлекает комнату в массивы приложения (W2):
  fg[30] (тайл-код = байт & 0x1F, верхние биты-модификаторы пока отброшены,
  как делал render_room.py), bg[30] (raw) + срезы соседей для кромок — правый
  столбец left-комнаты (leftcol), верхний ряд down-комнаты (belowrow).
  pop_room_link() — связи для будущих переходов (L2/L3).
- Рабочая копия ТЕКУЩЕЙ комнаты — в обычной памяти (W2, мутабельная: loose→
  empty); страница уровня маппится в W0 только на время извлечения.
- Проверено в MAME: комната 1 рисуется идентично.  Данные сверены байт-в-байт
  (fg&0x1F, bg raw, leftcol из room5 совпали); belowrow теперь из реального
  room2 (links.down=2), а не из прежнего частично-выдуманного хардкода.
- Память (small): DATA до 0xA260, стек от 0xBFFF — запас ~7.5КБ; EMM-страница
  уровня вне W1/W2.

NB: res2001.bin берётся из клона SDLPoP (data/ в .gitignore) — как и генерация
атласов через pop_pack_bg.py; в наш репозиторий сырой уровень не тащим.

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

applications/PoP/roomtest/roomtest.c

@@ -13,10 +13,11 @@
 #include "pop_kid.h"
 #include "pop_ctrl.h"
 #include "pop_map.h"
-#include "room1_data.h"
+#include "pop_level.h"
 
 /* seq_2_stand (types.h seqids) — Kid стоит, ждёт ввода. */
 #define SEQ_STAND 2
+#define ROOM_1    1
 
 int main(void)
 {
@@ -24,13 +25,14 @@ int main(void)
      * по умолчанию (без мерцания); SPACE переключает в однобуфер для
      * отладки багов рисования (edge по sp_prev, чтоб не дёргать). */
     uint8_t pg, front = 0, back, dbuf = 1, sp_prev = 0, frozen = 0;
-    /* МУТАБЕЛЬНАЯ копия комнаты — одна на отрисовку (pop_room_draw) И
-     * коллизию (pop_map): loose-пол при падении меняет тайл на empty, и
-     * оба модуля должны это видеть. */
-    uint8_t room_fg[30];
-    for (pg = 0; pg < 30; pg++) room_fg[pg] = room1_fg[pg];
+    /* МУТАБЕЛЬНАЯ рабочая копия ТЕКУЩЕЙ комнаты в обычной памяти (W2) —
+     * на отрисовку (pop_room_draw) И коллизию (pop_map): loose-пол при
+     * падении меняет тайл на empty, оба модуля должны это видеть.  Плюс
+     * срезы соседей для кромок.  Заполняются pop_room_load из уровня. */
+    uint8_t room_fg[30], room_bg[30];
+    uint8_t lcol_fg[3], lcol_bg[3], below_fg[10];
 
-    if (pop_bg_load() != 0) {          /* атласы — ДО initgraph */
+    if (pop_bg_load() != 0) {          /* атласы — ДО initgraph (снимает DSS-страницу W0) */
         puts("pop_bg_load failed");
         return 1;
     }
@@ -38,6 +40,11 @@ int main(void)
         puts("kid atlas load failed");
         return 1;
     }
+    if (pop_level_load("res2001.bin") != 0 &&   /* сырой уровень 1 в EMM-страницу */
+        pop_level_load("a:\\res2001.bin") != 0) {
+        puts("level load failed");
+        return 1;
+    }
 
     initgraph();
     gfx_set_visible_page(0);
@@ -49,12 +56,15 @@ int main(void)
      * ОЗУ-копия/видео-ОЗУ, а heal берёт чистый фон из ОЗУ-копии ТОЙ
      * страницы, в которую рисуем.  Дальше каждый тик восстанавливаем
      * ТОЛЬКО прямоугольник Кида (kid_heal), а не весь экран. */
-    pop_room_set_below(belowrow_fg);   /* ряд снизу (room 2) для «стены вниз» */
+    /* Извлечь комнату 1 из уровня в рабочие массивы (W2): тайлы + срезы
+     * соседей (правый столбец left-комнаты, верхний ряд down-комнаты). */
+    pop_room_load(ROOM_1, room_fg, room_bg, lcol_fg, lcol_bg, below_fg);
+    pop_room_set_below(below_fg);      /* ряд снизу для «стены вниз» */
     for (pg = 0; pg < 2; pg++) {
         gfx_set_draw_page(pg);
         setfillstyle(SOLID_FILL, BLACK);
         bar(0, 0, 319, 255);
-        pop_room_draw(1, room_fg, room1_bg, leftcol_fg, leftcol_bg);
+        pop_room_draw(ROOM_1, room_fg, room_bg, lcol_fg, lcol_bg);
     }
     gfx_set_draw_page(0);
 
@@ -132,5 +142,6 @@ int main(void)
     closegraph();
     pop_bg_free();
     pop_kid_free();
+    pop_level_free();
     return 0;
 }