mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2026-06-02 22:14:56 -04:00
Send RxFreq and FTol from wsjtx to sfrx, and display them on WideGraph.
This commit is contained in:
+8
-1
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user