mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-02-03 09:44:24 -05:00
Fix decoding of shorthand messages after changing nfast.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@2582 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
7c8eeff1b1
commit
5b977444d1
@ -16,7 +16,7 @@ subroutine ccf65(ss,nhsym,nfast,ssmax,sync1,ipol1,jpz,dt1,flipk, &
|
|||||||
real ccf(-11:54,4)
|
real ccf(-11:54,4)
|
||||||
logical first
|
logical first
|
||||||
integer npr(126)
|
integer npr(126)
|
||||||
data first/.true./
|
data first/.true./,nfast0/-99/
|
||||||
equivalence (s,cs),(pr,cpr),(s2,cs2),(pr2,cpr2)
|
equivalence (s,cs),(pr,cpr),(s2,cs2),(pr2,cpr2)
|
||||||
save
|
save
|
||||||
|
|
||||||
@ -30,7 +30,7 @@ subroutine ccf65(ss,nhsym,nfast,ssmax,sync1,ipol1,jpz,dt1,flipk, &
|
|||||||
0,1,0,1,0,0,1,1,0,0,1,0,0,1,0,0,0,0,1,1, &
|
0,1,0,1,0,0,1,1,0,0,1,0,0,1,0,0,0,0,1,1, &
|
||||||
1,1,1,1,1,1/
|
1,1,1,1,1,1/
|
||||||
|
|
||||||
if(first) then
|
if(first .or. nfast.ne.nfast0) then
|
||||||
! Initialize pr, pr2; compute cpr, cpr2.
|
! Initialize pr, pr2; compute cpr, cpr2.
|
||||||
fac=1.0/NFFT
|
fac=1.0/NFFT
|
||||||
do i=1,NFFT
|
do i=1,NFFT
|
||||||
@ -49,6 +49,7 @@ subroutine ccf65(ss,nhsym,nfast,ssmax,sync1,ipol1,jpz,dt1,flipk, &
|
|||||||
call four2a(pr,NFFT,1,-1,0)
|
call four2a(pr,NFFT,1,-1,0)
|
||||||
call four2a(pr2,NFFT,1,-1,0)
|
call four2a(pr2,NFFT,1,-1,0)
|
||||||
first=.false.
|
first=.false.
|
||||||
|
nfast0=nfast
|
||||||
endif
|
endif
|
||||||
|
|
||||||
! Look for JT65 sync pattern and shorthand square-wave pattern.
|
! Look for JT65 sync pattern and shorthand square-wave pattern.
|
||||||
|
@ -1,4 +1,4 @@
|
|||||||
//--------------------------------------------------------------- MainWindow
|
//-------------------------------------------------------------- MainWindow
|
||||||
#include "mainwindow.h"
|
#include "mainwindow.h"
|
||||||
#include "ui_mainwindow.h"
|
#include "ui_mainwindow.h"
|
||||||
#include "devsetup.h"
|
#include "devsetup.h"
|
||||||
|
Loading…
Reference in New Issue
Block a user