aboutsummaryrefslogtreecommitdiff
path: root/degreeToChord.pd
blob: 9591073d3d0594e12f710081e2f3f2fd017d3a5a (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
#N canvas 369 115 1071 783 10;
#X obj 191 419 list;
#X msg 733 559 1 0 1 0 1 1 0 1 0 1 0 1;
#X obj 736 535 loadbang;
#X obj 716 510 inlet;
#X obj 146 87 inlet;
#X text 759 590 The major;
#X obj 849 650 - 1;
#X text 713 484 Scale;
#X obj 224 174 t b f;
#X text 94 54 Offset (degree) of the chord to get;
#X obj 412 179 inlet;
#X text 418 153 Number of notes in the chord;
#X obj 415 224 f;
#X obj 183 694 outlet;
#X obj 226 130 - 1;
#X text 199 89 In music \, index 1 is the first degree. In computer
sciences \, it is index 0;
#X obj 218 464 expr 0-$f1;
#X text 302 464 The offset are the inverse (negative) than those in
list-rot;
#X obj 459 192 tof/argument 1 3;
#X obj 459 172 loadbang;
#X obj 716 620 ./listBoolToPos;
#X obj 716 653 ./listOp;
#X obj 156 524 cyclone/zl rot;
#X obj 183 639 ./listJump 2 3;
#X connect 0 0 22 0;
#X connect 1 0 20 0;
#X connect 2 0 1 0;
#X connect 3 0 20 0;
#X connect 4 0 14 0;
#X connect 6 0 21 1;
#X connect 8 0 0 0;
#X connect 8 1 16 0;
#X connect 10 0 12 0;
#X connect 12 0 23 2;
#X connect 14 0 8 0;
#X connect 16 0 22 1;
#X connect 18 0 12 0;
#X connect 19 0 18 0;
#X connect 20 0 21 0;
#X connect 21 0 0 1;
#X connect 21 1 6 0;
#X connect 22 0 23 0;
#X connect 23 0 13 0;