Don't do DS for Mycall HisCall rpt OOO.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@1022 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2008-09-16 18:20:04 +00:00
parent 735b4838a4
commit 0e24891d04
2 changed files with 3 additions and 3 deletions

View File

@ -77,9 +77,9 @@
callgrid(icall)=callsign(1:j2) callgrid(icall)=callsign(1:j2)
mz=1 mz=1
! Allow MyCall + HisCall + rpt (?)
if(n.eq.1 .and. j3.lt.1 .and. j4.lt.1 .and. if(n.eq.1 .and. j3.lt.1 .and. j4.lt.1 .and.
+ callsign(1:6).ne.' ') mz=MAXRPT+1 !Allow MyCall + HisCall + rpt + flip.gt.0.0 .and. callsign(1:6).ne.' ') mz=MAXRPT+1
do m=1,mz do m=1,mz
if(m.gt.1) grid=rpt(m-1) if(m.gt.1) grid=rpt(m-1)
if(j3.lt.1 .and.j4.lt.1) if(j3.lt.1 .and.j4.lt.1)

View File

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