From 5ee6e78c61be5bb24886a80d65f0fa9caf5c4628 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Sun, 13 Nov 2016 20:04:09 +0000 Subject: [PATCH] Invert the sync-vector test for messages with "OOO" signal report. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7305 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 --- lib/gen65.f90 | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lib/gen65.f90 b/lib/gen65.f90 index e964c0af7..b899c5e00 100644 --- a/lib/gen65.f90 +++ b/lib/gen65.f90 @@ -41,6 +41,8 @@ subroutine gen65(msg0,ichk,msgsent,itone,itype) enddo call chkmsg(message,cok,nspecial,flip) + ntest=0 + if(flip.lt.0.0) ntest=1 if(nspecial.eq.0) then call packmsg(message,dgen,itype) !Pack message into 72 bits 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 k=0 do j=1,nsym - if(nprc(j).eq.0) then + if(nprc(j).eq.ntest) then k=k+1 itone(j)=sent(k)+2 else