From 71bd5b79e3c931f063055b6dad7b0576f7abb3d2 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Fri, 2 Apr 2021 09:56:50 -0400 Subject: [PATCH] Don't attempt a Q65 average decode if it's not selected on Decode menu. --- lib/q65_decode.f90 | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lib/q65_decode.f90 b/lib/q65_decode.f90 index 7869527d7..5acc15f52 100644 --- 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