mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-12 07:06:17 -05:00
Q65 sync curves linear up to 10, then logarithmic. AutoClrAvg only for decodes at RxFreq, and never for "lagain" decode attempts.
This commit is contained in:
parent
bb1306a54b
commit
41ce20101f
@ -234,7 +234,9 @@ contains
|
||||
nsnr=nint(snr2)
|
||||
call this%callback(nutc,snr1,nsnr,dtdec,f0dec,decoded, &
|
||||
idec,nused,ntrperiod)
|
||||
if(iand(ndepth,128).ne.0) call q65_clravg !AutoClrAvg after decode
|
||||
! if(iand(ndepth,128).ne.0) call q65_clravg !AutoClrAvg after decode
|
||||
if(iand(ndepth,128).ne.0 .and. .not.lagain .and. &
|
||||
int(abs(f0dec-nfqso)).le.ntol ) call q65_clravg !AutoClrAvg
|
||||
call sec0(1,tdecode)
|
||||
open(22,file=trim(data_dir)//'/q65_decodes.dat',status='unknown', &
|
||||
position='append',iostat=ios)
|
||||
@ -316,7 +318,9 @@ contains
|
||||
nsnr=nint(snr2)
|
||||
call this%callback(nutc,snr1,nsnr,dtdec,f0dec,decoded, &
|
||||
idec,nused,ntrperiod)
|
||||
if(iand(ndepth,128).ne.0) call q65_clravg !AutoClrAvg after decode
|
||||
! if(iand(ndepth,128).ne.0) call q65_clravg !AutoClrAvg after decode
|
||||
if(iand(ndepth,128).ne.0 .and. .not.lagain .and. &
|
||||
int(abs(f0dec-nfqso)).le.ntol ) call q65_clravg !AutoClrAvg
|
||||
call sec0(1,tdecode)
|
||||
open(22,file=trim(data_dir)//'/q65_decodes.dat',status='unknown', &
|
||||
position='append',iostat=ios)
|
||||
|
@ -583,8 +583,12 @@ subroutine q65_write_red(iz,xdt,ccf2_avg,ccf2)
|
||||
write(17,1000) xdt
|
||||
do i=max(1,nint(nfa/df)),nint(nfb/df)
|
||||
freq=i*df
|
||||
write(17,1000) freq,ccf2_avg(i),ccf2(i)
|
||||
1000 format(f10.3,2e12.3)
|
||||
y1=ccf2_avg(i)
|
||||
if(y1.gt.10.0) y1=10.0 + 2.0*log10(y1/10.0)
|
||||
y2=ccf2(i)
|
||||
if(y2.gt.10.0) y2=10.0 + 2.0*log10(y2/10.0)
|
||||
write(17,1000) freq,y1,y2
|
||||
1000 format(3f10.3)
|
||||
enddo
|
||||
flush(17)
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user