diff --git a/lib/fsk4hf/sync8.f90 b/lib/fsk4hf/sync8.f90 index a13297318..30f6de172 100644 --- a/lib/fsk4hf/sync8.f90 +++ b/lib/fsk4hf/sync8.f90 @@ -1,8 +1,8 @@ subroutine sync8(dd,nfa,nfb,syncmin,nfqso,s,candidate,ncand,sbase) include 'ft8_params.f90' -! Search over +/- 1.5s relative to 0.5s TX start time. - parameter (JZ=38) +! Search over +/- 2.5s relative to 0.5s TX start time. + parameter (JZ=62) complex cx(0:NH1) real s(NH1,NHSYM) real savg(NH1) @@ -138,7 +138,8 @@ subroutine sync8(dd,nfa,nfb,syncmin,nfqso,s,candidate,ncand,sbase) ! do i=ncand,1,-1 do i=1,ncand j=indx(i) - if( candidate0(3,j) .ge. syncmin .and. candidate0(2,j).ge.-1.5 ) then +! if( candidate0(3,j) .ge. syncmin .and. candidate0(2,j).ge.-1.5 ) then + if( candidate0(3,j) .ge. syncmin ) then candidate(1,k)=abs(candidate0(1,j)) candidate(2,k)=candidate0(2,j) candidate(3,k)=candidate0(3,j)