diff --git a/lib/fsk4hf/ft8b.f90 b/lib/fsk4hf/ft8b.f90
index bdac86d5d..1c0575757 100644
--- a/lib/fsk4hf/ft8b.f90
+++ b/lib/fsk4hf/ft8b.f90
@@ -1,4 +1,4 @@
-subroutine ft8b(s,f1,xdt,nharderrors,dmin,nbadcrc,message)
+subroutine ft8b(s,nfqso,f1,xdt,nharderrors,dmin,nbadcrc,message)
 
   include 'ft8_params.f90'
   parameter(NRECENT=10)
@@ -12,6 +12,7 @@ subroutine ft8b(s,f1,xdt,nharderrors,dmin,nbadcrc,message)
 
   max_iterations=40
   norder=2
+  if(abs(nfqso-f1).lt.10.0) norder=3
   tstep=0.5*NSPS/12000.0
   df=12000.0/NFFT1
 
diff --git a/lib/ft8_decode.f90 b/lib/ft8_decode.f90
index b6ff2cd4b..bb72349aa 100644
--- a/lib/ft8_decode.f90
+++ b/lib/ft8_decode.f90
@@ -54,7 +54,7 @@ contains
        xdt=candidate(2,icand)
        nsnr=min(99,nint(10.0*log10(sync) - 25.5))    !### empirical ###
        call timer('ft8b    ',0)
-       call ft8b(s,f1,xdt,nharderrors,dmin,nbadcrc,message)
+       call ft8b(s,nfqso,f1,xdt,nharderrors,dmin,nbadcrc,message)
        call timer('ft8b    ',1)
        if (associated(this%callback)) call this%callback(sync,nsnr,xdt,   &
             f1,nbadcrc,message)