blob: d8e5e7a112b56c5c3f910cdd9d55936b0ca32e2a (
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
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
|
#N canvas 403 268 423 406 10;
#X obj 75 80 inlet;
#X obj 147 100 inlet;
#X obj 76 275 outlet~;
#X obj 148 276 outlet~;
#X text 62 54 inlet for (note \, velocity) pairs;
#X text 74 303 left and right dsp outlet;
#N canvas 0 0 621 566 \$0-instr 1;
#X obj 75 80 inlet;
#X obj 76 356 *~;
#X obj 76 389 *~ 0.2;
#X obj 75 247 mtof;
#X obj 139 249 select 0;
#X obj 75 224 unpack 0 0;
#X obj 192 276 / 127;
#X obj 76 295 osc~;
#X obj 76 455 outlet~;
#X obj 91 194 print \$1_NOTE;
#X obj 151 456 outlet~;
#X obj 383 237 random 100;
#X obj 150 423 *~ 0.2;
#X obj 77 424 *~ 0.2;
#X text 447 286 * ~M_PI/2;
#X obj 383 285 * 1.5708;
#X obj 342 350 cos;
#X obj 423 351 sin;
#X obj 383 264 * 0.01;
#X obj 280 349 pow -1;
#X floatatom 280 410 5 0 0 0 - - -;
#X floatatom 342 411 5 0 0 0 - - -;
#X floatatom 423 411 5 0 0 0 - - -;
#X obj 280 317 f \$2;
#X msg 139 304 \$1 10;
#X obj 134 362 *~;
#X obj 134 381 *~;
#X text 62 54 inlet for (note \, velocity) pairs;
#X text 74 483 left and right dsp outlet;
#X obj 383 172 loadbang;
#X obj 257 91 inlet;
#X obj 192 301 pack 0 500;
#X floatatom 272 119 5 0 0 0 - - -;
#X obj 139 340 vline~;
#X text 382 79 loadbang can be used just fine.;
#X obj 75 100 t a b;
#X connect 0 0 35 0;
#X connect 1 0 2 0;
#X connect 2 0 13 0;
#X connect 2 0 12 0;
#X connect 3 0 7 0;
#X connect 4 0 31 0;
#X connect 4 1 6 0;
#X connect 5 0 3 0;
#X connect 5 1 4 0;
#X connect 6 0 24 0;
#X connect 7 0 1 0;
#X connect 11 0 18 0;
#X connect 12 0 10 0;
#X connect 13 0 8 0;
#X connect 15 0 16 0;
#X connect 15 0 17 0;
#X connect 16 0 13 1;
#X connect 16 0 21 0;
#X connect 17 0 12 1;
#X connect 17 0 22 0;
#X connect 18 0 15 0;
#X connect 19 0 2 1;
#X connect 19 0 20 0;
#X connect 23 0 19 0;
#X connect 24 0 33 0;
#X connect 25 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 1 1;
#X connect 29 0 11 0;
#X connect 29 0 23 0;
#X connect 30 0 31 1;
#X connect 30 0 32 0;
#X connect 31 0 33 0;
#X connect 33 0 25 0;
#X connect 33 0 25 1;
#X connect 35 0 5 0;
#X restore 75 223 pd \$0-instr;
#X text 129 76 extra inlet;
#X connect 0 0 6 0;
#X connect 1 0 6 1;
#X connect 6 0 2 0;
#X connect 6 1 3 0;
|
