From 8a2c2824a59d7644e13bc52c9a0ecbd641f21f95 Mon Sep 17 00:00:00 2001
From: Robert Jonsson <spamatica@gmail.com>
Date: Wed, 13 Oct 2010 19:34:22 +0000
Subject: new branch muse2, first checkin

---
 muse2/plugins/freeverb/comb.h | 66 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 66 insertions(+)
 create mode 100644 muse2/plugins/freeverb/comb.h

(limited to 'muse2/plugins/freeverb/comb.h')

diff --git a/muse2/plugins/freeverb/comb.h b/muse2/plugins/freeverb/comb.h
new file mode 100644
index 00000000..d2e0f871
--- /dev/null
+++ b/muse2/plugins/freeverb/comb.h
@@ -0,0 +1,66 @@
+// Comb filter class declaration
+//
+// Written by Jezar at Dreampoint, June 2000
+// http://www.dreampoint.co.uk
+// This code is public domain
+
+#ifndef _comb_
+#define _comb_
+
+#include "denormals.h"
+
+
+//---------------------------------------------------------
+//   comb
+//---------------------------------------------------------
+
+class comb
+      {
+	float	feedback;
+	float	filterstore;
+	float	damp1;
+	float	damp2;
+	float	*buffer;
+	int bufsize;
+	int bufidx;
+
+public:
+      comb() {
+	      filterstore = 0;
+	      bufidx = 0;
+            }
+	void	setbuffer(float *buf, int size) {
+	      buffer = buf;
+	      bufsize = size;
+            }
+      float process(float input) {
+      	float output = buffer[bufidx];
+	      undenormalise(output);
+      	filterstore = (output*damp2) + (filterstore*damp1);
+	      undenormalise(filterstore);
+      	buffer[bufidx] = input + (filterstore*feedback);
+            if (++bufidx >= bufsize)
+                  bufidx = 0;
+//            bufidx = ++bufidx % bufsize;
+      	return output;
+            }
+	void	mute() {
+      	for (int i=0; i<bufsize; i++)
+	      	buffer[i]=0;
+            }
+	void	setdamp(float val) {
+	      damp1 = val;
+	      damp2 = 1-val;
+            }
+	float	getdamp()              { return damp1; }
+	void	setfeedback(float val) { feedback = val; }
+	float	getfeedback()          { return feedback; }
+      };
+
+
+// Big to inline - but crucial for speed
+
+
+#endif //_comb_
+
+//ends
-- 
cgit v1.2.3