irq: фикс Phase 1 после отладки — DSS работает в IM 1, чейн всегда на 0x0038

Первая версия висла на первом прерывании. Две причины (verified по
docs/samples/sprinterIntLib.asm, SIO_CTC_KEY.asm и исходникам MAME):

- DSS работает в IM 1 (обработчик 0x0038); I=0x3F — наследие Spectrum
  ROM, НЕ таблица: чтение [I<<8|0xFF] давало мусор (0x00BF) и прыжок в
  никуда. Чейн из трамплина теперь ВСЕГДА jp 0x0038 (interrupted-PC на
  стеке = имитация RST 38); irq_remove безусловно восстанавливает IM 1
- CBL-фильтр по биту 7 порта 0xFE убран: при выключенном CBL бит
  подтянут к 1 (MAME kbd_fe_r: data |= 0xE0) — каждый кадр ложно
  уходил в чейн, user-handler не вызывался бы. Вернуть в Phase 2
  вместе с поддержкой CBL

Попутно подтверждено: порт 0x19 = SIO-A RR0 (Z84C015), бит 0 = Rx
Available; вектора встроенной периферии SIO 0x10..0x1E / CTC 0x06
(заливка 257×H ловит любые); внешний вектор 0xFF.

irqtest: диагностика I до установки + фаза без ESTEX; прогон в MAME:
~49 Гц, клавиатура жива, remove останавливает тики, чистый выход.

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

tests/irqtest/irqtest.c

@@ -21,6 +21,21 @@ static void on_tick(void)
     ticks++;
 }
 
+/* Диагностика: регистр I до установки (что за режим у DSS?). */
+static uint8_t get_i(void) __naked
+{
+    __asm
+        ld    a, i
+        ret
+    __endasm;
+}
+
+/* Busy-пауза без единого ESTEX-вызова (~симв. полсекунды). */
+static void busy_wait(void)
+{
+    for (volatile uint16_t i = 0; i < 30000u; i++) ;
+}
+
 /* Атомарное чтение 16-битного счётчика, разделяемого с ISR. */
 static uint16_t read_ticks(void)
 {
@@ -33,11 +48,24 @@ static uint16_t read_ticks(void)
 
 int main(void)
 {
+    /* --- диагностика ДО установки --- */
+    uint8_t old_i = get_i();
+    const uint8_t *vec = (const uint8_t *)(((uint16_t)old_i << 8) + 0xFF);
+    printf("I=%02x, [I:FF]=%02x%02x (DSS isr cand: %04x)\n",
+           old_i, vec[1], vec[0],
+           (unsigned)(vec[0] | ((uint16_t)vec[1] << 8)));
+
     if (irq_install(on_tick) != 0) {
         printf("irq_install failed: errno=%d\n", errno);
         return 1;
     }
-    puts("irq installed; measuring 3 s...");
+    puts("irq installed");
+
+    /* Фаза 1: busy-пауза БЕЗ ESTEX — жив ли трамплин/чейн вообще. */
+    busy_wait();
+    printf("phase1: ticks=%u (expect >0)\n", read_ticks());
+
+    puts("phase2: measuring 3 s vs time()...");
 
     /* Выровняться на границу секунды (time() зовёт ESTEX SYSTIME в
      * цикле — заодно стресс чейна к DSS). */