mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-03-31 16:38:35 -04:00
For unknown reasons, AP decode of [CQ ? ?] is not working.
Temporary work-around effectively sets MyCall to "CQ ". git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6930 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
f92afadc6c
commit
2df82d2b12
@ -126,10 +126,14 @@ subroutine qra64a(dd,nf1,nf2,nfqso,ntol,mycall_12,hiscall_12,hisgrid_6, &
|
||||
call packcall(mycall,nmycall,ltext)
|
||||
call packcall(hiscall,nhiscall,ltext)
|
||||
call packgrid(hisgrid,nhisgrid,ltext)
|
||||
call packcall("CQ ",ncq,ltext)
|
||||
nmycall=ncq
|
||||
|
||||
snr2=-99.
|
||||
ttot=0.
|
||||
do naptype=4,0,-1
|
||||
call system_clock(count0,clkfreq)
|
||||
if(naptype.eq.0) nmycall=ncq
|
||||
call qra64_dec(s3,nmycall,nhiscall,nhisgrid,naptype,dat4,snr2,irc)
|
||||
if(irc.ge.0) then
|
||||
call unpackmsg(dat4,decoded) !Unpack the user message
|
||||
|
Loading…
Reference in New Issue
Block a user