1. Corrected handling of compound callsigns: use JT65v1 encoding if

applicable, JT65v2 otherwise.  Thanks to DL9RDZ!

2. Fix a bug in flat3.f90, evident on OSX systems.  Thanks to G4KLA!

3. The Makefile now copy the jt9code executable into the destination
   directory for to-be-packaged executables.



git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@3648 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2014-01-18 13:59:19 +00:00
parent e903647371
commit 15c102fad8
6 changed files with 7 additions and 4 deletions

View File

@ -72,6 +72,7 @@ jt9sim.exe: $(OBJS3) libjt9.a
OBJS4 = jt9code.o
jt9code.exe: $(OBJS4) libjt9.a
$(FC) -o jt9code.exe $(OBJS4) libjt9.a
cp jt9code.exe $(EXE_DIR)
OBJS5 = jt65.o
jt65.exe: $(OBJS5) libjt9.a

View File

@ -62,6 +62,7 @@ jt9sim: $(OBJS3) libjt9.a
OBJS4 = jt9code.o
jt9code: $(OBJS4) libjt9.a
$(FC) -o jt9code $(OBJS4) -L. -ljt9
cp jt9code $(EXE_DIR)
sync9.o: sync9.f90 jt9sync.f90
$(FC) $(FFLAGS) -c sync9.f90

View File

@ -4,7 +4,7 @@ subroutine flat3(s0,iz,nfa,nfb,nterms,ynoise,s)
parameter (NSMAX=6827)
real*4 s0(iz)
real*4 s(iz)
real*4 ynoise,y4
real*4 ynoise,y4,db
real*8 x(NSMAX)
real*8 y(NSMAX)

View File

@ -13,7 +13,7 @@ subroutine getpfx1(callsign,k,nv2)
if(iz.lt.0) iz=12
islash=index(callsign(1:iz),'/')
k=0
if(k.eq.0) go to 10 !### Always use JT65v2 ###
! if(k.eq.0) go to 10 !Tnx to DL9RDZ for reminder:this was for tests only!
c=' '
if(islash.gt.0 .and. islash.le.(iz-4)) then
! Add-on prefix

View File

@ -60,7 +60,8 @@ subroutine packmsg(msg,dat,text)
c3=' '
if(ic.ge.ib+1) c3=msg(ib+1:ic)
if(c3.eq.'OOO ') c3=' ' !Strip out the OOO flag
call getpfx1(c1,k1,junk)
call getpfx1(c1,k1,kk)
if(kk.ne.0) go to 10 !Tnx to DL9RDZ for reminding me!
call packcall(c1,nc1,text1)
call getpfx1(c2,k2,nv2)
call packcall(c2,nc2,text2)

View File

@ -1,4 +1,4 @@
//-------------------------------------------------------------- MainWindow
//------------------------------------------------------------- MainWindow
#include "mainwindow.h"
#include "ui_mainwindow.h"