DttSP_EXP void
NewKeyer (REAL freq, BOOLEAN niambic, REAL gain, REAL ramp, REAL wpm,
REAL SampleRate)
{
BOOL out;
//fprintf(stderr,"NewKeyer\n");
kl = newKeyerLogic ();
ks = newKeyerState ();
ks->flag.iambic = niambic;
ks->flag.revpdl = TRUE; // depends on port wiring
ks->flag.autospace.khar = ks->flag.autospace.word = FALSE;
ks->flag.mdlmdB = TRUE;
ks->flag.memory.dah = TRUE;
ks->flag.memory.dit = TRUE;
ks->debounce = 1; // could be more if sampled faster
ks->mode = MODE_B;
ks->weight = 50;
ks->wpm = wpm;
iambic = niambic;
cs_cw = &CS_CW;
out = InitializeCriticalSectionAndSpinCount (cs_cw, 0x00000080);
update_ok = &UPDATE_OK;
out = InitializeCriticalSectionAndSpinCount (update_ok, 0x00000080);
#ifndef INTERLEAVED
lring = ringb_float_create (RING_SIZE);
rring = ringb_float_create (RING_SIZE);
#else
lring = ringb_float_create (2 * RING_SIZE);
#endif
sem_init (&clock_fired, 0, 0);
sem_init (&poll_fired, 0, 0);
sem_init (&keyer_started, 0, 0);
if (HiPerformance)
{
key_poll_period = 1;
TONE_SIZE = 48 * (int) (uni[0].samplerate / 48000.0);
}
else
{
key_poll_period = 5;
TONE_SIZE = 240 * (int) (uni[0].samplerate / 48000.0);
}
//------------------------------------------------------------
SAMP_RATE = SampleRate;
delCWToneGen(gen);
gen = newCWToneGen (gain, freq, ramp, ramp, TONE_SIZE, SampleRate);
//------------------------------------------------------------
// if (timeSetEvent(5,1,(LPTIMECALLBACK)timer_callback,(DWORD_PTR)NULL,TIME_PERIODIC) == (MMRESULT)NULL) {
// fprintf(stderr,"Timer failed\n"),fflush(stderr);
// }
}
PRIVATE void
setup_system_audio (unsigned int thread)
{
sprintf (top[thread].jack.name, "sdr-%d-%0u", top[thread].pid,thread);
top[thread].jack.size = 2048;
memset ((char *) &top[thread].jack.blow, 0, sizeof (top[thread].jack.blow));
top[thread].jack.ring.i.l = ringb_float_create (top[thread].jack.size * loc[thread].mult.ring);
top[thread].jack.ring.i.r = ringb_float_create (top[thread].jack.size * loc[thread].mult.ring);
top[thread].jack.ring.o.l = ringb_float_create (top[thread].jack.size * loc[thread].mult.ring);
top[thread].jack.ring.o.r = ringb_float_create (top[thread].jack.size * loc[thread].mult.ring);
top[thread].jack.auxr.i.l = ringb_float_create (top[thread].jack.size * loc[thread].mult.ring);
top[thread].jack.auxr.i.r = ringb_float_create (top[thread].jack.size * loc[thread].mult.ring);
top[thread].jack.auxr.o.l = ringb_float_create (top[thread].jack.size * loc[thread].mult.ring);
top[thread].jack.auxr.o.r = ringb_float_create (top[thread].jack.size * loc[thread].mult.ring);
ringb_float_clear (top[thread].jack.ring.o.l, top[thread].hold.size.frames);
ringb_float_clear (top[thread].jack.ring.o.r, top[thread].hold.size.frames);
}
