w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-05-30 05:12:26 -04:00
Code Issues Packages Projects Releases Wiki Activity

For Q65 nsg averaging, wrap nsave when it reaches MAXAVE.

Browse Source
This commit is contained in:
Joe Taylor 2020-12-30 08:44:56 -05:00
parent b6d2002985
commit 057967a761
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lib/qra/q65/q65_avg.f90
View File

@ -51,6 +51,7 @@ subroutine q65_avg(nutc,ntrperiod,LL,ntol,lclearave,baud,nsubmode, &
! Save data for message averaging ! Save data for message averaging
nsave=nsave+1 nsave=nsave+1
nsave=mod(nsave-1,MAXAVE)+1
n=nutc n=nutc
if(ntrperiod.ge.60) n=100*n if(ntrperiod.ge.60) n=100*n
write(cutc,'(i6.6)') n write(cutc,'(i6.6)') n