From bff84e0e37d585cd25d875c76c36b8d979837084 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Wed, 4 May 2016 18:59:18 +0000 Subject: [PATCH] Use '$' to flag JT4 mode in the 2-character csync. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6668 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 --- lib/decoder.f90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/decoder.f90 b/lib/decoder.f90 index 40ca1376f..50c5e7cbf 100644 --- a/lib/decoder.f90 +++ b/lib/decoder.f90 @@ -174,9 +174,9 @@ contains char(ichar('A')+ich-1) end if else - write(*,1000) utc ,snr, dt, freq + write(*,1000) utc,snr,dt,freq end if -1000 format(i4.4,i4,f5.2,i5,1x,a1,1x,a22,a2,1x,a1,i3) +1000 format(i4.4,i4,f5.2,i5,1x,'$',a1,1x,a22,a2,1x,a1,i3) select type(this) type is (counting_jt4_decoder) this%decoded = this%decoded + 1