w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-09-27 07:36:38 -04:00
Code Issues Packages Projects Releases Wiki Activity

Fix a bug in split77.

Browse Source
This commit is contained in:
Joe Taylor 2018-07-07 09:54:34 -04:00
parent 7e8c177034
commit d3c9d29214
2 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lib/77bit/packjt77.f90
View File

@ -668,9 +668,10 @@ subroutine split77(msg,nwords,nw,w)
enddo
iz=j !Message length
nwords=k !Number of words in msg
if(nwords.le.0) go to 900
nw(k)=len(trim(w(k)))
msg(iz+1:)=' '
if(nwords.lt.3) go to 900
call chkcall(w(3),bcall_1,ok1)
if(ok1 .and. w(1)(1:3).eq.'CQ ') then
w(1)='CQ_'//w(2)(1:10)
@ -678,7 +679,7 @@ subroutine split77(msg,nwords,nw,w)
nwords=nwords-1
endif
return
900 return
end subroutine split77

4
mainwindow.cpp
View File

@ -3678,8 +3678,8 @@ void MainWindow::guiUpdate()
//Once per second:
if(nsec != m_sec0) {
qDebug() << "OneSec:" << m_config.bGenerate77() << m_config.bDecode77()
<< m_config.FieldDayExchange() << m_config.RTTYExchange();
// qDebug() << "OneSec:" << m_config.bGenerate77() << m_config.bDecode77()
// << m_config.FieldDayExchange() << m_config.RTTYExchange();
if(m_freqNominal!=0 and m_freqNominal<50000000 and m_config.enable_VHF_features()) {
if(!m_bVHFwarned) vhfWarning();
} else {