Send "<DecodeFinished>" for FT8 only after the full-length decoding pass.

This commit is contained in:
Joe Taylor 2020-02-14 11:49:07 -05:00
parent e25696f4e3
commit 364db768db
1 changed files with 9 additions and 1 deletions

View File

@ -276,8 +276,16 @@ subroutine multimode_decoder(ss,id2,params,nfsample)
! JT65 is not yet producing info for nsynced, ndecoded.
800 ndecoded = my_jt4%decoded + my_jt65%decoded + my_jt9%decoded + &
my_ft8%decoded + my_ft4%decoded
write(*,1010) nsynced,ndecoded
if(params%nmode.eq.8) then
if(params%nzhsym.lt.50) ndecoded_pass1=ndecoded
if(params%nzhsym.ge.50) then
ndecoded=ndecoded+ndecoded_pass1
write(*,1010) nsynced,ndecoded
endif
else
write(*,1010) nsynced,ndecoded
1010 format('<DecodeFinished>',2i4)
endif
call flush(6)
close(13)
if(ncontest.eq.6) close(19)