User-defined params nt1, nt2 to set timing of state machine.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@503 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2007-07-12 20:45:14 +00:00
parent 98c25d81d9
commit ff721d42d9
4 changed files with 30 additions and 5 deletions

View File

@ -49,6 +49,8 @@ integer nfullspec !Set to 1 to display full spectrum GUI
integer ndebug !Write debugging info? GUI integer ndebug !Write debugging info? GUI
integer ndphi !Set to 1 to compute dphi GUI,Decoder integer ndphi !Set to 1 to compute dphi GUI,Decoder
integer nhispol !Pol angle matching HisCall or HisGrid Decoder integer nhispol !Pol angle matching HisCall or HisGrid Decoder
integer nt1 !Time to start FFTs GUI
integer nt2 !Time to start quick decode GUI
integer nblank !Is NB checked? GUI integer nblank !Is NB checked? GUI
integer nfmid !Center frequency of main display GUI integer nfmid !Center frequency of main display GUI
integer nfrange !Frequency range of main display GUI integer nfrange !Frequency range of main display GUI
@ -106,7 +108,7 @@ common/gcom2/ps0(431),psavg(450),s2(64,3100),ccf(-5:540), &
ndecdone,npingtime,ierr,lauto,mantx,nrestart,ntr,nmsg,nsave,nadd5, & ndecdone,npingtime,ierr,lauto,mantx,nrestart,ntr,nmsg,nsave,nadd5, &
dftolerance,LDecoded,rxdone,monitoring,nzap,minsigdb, & dftolerance,LDecoded,rxdone,monitoring,nzap,minsigdb, &
nclearave,nfreeze,nafc,ncsmin,newspec,nfa,nfb,nfcal,idphi,nkeep, & nclearave,nfreeze,nafc,ncsmin,newspec,nfa,nfb,nfcal,idphi,nkeep, &
nmode,mode65,nbpp,nfullspec,ndebug,ndphi,nhispol, & nmode,mode65,nbpp,nfullspec,ndebug,ndphi,nhispol,nt1,nt2, &
nblank,nport,mousedf,mousefqso,neme,nrw26,naggressive,ntx2,nagain, & nblank,nport,mousedf,mousefqso,neme,nrw26,naggressive,ntx2,nagain, &
shok,sendingsh,d2a(661500),d2b(661500),b(60000),jza,jzb,ntime, & shok,sendingsh,d2a(661500),d2b(661500),b(60000),jza,jzb,ntime, &
idinterval,msmax,lenappdir,idf,ndiskdat,nlines,nflat,ntxreq,ntxnow, & idinterval,msmax,lenappdir,idf,ndiskdat,nlines,nflat,ntxreq,ntxnow, &

View File

@ -1224,7 +1224,6 @@ def update():
Audio.gcom2.dftolerance=ntol[itol] Audio.gcom2.dftolerance=ntol[itol]
Audio.gcom2.neme=neme.get() Audio.gcom2.neme=neme.get()
Audio.gcom2.ndepth=ndepth.get() Audio.gcom2.ndepth=ndepth.get()
Audio.gcom2.ncsmin=options.ncsmin.get()
try: try:
Audio.gcom2.idinterval=options.IDinterval.get() Audio.gcom2.idinterval=options.IDinterval.get()
except: except:
@ -1250,6 +1249,19 @@ def update():
Audio.gcom2.nfcal=options.fcal.get() Audio.gcom2.nfcal=options.fcal.get()
except: except:
Audio.gcom2.nfcal=0 Audio.gcom2.nfcal=0
try:
Audio.gcom2.ncsmin=options.ncsmin.get()
except:
Audio.gcom2.ncsmin=20
try:
Audio.gcom2.nt1=options.nt1.get()
except:
Audio.gcom2.nt1=48
try:
Audio.gcom2.nt2=options.nt2.get()
except:
Audio.gcom2.nt2=52
t=options.savedir.get() + \ t=options.savedir.get() + \
' ' + \ ' ' + \
' ' ' '
@ -1738,6 +1750,8 @@ try:
elif key == 'fb': options.fb.set(value) elif key == 'fb': options.fb.set(value)
elif key == 'fcal': options.fcal.set(value) elif key == 'fcal': options.fcal.set(value)
elif key == 'CSmin': options.ncsmin.set(value) elif key == 'CSmin': options.ncsmin.set(value)
elif key == 'Nt1': options.nt1.set(value)
elif key == 'Nt2': options.nt2.set(value)
elif key == 'dphi': options.dphi.set(value) elif key == 'dphi': options.dphi.set(value)
elif key == 'SaveDir': options.savedir.set(value) elif key == 'SaveDir': options.savedir.set(value)
@ -1831,6 +1845,8 @@ f.write("fa " + str(options.fa.get()) + "\n")
f.write("fb " + str(options.fb.get()) + "\n") f.write("fb " + str(options.fb.get()) + "\n")
f.write("fcal " + str(options.fcal.get()) + "\n") f.write("fcal " + str(options.fcal.get()) + "\n")
f.write("CSmin " + str(options.ncsmin.get()) + "\n") f.write("CSmin " + str(options.ncsmin.get()) + "\n")
f.write("Nt1 " + str(options.nt1.get()) + "\n")
f.write("Nt2 " + str(options.nt2.get()) + "\n")
f.write("SaveDir " + str(options.savedir.get()) + "\n") f.write("SaveDir " + str(options.savedir.get()) + "\n")
f.write("TxFirst " + str(TxFirst.get()) + "\n") f.write("TxFirst " + str(TxFirst.get()) + "\n")
f.write("KB8RQ " + str(kb8rq.get()) + "\n") f.write("KB8RQ " + str(kb8rq.get()) + "\n")

