]> git.mxchange.org Git - flightgear.git/blobdiff - src/Sound/morse.cxx
Latest JSBSim changes.
[flightgear.git] / src / Sound / morse.cxx
index ae9509d88a86a43e75408afe2ae558879d66be2d..507cf54eb0f858ca8128cd79d0e506d973d2156e 100644 (file)
@@ -21,6 +21,8 @@
 // $Id$
 
 
+#include <simgear/constants.h>
+
 #include "morse.hxx"
 
 
@@ -63,155 +65,65 @@ FGMorse::~FGMorse() {
 }
 
 
-// allocate and initialize sound samples
-bool FGMorse::init() {
+// Make a tone of specified freq and total_len with trans_len ramp in
+// and out and only the first len bytes with sound, the rest with
+// silence
+void make_tone( unsigned char *buf, int freq, 
+               int len, int total_len, int trans_len )
+{
     int i, j;
 
-    // Make Low DIT
-    for ( i = 0; i < TRANSITION_BYTES; ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI
-                            / (8000.0 / LO_FREQUENCY) ) )
-           * ((double)i / TRANSITION_BYTES)
-           / 2.0 + 0.5;
+    for ( i = 0; i < trans_len; ++i ) {
+       float level = ( sin( (double) i * 2.0 * SGD_PI / (8000.0 / freq) ) )
+           * ((double)i / trans_len) / 2.0 + 0.5;
 
        /* Convert to unsigned byte */
-       lo_dit[ i ] = (unsigned char) ( level * 255.0 ) ;
+       buf[ i ] = (unsigned char) ( level * 255.0 ) ;
     }
 
-    for ( i = TRANSITION_BYTES;
-         i < DIT_SIZE - TRANSITION_BYTES - COUNT_SIZE; ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI
-                            / (8000.0 / LO_FREQUENCY) ) )
+    for ( i = trans_len; i < len - trans_len; ++i ) {
+       float level = ( sin( (double) i * 2.0 * SGD_PI / (8000.0 / freq) ) )
            / 2.0 + 0.5;
 
        /* Convert to unsigned byte */
-       lo_dit[ i ] = (unsigned char) ( level * 255.0 ) ;
+       buf[ i ] = (unsigned char) ( level * 255.0 ) ;
     }
-    j = TRANSITION_BYTES;
-    for ( i = DIT_SIZE - TRANSITION_BYTES - COUNT_SIZE;
-         i < DIT_SIZE - COUNT_SIZE;
-         ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI
-                            / (8000.0 / LO_FREQUENCY) ) )
-           * ((double)j / TRANSITION_BYTES) / 2.0 + 0.5;
+    j = trans_len;
+    for ( i = len - trans_len; i < len; ++i ) {
+       float level = ( sin( (double) i * 2.0 * SGD_PI / (8000.0 / freq) ) )
+           * ((double)j / trans_len) / 2.0 + 0.5;
        --j;
 
        /* Convert to unsigned byte */
-       lo_dit[ i ] = (unsigned char) ( level * 255.0 ) ;
+       buf[ i ] = (unsigned char) ( level * 255.0 ) ;
     }
-    for ( i = DIT_SIZE - COUNT_SIZE; i < DIT_SIZE; ++i ) {
-       lo_dit[ i ] = (unsigned char) ( 0.5 * 255.0 ) ;
-    }
-
-    // Make High DIT
-    for ( i = 0; i < TRANSITION_BYTES; ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI
-                            / (8000.0 / HI_FREQUENCY)) )
-           * ((double)i / TRANSITION_BYTES) / 2.0 + 0.5;
-
-       /* Convert to unsigned byte */
-       hi_dit[ i ] = (unsigned char) ( level * 255.0 ) ;
+    for ( i = len; i < total_len; ++i ) {
+       buf[ i ] = (unsigned char) ( 0.5 * 255.0 ) ;
     }
+}
 
