libbgi: funcptr-диспетч clip/noclip спрайтовых ядер + снятие src[0]-фикса

Диспетчеризация clip/noclip через указатели _gfx_blit_fn/_gfx_heal_fn
(common/_gfx_sprite_fns.c, дефолт clip): gfx_sprite_clip() — теперь
модуль, переключает указатели один раз; sprite_update/putsprite/
movesprite зовут через указатель — ветка if(clip) из горячего цикла
убрана (съедала половину выигрыша noclip). Программа без вызова
gfx_sprite_clip() noclip-ядра не линкует.

Замер dev-MAME (16 шаров, uncapped): clip 50 → noclip 60-61 fps
(+20-22%). Регресс tests/sprites (A/B PASS), size-check OK
(balls −237 Б, sprites −3177 Б — отвязались лишние ядра).

Фикс CPU-байта write-триггера (preread + EX AF,AF') снят: точная
dev-MAME эмулирует ПЛМ, подавляющую CPU-байт при активном burst'е —
подтверждено по байтам VRAM (tests/blitw col0 = GREEN через
read_vram MCP-моста). Для heal фикс был избыточен всегда (банк 0x50
перезаписывает dst[0]). Строки фикса оставлены закомментированными
в трёх leaf'ах на случай отличий реального железа; шапки и §9а/§9б
дизайна обновлены. НА ЖЕЛЕЗЕ ПЕРЕПРОВЕРИТЬ.

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

libbgi/common/sprite_update.c

@@ -31,7 +31,6 @@ void sprite_update(sprite_t *arr, uint8_t count)
     uint8_t p     = gfx_get_draw_page();               /* 0 / 1        */
     uint8_t dbit  = p ? _SPR_DIRTY1 : _SPR_DIRTY0;
     uint8_t saved = gfx_get_bank();
-    uint8_t clip  = _gfx_sprite_clip;   /* раз на кадр: clip- или noclip-ядро */
     uint8_t i;
     sprite_t *s;
 
@@ -40,8 +39,7 @@ void sprite_update(sprite_t *arr, uint8_t count)
     _bgi_begin();
     for (i = 0, s = arr; i < count; i++, s++) {
         if (s->drawn[p].on && (s->flags & (dbit | SPR_ALWAYS))) {
-            if (clip) _gfx_heal_sprite(s->drawn[p].x, s->drawn[p].y, s->w, s->h);
-            else      _gfx_heal_sprite_noclip(s->drawn[p].x, s->drawn[p].y, s->w, s->h);
+            (*_gfx_heal_fn)(s->drawn[p].x, s->drawn[p].y, s->w, s->h);
             s->drawn[p].on = 0;
         }
     }
@@ -53,8 +51,7 @@ void sprite_update(sprite_t *arr, uint8_t count)
     for (i = 0, s = arr; i < count; i++, s++) {
         if (s->flags & (dbit | SPR_ALWAYS)) {
             if (s->flags & SPR_VISIBLE) {
-                if (clip) _gfx_blit_sprite(s->x, s->y, s->img, s->sx, s->sy, s->w, s->h);
-                else      _gfx_blit_sprite_noclip(s->x, s->y, s->img, s->sx, s->sy, s->w, s->h);
+                (*_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;