From 506b8e7dedb80d79bf015e47d92e8b8dd8284584 Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Sat, 16 Aug 2003 17:08:55 +0000
Subject: added files straight from Yves' sources

svn path=/trunk/externals/unauthorized/; revision=864
---
 stksitar~/mstksitar~.cc | 39 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 39 insertions(+)
 create mode 100644 stksitar~/mstksitar~.cc

(limited to 'stksitar~/mstksitar~.cc')

diff --git a/stksitar~/mstksitar~.cc b/stksitar~/mstksitar~.cc
new file mode 100644
index 0000000..62edef6
--- /dev/null
+++ b/stksitar~/mstksitar~.cc
@@ -0,0 +1,39 @@
+/* stksitar~ -- apply a stksitar effect 
+ * requires libDSP library
+ * Copyleft 2001 Yves Degoyon.
+ * Permission is granted to use this software for any purpose provided you
+ * keep this copyright notice intact.
+ *
+ * THE AUTHOR AND HIS EXPLOITERS MAKE NO WARRANTY, EXPRESS OR IMPLIED,
+ * IN CONNECTION WITH THIS SOFTWARE.
+ *
+*/
+
+#include "sitar.h"
+#include "unistd.h"
+#include "RtWvOut.h"
+
+sitar *x_stksitar = NULL;
+
+int main( int argc, char** argv )
+{
+
+  // int count=0;
+    
+    x_stksitar = new sitar( 50.0 );
+    if ( x_stksitar == NULL ) 
+    {
+       printf( "mstksitar~: cannot build sitar instrument from STK" );
+       exit(-1);
+    }
+
+    x_stksitar->noteOn( 400.0, 0.25 ); // start sound
+    while (1)
+    {
+      double dare;
+        
+       dare = (float) x_stksitar->tick();
+       printf( "%f\n", dare );
+       fwrite( (void*)&dare, sizeof(float), 1, stderr );
+    }
+}
-- 
cgit v1.2.1