Don't attempt a Q65 average decode if it's not selected on Decode menu.

2021-04-02 09:56:50 -04:00 · 2021-04-02 09:56:50 -04:00 · 71bd5b79e3
parent e20cd2c8e2
commit 71bd5b79e3
1 changed files with 1 additions and 2 deletions
--- a/lib/q65_decode.f90
+++ b/lib/q65_decode.f90
@ -341,8 +341,7 @@ contains
          endif
       endif
    enddo  ! icand
-    if(iavg.eq.0 .and.navg(iseq).ge.2) go to 50
-
+    if(iavg.eq.0 .and.navg(iseq).ge.2 .and. iand(ndepth,16).ne.0) go to 50
 900 return
  end subroutine decode