w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-22 12:23:37 -05:00
Code Issues Packages Projects Releases Wiki Activity

Work-in-progress with Fox-mode code. Contains incomplete and untested code!

Browse Source 
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@8270 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2017-11-30 18:45:51 +00:00
parent bc31f581bd
commit 00e0d76fc2
5 changed files with 199 additions and 105 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
commons.h
View File

@ -81,6 +81,8 @@ extern struct {
extern struct { extern struct {
float wave[606720]; float wave[606720];
int nslots;
char cmsg[5][32];
} foxcom_; } foxcom_;
#ifdef __cplusplus #ifdef __cplusplus

10
lib/ft8/foxgen.f90
View File

@ -1,8 +1,9 @@
subroutine foxgen(mycall,mygrid6,nslots,t) subroutine foxgen(mycall,mygrid6,t)
parameter (NN=79,KK=87,NSPS=4*1920) parameter (NN=79,KK=87,NSPS=4*1920)
parameter (NWAVE=NN*NSPS,NFFT=614400,NH=NFFT/2) parameter (NWAVE=NN*NSPS,NFFT=614400,NH=NFFT/2)
character*(*) t character*(*) t
character*32 cmsg
character*22 msg,msgsent character*22 msg,msgsent
character*12 t1 character*12 t1
character*6 mycall,mygrid6,mygrid,call1,call2 character*6 mycall,mygrid6,mygrid,call1,call2
@ -10,15 +11,14 @@ subroutine foxgen(mycall,mygrid6,nslots,t)
integer itone(NN) integer itone(NN)
integer*1 msgbits(KK) integer*1 msgbits(KK)
integer*8 count0,count1,clkfreq integer*8 count0,count1,clkfreq
real wave(NWAVE)
real x(NFFT),y(NFFT) real x(NFFT),y(NFFT)
real*8 dt,twopi,f0,fstep,dfreq,phi,dphi real*8 dt,twopi,f0,fstep,dfreq,phi,dphi
complex cx(0:NH),cy(0:NH) complex cx(0:NH),cy(0:NH)
common/foxcom/wave common/foxcom/wave(NWAVE),nslots,cmsg(5)
equivalence (x,cx),(y,cy) equivalence (x,cx),(y,cy)
mygrid=mygrid6(1:4)//' ' mygrid=mygrid6(1:4)//' '
print*,mycall,' ',mygrid6,' ',nslots,len(t),t ! print*,mycall,' ',mygrid6,' ',nslots,len(t),t
call system_clock(count0,clkfreq) call system_clock(count0,clkfreq)
bcontest=.false. bcontest=.false.
i3bit=0 i3bit=0
@ -38,7 +38,7 @@ subroutine foxgen(mycall,mygrid6,nslots,t)
endif endif
call2=t(ia+11:ia+16) call2=t(ia+11:ia+16)
read(t(ia+18:ia+21),*) irpt2 read(t(ia+18:ia+21),*) irpt2
print*,n,call1,irpt1,call2,irpt2 ! print*,n,call1,irpt1,call2,irpt2
call genft8(msg,mygrid,bcontest,i3bit,msgsent,msgbits,itone) call genft8(msg,mygrid,bcontest,i3bit,msgsent,msgbits,itone)

80
mainwindow.cpp
View File

@ -135,7 +135,7 @@ extern "C" {
void calibrate_(char data_dir[], int* iz, double* a, double* b, double* rms, void calibrate_(char data_dir[], int* iz, double* a, double* b, double* rms,
double* sigmaa, double* sigmab, int* irc, int len1); double* sigmaa, double* sigmab, int* irc, int len1);
void foxgen_(char* mycall, char* mygrid, int* nslots, char* tb3, int len1, int len2, int len3); void foxgen_(char* mycall, char* mygrid, char* tb3, int len1, int len2, int len3);
} }
int volatile itone[NUM_ISCAT_SYMBOLS]; //Audio tones for all Tx symbols int volatile itone[NUM_ISCAT_SYMBOLS]; //Audio tones for all Tx symbols
@ -1159,6 +1159,10 @@ void MainWindow::setDecodedTextFont (QFont const& font)
ui->decodedTextBrowser2->setContentFont (font); ui->decodedTextBrowser2->setContentFont (font);
ui->textBrowser3->setContentFont(font); ui->textBrowser3->setContentFont(font);
ui->textBrowser4->setContentFont(font); ui->textBrowser4->setContentFont(font);
ui->textBrowser3->displayFoxToBeCalled(" ","#ffffff");
ui->textBrowser4->displayFoxToBeCalled(" ","#ffffff");
ui->textBrowser3->setText("");
ui->textBrowser4->setText("");
auto style_sheet = "QLabel {" + font_as_stylesheet (font) + '}'; auto style_sheet = "QLabel {" + font_as_stylesheet (font) + '}';
ui->decodedTextLabel->setStyleSheet (ui->decodedTextLabel->styleSheet () + style_sheet); ui->decodedTextLabel->setStyleSheet (ui->decodedTextLabel->styleSheet () + style_sheet);
ui->decodedTextLabel2->setStyleSheet (ui->decodedTextLabel2->styleSheet () + style_sheet); ui->decodedTextLabel2->setStyleSheet (ui->decodedTextLabel2->styleSheet () + style_sheet);
@ -1719,18 +1723,6 @@ void MainWindow::keyPressEvent (QKeyEvent * e)
{ {
if(m_config.bFox()) { if(m_config.bFox()) {
switch (e->key()) { switch (e->key()) {
case Qt::Key_7:
if(m_isort>-4) m_isort--;
return;
case Qt::Key_8:
if(m_isort<4) m_isort++;
return;
case Qt::Key_9:
if(m_max_dB > -15) m_max_dB--;
return;
case Qt::Key_0:
if(m_max_dB < 30) m_max_dB++;
return;
case Qt::Key_Return: case Qt::Key_Return:
doubleClickOnCall2(Qt::KeyboardModifier(Qt::ShiftModifier + Qt::ControlModifier + Qt::AltModifier)); doubleClickOnCall2(Qt::KeyboardModifier(Qt::ShiftModifier + Qt::ControlModifier + Qt::AltModifier));
return; return;
@ -1738,7 +1730,7 @@ void MainWindow::keyPressEvent (QKeyEvent * e)
doubleClickOnCall2(Qt::KeyboardModifier(Qt::ShiftModifier + Qt::ControlModifier + Qt::AltModifier)); doubleClickOnCall2(Qt::KeyboardModifier(Qt::ShiftModifier + Qt::ControlModifier + Qt::AltModifier));
return; return;
case Qt::Key_Backspace: case Qt::Key_Backspace:
qDebug() << "a" << m_toBeCalled; qDebug() << "Key Backspace" << m_toBeCalled;
return; return;
} }
QMainWindow::keyPressEvent (e); QMainWindow::keyPressEvent (e);
@ -2756,7 +2748,6 @@ void MainWindow::decodeDone ()
QFile f(m_config.temp_dir().absoluteFilePath("foxcalls.txt")); QFile f(m_config.temp_dir().absoluteFilePath("foxcalls.txt"));
if(f.open(QIODevice::ReadOnly | QIODevice::Text)) { if(f.open(QIODevice::ReadOnly | QIODevice::Text)) {
QTextStream s(&f); QTextStream s(&f);
// QString t=s.readAll();
QString t=""; QString t="";
QString t0; QString t0;
QString c2; QString c2;
@ -2767,7 +2758,7 @@ void MainWindow::decodeDone ()
b=false; b=false;
if(ui->textBrowser3->toPlainText().indexOf(c2) >= 0) b=true; if(ui->textBrowser3->toPlainText().indexOf(c2) >= 0) b=true;
if(ui->textBrowser4->toPlainText().indexOf(c2) >= 0) b=true; if(ui->textBrowser4->toPlainText().indexOf(c2) >= 0) b=true;
if(!b) t += (t0 + "\n"); //Don't include calls already in the queue if(!b) t += (t0 + "\n"); //Don't list calls already in QSO or in the stack
} }
if(t.length()>30) { if(t.length()>30) {
m_isort=ui->comboBoxFoxSort->currentIndex(); m_isort=ui->comboBoxFoxSort->currentIndex();
@ -2812,14 +2803,7 @@ void MainWindow::readFromStdout() //readFromStdout
if(navg>1 or t.indexOf("f*")>0) bAvgMsg=true; if(navg>1 or t.indexOf("f*")>0) bAvgMsg=true;
} }
} }
/*
if(m_mode=="FT8" and m_bDXped) {
int i3bit=t.mid(44,1).toInt();
t=t.mid(0,44) + " " + t.mid(45);
if(i3bit==1) t=t.mid(0,24) + "RR73 NOW " + t.mid(24);
if(i3bit==2) t=t.mid(0,24) + "NIL NOW " + t.mid(24);
}
*/
QFile f {m_config.writeable_data_dir ().absoluteFilePath ("ALL.TXT")}; QFile f {m_config.writeable_data_dir ().absoluteFilePath ("ALL.TXT")};
if (f.open(QIODevice::WriteOnly | QIODevice::Text | QIODevice::Append)) { if (f.open(QIODevice::WriteOnly | QIODevice::Text | QIODevice::Append)) {
QTextStream out(&f); QTextStream out(&f);
@ -2849,6 +2833,8 @@ void MainWindow::readFromStdout() //readFromStdout
DecodedText decodedtext {QString::fromUtf8 (t.constData ()).remove (QRegularExpression {"\r|\n"}), "FT8" == m_mode && DecodedText decodedtext {QString::fromUtf8 (t.constData ()).remove (QRegularExpression {"\r|\n"}), "FT8" == m_mode &&
ui->cbVHFcontest->isChecked(), m_config.my_grid ()}; ui->cbVHFcontest->isChecked(), m_config.my_grid ()};
if(m_mode=="FT8" and m_config.bFox()) {
QString c2,g2; QString c2,g2;
decodedtext.deCallAndGrid(/*out*/c2,g2); decodedtext.deCallAndGrid(/*out*/c2,g2);
if(g2.mid(0,2)=="R+" or g2.mid(0,2)=="R-") { if(g2.mid(0,2)=="R+" or g2.mid(0,2)=="R-") {
@ -2872,6 +2858,7 @@ void MainWindow::readFromStdout() //readFromStdout
} }
} }
} }
}
//Left (Band activity) window //Left (Band activity) window
if(!bAvgMsg) { if(!bAvgMsg) {
@ -3231,6 +3218,7 @@ void MainWindow::guiUpdate()
} }
} }
// Calculate Tx tones when needed // Calculate Tx tones when needed
if((g_iptt==1 && m_iptt0==0) || m_restart) { if((g_iptt==1 && m_iptt0==0) || m_restart) {
//---------------------------------------------------------------------- //----------------------------------------------------------------------
@ -3268,21 +3256,6 @@ void MainWindow::guiUpdate()
if(m_ntx == 8) ba=ui->freeTextMsg->currentText().toLocal8Bit(); if(m_ntx == 8) ba=ui->freeTextMsg->currentText().toLocal8Bit();
} }
m_i3bit=0;
if(m_mode=="FT8" and m_bDXped) {
ba0=ba;
QString t=QString::fromUtf8(ba0);
if(t.startsWith("RR73 NOW ")) {
t=t.mid(9);
m_i3bit=1;
}
if(t.startsWith("NIL NOW ")) {
t=t.mid(8);
m_i3bit=2;
}
ba=t.toLocal8Bit();
}
ba2msg(ba,message); ba2msg(ba,message);
int ichk=0; int ichk=0;
if (m_lastMessageSent != m_currentMessage if (m_lastMessageSent != m_currentMessage
@ -3328,20 +3301,28 @@ void MainWindow::guiUpdate()
} }
if(m_modeTx=="FT8") { if(m_modeTx=="FT8") {
if(m_config.bFox()) { if(m_config.bFox()) {
int islots=0;
QString msg[5];
QString t1=""; QString t1="";
QString t3=ui->textBrowser3->toPlainText() + "\n"; QString t3=ui->textBrowser3->toPlainText() + "\n";
QString t4=ui->textBrowser4->toPlainText() + "\n"; QString t4=ui->textBrowser4->toPlainText() + "\n";
int nslots=ui->sbNslots->value(); for(int i=0; i<m_Nslots; i++) {
for(int i=0; i<nslots; i++) {
QString t0=t3.split("\n").at(i); QString t0=t3.split("\n").at(i);
if(t0=="") break;
if(t0.length()==10) t0 += " "; if(t0.length()==10) t0 += " ";
t1 += t0; t1 += t0;
t0=t4.split("\n").at(i); QString t2=t4.split("\n").at(i);
if(t0.length()==10) t0 += " "; if(t2=="") break;
t1 += t0; if(t2.length()==10) t2 += " ";
t1 += t2;
islots=i;
} }
int len3=t1.length(); int len3=t1.length();
foxgen_(MyCall, MyGrid, &nslots, const_cast <char *> (t1.toLatin1().constData()),6,6,len3); // qDebug() << "aa" << len3 << t1;
foxcom_.nslots=islots;
if(len3>10) {
foxgen_(MyCall, MyGrid, const_cast <char *> (t1.toLatin1().constData()),6,6,len3);
}
} else { } else {
genft8_(message, MyGrid, &bcontest, &m_i3bit, msgsent, const_cast<char *> (ft8msgbits), genft8_(message, MyGrid, &bcontest, &m_i3bit, msgsent, const_cast<char *> (ft8msgbits),
const_cast<int *> (itone), 22, 6, 22); const_cast<int *> (itone), 22, 6, 22);
@ -7187,3 +7168,12 @@ void MainWindow::on_sbMax_dB_valueChanged(int n)
{ {
m_max_dB=n; m_max_dB=n;
} }
void MainWindow::on_pbFoxReset_clicked()
{
QString t="";
for(int i=0; i<m_Nslots; i++) {
t += ui->comboBoxCQ->currentText() + "\n";
}
ui->textBrowser3->setText(t);
}

1
mainwindow.h
View File

@ -285,6 +285,7 @@ private slots:
void on_sbNsig_valueChanged(int n); void on_sbNsig_valueChanged(int n);
void on_sbNslots_valueChanged(int n); void on_sbNslots_valueChanged(int n);
void on_sbMax_dB_valueChanged(int n); void on_sbMax_dB_valueChanged(int n);
void on_pbFoxReset_clicked();
private: private:
Q_SIGNAL void initializeAudioOutputStream (QAudioDeviceInfo, Q_SIGNAL void initializeAudioOutputStream (QAudioDeviceInfo,

163
mainwindow.ui
View File

@ -1628,32 +1628,98 @@ list. The list can be maintained in Settings (F2).</string>
</item> </item>
<item row="0" column="1" rowspan="2"> <item row="0" column="1" rowspan="2">
<layout class="QGridLayout" name="gridLayout_10"> <layout class="QGridLayout" name="gridLayout_10">
<item row="1" column="0"> <item row="5" column="0">
<widget class="QSpinBox" name="sbNsig"> <widget class="QComboBox" name="comboBoxCQ">
<property name="sizePolicy"> <item>
<sizepolicy hsizetype="Expanding" vsizetype="Fixed"> <property name="text">
<horstretch>0</horstretch> <string>CQ</string>
<verstretch>0</verstretch>
</sizepolicy>
</property> </property>
<property name="maximumSize"> </item>
<size> <item>
<width>16777215</width> <property name="text">
<height>16777215</height> <string>CQ AF</string>
</size>
</property> </property>
<property name="prefix"> </item>
<string>N Sigs </string> <item>
<property name="text">
<string>CQ AN</string>
</property> </property>
<property name="minimum"> </item>
<number>5</number> <item>
<property name="text">
<string>CQ AS</string>
</property> </property>
<property name="maximum"> </item>
<number>100</number> <item>
<property name="text">
<string>CQ EU</string>
</property> </property>
<property name="value"> </item>
<number>12</number> <item>
<property name="text">
<string>CQ NA</string>
</property> </property>
</item>
<item>
<property name="text">
<string>CQ OC</string>
</property>
</item>
<item>
<property name="text">
<string>CQ SA</string>
</property>
</item>
<item>
<property name="text">
<string>CQ 0</string>
</property>
</item>
<item>
<property name="text">
<string>CQ 1</string>
</property>
</item>
<item>
<property name="text">
<string>CQ 2</string>
</property>
</item>
<item>
<property name="text">
<string>CQ 3</string>
</property>
</item>
<item>
<property name="text">
<string>CQ 4</string>
</property>
</item>
<item>
<property name="text">
<string>CQ 5</string>
</property>
</item>
<item>
<property name="text">
<string>CQ 6</string>
</property>
</item>
<item>
<property name="text">
<string>CQ 7</string>
</property>
</item>
<item>
<property name="text">
<string>CQ 8</string>
</property>
</item>
<item>
<property name="text">
<string>CQ 9</string>
</property>
</item>
</widget> </widget>
</item> </item>
<item row="0" column="0"> <item row="0" column="0">
@ -1759,6 +1825,47 @@ list. The list can be maintained in Settings (F2).</string>
</property> </property>
</widget> </widget>
</item> </item>
<item row="1" column="0">
<widget class="QSpinBox" name="sbNsig">
<property name="sizePolicy">
<sizepolicy hsizetype="Expanding" vsizetype="Fixed">
<horstretch>0</horstretch>
<verstretch>0</verstretch>
</sizepolicy>
</property>
<property name="maximumSize">
<size>
<width>16777215</width>
<height>16777215</height>
</size>
</property>
<property name="prefix">
<string>N Sigs </string>
</property>
<property name="minimum">
<number>5</number>
</property>
<property name="maximum">
<number>100</number>
</property>
<property name="value">
<number>12</number>
</property>
</widget>
</item>
<item row="7" column="0">
<spacer name="verticalSpacer_5">
<property name="orientation">
<enum>Qt::Vertical</enum>
</property>
<property name="sizeHint" stdset="0">
<size>
<width>20</width>
<height>40</height>
</size>
</property>
</spacer>
</item>
<item row="3" column="0"> <item row="3" column="0">
<widget class="QSpinBox" name="sbNslots"> <widget class="QSpinBox" name="sbNslots">
<property name="sizePolicy"> <property name="sizePolicy">
@ -1790,18 +1897,12 @@ list. The list can be maintained in Settings (F2).</string>
</property> </property>
</widget> </widget>
</item> </item>
<item row="5" column="0"> <item row="6" column="0">
<spacer name="verticalSpacer_5"> <widget class="QPushButton" name="pbFoxReset">
<property name="orientation"> <property name="text">
<enum>Qt::Vertical</enum> <string>Reset</string>
</property> </property>
<property name="sizeHint" stdset="0"> </widget>
<size>
<width>20</width>
<height>40</height>
</size>
</property>
</spacer>
</item> </item>
</layout> </layout>
</item> </item>