From 868d33ebd2c90da25d7a874f2ec9d0025d218712 Mon Sep 17 00:00:00 2001
From: Jonathan Naylor <naylorjs@yahoo.com>
Date: Fri, 24 Apr 2020 15:00:40 +0100
Subject: [PATCH] Rescale the CTCSS TX level.

---
 FMCTCSSTX.cpp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/FMCTCSSTX.cpp b/FMCTCSSTX.cpp
index ce11d9f..4318c67 100644
--- a/FMCTCSSTX.cpp
+++ b/FMCTCSSTX.cpp
@@ -106,7 +106,7 @@ uint8_t CFMCTCSSTX::setParams(uint8_t frequency, uint8_t level)
 
   q15_t arg = 0;
   for (uint16_t i = 0U; i < m_length; i++) {
-    q31_t value = ::arm_sin_q15(arg) * q15_t(level * 1280);
+    q31_t value = ::arm_sin_q15(arg) * q15_t(level * 13);
     m_values[i] = q15_t(__SSAT((value >> 15), 16));
 
     arg += entry->increment;