mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-10-31 15:47:10 -04:00
Never apply dynamic phase coeffs. Measure phase response for DX Call and write coeffs, as before. Rx Equalization is still hardwired for K9AN's TS2000.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7501 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
18a80232cc
commit
5fb051e3cb
@ -96,7 +96,7 @@ subroutine mskrtd(id2,nutc0,tsec,ntol,nrxfreq,ndepth,mycall,mygrid,hiscall, &
|
||||
fac=1.0/rms
|
||||
d(1:NZ)=fac*d(1:NZ)
|
||||
d(NZ+1:NFFT1)=0.
|
||||
call analytic(d,NZ,NFFT1,cdat,pcoeffs,brxequal,.true.)
|
||||
call analytic(d,NZ,NFFT1,cdat,pcoeffs,brxequal,.false.) ! never apply dynamic coeffs
|
||||
|
||||
! Calculate average power for each frame and for the entire block.
|
||||
! If decode is successful, largest power will be taken as signal+noise.
|
||||
@ -190,9 +190,10 @@ subroutine mskrtd(id2,nutc0,tsec,ntol,nrxfreq,ndepth,mycall,mygrid,hiscall, &
|
||||
endif
|
||||
|
||||
decsym=' & '
|
||||
if( brxequal .and. (.not. trained) ) decsym=' ^ '
|
||||
if( brxequal .and. trained ) decsym=' $ '
|
||||
if( (.not. brxequal) .and. trained ) decsym=' @ '
|
||||
if( brxequal ) decsym=' ^ '
|
||||
! if( brxequal .and. (.not. trained) ) decsym=' ^ '
|
||||
! if( brxequal .and. trained ) decsym=' $ '
|
||||
! if( (.not. brxequal) .and. trained ) decsym=' @ '
|
||||
if( msgreceived(1:1).eq.'<') then
|
||||
ncorrected=0
|
||||
eyeopening=0.0
|
||||
|
Loading…
Reference in New Issue
Block a user