-
Notifications
You must be signed in to change notification settings - Fork 1
/
dkmiditonote.pd
133 lines (133 loc) · 2.98 KB
/
dkmiditonote.pd
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
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
#N canvas 222 405 1071 661 12;
#X obj 153 172 inlet;
#X obj 472 341 / 12;
#X obj 472 365 i;
#X obj 153 196 t f f, f 46;
#X text 496 320 octave;
#X obj 153 220 % 12;
#X text 86 220 degree;
#X obj 472 389 - 1;
#X text 515 388 since "C-1" is 0;
#X obj 144 566 makefilename;
#X msg 472 413 set %s\$1;
#X obj 455 119 inlet;
#X text 505 116 flats/sharps;
#X obj 153 244 swap;
#X obj 153 268 pack f f;
#X obj 153 292 route 0 1, f 39;
#N canvas 369 231 747 586 dkmiditonote_sharps 0;
#X obj 165 269 sel 0 1 2 3 4 5 6 7 8 9 10 11, f 68;
#X msg 165 293 c;
#X msg 190 326 c#;
#X msg 229 306 d;
#X msg 249 333 d#;
#X msg 279 303 e;
#X msg 317 305 f;
#X msg 334 337 f#;
#X msg 379 310 g;
#X msg 400 333 g#;
#X msg 443 314 a;
#X msg 482 333 a#;
#X msg 544 312 b;
#X obj 160 375 outlet;
#X obj 164 199 inlet;
#X connect 0 0 1 0;
#X connect 0 1 2 0;
#X connect 0 2 3 0;
#X connect 0 3 4 0;
#X connect 0 4 5 0;
#X connect 0 5 6 0;
#X connect 0 6 7 0;
#X connect 0 7 8 0;
#X connect 0 8 9 0;
#X connect 0 9 10 0;
#X connect 0 10 11 0;
#X connect 0 11 12 0;
#X connect 1 0 13 0;
#X connect 2 0 13 0;
#X connect 3 0 13 0;
#X connect 4 0 13 0;
#X connect 5 0 13 0;
#X connect 6 0 13 0;
#X connect 7 0 13 0;
#X connect 8 0 13 0;
#X connect 9 0 13 0;
#X connect 10 0 13 0;
#X connect 11 0 13 0;
#X connect 12 0 13 0;
#X connect 14 0 0 0;
#X restore 286 362 pd dkmiditonote_sharps;
#N canvas 369 231 747 586 dkmiditonote_flats 0;
#X obj 165 269 sel 0 1 2 3 4 5 6 7 8 9 10 11, f 68;
#X msg 165 293 c;
#X msg 229 306 d;
#X msg 279 303 e;
#X msg 317 305 f;
#X msg 379 310 g;
#X msg 443 314 a;
#X msg 544 312 b;
#X obj 160 375 outlet;
#X obj 164 199 inlet;
#X msg 190 326 db;
#X msg 249 333 eb;
#X msg 334 337 gb;
#X msg 400 333 ab;
#X msg 482 333 bb;
#X connect 0 0 1 0;
#X connect 0 1 10 0;
#X connect 0 2 2 0;
#X connect 0 3 11 0;
#X connect 0 4 3 0;
#X connect 0 5 4 0;
#X connect 0 6 12 0;
#X connect 0 7 5 0;
#X connect 0 8 13 0;
#X connect 0 9 6 0;
#X connect 0 10 14 0;
#X connect 0 11 7 0;
#X connect 1 0 8 0;
#X connect 2 0 8 0;
#X connect 3 0 8 0;
#X connect 4 0 8 0;
#X connect 5 0 8 0;
#X connect 6 0 8 0;
#X connect 7 0 8 0;
#X connect 9 0 0 0;
#X connect 10 0 8 0;
#X connect 11 0 8 0;
#X connect 12 0 8 0;
#X connect 13 0 8 0;
#X connect 14 0 8 0;
#X restore 147 411 pd dkmiditonote_flats;
#X obj 147 435 symbol;
#X obj 144 590 outlet;
#X obj 455 143 f \$1;
#X obj 455 167 == 1;
#X obj 637 119 loadbang;
#X text 30 31 dkmiditonote - midi notes to note names;
#X text 843 25 derek kwan;
#X text 848 76 gpl v 3;
#X text 842 53 pdkvabs 2018;
#X text 22 90 args: flats/sharps;
#X text 28 68 inlets:midi note \, flats/sharps;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 2 0 7 0;
#X connect 3 0 5 0;
#X connect 3 1 1 0;
#X connect 5 0 13 0;
#X connect 7 0 10 0;
#X connect 9 0 19 0;
#X connect 10 0 9 0;
#X connect 11 0 20 0;
#X connect 13 0 14 0;
#X connect 13 1 14 1;
#X connect 14 0 15 0;
#X connect 15 0 17 0;
#X connect 15 1 16 0;
#X connect 16 0 18 0;
#X connect 17 0 18 0;
#X connect 18 0 9 0;
#X connect 20 0 21 0;
#X connect 21 0 13 1;
#X connect 22 0 20 0;