diff --git a/decode1.F90 b/decode1.F90
index 70b057c2a..78bd56a03 100644
--- a/decode1.F90
+++ b/decode1.F90
@@ -40,13 +40,15 @@ subroutine decode1(iarg)
   kbuf0=kbuf
   kkk=kk
   if(kbuf.eq.2) kkk=kk-5760000
+
   n=Tsec
-  if(n.ne.ns00) then
+  if(ndebug.eq.2 .and. n.ne.ns00) then
      write(29,3101) nutc,mod(n,60),ndiskdat,ndecoding,kbuf,  &
           newdat,kk,kkdone
 3101 format('d1:',i5.4,i3.2,4i5,2i10)
      ns00=n
   endif
+
   if((ndiskdat.eq.1 .or. ndecoding.eq.0) .and. ((kkk-kkdone).gt.32768)) then
      call symspec(id,kbuf,kk,kkdone,nutc,newdat)
      call sleep_msec(10)
diff --git a/map65.py b/map65.py
index 0db1cac18..c285969e6 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 eaac7f90c..794513814 100644
--- a/map65a.F90
+++ b/map65a.F90
@@ -27,8 +27,8 @@ subroutine map65a(newdat)
   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,' %')
+  if(ndebug.eq.2) write(29,3001) nutc,mod(int(sec_midn()),60),nlost,pctlost
+3001 format('m1:',i5.4,i3.2,i8,f7.2,' %')
 
   rewind 11
   rewind 12
@@ -281,8 +281,8 @@ subroutine map65a(newdat)
         call flushqqq(11)
         ndecdone=1
         t2=sec_midn()
-        if(ndebug.eq.2) write(*,3002) mod(int(t2),60)
-3002    format('mod65a  2:'i8.2)
+        if(ndebug.eq.2) write(29,3002) mod(int(t2),60)
+3002    format('m2:'i8.2)
      endif
      if(nagain.eq.1) go to 999
   enddo
@@ -371,11 +371,11 @@ subroutine map65a(newdat)
   kk=kkdone
   if(nagain.eq.0) then
      t3=sec_midn()
-     if(ndebug.eq.2) write(*,3003) mod(int(t3),60)
-3003 format('mod65a  3:'i8.2)
+     if(ndebug.eq.2) write(29,3003) mod(int(t3),60)
+3003 format('m3:'i8.2)
      if(ndebug.eq.1) write(*,3004) nutc,mod(t2,60.0),mod(t3,60.0),    &
           nlost,pctlost
-3004 format('mod65a:',i5.4,1x,2f6.1,i6,f8.2,' %')
+3004 format('map65:',i5.4,1x,2f6.1,i6,f8.2,' %')
   endif
   nagain=0
 
diff --git a/recvpkt.F90 b/recvpkt.F90
index 3d8e6a477..8c1fbacad 100644
--- a/recvpkt.F90
+++ b/recvpkt.F90
@@ -46,7 +46,7 @@ subroutine recvpkt(iarg)
      if(nb.lt.0) nb=nb+65536
      nb0=nblock0
      if(nb0.lt.0) nb0=nb0+65536
-     if(ndebug.eq.2) print*,'Lost packets:',nb0,nb,lost
+     if(ndebug.gt.0) print*,'Lost packets:',nb0,nb,lost
      lost_tot=lost_tot + lost               ! Insert zeros for the lost data.
      do i=1,174*lost
         k=k+1
@@ -113,22 +113,23 @@ subroutine recvpkt(iarg)
      ntx=ntx+transmitting
 
      if(ns.ge.nt1 .and. ndone1.eq.0) then
+!  Time in this minute has reached designated time to start FFTs
         nutc=mutc
         fcenter=center_freq
         kbuf=kb
         kk=k
         ndiskdat=0
         ndone1=1
-        if(ndebug.eq.2) write(*,3001) nutc,mod(int(sec_midn()),60),ns,  &
+        if(ndebug.eq.2) write(29,3001) nutc,mod(int(sec_midn()),60),ns,  &
              kbuf,kk
-3001    format('r1:',i5.4,2i3.2,2i10)
+3001    format('r1:',i5.4,2i3.2,i5,i10)
      endif
      if(ns.ge.nt2 .and. ndone2.eq.0) then
         kk=k
         ndone2=1
-        if(ndebug.eq.2) write(*,3002) nutc,mod(int(sec_midn()),60),ns,  &
+        if(ndebug.eq.2) write(29,3002) nutc,mod(int(sec_midn()),60),ns,  &
              kbuf,kk
-3002    format('r2:',i5.4,2i3.2,2i10)
+3002    format('r2:',i5.4,2i3.2,i5,i10)
         nlost=lost_tot                         ! Save stats for printout
      endif
   endif
diff --git a/symspec.f90 b/symspec.f90
index 8a5a27e61..4038ca9d2 100644
--- a/symspec.f90
+++ b/symspec.f90
@@ -18,7 +18,7 @@ subroutine symspec(id,kbuf,kk,kkdone,nutc,newdat)
 !       kbuf,kk,kkk,kkdone
 !4001 format(a1,i5.4,2i3,3i9,i5)
 
-  if(ndebug.eq.2) write(*,3001) nutc,mod(int(sec_midn()),60),n,  &
+  if(ndebug.eq.2) write(29,3001) nutc,mod(int(sec_midn()),60),n,  &
        newdat,ndecoding,kbuf,kk,kkdone
 3001 format('s1:',i5.4,i3.2,4i5,2i10)
   fac=0.0002
@@ -120,7 +120,7 @@ subroutine symspec(id,kbuf,kk,kkdone,nutc,newdat)
 999 continue
 !  if(ndebug.gt.0) write(*,4001) 'B',nutc,mod(int(sec_midn()),60),  &
 !       kbuf,kk,kkk,kkdone,n
-  if(ndebug.eq.2) write(*,3002) mod(int(sec_midn()),60),n,   &
+  if(ndebug.eq.2) write(29,3002) mod(int(sec_midn()),60),n,   &
        newdat,ndecoding,kbuf,kk,kkdone
 3002 format('s2:',i8.2,4i5,2i10)
   return