w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-25 21:58:38 -05:00
Code Issues Packages Projects Releases Wiki Activity

Suppress any "QU1RK" decodes, they are necessarily bad.

Browse Source
This commit is contained in:
Joe Taylor 2018-07-27 10:43:58 -04:00
parent 91d0707eb6
commit 017629ac36
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lib/ft8/ft8b_2.f90
View File

@ -322,6 +322,10 @@ subroutine ft8b_2(dd0,newdat,nQSOProgress,nfqso,nftx,ndepth,lapon,lapcqonly, &
read(c77(72:74),'(b3)') n3 read(c77(72:74),'(b3)') n3
read(c77(75:77),'(b3)') i3 read(c77(75:77),'(b3)') i3
call unpack77(c77,msg37) call unpack77(c77,msg37)
if(index(msg37,'QU1RK').gt.0) then
nbadcrc=1
cycle
endif
call genft8_174_91(msg37,i3,n3,msgsent37,msgbits,itone) call genft8_174_91(msg37,i3,n3,msgsent37,msgbits,itone)
if(lsubtract) call subtractft8(dd0,itone,f1,xdt) if(lsubtract) call subtractft8(dd0,itone,f1,xdt)
xsig=0.0 xsig=0.0