mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-08-03 14:42:25 -04:00
LU=19 shound be opened even if nagain is true; otherwise it will try to write in the exe directory.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@8646 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
d99129e196
commit
58731f8caa
@ -56,20 +56,21 @@ subroutine multimode_decoder(ss,id2,params,nfsample)
|
|||||||
position='append',iostat=ios)
|
position='append',iostat=ios)
|
||||||
else
|
else
|
||||||
open(13,file=trim(temp_dir)//'/decoded.txt',status='unknown',iostat=ios)
|
open(13,file=trim(temp_dir)//'/decoded.txt',status='unknown',iostat=ios)
|
||||||
if(params%nmode.eq.8) then
|
|
||||||
inquire(file=trim(temp_dir)//'/houndcallers.txt',exist=ex)
|
|
||||||
if(.not.ex) then
|
|
||||||
c2fox=' '
|
|
||||||
g2fox=' '
|
|
||||||
nsnrfox=-99
|
|
||||||
nfreqfox=-99
|
|
||||||
n30z=0
|
|
||||||
nwrap=0
|
|
||||||
nfox=0
|
|
||||||
endif
|
|
||||||
open(19,file=trim(temp_dir)//'/houndcallers.txt',status='unknown')
|
|
||||||
endif
|
|
||||||
endif
|
endif
|
||||||
|
if(params%nmode.eq.8) then
|
||||||
|
inquire(file=trim(temp_dir)//'/houndcallers.txt',exist=ex)
|
||||||
|
if(.not.ex) then
|
||||||
|
c2fox=' '
|
||||||
|
g2fox=' '
|
||||||
|
nsnrfox=-99
|
||||||
|
nfreqfox=-99
|
||||||
|
n30z=0
|
||||||
|
nwrap=0
|
||||||
|
nfox=0
|
||||||
|
endif
|
||||||
|
open(19,file=trim(temp_dir)//'/houndcallers.txt',status='unknown')
|
||||||
|
endif
|
||||||
|
|
||||||
if(ios.ne.0) then
|
if(ios.ne.0) then
|
||||||
nfail=nfail+1
|
nfail=nfail+1
|
||||||
if(nfail.le.3) then
|
if(nfail.le.3) then
|
||||||
|
Loading…
x
Reference in New Issue
Block a user