blob: acf09cc854b40d2255b7f1782f0a7c7584e6f9c9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
|
#N canvas 323 155 599 396 12;
#X text 137 8 gestalt :: gestalt detection for monophonic melodies
;
#X floatatom 58 332 5 0 0;
#X obj 58 176 makenote 100 100;
#X obj 58 53 tgl 20 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
;
#X obj 58 76 metro 100;
#X obj 58 100 random 24;
#X obj 58 124 + 60;
#X obj 58 278 gestalt 100;
#X obj 142 100 random 24;
#X obj 142 124 select 0;
#X msg 201 146 100;
#X msg 142 146 400;
#X floatatom 68 154 5 0 0;
#X text 160 282 CREATION ARGUMENT: reference time;
#X obj 219 220 beat;
#X floatatom 232 245 5 0 0;
#X text 87 54 click to play random melody;
#X text 112 350 one could use 'tilt' to detect abrupt changes that
;
#X text 112 367 indicate the start of a new segment;
#X text 111 332 the higher the output the more the gestalt changes
\;;
#X text 161 298 i.e. time in ms expected to be the duration of the
;
#X text 161 314 shortest note (also setable via rightmost inlet);
#X text 281 200 use 'beat' (maxlib) to get the real;
#X text 281 217 reference time from input \, especially;
#X text 282 234 when using;
#X obj 372 235 notein;
#X text 225 26 written by <olaf.matthes@gmx.de>;
#X connect 2 0 7 0;
#X connect 2 0 14 0;
#X connect 2 1 7 1;
#X connect 2 1 14 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 8 0;
#X connect 5 0 6 0;
#X connect 6 0 2 0;
#X connect 6 0 12 0;
#X connect 7 0 1 0;
#X connect 8 0 9 0;
#X connect 9 0 11 0;
#X connect 9 1 10 0;
#X connect 10 0 2 2;
#X connect 11 0 2 2;
#X connect 14 1 15 0;
#X connect 14 1 7 2;
|