From 2f600ae198b6a3f6370354753a507c63da1a9902 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Sat, 2 Mar 2024 16:01:55 -0500
Subject: [PATCH] Functional with bare-bones sfox_tx executable.

---
 lib/superfox/sfox_assemble.f90 | 2 +-
 lib/superfox/sfox_tx.f90       | 9 +++++++++
 widgets/mainwindow.cpp         | 4 +++-
 3 files changed, 13 insertions(+), 2 deletions(-)
 create mode 100644 lib/superfox/sfox_tx.f90

diff --git a/lib/superfox/sfox_assemble.f90 b/lib/superfox/sfox_assemble.f90
index acaea3247..1ea1834f5 100644
--- a/lib/superfox/sfox_assemble.f90
+++ b/lib/superfox/sfox_assemble.f90
@@ -77,7 +77,7 @@ subroutine sfox_assemble(ntype,k,msg,mycall0,mygrid0,line)
            line=trim(line)//'  '//trim(hiscall(i))//' '//rpt2(i)
         enddo
         do i=1,nmsg(2)
-           line=trim(line)//'  '//trim(hiscall(i))
+           line=trim(line)//'  '//trim(hiscall(i+5))
         enddo
      endif
 
diff --git a/lib/superfox/sfox_tx.f90 b/lib/superfox/sfox_tx.f90
new file mode 100644
index 000000000..431e9985c
--- /dev/null
+++ b/lib/superfox/sfox_tx.f90
@@ -0,0 +1,9 @@
+program sfox_tx
+
+  character*120 line
+
+  call getarg(1,line)
+  write(*,1000) trim(line)
+1000 format(a)
+  
+end program sfox_tx
diff --git a/widgets/mainwindow.cpp b/widgets/mainwindow.cpp
index 822b4b95a..b59d35d38 100644
--- a/widgets/mainwindow.cpp
+++ b/widgets/mainwindow.cpp
@@ -10304,7 +10304,7 @@ Transmit:
   QString foxCall=m_config.my_callsign() + "         ";
   ::memcpy(foxcom_.mycall, foxCall.toLatin1(),sizeof foxcom_.mycall);   //Copy Fox callsign into foxcom_
   bool bSuperFox=m_config.superFox();
-  qDebug() << "bb" << foxcom_.nslots << foxcom_.mycall << foxcom_.cmsg[0];
+//  qDebug() << "bb" << foxcom_.nslots << foxcom_.mycall << foxcom_.cmsg[0];
   char cmnd[120];
   foxgen_(&bSuperFox, cmnd, 120);
   if(bSuperFox) {
@@ -10892,5 +10892,7 @@ void MainWindow::sfox_tx(QString t)
   p2.start("sfox_tx", QStringList {t});
   p2.waitForFinished();
   QString t2=p2.readAllStandardOutput();
+  t2=t2.left(t2.length()-2);
 //  qDebug() << "aa" << QDateTime::currentMSecsSinceEpoch() - ms0 << t2;
+  qDebug() << "aa" << t2;
 }