Send RxFreq and FTol from wsjtx to sfrx, and display them on WideGraph.

This commit is contained in:
Joe Taylor
2024-08-14 10:03:46 -04:00
parent 08866b0d75
commit 1186b0bb8b
7 changed files with 35 additions and 5 deletions
+8 -1
View File
@@ -53,6 +53,8 @@ subroutine multimode_decoder(ss,id2,params,nfsample)
character(len=12) :: mycall, hiscall
character(len=6) :: mygrid, hisgrid
character*60 line
character*256 cmnd,cmndmsg
character*6 crxfreq,cftol
data ndec8/0/,ntr0/-1/
save
type(counting_jt4_decoder) :: my_jt4
@@ -146,7 +148,12 @@ subroutine multimode_decoder(ss,id2,params,nfsample)
access='stream')
write(47) params%yymmdd,params%nutc,id2(1:20),id2(1:180000)
close(47)
call execute_command_line(trim(exe_dir)//'/sfrx '//'"'//trim(temp_dir)//'/fort.47"')
write(crxfreq,'(i6)') params%nfqso
write(cftol,'(i5)') params%ntol
cmnd=trim(exe_dir)//char(92)//'sfrx'//crxfreq//cftol// '"' // &
trim(temp_dir)//char(92)//'fort.47"'
call execute_command_line(trim(cmnd),exitstat=nexitstat, &
cmdstat=ncmdstat,cmdmsg=cmndmsg)
else
call timer('decft8 ',0)
newdat=params%newdat