feat(cw): программный кейер — телеграф на Pluto/LibreSDR

У openHPSDR точки и тире формирует кейер в FPGA, и это остаётся путём по
умолчанию: тайминги в железе, джиттер PC не влияет вовсе. У AD936x такого
кейера нет вовсе, поэтому телеграфа на Pluto не было в принципе — голосовой
TXA в CW не запускается, а несущую давать некому.

CWKeyer.pas: TCWLocalKeyer рисует манипулированную несущую прямо в поток IQ,
мимо WDSP (эталон pihpsdr cw_shape_buffer: в WDSP режим TXA_CWL — ветка SSB,
да и PostGen не умеет огибающей). Длительности живут В СЭМПЛАХ, а не в
миллисекундах: планировщик ОС влияет только на темп выдачи блоков, а его
сглаживает FIFO бэкенда. Умеет текст, иамбик A/B и прямой ключ; TCWKeyPort
читает манипулятор с модемных линий COM/USB-serial (DTR/RTS питают ключ,
CTS/DSR/DCD/RI — лепестки). Оффлайн-прогон: PARIS занимает ровно 43 точки,
все посылки и паузы 1/3/7 dit с точностью до сэмпла.

Сессия = одна передача, а не одна посылка: PTT, реле T/R, антенна, OC и
аттенюатор Pluto поднимаются один раз и держатся до конца hang — внутри
манипуляция чисто цифровая. Предзаполнение FIFO задано железом: TX-поток
Pluto наполняет буфер целиком (16384 пары ≈ 28 мс на 576k) и добивает
нулями, чего не хватило. Сайдтон эту латентность не наследует — кольцо
огибающей листается, если отставание больше 20 мс.

Сдвиг несущей: у zero-IF ноль бейсбенда совпадает с частотой гетеродина, и
там же его утечка — манипуляция на нуле дала бы backwave ровно на рабочей
частоте. Поэтому несущая идёт на сдвиге, а гетеродин уезжает навстречу через
новую единую дверь TXTuneFreqHz (все пуши TX-частоты переведены на неё).
Знак (CW_TX_BB_SIGN) замерен на эфире, а не выведен.

Развилка источника в UI — один список Keyer: firmware / software (PC) / off;
хранится прежней парой флагов, и на железе без кейера выбор «прошивка»
вырождается в программный, поэтому Pluto работает из коробки. Новое поле
caps HasCWKeyer (раньше это неявно жило в HasHWMic).

Попутно: у AD9361 calib_mode стоял manual_tx_quad, то есть драйвер не
переигрывал калибровку TX quad (она нулит утечку гетеродина) на сменах
TX LO — выставляем auto при подключении.

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

MainForm.pas

@@ -3688,6 +3688,9 @@ begin
   FController.ServiceBeaconLock;
   // Pluto: опрос температуры/RSSI (троттлинг внутри; no-op для HPSDR).
   FController.ServicePlutoTelemetry;
+  // Телеграф: фронты «железо в эфире» (у Pluto HP-статуса нет — гнать индикацию
+  // и отпускать реле T/R после выдержки больше некому).
+  FController.ServiceCWKeyed;
   // PureSignal: state machine команд + auto-attenuate + опрос GetPSInfo
   // (no-op на бэкендах без PS; рендер кнопок/поповера через rfPureSignal).
   FController.PureSignalTick;
@@ -4601,7 +4604,7 @@ begin
 
   if FController.FNetwork.Connected and FController.FNetwork.Running then
   begin
