Фиксированный логический кадр по лучу + режимы FASTEST/FAST/NORMAL

Период стал max(n, ceil(W)) вместо ceil(W)+2: три gfx_wait_vsync после
работы отсчитывались от её КОНЦА, поэтому бюджет кадра был один растр.
Теперь ждём от якоря начала кадра, и при n=3 бюджет 1 290 240 тактов.

Счёт кадров — программный, по биту 5 порта 0xFE (положение луча), а не по
кадровым прерываниям: те теряются в DI-окнах акселератора фазозависимо
(замер: 0..2,8 %, на полной перерисовке три подряд).  Условие точности
одно — зазор между выборками меньше 64 512 тактов; точки выборки
расставлены по замеру, а не на глаз.

Режимы (pop_pace.h), клавиша P по кругу, дефолт FASTEST.  Условие боя
взято у оригинала буквально (SDLPoP seg003.c:363): Kid.sword ==
SWORD_2_DRAWN, а не «идёт бой».

Проверено в MAME на 11/15: счётчик без недосчёта на 270 кадров, период
ровно 3 растра на 302 логических кадрах (ни длиннее 3,1, ни короче 2,9),
NORMAL даёт ровно 4, с вынутым мечом — ровно 5.

applications/PoP/roomtest/pop_tile.c

@@ -14,6 +14,7 @@
 #include "pop_map.h"       /* pop_upside — переворот (зелье инверсии) */
 #include "pop_cdraw.h"     /* POP_CD_TOUCH — фон тронут, персонажей перерисовать */
 #include "pop_tile.h"
+#include "pop_pace.h"    /* pop_beam_sample — счёт кадров по лучу */
 #include "pop_level.h"     /* pop_doorlink2 — подстановка нажатой кнопки */
 #include "_pop_draw.h"     /* pop_heal_fast */
 
@@ -565,6 +566,7 @@ static const uint8_t *pb_img;
 
 void pop_blit_b(atlas_t *a, uint8_t idx, int x, int ybottom)
 {
+    pop_beam_sample();      /* ТЕМП КАДРА: выборка луча, см. pop_pace.h */
     /* Аргументы сразу в file-scope: третий и дальше SDCC передаёт СТЕКОМ, и
      * дальше каждое их чтение — `-N(ix)` (замер 2026-08-17: 76 таких
      * обращений в теле, ~3 500 такта из 14 500 цены блита).  То же лечение,
@@ -597,6 +599,7 @@ void pop_blit_b(atlas_t *a, uint8_t idx, int x, int ybottom)
      * общий путь выше. */
     if (pb_img[1] | pb_img[3]) {                 /* кадр больше 255 — редкий путь */
         blit_b_oversize(pb_img, pb_x, pb_yb);
+        pop_beam_sample();   /* ТЕМП КАДРА: выборка луча (pop_pace.h) */
         gfx_w0_unmap();
         return;
     }
@@ -618,6 +621,7 @@ void pop_blit_b(atlas_t *a, uint8_t idx, int x, int ybottom)
              * целиком внутри поля: иначе он залезет в борт (см. blit_b_clip). */
             if (pop_upside && (pb_top < POP_YOFF || pb_top + (int)pb_h > POP_CLIP_BOTTOM)) {
                 blit_b_clip(pb_img, pb_x, pb_top, pb_w, pb_h);
+                pop_beam_sample();   /* ТЕМП КАДРА: выборка луча (pop_pace.h) */
                 gfx_w0_unmap();
                 return;
             }
@@ -645,6 +649,7 @@ void pop_blit_b(atlas_t *a, uint8_t idx, int x, int ybottom)
             blit_b_clip(pb_img, pb_x, pb_top, pb_w, pb_h);
         }
     }
+    pop_beam_sample();   /* ТЕМП КАДРА: выборка луча (pop_pace.h) */
     gfx_w0_unmap();
 }