w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-09-05 14:47:54 -04:00
Code Issues Packages Projects Releases Wiki Activity

Temporary debugging statements to help tracing problem with nagain=1 decodes.

Browse Source
This commit is contained in:
Joe Taylor 2023-01-16 14:56:33 -05:00
parent 4dd8dd456f
commit f4475740c1
3 changed files with 14 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
q65w/getfile.cpp
View File

@ -26,6 +26,7 @@ void getfile(QString fname, bool xpol, int dbDgrd)
n = fread(id,2,npts,fp); n = fread(id,2,npts,fp);
Q_UNUSED (n); Q_UNUSED (n);
int j=0; int j=0;
qDebug() << "aaa" << datcom_.fcenter;
if(dbDgrd<0) { if(dbDgrd<0) {
for(int i=0; i<npts; i+=2) { for(int i=0; i<npts; i+=2) {

16
q65w/libq65/q65c.f90
View File

@ -35,13 +35,21 @@ subroutine q65c(itimer)
return return
endif endif
! newdat=1
! nagain=0
write(*,3001) 'aa',newdat,nagain,nfa,nfb,ntol
3001 format(a2,5i6)
datetime(18:20)=':00' datetime(18:20)=':00'
npatience=1 npatience=1
if(newdat.eq.0 .and. nagain.eq.1) then ! if(newdat.eq.0 .and. nagain.eq.1) then
nfa=nint(mousefqso+0.001*mousedf) - 1 !Minimal solution for ! nfa=nint(mousefqso+0.001*mousedf) - 1 !Minimal solution for
nfb=nint(mousefqso+0.001*mousedf) + 1 !double-click decodes ! nfb=nint(mousefqso+0.001*mousedf) + 1 !double-click decodes
endif ! newdat=1
! nagain=0
! endif
write(*,3001) 'bb',newdat,nagain,nfa,nfb,ntol
call timer('decode0 ',0) call timer('decode0 ',0)
call decode0(dd,ss,savg) call decode0(dd,ss,savg)

1
q65w/mainwindow.cpp
View File

@ -891,6 +891,7 @@ void MainWindow::decode() //decode()
datcom_.nfa=nfa; datcom_.nfa=nfa;
datcom_.nfb=nfb; datcom_.nfb=nfb;
qDebug() << "bbb" << datcom_.fcenter << datcom_.nfa << datcom_.nfb;
datcom_.nfcal=m_fCal; datcom_.nfcal=m_fCal;
datcom_.nfshift=nfshift; datcom_.nfshift=nfshift;
datcom_.mcall3=0; datcom_.mcall3=0;