libbgi: W0-атласы спрайтов — загрузчик, движок, упаковщик (все проверки PASS)

Реализация §3.1/§9в: атлас = один .atl-файл = одна EMM-страница,
подключаемая в W0 на время блита.

- atlas_load: read() файла целиком в страницу через W3 + патч ISR-стаба
  (0x38: JP _gfx_w0_isr; 0x66: RETN); atlas_free/atlas_image/
  atlas_sprite_init; gfx_w0_map/unmap для ручных вызовов.
- _gfx_w0_isr (стаб из tests/w0page): свап на ядро DSS → честный 0x38 →
  restore спрайт-страницы; покрывает IM1 и IM2-чейн.
- sprite_t.page (0 = обычная память); sprite_update в блит-проходе
  мапит страницу по смене (один OUT на атлас), эпилог возвращает DSS
  (+52 Б на движок — цена фичи).
- toolchain/mkatlas.py: PNG (indexed) / raw → .atl; заголовок 0x100,
  каталог 0x68 (19 лент), файл-офсет == офсет страницы == W0-адрес.
- Сплит _gfx_sprite_fns → _gfx_blit_fn.c + _gfx_heal_fn.c (1 указатель
  = 1 модуль): putsprite-only программа не тянет heal-ядро (spriteclip
  ловил +292 Б; теперь −68 Б от эталона).

tests/atlas (MAME dev, PASS): загрузка (count/страница), каталог и
данные по W0-адресам (заголовок ленты через gfx_w0_map), 3 спрайта из
двух лент через движок — пиксели проверены read_vram побайтно
(0x10/0x12/0x21, прозрачный угол = фон).

docs: §9г — предложение авто-анимации (кадровая ±step без умножений,
tween-Брезенхэм порциями, тикер через funcptr) — ОБСУЖДАЕТСЯ.

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

libbgi/common/sprite_update.c

@@ -23,6 +23,7 @@
  * прерывания НЕ трогает (только мапит W3), поэтому длина прохода не
  * влияет на аудио-ISR.  w,h кадра ≤ 255 (см. sprite.h).
  */
+#include <sprinter.h>
 #include "../_bgi.h"
 #include <sprite.h>
 
@@ -45,19 +46,35 @@ void sprite_update(sprite_t *arr, uint8_t count)
     }
     _bgi_end();
 
-    /* Проход 2: блит ВСЕХ видимых, требующих обновления. */
+    /* Проход 2: блит ВСЕХ видимых, требующих обновления.  Спрайты из
+     * W0-атласов (s->page): подключить страницу перед блитом — один OUT
+     * на СМЕНУ страницы (спрайты одного атласа подряд = один OUT);
+     * порядок «_gfx_w0_cur, затем OUT» закрывает гонку с ISR-стабом
+     * (он восстановит уже новую).  heal-проходу страница не нужна
+     * (img не читается). */
     gfx_set_bank(GFX_BANK_SPRITE);
     _bgi_begin();
-    for (i = 0, s = arr; i < count; i++, s++) {
-        if (s->flags & (dbit | SPR_ALWAYS)) {
-            if (s->flags & SPR_VISIBLE) {
-                (*_gfx_blit_fn)(s->x, s->y, s->img, s->sx, s->sy, s->w, s->h);
-                s->drawn[p].x  = s->x;
-                s->drawn[p].y  = s->y;
-                s->drawn[p].on = 1;
+    {
+        uint8_t mapped = 0;         /* 0 = W0 не тронута (там ядро DSS) */
+
+        for (i = 0, s = arr; i < count; i++, s++) {
+            if (s->flags & (dbit | SPR_ALWAYS)) {
+                if (s->flags & SPR_VISIBLE) {
+                    if (s->page != mapped && s->page) {
+                        _gfx_w0_cur = s->page;
+                        _io_page_w0 = s->page;
+                        mapped = s->page;
+                    }
+                    (*_gfx_blit_fn)(s->x, s->y, s->img, s->sx, s->sy, s->w, s->h);
+                    s->drawn[p].x  = s->x;
+                    s->drawn[p].y  = s->y;
+                    s->drawn[p].on = 1;
+                }
+                s->flags &= ~dbit;  /* страница p обновлена для спрайта */
             }
-            s->flags &= ~dbit;      /* страница p обновлена для спрайта */
         }
+        if (mapped)
+            _io_page_w0 = _gfx_w0_dss;   /* вернуть ядро DSS */
     }
     _bgi_end();