-    FController.FNetwork.UpdateState(XvtrTranslate(FController.FCenterFreq), XvtrTranslateTX(ActiveTXFreqHz), FController.FDriveLevel,
+    FController.FNetwork.UpdateState(XvtrTranslate(FController.FCenterFreq), FController.TXTuneFreqHz, FController.FDriveLevel,
                          FController.FTransmitting, True, True, FController.FTuning, FController.FTwoTone);
     FController.FNetwork.SendFullHP;
   end;
@@ -4623,7 +4626,7 @@ begin
 
   if FController.FNetwork.Connected and FController.FNetwork.Running then
   begin
-    FController.FNetwork.UpdateState(XvtrTranslate(FController.FCenterFreq), XvtrTranslateTX(ActiveTXFreqHz), FController.FDriveLevel,
+    FController.FNetwork.UpdateState(XvtrTranslate(FController.FCenterFreq), FController.TXTuneFreqHz, FController.FDriveLevel,
                          FController.FTransmitting, True, True, FController.FTuning, FController.FTwoTone);
     FController.FNetwork.SendFullHP;
   end;
@@ -5069,7 +5072,7 @@ begin
     if FController.FNetwork.Connected and FController.FNetwork.Running then
     begin
       FController.FNetwork.UpdateState(XvtrTranslate(FController.FCenterFreq),
-        XvtrTranslateTX(ActiveTXFreqHz), FController.FDriveLevel, FController.FTransmitting, True, True,
+        FController.TXTuneFreqHz, FController.FDriveLevel, FController.FTransmitting, True, True,
         FController.FTuning, FController.FTwoTone);
       FController.FNetwork.SendFullHP;
     end;
@@ -8040,7 +8043,7 @@ begin
   end;
   FController.FDriveLevel := CalcDriveByte;
   if FController.FNetwork.Connected and FController.FNetwork.Running then
-    FController.FNetwork.UpdateState(XvtrTranslate(FController.FCenterFreq), XvtrTranslateTX(ActiveTXFreqHz), FController.FDriveLevel, FController.FTransmitting, True, True, FController.FTuning, FController.FTwoTone);
+    FController.FNetwork.UpdateState(XvtrTranslate(FController.FCenterFreq), FController.TXTuneFreqHz, FController.FDriveLevel, FController.FTransmitting, True, True, FController.FTuning, FController.FTwoTone);
 end;
 
 procedure TMainForm.OnPlutoTxMaxAttChange(MaxAttDb: Double);
@@ -8075,7 +8078,7 @@ begin
   end;
   FController.FDriveLevel := CalcDriveByte;
   if FController.FNetwork.Connected and FController.FNetwork.Running then
-    FController.FNetwork.UpdateState(XvtrTranslate(FController.FCenterFreq), XvtrTranslateTX(ActiveTXFreqHz), FController.FDriveLevel, FController.FTransmitting, True, True, FController.FTuning, FController.FTwoTone);
+    FController.FNetwork.UpdateState(XvtrTranslate(FController.FCenterFreq), FController.TXTuneFreqHz, FController.FDriveLevel, FController.FTransmitting, True, True, FController.FTuning, FController.FTwoTone);
 end;
 
 procedure TMainForm.OnTXSettingsChange(const T: TTXSettings);
@@ -8121,7 +8124,7 @@ begin
         FController.FDSPEngine.SetDriveLevel(FController.FTXSettings.TUNLevel / 100.0);
       if FController.FNetwork.Connected and FController.FNetwork.Running then
       begin
-        FController.FNetwork.UpdateState(XvtrTranslate(FController.FCenterFreq), XvtrTranslateTX(ActiveTXFreqHz), FController.FDriveLevel,
+        FController.FNetwork.UpdateState(XvtrTranslate(FController.FCenterFreq), FController.TXTuneFreqHz, FController.FDriveLevel,
                              FController.FTransmitting, True, True, FController.FTuning, FController.FTwoTone);
         FController.FNetwork.SendFullHP;
       end;
@@ -9137,6 +9140,9 @@ begin
   PushTXProfilesToSettings;
   SF.LoadTXSettings(FController.FTXSettings,
     IfThen(FController.FNetwork.Connected, FController.FNetwork.Device.BoardType, FPendingBoardType));
+  // Телеграф: есть ли кейер в железе. У AD936x его нет — там телеграф может
+  // быть только программным, и настройки прошивки в группе гасятся.
+  SF.SetCWBackend(FController.BackendCaps.HasCWKeyer);
   SF.LoadCWSettings(FController.CWSettings);
   SF.LoadAlexSettings(FController.FAlexSettings,
     IfThen(FController.FNetwork.Connected, FController.FNetwork.Device.BoardType, FPendingBoardType));