libbgi: спрайты — кэш адреса кадра, DDA+asm тик, Y-сортировка со слоями

Оптимизации A+B (профиль rpgwalk-15: активная часть кадра 410К → 307К
тактов из 430080; лимит спрайтов 16×16 на стабильные 48.8 fps: 14 → ~21):

- (B) sprite_t.src/stride — готовый адрес кадра: считают только
  sprite_frame (теперь функция, одно умножение на СМЕНУ кадра) и тикер
  (±an_step БАЙТ инкрементально); блит-ядра принимают src+stride,
  img/sx/sy из сигнатуры ушли.  Блит 177К → 146К на кадр.
- (A) тик 100К → 37.7К: tween переформулирован Брезенхэм → беззнаковый
  DDA (mv_rem/mv_acc, «приехали» = rem==0 — без знаковых 16-бит
  сравнений), tick_move и tick_anim — ручной asm (SDCC спиллит такие
  функции в IX-фрейм ~100 обращений; C-реструктуризации не помогали —
  проверено кодогеном).  Биты an_flags переименованы по категориям
  (_SPR_STRIP_HORZ, _SPR_PP_BACK).

Y-сортировка (gfx_sprite_ysort, идеи пользователя — 8-бит ключ,
персистентность):

- painter's algorithm по ключу {layer:8, clamp_y:8}; поле
  sprite_t.layer (в КОНЦЕ структуры — asm-офсеты не сдвигает): слои
  сцены в одном массиве/одном sprite_update;
- ПЕРСИСТЕНТНАЯ asm-таблица {key16, ptr16}: resort порядка прошлого
  кадра (почти линейно), rebuild при смене arr/count; массив
  приложения не трогается; ~28К/15 спрайтов (с нуля было 44К);
- компоненты YSORT_Y/YSORT_LAYER отключаемы независимо масками ключа
  (без ветвлений в сортировщике); ВНИМАНИЕ: mode=1 значит Y-only,
  полный порядок = YSORT_Y|YSORT_LAYER;
- funcptr-DCE: выключено = код и таблица не линкуются (rpgwalk −190 Б);
- ПРАВИЛО в sprite.h: два sprite_update на страницу запрещены (heal
  второй группы стирает спрайты первой — ОЗУ-копия чистая).

Попутные фиксы:

- libbgi/Makefile: .rel зависят от заголовков (HDRS) — stale .rel со
  старой раскладкой sprite_t молча ломал рантайм;
- rpgprof: --memory small (перерос tiny: BSS вылезал за W2 → мгновенный
  «Unexpected application termination»; mkexe это пока не ловит);
- tests/spranim: проверки переведены на кэш src, добавлены T6 (reframe
  после тикера) и T7 (Y-сортировка: порядок, слои, персистентный
  resort, LAYER-only) — 7/7 PASS в MAME.

Доки: §9д — новый бюджет (19.5К/спрайт), §9е — ПЛАН FPS-делителя
(frame pacing, gfx_set_fps_div); TODO — дизайн цепочки irq-обработчиков.

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

examples/rpgwalk/rpgwalk.c

@@ -24,7 +24,7 @@
 #include <time.h>
 #include <stdlib.h>
 
-#define NCHR   8
+#define NCHR   15
 #define MINX   0
 #define MAXX   (320 - 16)
 #define MINY   14               /* под заголовком */
@@ -41,8 +41,10 @@ static uint8_t  phase[NCHR];    /* 0 = до края, 1 = до случайно
 static void set_dir(uint8_t i, uint8_t d)
 {
     dir[i] = d;
+//    sprite_anim(&sp[i], (uint8_t)(d * 3), (uint8_t)(d * 3 + 2),
+//                (uint8_t)(5 + (i & 3)), ANIM_PINGPONG);
     sprite_anim(&sp[i], (uint8_t)(d * 3), (uint8_t)(d * 3 + 2),
-                (uint8_t)(5 + (i & 3)), ANIM_PINGPONG);
+                (uint8_t)20, ANIM_PINGPONG);
 }
 
 /* Идти до края экрана вдоль dir[i] (скорость: 1px, интервал 1-2). */
@@ -52,10 +54,10 @@ static void go_edge(uint8_t i)
     int tx = s->x, ty = s->y;
 
     switch (dir[i]) {
-    case 0: ty = MAXY; break;
-    case 1: tx = MINX; break;
-    case 2: tx = MAXX; break;
-    default: ty = MINY; break;
+        case 0: ty = MAXY; break;
+        case 1: tx = MINX; break;
+        case 2: tx = MAXX; break;
+        default: ty = MINY; break;
     }
     sprite_moveto(s, tx, ty, 1, (uint8_t)(1 + (i & 1)));
     phase[i] = 0;
@@ -68,23 +70,24 @@ static void go_back_random(uint8_t i)
     int tx = s->x, ty = s->y, avail, dist;
     uint8_t d = dir[i];
 
-    d = (uint8_t)(d ^ ((d < 2) ? 3 : 1));   /* 0↔3, 1↔2 — разворот */
+    // d = (uint8_t)(d ^ ((d < 2) ? 3 : 1));   /* 0↔3, 1↔2 — разворот */
+    d = 3 - d;   /* 0↔3, 1↔2 — разворот */
     set_dir(i, d);
     switch (d) {
-    case 0: avail = MAXY - s->y; dist = QY; break;
-    case 1: avail = s->x - MINX; dist = QX; break;
-    case 2: avail = MAXX - s->x; dist = QX; break;
-    default: avail = s->y - MINY; dist = QY; break;
+        case 0: avail = MAXY - s->y; dist = QY; break;
+        case 1: avail = s->x - MINX; dist = QX; break;
+        case 2: avail = MAXX - s->x; dist = QX; break;
+        default: avail = s->y - MINY; dist = QY; break;
     }
     if (avail > dist)
         dist += rand() % (avail - dist + 1);
     else
         dist = avail;                        /* некуда — до края */
     switch (d) {
-    case 0: ty += dist; break;
-    case 1: tx -= dist; break;
-    case 2: tx += dist; break;
-    default: ty -= dist; break;
+        case 0: ty += dist; break;
+        case 1: tx -= dist; break;
+        case 2: tx += dist; break;
+        default: ty -= dist; break;
     }
     sprite_moveto(s, tx, ty, 1, (uint8_t)(1 + (i & 1)));
     phase[i] = 1;