View File

@ -47,6 +47,8 @@ fa=IntVar()
fb=IntVar() fb=IntVar()
fcal=IntVar() fcal=IntVar()
ncsmin=IntVar() ncsmin=IntVar()
nt1=IntVar()
nt2=IntVar()
savedir=StringVar() savedir=StringVar()
mycall=Pmw.EntryField(g1.interior(),labelpos=W,label_text='My Call:', mycall=Pmw.EntryField(g1.interior(),labelpos=W,label_text='My Call:',
@ -104,10 +106,15 @@ fcal_entry=Pmw.EntryField(g3.interior(),labelpos=W,label_text='Fcal (Hz):',
entry_width=9,entry_textvariable=fcal) entry_width=9,entry_textvariable=fcal)
min_callsign_entry=Pmw.EntryField(g3.interior(),labelpos=W, \ min_callsign_entry=Pmw.EntryField(g3.interior(),labelpos=W, \
label_text='CSmin:',entry_width=9,value=4,entry_textvariable=ncsmin) label_text='CSmin:',entry_width=9,value=4,entry_textvariable=ncsmin)
nt1_entry=Pmw.EntryField(g3.interior(),labelpos=W, \
label_text='Rx t1:',entry_width=9,value=48,entry_textvariable=nt1)
nt2_entry=Pmw.EntryField(g3.interior(),labelpos=W, \
label_text='Rx t2:',entry_width=9,value=52,entry_textvariable=nt2)
savedir_entry=Pmw.EntryField(g3.interior(),labelpos=W,label_text='SaveDir:', savedir_entry=Pmw.EntryField(g3.interior(),labelpos=W,label_text='SaveDir:',
entry_width=23,value=g.appdir+'\save',entry_textvariable=savedir) entry_width=23,value=g.appdir+'\save',entry_textvariable=savedir)
widgets = (temp_prefix,aux_ra,aux_dec,nkeep_entry,dphi_entry, \ widgets = (temp_prefix,aux_ra,aux_dec,nkeep_entry,dphi_entry, \
fa_entry,fb_entry,fcal_entry,min_callsign_entry,savedir_entry,) fa_entry,fb_entry,fcal_entry,min_callsign_entry, \
nt1_entry,nt2_entry,savedir_entry,)
for widget in widgets: for widget in widgets:
widget.pack(padx=2,pady=2) widget.pack(padx=2,pady=2)
Pmw.alignlabels(widgets) Pmw.alignlabels(widgets)

View File

@ -110,7 +110,7 @@ subroutine recvpkt(iarg)
nsec0=nsec nsec0=nsec
ntx=ntx+transmitting ntx=ntx+transmitting
if(ns.eq.48) then if(ns.eq.nt1) then
nutc=mutc nutc=mutc
fcenter=center_freq fcenter=center_freq
kbuf=kb kbuf=kb
@ -119,7 +119,7 @@ subroutine recvpkt(iarg)
if(ndebug.eq.2) write(*,3001) nutc,mod(int(sec_midn()),60),ns if(ndebug.eq.2) write(*,3001) nutc,mod(int(sec_midn()),60),ns
3001 format('recvpkt 1:',i5.4,2i3.2) 3001 format('recvpkt 1:',i5.4,2i3.2)
endif endif
if(ns.eq.52) then if(ns.eq.nt2) then
kk=k kk=k
if(ndebug.eq.2) write(*,3002) nutc,mod(int(sec_midn()),60),ns if(ndebug.eq.2) write(*,3002) nutc,mod(int(sec_midn()),60),ns
3002 format('recvpkt 2:',i5.4,2i3.2) 3002 format('recvpkt 2:',i5.4,2i3.2)