Code cleanup and improvement in the JT4 decoder.

NB: should remove the present downsampling to 11025/2 Hz, which unnecessarily
limits the availabler range of Fx Freq ("nfqso" in the source code).
This commit is contained in:
Joe Taylor
2018-07-23 12:42:50 -04:00
parent 59f713ba76
commit 7ff366abe3
5 changed files with 59 additions and 119 deletions
+1 -1
View File
@@ -37,7 +37,7 @@ function stdmsg(msg0)
call packmsg(msg0,dat,itype)
call unpackmsg(dat,msg)
msg(23:37)=' '
stdmsg=(msg.eq.msg1) .and. (itype.ge.0) .and. itype.ne.6
stdmsg=(msg(1:22).eq.msg1(1:22)) .and. (itype.ge.0) .and. (itype.ne.6)
if(.not.stdmsg) then
call parse77(msg1,i3,n3)
if(i3.gt.0 .or. n3.gt.0) stdmsg=.true.