w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-03-25 05:29:16 -04:00
Code Issues Packages Projects Releases Wiki Activity

Pass state of "More CQs" checkbox to sftx in cmsg(1)(40:40).

Browse Source
This commit is contained in:
Joe Taylor 2024-03-22 14:00:03 -04:00
parent 0c38d3b83f
commit 2ec0a54d2a
4 changed files with 7 additions and 5 deletions

1
commons.h
View File

@ -93,6 +93,7 @@ extern struct {
int i3bit[5];
char cmsg[5][40];
char mycall[12];
bool bMoreCQs;
} foxcom_;
#ifdef __cplusplus

6
lib/ft8/foxgen.f90
View File

@ -17,7 +17,7 @@ subroutine foxgen(bSuperFox,fname)
parameter (NN=79,ND=58,NSPS=4*1920)
parameter (NWAVE=(160+2)*134400*4) !the biggest waveform we generate (FST4-1800 at 48kHz)
parameter (NFFT=614400,NH=NFFT/2)
logical*1 bSuperFox
logical*1 bSuperFox,bMoreCQs
character*(*) fname
character*40 cmsg
character*37 msg,msgsent
@ -27,12 +27,12 @@ subroutine foxgen(bSuperFox,fname)
real x(NFFT)
real*8 dt,twopi,f0,fstep,dfreq,phi,dphi
complex cx(0:NH)
common/foxcom/wave(NWAVE),nslots,nfreq,i3bit(5),cmsg(5),mycall(12)
common/foxcom/wave(NWAVE),nslots,nfreq,i3bit(5),cmsg(5),mycall(12),bMoreCQs
common/foxcom2/itone2(NN),msgbits2(77)
equivalence (x,cx),(y,cy)
if(bSuperFox) then
! call foxgen2(nslots,cmsg,cmnd)
if(bMoreCQs) cmsg(1)(40:40)='1'
open(25,file=fname,status='unknown')
rewind(25)
write(25,'(a40)') cmsg(1:nslots)

4
lib/ft8/foxgen_wrap.f90
View File

@ -2,12 +2,12 @@ subroutine foxgen_wrap(msg40,msgbits,itone)
parameter (NN=79,ND=58,KK=77,NSPS=4*1920)
parameter (NWAVE=(160+2)*134400*4) !the biggest waveform we generate (FST4-1800)
logical*1 bMoreCQs
character*40 msg40,cmsg
character*12 mycall12
integer*1 msgbits(KK),msgbits2
integer itone(NN)
common/foxcom/wave(NWAVE),nslots,nfreq,i3bit(5),cmsg(5),mycall12
common/foxcom/wave(NWAVE),nslots,nfreq,i3bit(5),cmsg(5),mycall12,bMoreCQs
common/foxcom2/itone2(NN),msgbits2(KK)
nslots=1

1
widgets/mainwindow.cpp
View File

@ -4833,6 +4833,7 @@ void MainWindow::guiUpdate()
::memcpy(foxcom_.mycall, foxCall.toLatin1(), sizeof foxcom_.mycall); //Copy Fox callsign into foxcom_
bool bSuperFox=m_config.superFox();
auto fname {QDir::toNativeSeparators(m_config.writeable_data_dir().absoluteFilePath("sfox_1.dat")).toLocal8Bit()};
foxcom_.bMoreCQs=ui->cbMoreCQs->isChecked();
foxgen_(&bSuperFox, fname.constData(), (FCL)fname.size());
if(bSuperFox) sfox_tx();
}