w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-09-01 04:37:50 -04:00
Code Issues Packages Projects Releases Wiki Activity

Formatting updates for program CABLOG.

Browse Source
This commit is contained in:
Joe Taylor 2023-12-01 09:35:53 -05:00
parent b986c7c81c
commit f6989c3e6c
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lib/cablog.f90
View File

@ -11,13 +11,15 @@ program cablog
nargs=iargc() nargs=iargc()
if(nargs.ne.4) then if(nargs.ne.4) then
print*,"Program cablog converts the file 'wsjtx.log' to a bare-bones" print*,"Program cablog converts file 'wsjtx.log' written by WSJT-X"
print*,"Cabrillo log for the ARRL International EME Contest. You will" print*,"(or wsjt.log written by MAP65) to a bare-bones Cabrillo"
print*,"log for the ARRL International EME Contest. You will"
print*,"certainly need to edit the header information, and you may" print*,"certainly need to edit the header information, and you may"
print*,"edit the log elsewhere as required." print*,"edit the log elsewhere as required."
print*,' ' print*,' '
print*,'Usage: cablog <MyCall> <sent> <rcvd> <infile>' print*,'Usage: cablog <MyCall> <sent> <rcvd> <infile>'
print*,'Example: cablog W2ZQ -15 -16 wsjtx.log' print*,'Examples: cablog W2ZQ -15 -16 wsjtx.log'
print*,' cablog W2ZQ O O wsjt.log'
go to 999 go to 999
endif endif
call getarg(1,mycall) call getarg(1,mycall)