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

Invert the sync-vector test for messages with "OOO" signal report.

Browse Source 
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7305 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2016-11-13 20:04:09 +00:00
parent 2b6146c818
commit 5ee6e78c61
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lib/gen65.f90
View File

@ -41,6 +41,8 @@ subroutine gen65(msg0,ichk,msgsent,itone,itype)
enddo enddo
call chkmsg(message,cok,nspecial,flip) call chkmsg(message,cok,nspecial,flip)
ntest=0
if(flip.lt.0.0) ntest=1
if(nspecial.eq.0) then if(nspecial.eq.0) then
call packmsg(message,dgen,itype) !Pack message into 72 bits call packmsg(message,dgen,itype) !Pack message into 72 bits
call unpackmsg(dgen,msgsent) !Unpack to get message sent call unpackmsg(dgen,msgsent) !Unpack to get message sent
@ -52,7 +54,7 @@ subroutine gen65(msg0,ichk,msgsent,itone,itype)
nsym=126 !Symbols per transmission nsym=126 !Symbols per transmission
k=0 k=0
do j=1,nsym do j=1,nsym
if(nprc(j).eq.0) then if(nprc(j).eq.ntest) then
k=k+1 k=k+1
itone(j)=sent(k)+2 itone(j)=sent(k)+2
else else