Hello Joe,
.
In gen9.f90 207th bit of the i1EncodedBits(207) / i1ScrambledBits(207) arrays 
is not initialized and may take any integer*1 non binary value causing 
corruption of the 69th data tone in JT9 modulation.
.
Proposing to fix it in lines 44...48 of gen9.f90 source code:
.
nsym2=206
call encode232(i1Msg8BitBytes,nsym2,i1EncodedBits) !Encode K=32, r=1/2
call interleave9(i1EncodedBits,1,i1ScrambledBits) !Interleave bits
call packbits(i1ScrambledBits,69,3,i4DataSymbols) !Pk 3-bits into words
.
with this patch:
.
nsym2=206
call encode232(i1Msg8BitBytes,nsym2,i1EncodedBits) !Encode K=32, r=1/2
i1EncodedBits(207)=0
call interleave9(i1EncodedBits,1,i1ScrambledBits) !Interleave bits
i1ScrambledBits(207)=0
call packbits(i1ScrambledBits,69,3,i4DataSymbols) !Pk 3-bits into words
.
73,
Igor UA3DJY
------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
wsjt-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/wsjt-devel

Reply via email to