Only train on DX Call when Rx Equalization is checked.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7502 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Steven Franke 2017-01-15 18:39:18 +00:00
parent 5fb051e3cb
commit f0e7bf8033
2 changed files with 9 additions and 7 deletions

View File

@ -1,5 +1,5 @@
subroutine msk144signalquality(cframe,snr,freq,t0,softbits,msg,dxcall, &
nbiterrors,eyeopening,trained,pcoeffs)
brxequal,nbiterrors,eyeopening,trained,pcoeffs)
character*22 msg,msgsent
character*12 dxcall
@ -23,6 +23,7 @@
integer values(8)
logical*1 bcontest
logical*1 brxequal
logical*1 first
logical*1 currently_training
logical*1 trained
@ -76,7 +77,8 @@ write(*,*) 'reset to untrained state '
indx_dxcall=index(msg,trim(dxcall))
msg_has_dxcall = indx_dxcall .ge. 4
if( msg_has_dxcall .and. (.not. trained) .and. .not. currently_training ) then
if( brxequal .and. msg_has_dxcall .and. (.not. trained) .and. &
.not. currently_training ) then
currently_training=.true.
training_dxcall=trim(dxcall)
trained_dxcall(1:12)=' '

View File

@ -186,7 +186,7 @@ subroutine mskrtd(id2,nutc0,tsec,ntol,nrxfreq,ndepth,mycall,mygrid,hiscall, &
if(.not. bshdecode) then
call msk144signalquality(ct,snr0,fest,tdec,softbits,msgreceived,hiscall, &
ncorrected,eyeopening,trained,pcoeffs)
brxequal,ncorrected,eyeopening,trained,pcoeffs)
endif
decsym=' & '