mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-04-11 22:08:32 -04:00
Display sine-wave frequency for QRA64 "@nnnn" messages.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7326 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
76e8f5ec85
commit
b1e69292bf
@ -20,6 +20,9 @@ subroutine genqra64(msg0,ichk,msgsent,itone,itype)
|
||||
go to 2
|
||||
1 nfreq=1000
|
||||
2 itone(1)=nfreq
|
||||
write(msgsent,1000) nfreq
|
||||
1000 format(i5,' Hz')
|
||||
print*,'aa ',msgsent
|
||||
else
|
||||
message=msg0
|
||||
do i=1,22
|
||||
|
@ -259,10 +259,10 @@ program jt9
|
||||
shared_data%params%dttol=3.
|
||||
|
||||
shared_data%params%minsync=0 !### TEST ONLY
|
||||
! shared_data%params%nfqso=1500 !### TEST ONLY
|
||||
! shared_data%params%nfqso=1500 !### TEST ONLY
|
||||
mycall="G3WDG " !### TEST ONLY
|
||||
hiscall="VK7MO " !### TEST ONLY
|
||||
mycall="QE37 " !### TEST ONLY
|
||||
hisgrid="QE37 " !### TEST ONLY
|
||||
if(mode.eq.164 .and. nsubmode.lt.100) nsubmode=nsubmode+100
|
||||
|
||||
shared_data%params%naggressive=10
|
||||
|
Loading…
Reference in New Issue
Block a user