-    for ( i = TRANSITION_BYTES;
-         i < DIT_SIZE - TRANSITION_BYTES - COUNT_SIZE; ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI
-                            / (8000.0 / HI_FREQUENCY) ) )
-           / 2.0 + 0.5;
 
-       /* Convert to unsigned byte */
-       hi_dit[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-    j = TRANSITION_BYTES;
-    for ( i = DIT_SIZE - TRANSITION_BYTES - COUNT_SIZE;
-         i < DIT_SIZE - COUNT_SIZE;
-         ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI
-                            / (8000.0 / HI_FREQUENCY) ) )
-           * ((double)j / TRANSITION_BYTES) / 2.0 + 0.5;
-       --j;
+// allocate and initialize sound samples
+bool FGMorse::init() {
+    // Make Low DIT
+    make_tone( lo_dit, LO_FREQUENCY, DIT_SIZE - COUNT_SIZE, DIT_SIZE,
+              TRANSITION_BYTES );
 
-       /* Convert to unsigned byte */
-       hi_dit[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-    for ( i = DIT_SIZE - COUNT_SIZE; i < DIT_SIZE; ++i ) {
-       hi_dit[ i ] = (unsigned char) ( 0.5 * 255.0 ) ;
-    }
+    // Make High DIT
+    make_tone( hi_dit, HI_FREQUENCY, DIT_SIZE - COUNT_SIZE, DIT_SIZE,
+              TRANSITION_BYTES );
 
     // Make Low DAH
-    for ( i = 0; i < TRANSITION_BYTES; ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI
-                            / (8000.0 / LO_FREQUENCY) ) )
-           * ((double)i / TRANSITION_BYTES) / 2.0 + 0.5;
-
-       /* Convert to unsigned byte */
-       lo_dah[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-
-    for ( i = TRANSITION_BYTES;
-         i < DAH_SIZE - TRANSITION_BYTES - COUNT_SIZE;
-         ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI
-                            / (8000.0 / LO_FREQUENCY) ) )
-           / 2.0 + 0.5;
-
-       /* Convert to unsigned byte */
-       lo_dah[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-    j = TRANSITION_BYTES;
-    for ( int i = DAH_SIZE - TRANSITION_BYTES - COUNT_SIZE;
-         i < DAH_SIZE - COUNT_SIZE;
-         ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI
-                            / (8000.0 / LO_FREQUENCY) ) )
-           * ((double)j / TRANSITION_BYTES) / 2.0 + 0.5;
-       --j;
-
-       /* Convert to unsigned byte */
-       lo_dah[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-    for ( int i = DAH_SIZE - COUNT_SIZE; i < DAH_SIZE; ++i ) {
-       lo_dah[ i ] = (unsigned char) ( 0.5 * 255.0 ) ;
-    }
+    make_tone( lo_dah, LO_FREQUENCY, DAH_SIZE - COUNT_SIZE, DAH_SIZE,
+              TRANSITION_BYTES );
 
     // Make High DAH
-    for ( i = 0; i < TRANSITION_BYTES; ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI
-                            / (8000.0 / HI_FREQUENCY) ) )
-           * ((double)i / TRANSITION_BYTES) / 2.0 + 0.5;
-
-       /* Convert to unsigned byte */
-       hi_dah[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-
-    for ( i = TRANSITION_BYTES;
-         i < DAH_SIZE - TRANSITION_BYTES - COUNT_SIZE;
-         ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI
-                            / (8000.0 / HI_FREQUENCY) ) )
-           / 2.0 + 0.5;
-
-       /* Convert to unsigned byte */
-       hi_dah[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-    j = TRANSITION_BYTES;
-    for ( int i = DAH_SIZE - TRANSITION_BYTES - COUNT_SIZE;
-         i < DAH_SIZE - COUNT_SIZE;
-         ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI
-                            / (8000.0 / HI_FREQUENCY) ) )
-           * ((double)j / TRANSITION_BYTES) / 2.0 + 0.5;
-       --j;
-
-       /* Convert to unsigned byte */
-       hi_dah[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-    for ( int i = DAH_SIZE - COUNT_SIZE; i < DAH_SIZE; ++i ) {
-       hi_dah[ i ] = (unsigned char) ( 0.5 * 255.0 ) ;
-    }
+    make_tone( hi_dah, HI_FREQUENCY, DAH_SIZE - COUNT_SIZE, DAH_SIZE,
+              TRANSITION_BYTES );
 
     // Make SPACE
-    for ( int i = 0; i < SPACE_SIZE; ++i ) {
+    int i;
+    for ( i = 0; i < SPACE_SIZE; ++i ) {
        space[ i ] = (unsigned char) ( 0.5 * 255 ) ;
     }
 
@@ -221,75 +133,18 @@ bool FGMorse::init() {
 
 // allocate and initialize sound samples
 bool FGMorse::cust_init(const int freq ) {
-    int i, j;
+    int i;
 
     // Make DIT
-    for ( i = 0; i < TRANSITION_BYTES; ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI / (8000.0 / freq)) )
-           * ((double)i / TRANSITION_BYTES) / 2.0 + 0.5;
-
-       /* Convert to unsigned byte */
-       cust_dit[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-
-    for ( i = TRANSITION_BYTES;
-         i < DIT_SIZE - TRANSITION_BYTES - COUNT_SIZE; ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI / (8000.0 / freq) ) )
-           / 2.0 + 0.5;
-
-       /* Convert to unsigned byte */
-       cust_dit[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-    j = TRANSITION_BYTES;
-    for ( i = DIT_SIZE - TRANSITION_BYTES - COUNT_SIZE;
-         i < DIT_SIZE - COUNT_SIZE;
-         ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI / (8000.0 / freq) ) )
-           * ((double)j / TRANSITION_BYTES) / 2.0 + 0.5;
-       --j;
-
-       /* Convert to unsigned byte */
-       cust_dit[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-    for ( i = DIT_SIZE - COUNT_SIZE; i < DIT_SIZE; ++i ) {
-       cust_dit[ i ] = (unsigned char) ( 0.5 * 255.0 ) ;
-    }
+    make_tone( cust_dit, freq, DIT_SIZE - COUNT_SIZE, DIT_SIZE,
+              TRANSITION_BYTES );
 
     // Make DAH
-    for ( i = 0; i < TRANSITION_BYTES; ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI / (8000.0 / freq) ) )
-           * ((double)i / TRANSITION_BYTES) / 2.0 + 0.5;
-
-       /* Convert to unsigned byte */
-       cust_dah[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-
-    for ( i = TRANSITION_BYTES;
-         i < DAH_SIZE - TRANSITION_BYTES - COUNT_SIZE;
-         ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI / (8000.0 / freq) ) )
-           / 2.0 + 0.5;
-
-       /* Convert to unsigned byte */
-       cust_dah[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-    j = TRANSITION_BYTES;
-    for ( int i = DAH_SIZE - TRANSITION_BYTES - COUNT_SIZE;
-         i < DAH_SIZE - COUNT_SIZE;
-         ++i ) {
-       float level = ( sin( (double) i * 2.0 * M_PI / (8000.0 / freq) ) )
-           * ((double)j / TRANSITION_BYTES) / 2.0 + 0.5;
-       --j;
-
-       /* Convert to unsigned byte */
-       cust_dah[ i ] = (unsigned char) ( level * 255.0 ) ;
-    }
-    for ( int i = DAH_SIZE - COUNT_SIZE; i < DAH_SIZE; ++i ) {
-       cust_dah[ i ] = (unsigned char) ( 0.5 * 255.0 ) ;
-    }
+    make_tone( cust_dah, freq, DAH_SIZE - COUNT_SIZE, DAH_SIZE,
+              TRANSITION_BYTES );
 
     // Make SPACE
-    for ( int i = 0; i < SPACE_SIZE; ++i ) {
+    for ( i = 0; i < SPACE_SIZE; ++i ) {
        space[ i ] = (unsigned char) ( 0.5 * 255 ) ;
     }