From 3fc573f4e163054c17a95b66277358bce1876a73 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Wed, 25 Sep 2024 10:20:26 -0400
Subject: [PATCH] Allow sfoxsim to generate "CQ <FoxCall> FN20" messages.

---
 lib/superfox/sfoxsim.f90 | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lib/superfox/sfoxsim.f90 b/lib/superfox/sfoxsim.f90
index 6e22652a1..86f7019e6 100644
--- a/lib/superfox/sfoxsim.f90
+++ b/lib/superfox/sfoxsim.f90
@@ -107,6 +107,8 @@ program sfoxsim
 !  write(*,*) 'Debug ',cmsg(i)
   enddo
 
+  if((nh1+nh2).eq.0 .and. bMoreCQs) cmsg(1)='CQ '//trim(foxcall)//' FN20'
+
 ! Generate a SuperFox message
   nslots=5
   call foxgen2(nslots,cmsg,line,foxcall)      !Parse old-style Fox messages