Compute ss(i,j) at Q65-30x half-symbol steps. Functional now, but needs work...

This commit is contained in:
Joe Taylor 2023-12-04 14:09:39 -05:00
parent 711ea392ef
commit c6fb86067e
5 changed files with 9 additions and 8 deletions

View File

@ -22,7 +22,7 @@ subroutine decode0(dd,ss,savg)
nQDecoderDone=0
if(newdat.ne.0) then
nz=96000*nhsym/5.3833
nz=96000*nhsym*0.15
hist=0
do i=1,nz
j1=min(abs(dd(1,i)),32768.0)

View File

@ -15,9 +15,9 @@ subroutine q65_sync(ss,i0,nts_q65,sync_ok,snr,xdt)
data first/.true./
save first,isync
tstep=2048.0/11025.0 !0.185760 s: 0.5*tsym_jt65, 0.3096*tsym_q65
tstep=0.15 !0.5*tsym_Q65-30x, 0.25*tsys_Q65-60x
if(first) then
fac=0.6/tstep !3.230
fac=0.6/tstep
do i=1,22 !Expand the Q65 sync stride
isync(i)=nint((isync(i)-1)*fac) + 1
enddo

View File

@ -38,7 +38,7 @@ subroutine symspec(k,ndiskdat,nb,nbslider,nfsample, &
enddo
endif
hsym=2048.d0*96000.d0/11025.d0 !Samples per JT65 half-symbol
hsym=0.15d0*96000.d0 !Samples per Q65-30x half-symbol
if(k.lt.k0) then
ts=1.d0 - hsym

View File

@ -705,9 +705,10 @@ void MainWindow::diskDat() //diskDat()
//These may be redundant??
m_diskData=true;
datcom_.newdat=1;
hsym=2048.0*96000.0/11025.0; //Samples per JT65 half-symbol
for(int i=0; i<304; i++) { // Do the half-symbol FFTs
int k = i*hsym + 2048.5;
hsym=0.15*96000.0; //Samples per Q65-30x half-symbol or Q65-60x quarter-symbol
for(int i=0; i<380; i++) { // Do the half-symbol FFTs
int k = i*hsym + 0.5;
if(k > 56*96000) break;
dataSink(k);
qApp->processEvents(); // Allow the waterfall to update
}

View File

@ -113,7 +113,7 @@ private:
qint32 m_modeQ65;
qint32 m_dB;
qint32 m_fetched=0;
qint32 m_hsymStop=302;
qint32 m_hsymStop=371;
qint32 m_nTransmitted=0;
qint32 m_nDoubleClicked=0;