diff --git a/lib/ft8/ft8b.f90 b/lib/ft8/ft8b.f90 index 68b06a645..1f77878ae 100644 --- a/lib/ft8/ft8b.f90 +++ b/lib/ft8/ft8b.f90 @@ -175,7 +175,7 @@ subroutine ft8b(dd0,newdat,nQSOProgress,nfqso,nftx,ndepth,nzhsym,lapon, & enddo ! hard sync sum - max is 21 nsync=is1+is2+is3 - if(nsync .le. 7) then ! bail out + if(nsync .le. 6) then ! bail out nbadcrc=1 return endif @@ -451,10 +451,13 @@ subroutine ft8b(dd0,newdat,nQSOProgress,nfqso,nftx,ndepth,nzhsym,lapon, & xsnr2=10.0*log10(xsnr2)-27.0 if(.not.nagain) then xsnr=xsnr2 - endif - if(xsnr .lt. -24.0) xsnr=-24.0 - - return + endif + if(nsync.le.7 .and. xsnr.lt.-24.0) then !bail out, likely false decode + nbadcrc=1 + return + endif + if(xsnr .lt. -24.0) xsnr=-24.0 + return enddo return end subroutine ft8b diff --git a/lib/jt9.f90 b/lib/jt9.f90 index 5d657bbe2..7656f51e2 100644 --- a/lib/jt9.f90 +++ b/lib/jt9.f90 @@ -316,10 +316,9 @@ program jt9 id2a(nearly*3456+1:)=0 call multimode_decoder(shared_data%ss,id2a, & shared_data%params,nfsample) - nearly=50 id2a(nearly*3456+1:50*3456)=shared_data%id2(nearly*3456+1:50*3456) id2a(50*3456+1:)=0 - shared_data%params%nzhsym=nearly + shared_data%params%nzhsym=50 call multimode_decoder(shared_data%ss,id2a, & shared_data%params,nfsample) cycle