mirror
/
dl-fldigi
kopia lustrzana https://github.com/jamescoxon/dl-fldigi
1
0
Forkuj 0
Kod Zgłoszenia Projekty Wydania Wiki Aktywność

CW QSK Tune 

* Added right channel "tune" signal for QSK / keyer
    control via right channel tone.
pull/1/head
David Freese 2015-02-05 11:23:44 -06:00
rodzic 3ebf3dbb40
commit 375e98f652
1 zmienionych plików z 48 dodań i 9 usunięć
Pokaż statystyki Ściągnij plik aktualizacji Ściągnij plik porównania Expand all files Collapse all files

57
src/trx/tune.cxx
Wyświetl plik

@ -72,7 +72,9 @@ double kushape[KNUM] = {
#define BUFLEN 512
double phaseacc = 0.0;
double phaseincr = 0.0;
double pttacc = 0.0;
double outbuf[BUFLEN];
double pttbuf[BUFLEN];
//===========================================================================
@ -83,6 +85,14 @@ inline double nco()
return cos(phaseacc);
}
inline double pttnco()
{
pttacc += TWOPI * 1000 / active_modem->get_samplerate();
if (pttacc > TWOPI) pttacc -= TWOPI;
return sin(pttacc);
}
//=====================================================================
@ -92,11 +102,21 @@ void keydown(double freq, SoundBase *scard)
{
int i;
phaseincr = 2.0 * M_PI * freq / active_modem->get_samplerate();
for (i = 0; i < KNUM; i++)
for (i = 0; i < KNUM; i++){
outbuf[i] = nco() * kdshape[i];
for (; i < BUFLEN; i++)
pttbuf[i] = pttnco();
}
for (; i < BUFLEN; i++) {
outbuf[i] = nco();
active_modem->ModulateXmtr(outbuf, BUFLEN);
pttbuf[i] = pttnco();
}
if ((active_modem == cw_modem) && progdefaults.QSK) {
active_modem->ModulateStereo(
outbuf, pttbuf,
BUFLEN, false);
} else {
active_modem->ModulateXmtr(outbuf, BUFLEN);
}
}
//=====================================================================
@ -105,11 +125,21 @@ void keyup(double freq, SoundBase *scard)
{
int i;
phaseincr = 2.0 * M_PI * freq / active_modem->get_samplerate();
for (i = 0; i < KNUM; i++)
for (i = 0; i < KNUM; i++) {
outbuf[i] = nco() * kushape[i];
for (; i < BUFLEN; i++)
pttbuf[i] = pttnco();
}
for (; i < BUFLEN; i++) {
outbuf[i] = 0.0;
active_modem->ModulateXmtr(outbuf, BUFLEN);
pttbuf[i] = pttnco();
}
if ((active_modem == cw_modem) && progdefaults.QSK) {
active_modem->ModulateStereo(
outbuf, pttbuf,
BUFLEN, false);
} else {
active_modem->ModulateXmtr(outbuf, BUFLEN);
}
}
//=====================================================================
@ -118,9 +148,18 @@ void tune(double freq, SoundBase *scard)
{
int i;
phaseincr = 2.0 * M_PI * freq / active_modem->get_samplerate();
for (i = 0; i < BUFLEN; i++)
for (i = 0; i < BUFLEN; i++) {
outbuf[i] = nco();
active_modem->ModulateXmtr(outbuf, BUFLEN);
pttbuf[i] = pttnco();
}
if ((active_modem == cw_modem) && progdefaults.QSK) {
active_modem->ModulateStereo(
outbuf, pttbuf,
BUFLEN, false);
} else {
active_modem->ModulateXmtr(outbuf, BUFLEN);
}
}
} // namespace tune
}; // namespace tune