From c0dc3476a8baa832e6874b229470decfd522e3cd Mon Sep 17 00:00:00 2001
From: Luke Iannini <lukeiannini@users.sourceforge.net>
Date: Thu, 21 May 2009 05:10:26 +0000
Subject: more work on the delegate/dispatch design pattern switched time-
 series to delegate/dispatch and added more beat-sync objects
 midi-stream2notes turns a continuous stream of midi notes into static lists
 of notes and durations - great for building sequencers but still has a bug.
 list-extract to "split" a list into a sublist and the remainder ds-criteria
 to get a pointer to the first item with a specific variable value

svn path=/trunk/abstractions/sfruit/; revision=11471
---
 sfruit/midi-stream2notes-help.pd | 102 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 102 insertions(+)
 create mode 100644 sfruit/midi-stream2notes-help.pd

(limited to 'sfruit/midi-stream2notes-help.pd')

diff --git a/sfruit/midi-stream2notes-help.pd b/sfruit/midi-stream2notes-help.pd
new file mode 100644
index 0000000..9a83302
--- /dev/null
+++ b/sfruit/midi-stream2notes-help.pd
@@ -0,0 +1,102 @@
+#N canvas 347 450 449 345 10;
+#X obj 97 199 midi-stream2notes;
+#X obj 196 171 timer;
+#X obj 196 132 loadbang;
+#N canvas 731 143 383 603 random-notes 0;
+#X obj 125 445 + 50;
+#X obj 125 421 random 450;
+#X obj 104 470 pipe;
+#X msg 104 496 \$1 0;
+#X obj 168 267 + 60;
+#X obj 168 243 random 40;
+#X obj 238 243 random 117;
+#X obj 238 268 + 10;
+#X obj 104 375 list split 1;
+#X obj 167 174 del;
+#X obj 167 121 random 450;
+#X obj 167 143 + 50;
+#X obj 92 174 t b b;
+#X obj 168 206 t b b;
+#X obj 169 296 pack f f;
+#X obj 169 327 t a a;
+#X obj 196 540 outlet;
+#X obj 104 397 t a b;
+#X obj 167 95 spigot;
+#X obj 191 27 inlet;
+#X obj 192 71 sel 1;
+#X obj 192 48 t a a;
+#X connect 0 0 2 1;
+#X connect 1 0 0 0;
+#X connect 2 0 3 0;
+#X connect 3 0 16 0;
+#X connect 4 0 14 0;
+#X connect 5 0 4 0;
+#X connect 6 0 7 0;
+#X connect 7 0 14 1;
+#X connect 8 0 17 0;
+#X connect 9 0 12 0;
+#X connect 10 0 11 0;
+#X connect 11 0 9 0;
+#X connect 12 0 18 0;
+#X connect 12 1 13 0;
+#X connect 13 0 5 0;
+#X connect 13 1 6 0;
+#X connect 14 0 15 0;
+#X connect 15 0 8 0;
+#X connect 15 1 16 0;
+#X connect 17 0 2 0;
+#X connect 17 1 1 0;
+#X connect 18 0 10 0;
+#X connect 19 0 21 0;
+#X connect 20 0 10 0;
+#X connect 21 0 20 0;
+#X connect 21 1 18 1;
+#X restore 97 34 pd random-notes;
+#X msg 97 93 74 0;
+#N canvas 0 22 279 283 show 0;
+#X obj 82 95 list prepend set;
+#X obj 82 122 list trim;
+#X obj 82 36 inlet;
+#X obj 82 154 t b a;
+#X obj 82 196 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 2 0 0 0;
+#X connect 3 0 4 0;
+#X connect 3 1 4 0;
+#X restore 97 63 pd show;
+#X obj 97 143 t a b;
+#X floatatom 213 200 0 0 0 0 - - -;
+#X text 231 171 time can be in any format you like;
+#X text 287 186 (even symbols!);
+#X msg 97 256 74 112 226741 226920;
+#N canvas 0 22 279 283 show 0;
+#X obj 82 95 list prepend set;
+#X obj 82 122 list trim;
+#X obj 82 36 inlet;
+#X obj 82 154 t b a;
+#X obj 82 196 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 2 0 0 0;
+#X connect 3 0 4 0;
+#X connect 3 1 4 0;
+#X restore 97 226 pd show;
+#X obj 97 288 print note;
+#X obj 256 138 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 97 9 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
+;
+#X connect 0 0 11 0;
+#X connect 1 0 0 1;
+#X connect 1 0 7 0;
+#X connect 2 0 1 0;
+#X connect 3 0 5 0;
+#X connect 4 0 6 0;
+#X connect 5 0 4 0;
+#X connect 6 0 0 0;
+#X connect 6 1 1 1;
+#X connect 10 0 12 0;
+#X connect 11 0 10 0;
+#X connect 13 0 1 0;
+#X connect 14 0 3 0;
-- 
cgit v1.2.1