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

Re-establish improved decoding for JT65 shorthand messages.

Browse Source
This commit is contained in:
Joe Taylor 2020-04-09 10:51:35 -04:00
parent eafaa1ce28
commit 899d0e71ce
1 changed files with 10 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
lib/jt65_decode.f90
View File

@ -210,13 +210,13 @@ contains
nsave=0
endif
! if(bVHF) then
if(bVHF) then
! Be sure to search for shorthand message at nfqso +/- ntol
! if(ncand.lt.300) ncand=ncand+1
! ca(ncand)%sync=5.0
! ca(ncand)%dt=2.5
! ca(ncand)%freq=nfqso
! endif
if(ncand.lt.300) ncand=ncand+1
ca(ncand)%sync=5.0
ca(ncand)%dt=2.5
ca(ncand)%freq=nfqso
endif
do icand=1,ncand
sync1=ca(icand)%sync
dtx=ca(icand)%dt
@ -238,6 +238,10 @@ contains
if(nspecial.eq.2) decoded='RO'
if(nspecial.eq.3) decoded='RRR'
if(nspecial.eq.4) decoded='73'
if(nspecial.eq.0 .and. sync1.eq.5.0 .and. dtx.eq.2.5) then
nft=0
decoded=' '
endif
call timer('decod65a',1)
if(sync1.lt.float(minsync) .and. &
decoded.eq.' ') nflip=0