Removed rewind of LU 29, and connected it to debug.txt.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@573 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2007-11-02 20:05:44 +00:00
parent f8641c5f8b
commit 904d633e82
3 changed files with 5 additions and 16 deletions

View File

@ -33,10 +33,7 @@ subroutine decode1(iarg)
newdat=1
endif
if(kbuf.ne.kbuf0) then
kkdone=0
rewind 29
endif
if(kbuf.ne.kbuf0) kkdone=0
kbuf0=kbuf
kkk=kk
if(kbuf.eq.2) kkk=kk-5760000

View File

@ -5,7 +5,7 @@
! 12 decoded.ave
! 13 tsky.dat
! 14 azel.dat
! 15 debug.txt
! 15
! 16 c:/wsjt.reg
! 17 wave files written to disk
! 18 test file to be transmitted (wsjtgen.f90)
@ -72,14 +72,6 @@ subroutine ftn_init
err=930)
#endif
#ifdef Win32
open(15,file=appdir(:iz)//'/debug.txt',status='unknown', &
share='denynone',err=940)
#else
open(15,file=appdir(:iz)//'/debug.txt',status='unknown', &
err=940)
#endif
#ifdef Win32
open(19,file=appdir(:iz)//'/messages.txt',status='unknown', &
share='denynone',err=911)
@ -147,10 +139,10 @@ subroutine ftn_init
#endif
#ifdef Win32
open(29,file=appdir(:iz)//'/tmp29.txt',status='unknown', &
open(29,file=appdir(:iz)//'/debug.txt',status='unknown', &
share='denynone')
#else
open(29,file=appdir(:iz)//'/tmp29.txt',status='unknown')
open(29,file=appdir(:iz)//'/debug.txt',status='unknown')
#endif

View File

@ -1,4 +1,4 @@
#----------------------------------------------------------------------- MAP65
#---------------------------------------------------------------------- MAP65
# $Date$ $Revision$
#
from Tkinter import *