mirror of
https://git.vladimir.cc/vladimir/ewsdr.git
synced 2026-08-25 20:37:33 +00:00
feat(cw): телеграф — FPGA-кейер, pitch, сайдтон, передача текста
CW не работал ни на приём, ни на передачу: фильтр стоял симметрично вокруг нуля (тона не было), понятия pitch не существовало, MOX в CWL отправлял в эфир голос 2.9 кГц (в WDSP TXA_CWL — ветка SSB), байт CW-опций DUC всегда был нулевым, поэтому кейер, сайдтон и break-in в прошивке молчали. Pitch сделан ОДНИМ сдвигом в движке. Кромки фильтра везде остаются относительно VFO (у CW — симметрично нулю), а гетеродин и полосу двигают три метода WDSPEngine: CWLOOffset / PushShift / PushPassband. Прямых вызовов SetRXAShiftFreq и RXASetPassband в проекте больше нет. Так таблица фильтров не перестраивается при смене pitch (в отличие от Thetis), полоска на спектре и маркер VFO верны без правок в UI, а слайсы получают свой сдвиг по своему режиму. Правила эфира: - голосовой TXA в CW не запускается вообще (гард по режиму), MOX = только PTT; несущую даёт кейер, бит CWX или тон TUN; - байт 5 собирается из настроек и перепосылается на каждой смене режима и TX-слайса — вне CW он обязан быть нулевым, иначе прошивка поднимет PTT на замыкание ключа посреди SSB; - TUN в CW: тон = pitch и встречный сдвиг DUC, несущая встаёт ровно на VFO; - приёмник на передаче в CW не глушится, иначе умолкает программный сайдтон и эфир между посылками. Программная передача текста (CWMorse): поток с абсолютными дедлайнами дёргает бит CWX в High Priority, элементы рисует прошивка. Касание манипулятора или снятие MOX обрывают передачу. Память сообщений — окно CW Messages и F1..F8 в главном окне. Оживлены CAT KS/KY/ZZKM/ZZKS/ZZKY. Настройки — вкладка Transmit, подвкладка Hardware, перед блоком FM/CTCSS. Программный сайдтон точен для передачи текста и прямого ключа; при иамбике таймингом владеет FPGA, поэтому там верен только аппаратный тон. Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>
This commit is contained in:
@@ -169,6 +169,7 @@ type
|
||||
FAlexEnabled: Boolean;
|
||||
FAlexConfig: TAlexSettings; // per-band antenna + routing config
|
||||
FStepAtten: Byte; // ADC0 step attenuator 0-31 dB
|
||||
FCWXKey: Boolean; // бит CWX (HP байт 5): программный ключ
|
||||
// ---- OC Control (Open Collector выходы Penny/Alex, byte 1401) ----
|
||||
FOCConfig: TOCSettings;
|
||||
FTuning: Boolean; // TUN активен (для TX pin action)
|
||||
@@ -269,6 +270,7 @@ type
|
||||
Transmitting, PAEnabled, AlexEnabled: Boolean;
|
||||
Tuning: Boolean = False; TwoTone: Boolean = False); override;
|
||||
procedure SetStepAtten(dB: Byte); override;
|
||||
procedure SetCWXKey(Down: Boolean); override;
|
||||
procedure SetFreqCalPPM(P: Double); override;
|
||||
// Частота с поправкой опорника — для частотного слова DDC/DUC.
|
||||
function CalFreq(Hz: Double): Double;
|
||||
@@ -1801,6 +1803,15 @@ begin
|
||||
FFreqCalPPM := P;
|
||||
end;
|
||||
|
||||
procedure THPSDRNetwork.SetCWXKey(Down: Boolean);
|
||||
// Каждый фронт — немедленный HP-пакет: тайминги посылки держит PC, задержка
|
||||
// доставки = один UDP-пакет (так же делает Thetis, cwx.cs setkey).
|
||||
begin
|
||||
if FCWXKey = Down then Exit;
|
||||
FCWXKey := Down;
|
||||
if FConnected then SendFullHP;
|
||||
end;
|
||||
|
||||
procedure THPSDRNetwork.SetStepAtten(dB: Byte);
|
||||
begin
|
||||
if dB > 31 then dB := 31;
|
||||
@@ -1840,6 +1851,9 @@ begin
|
||||
if FPTTActive then Buf[4] := Buf[4] or HP_PTT0;
|
||||
end;
|
||||
|
||||
// Byte 5 bit0: CWX — программный ключ телеграфа (несущую даёт прошивка).
|
||||
if FCWXKey then Buf[5] := Buf[5] or $01;
|
||||
|
||||
// IsOrion2: платы с Alex BPF и TxRx Status bit18 (ORION_MK2=5, SATURN=10)
|
||||
IsOrion2 := FDevice.BoardType in [5, 10]; // ORION_MK2=5, SATURN=10
|
||||
DDCBase := DDCBaseIndex;
|
||||
|
||||
Reference in New Issue
Block a user