Added flushqqq calls to wsjt1.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/trunk@218 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2006-08-01 16:08:36 +00:00
parent 9ba3471dfe
commit 882cb0b933
2 changed files with 6 additions and 4 deletions

View File

@ -1,4 +1,4 @@
#------------------------------------------------------------------ WSJT
#------------------------------------------------------------------- WSJT
from Tkinter import *
from tkFileDialog import *
import Pmw

View File

@ -295,7 +295,7 @@ C Now the multi-tone decoding
+ line(j)(29:31).eq.' ') goto 10
write(lumsg,1050) line(j) !Write to decoded.txt
1050 format(a79)
if(lcum) write(21,1050) line(j) !Write to decoded.cum
if(lcum) write(21,1050) line(j) !Write to ALL.TXT
read(line(j),1060) sig,msg3
1060 format(16x,f3.0,9x,a3)
if(sig.gt.smax) then
@ -315,9 +315,11 @@ C Now the multi-tone decoding
800 continue
call s2shape(s2,nchan,nz,tbest)
900 continue
900 LDecoded = ((NSyncOK.gt.0) .or. npkept.gt.0)
end file 11
LDecoded = ((NSyncOK.gt.0) .or. npkept.gt.0)
call flushqqq(11)
call flushqqq(12)
call flushqqq(21)
return
end