diff --git a/RadioController.pas b/RadioController.pas index 0d26626..62a428d 100644 --- a/RadioController.pas +++ b/RadioController.pas @@ -2885,8 +2885,10 @@ begin FilterEdgesFor(FMode, FFilterBW, Lo, Hi); if FWDSPReady and Assigned(FDSPEngine) then begin + // Только RX. TX-полоса НЕ следует за RX-фильтром (модель Thetis) — её + // единственный источник TX-фильтр из настроек (SetTXFilterFull/ApplyTXChain + // через TXSignedEdges). Иначе широкий RX раздувал бы излучаемый сигнал. FDSPEngine.SetFilter(Lo, Hi); - FDSPEngine.SetTXFilter(Lo, Hi); if FMode in [MODE_FM, MODE_DMR, MODE_FMRAW] then begin if FMode = MODE_FMRAW then diff --git a/WDSPEngine.pas b/WDSPEngine.pas index a32ad64..679eb93 100644 --- a/WDSPEngine.pas +++ b/WDSPEngine.pas @@ -650,7 +650,6 @@ type // TX управление procedure SetTXMode(Mode: Integer); - procedure SetTXFilter(Low, High: Integer); procedure SetDriveLevel(Level: Double); procedure SetMicGain(GainDB: Double); procedure SetTXRun(Run: Boolean); @@ -3248,15 +3247,6 @@ begin ApplyTXMode(FTXMode); end; -procedure TWDSPEngine.SetTXFilter(Low, High: Integer); -begin - if not FInitialized then Exit; - // In FM RAW this is an RF-channel-width update mirrored from the RX UI, - // not an audio passband request. The flat modem AF passband is fixed above. - if FTXMode = MODE_FMRAW then Exit; - SetTXABandpassFreqs(TXA_CHAN, Low, High); -end; - procedure TWDSPEngine.SetDriveLevel(Level: Double); begin if not FInitialized then Exit;