Version 0.99

2026-01-16 22:31:52 +00:00 · 2009-03-24 22:41:14 -04:00
commit 6485746ee9
218 changed files with 13786 additions and 0 deletions
--- a/DrumSynt.cpp
+++ b/DrumSynt.cpp
@@ -0,0 +1,164 @@
+/*******************************************/
+/*  Master Class for Drum Synthesizer      */
+/*  by Perry R. Cook, 1995-96              */ 
+/*  This instrument contains a bunch of    */
+/*  RawWvIn objects (Non-Interpolating,   */
+/*  1 shot players), run through a bunch   */
+/*  of one-pole filters.  You can specify  */
+/*  the maximum Polyphony (maximum number  */
+/*  of simultaneous voices) in a #define   */
+/*  in the .h file.  			   */
+/*******************************************/
+
+#include "DrumSynt.h"
+#include <string.h>
+
+char waveNames[DRUM_NUMWAVES][16] = { 
+    "bass.raw",
+    "snar.raw",
+    "tomlow.raw",
+    "tommid.raw",
+    "tomhi.raw",
+    "hat.raw",
+    "ride.raw",
+    "crash.raw", 
+    "cowbell.raw", 
+    "tamb.raw"
+};
+
+DrumSynt :: DrumSynt() : Object()
+{
+    int i;
+/*    char temp[64];                            */
+
+/*    for (i=0;i<DRUM_NUMWAVES;i++)  {          */
+/*        strcpy(temp,"rawwaves/drumwavs/");    */
+/*        strcat(temp,waveNames[i]);            */
+/*        waves[i] = new RawWvIn(temp);         */
+/*        waves[i]->finish();                   */
+/*        waves[i]->normalize(0.2);             */
+/*    }                                         */
+    
+    for (i=0;i<DRUM_POLYPHONY;i++)   {
+        filters[i] = new OnePole;
+        sounding[i] = -1;
+/*        filtSounding[i] = -1;                 */
+    }                 
+    numSounding = 0;      /*  This counts the number */
+                          /*  of sounding voices     */
+}  
+
+void DrumSynt :: noteOn(int noteNum, int vel)
+{
+    int i,notDone;
+    char tempString[64];
+    RawWvIn *tempWv;
+    OnePole *tempFilt;
+    
+    printf("NoteOn: %s vel=%i\n",waveNames[noteNum],vel);
+    
+    notDone = -1;
+    for (i=0;i<DRUM_POLYPHONY;i++)      {        /* Check first to see     */
+        if (sounding[i] == noteNum) notDone = i; /* if there's already     */
+    }                                            /* one like this sounding */
+    
+    if (notDone<0)        {                      /* If not, then           */
+        if (numSounding == DRUM_POLYPHONY)   {       /* If we're already   */
+            delete waves[0];                         /* at max polyphony,  */
+            filters[0]->clear();                     /* then               */
+            tempWv = waves[0];
+            tempFilt = filters[0];
+            for (i=0;i<DRUM_POLYPHONY-1;i++)   {     /* preempt oldest     */
+                waves[i] = waves[i+1];               /* oldest voice and   */
+                filters[i] = filters[i+1];           /* ripple all down    */
+            }
+            waves[DRUM_POLYPHONY-1] = tempWv;
+            filters[DRUM_POLYPHONY-1] = tempFilt;
+        }    
+        else    {
+            numSounding += 1;                    /* otherwise just add one */
+        }
+
+        sounding[numSounding-1] = noteNum;           /* allocate new wave  */
+        strcpy(tempString,"rawwaves/drumwavs/");
+        strcat(tempString,waveNames[noteNum]);
+        waves[numSounding-1] = new RawWvIn(tempString);
+        waves[numSounding-1]->normalize(0.2);        
+        filters[numSounding-1]->setPole(0.999 - (vel / 32.0));
+        filters[numSounding-1]->setGain(vel / 128.0);
+    }
+    else        {
+        waves[notDone]->reset();
+        filters[notDone]->setPole(0.999 - (vel / 32.0));
+        filters[notDone]->setGain(vel / 128.0);
+    }
+    
+    printf("Number Sounding = %i\n",numSounding);
+    for (i=0;i<numSounding;i++) printf(" %i  ",sounding[i]);
+    printf("\n");   
+}
+
+MY_FLOAT DrumSynt :: tick()
+{
+    int i, j, notDone;
+    MY_FLOAT output;
+    OnePole *tempFilt;
+    
+    i = 0;
+    notDone = 1;
+    output = 0.0;
+    
+    if (numSounding == 0) notDone = 0;
+    while (notDone && (i < numSounding))     {
+        
+        output += waves[i]->lastOut();
+        
+        if (waves[i]->informTick() == 1)     {
+  
+ printf("Wave %i %i down here\n",i,sounding[i]);
+        
+            delete waves[i];
+	    tempFilt = filters[i];
+    
+            for (j=i;j<numSounding-1;j++) {
+                sounding[j] = sounding[j+1];
+                waves[j] = waves[j+1];
+                filters[j] = filters[j+1];
+            }
+            filters[j] = tempFilt;
+            filters[j]->clear();
+            sounding[j] = -1;
+            numSounding -= 1;
+            if (numSounding == 0) notDone = 0;
+            i -= 1;
+        }
+        i++;
+    }    
+    
+    return output;
+}
+
+/**************  Test Main Program  *********************/
+
+#include "miditabl.h"
+#include "RawWvOut.h"
+#include "Reverb.h"
+#include "Noise.h"
+
+int main()
+{
+    long i,j;
+    DrumSynt instrument;    
+    RawWvOut output("test.snd");
+    Reverb reverb(2137);
+    Noise noise;
+
+    for (j=0;j<100;j++) {
+        i = (int) (fabs(noise.tick()) * DRUM_NUMWAVES);
+	instrument.noteOn(i,127);
+        for (i=0;i<2000;i++) output.tick(reverb.tick(instrument.tick()));
+    }
+
+    for (i=0;i<22000;i++) output.tick(reverb.tick(instrument.tick()));
+
+}