diff --git a/map65.py b/map65.py index 128a002be..7966d1b68 100644 --- a/map65.py +++ b/map65.py @@ -1,4 +1,4 @@ -#--------------------------------------------------------------------- MAP65 +#---------------------------------------------------------------------- MAP65 # $Date$ $Revision$ # from Tkinter import * diff --git a/map65a.F90 b/map65a.F90 index 6d04e1889..eaac7f90c 100644 --- a/map65a.F90 +++ b/map65a.F90 @@ -20,9 +20,12 @@ subroutine map65a(newdat) include 'datcom.f90' data blank/' '/ data shmsg0/'ATT','RO ','RRR','73 '/ - data nfile/0/,nutc0/-999/,nid/0/,ip000/1/,ip001/1/ + data nfile/0/,nutc0/-999/,nid/0/,ip000/1/,ip001/1/,mousefqso0/-999/ save + if(mousefqso.ne.mousefqso0 .and. nagain.eq.1) newspec=2 + mousefqso0=mousefqso + pctlost=nlost/331.03 if(ndebug.eq.2) write(*,3001) nutc,mod(int(sec_midn()),60),nlost,pctlost 3001 format('mod65a 1:',i5.4,i3.2,i8,f7.2,' %') diff --git a/specjt.py b/specjt.py index 80e4971b1..3f3f334c3 100644 --- a/specjt.py +++ b/specjt.py @@ -288,7 +288,8 @@ def update(): region2=im2.crop(box) #Get all but last line(s) box=(125,0,624,120) try: - im.paste(region,(0,n)) #Move waterfall down + if newspec==1: + im.paste(region,(0,n)) #Move waterfall down im2.paste(region2,(0,n)) #Move waterfall down except: print "Images did not match, continuing anyway."