w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2026-06-09 01:14:51 -04:00
Code Issues Packages Projects Releases Wiki Activity

Add routines that will be needed to decode SuperFox. (Presently, that's done in sf.exe.)

Browse Source
This commit is contained in:
Joe Taylor
2024-03-11 19:02:38 -04:00
parent 835e4936c1
commit b220643237
13 changed files with 628 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
lib/decoder.f90
+8 -3
View File
@@ -139,10 +139,15 @@ subroutine multimode_decoder(ss,id2,params,nfsample)
open(19,file=trim(temp_dir)//'/houndcallers.txt',status='unknown')
endif
if(ncontest.eq.7 .and. params%b_superfox .and. params%b_even_seq) then
if(((ncontest.eq.7 .and. params%b_superfox .and. params%b_even_seq) &
.or. params%ndiskdat) .and. params%nzhsym.ge.50) then
! Call the superFox decoder
print*,'Calling SuperFox decoder',params%nzhsym,params%b_superfox, &
params%b_even_seq
open(47,file='fort.47',status='unknown',access='stream')
write(47) params%nutc/15,id2(1:20),id2(1:180000)
close(47)
! print*,'Calling SuperFox decoder',params%nzhsym,params%b_superfox, &
! params%b_even_seq,params%nutc
call execute_command_line('.\sf fort.47')
else
call timer('decft8 ',0)
newdat=params%newdat