aboutsummaryrefslogtreecommitdiff
path: root/site/udo/_TESTS/feedback_test.csd
diff options
context:
space:
mode:
Diffstat (limited to 'site/udo/_TESTS/feedback_test.csd')
-rwxr-xr-xsite/udo/_TESTS/feedback_test.csd41
1 files changed, 41 insertions, 0 deletions
diff --git a/site/udo/_TESTS/feedback_test.csd b/site/udo/_TESTS/feedback_test.csd
new file mode 100755
index 0000000..2049acb
--- /dev/null
+++ b/site/udo/_TESTS/feedback_test.csd
@@ -0,0 +1,41 @@
+<CsoundSynthesizer>
+<CsOptions>
+-odac
+;-+rtmidi=alsa -Q hw:1 -M hw:1 -odac
+</CsOptions>
+<CsInstruments>
+sr = 48000
+ksmps= 1
+nchnls = 2
+0dbfs = 1
+seed 0
+
+#include "feedback.udo"
+
+instr 2
+ kp1[] init 9
+ kp2[] init 9
+ kdx = 0
+ while (kdx < lenarray(kp1)) do
+ if (random:k(0, 1) > 0.999) then
+ kp1[kdx] random 0, 0.9
+ endif
+ if (random:k(0, 1) > 0.999) then
+ kp2[kdx] random 0, 0.9
+ endif
+ kdx += 1
+ od
+
+ ao fbk_mixer2 kp1, kp2
+ outs ao, ao
+endin
+
+
+
+</CsInstruments>
+<CsScore>
+i2 0 3600
+
+
+</CsScore>
+</CsoundSynthesizer> \ No newline at end of file