From 1d7e86bc3536a94c198b877080c8e0691f63c23d Mon Sep 17 00:00:00 2001 From: Bill Somerville Date: Tue, 21 Jun 2016 00:13:52 +0000 Subject: [PATCH] Binary branding git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6786 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 --- lib/decode65a.f90 | 3 ++- lib/sync9.f90 | 2 ++ lib/wsprd/wsprd.c | 2 ++ 3 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lib/decode65a.f90 b/lib/decode65a.f90 index 974efc584..8a7f3cd80 100644 --- a/lib/decode65a.f90 +++ b/lib/decode65a.f90 @@ -18,7 +18,8 @@ subroutine decode65a(dd,npts,newdat,nqd,f0,nflip,mode65,ntrials, & logical single_decode,first character decoded*22,decoded_best*22 character mycall*12,hiscall*12,hisgrid*6 - data first/.true./,jjjmin/1000/,jjjmax/-1000/ + character*27 cr + data first/.true./,jjjmin/1000/,jjjmax/-1000/,cr/'(C) 2016, Joe Taylor - K1JT'/ save ! Mix sync tone to baseband, low-pass filter, downsample to 1378.125 Hz diff --git a/lib/sync9.f90 b/lib/sync9.f90 index a757d8c7f..635c1b565 100644 --- a/lib/sync9.f90 +++ b/lib/sync9.f90 @@ -9,6 +9,8 @@ subroutine sync9(ss,nzhsym,lag1,lag2,ia,ib,ccfred,red2,ipkbest) real smo(-5:25) real sq(NSMAX) real red2(NSMAX) + character*27 cr + data cr/'(C) 2016, Joe Taylor - K1JT'/ include 'jt9sync.f90' ipk=0 diff --git a/lib/wsprd/wsprd.c b/lib/wsprd/wsprd.c index 8d2288db6..09bdb9af5 100644 --- a/lib/wsprd/wsprd.c +++ b/lib/wsprd/wsprd.c @@ -570,6 +570,8 @@ void usage(void) //*************************************************************************** int main(int argc, char *argv[]) { + char cr[] = "(C) 2016, Steven Franke - K9AN"; + (void)cr; extern char *optarg; extern int optind; int i,j,k;