Recompute deep search messages after change of neme status and after

adding a callsign to CALL3.TXT.


git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@1718 ab8295b8-cf94-4d9e-aec4-7959e3be5d79

deep65.F

@@ -14,6 +14,7 @@
       integer ncode(63,2*MAXCALLS + 2 + MAXRPT)
       real pp(2*MAXCALLS + 2 + MAXRPT)
       common/mrscom/ mrs(63),mrs2(63)
+      common/c3com/ mcall3a
 
       data neme0/-99/
       data rpt/'-01','-02','-03','-04','-05',
@@ -31,10 +32,11 @@
      +         'RO','RRR','73'/
       save
 
-      modified=0                              !@@@
       if(mycall.eq.mycall0 .and. hiscall.eq.hiscall0 .and. 
-     +   hisgrid.eq.hisgrid0 .and. modified.eq.modified0) go to 30
+     +   hisgrid.eq.hisgrid0 .and. mcall3a.eq.0 .and.
+     +   neme.eq.neme0) go to 30
 
+      mcall3a=0
       call cs_lock('deep65a')
       rewind 23
       k=0

gcom2.f90

@@ -15,6 +15,7 @@ integer ngreen         !Length of green                         GUI
 real dgain             !Digital audio gain setting              GUI
 integer ndecoding      !Decoder status (see decode2.f90)     GUI,Decoder
 integer ndecoding0     !Status on previous decode            GUI,Decoder
+integer mcall3         !CALL3.TXT has been modified          GUI,Decoder
 integer mousebutton    !Which button was clicked?               GUI
 integer multicast      !1 for multicast data, 0 for unicast     GUI
 integer ndecdone       !Is decoder finished?                 GUI,Decoder
@@ -104,7 +105,7 @@ character*8 utcdata     !HHMM UTC for the processed data       Decoder
 
 common/gcom2/fcenter,ps0(431),psavg(450),s2(64,3100),ccf(-5:540),           &
      green(500),fselect,pctlost,pctblank,rxnoise,dphi,ngreen,dgain,         &
-     ndecoding,ndecoding0,mousebutton,multicast,nsetftx,ierr,               &
+     ndecoding,ndecoding0,mcall3,mousebutton,multicast,nsetftx,ierr,        &
      ndecdone,lauto,mantx,nrestart,ntr,nmsg,nsave,nadd5,                    &
      dftolerance,LDecoded,rxdone,monitoring,nzap,minsigdb,                  &
      nclearave,nfreeze,nafc,ncsmin,newspec,nfa,nfb,nfcal,idphi,nkeep,       &

map65.py

@@ -542,6 +542,7 @@ def addtodb():
             if os.path.exists("CALL3.OLD"): os.remove("CALL3.OLD")
             os.rename("CALL3.TXT","CALL3.OLD")
             os.rename("CALL3.TMP","CALL3.TXT")
+            Audio.gcom2.mcall3=1
 
 #-------------------------------------------------------- clrToRadio
 def clrToRadio(event):

map65a.F90

@@ -18,11 +18,15 @@ subroutine map65a(newdat)
   real qphi(12)
   include 'gcom2.f90'
   include 'datcom.f90'
+  common/c3com/ mcall3a
+  
   data blank/'                      '/
   data shmsg0/'ATT','RO ','RRR','73 '/
   data nfile/0/,nutc0/-999/,nid/0/,ip000/1/,ip001/1/,mousefqso0/-999/
   save
 
+  mcall3a=mcall3
+  if(mcall3.eq.1) mcall3=0
   if(mousefqso.ne.mousefqso0 .and. nagain.eq.1) newspec=2
   mousefqso0=mousefqso
   nfoffset=nint(1000*(fcenter-144.125d0))