-
Notifications
You must be signed in to change notification settings - Fork 0
/
midiosc.pd
381 lines (381 loc) · 9.33 KB
/
midiosc.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
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
#N canvas 493 173 687 596 10;
#X obj 17 528 outlet;
#X obj 470 428 r oscout;
#X obj 470 514 print oscout;
#X obj 503 470 tgl 15 0 empty empty print 17 7 0 10 -262144 -1 -1 0
1;
#X obj 470 492 spigot;
#X text 473 391 OSC output;
#X text 455 404 NOT IMPLEMENTED YET;
#X msg 17 205 start;
#X msg 66 205 stop;
#X msg 108 205 continue;
#X text 59 138 MIDI sequencer;
#X obj 152 267 spigot;
#X obj 152 288 print midiseq;
#X text 205 266 print midi msgs;
#X msg 178 205 loop \$1;
#X obj 17 221 t a;
#X obj 7 21 bng 15 250 50 0 \$0-start \$0-start start 17 7 0 10 -204786
-1 -1;
#X obj 57 21 bng 15 250 50 0 \$0-stop \$0-stop stop 17 7 0 10 -261234
-1 -1;
#X obj 109 21 bng 15 250 50 0 \$0-cont \$0-cont cont 17 7 0 10 -203904
-1 -1;
#X obj 160 62 tgl 15 0 \$0-loop \$0-loop loop 17 7 0 10 -262144 -1
-1 0 1;
#X obj 160 21 tgl 15 0 \$0-print-midi \$0-print-midi midi 17 7 0 10
-262144 -1 -1 0 1;
#X obj 109 62 tgl 15 0 \$0-thru \$0-thru thru 17 7 0 10 -262144 -1
-1 0 1;
#X obj 178 181 r \$0-loop;
#X obj 56 286 r \$0-thru;
#X obj 108 181 r \$0-cont;
#X obj 66 159 r \$0-stop;
#X obj 17 181 r \$0-start;
#X msg 56 512 write \$1;
#X obj 56 488 r \$0-write;
#X text 41 466 write controls -> MIDI/OSC;
#X obj 192 4 tgl 15 0 \$0-rec \$0-rec empty 17 7 0 10 -228856 -1 -1
0 1;
#X text 423 134 OSC sequencer;
#X msg 321 205 stop;
#X obj 456 292 spigot;
#X obj 321 221 t a;
#X obj 321 159 r \$0-stop;
#X text 509 291 print osc msgs;
#X obj 430 159 r \$0-abort;
#X obj 473 181 r \$0-clear;
#X msg 430 205 abort;
#X msg 473 205 clear;
#X obj 394 235 r oscrecord;
#X obj 420 346 s oscplay;
#X obj 57 41 bng 15 250 50 0 \$0-abort \$0-abort abort 17 7 0 10 -261234
-1 -1;
#X obj 109 41 bng 15 250 50 0 \$0-clear \$0-clear clear 17 7 0 10 -203904
-1 -1;
#X obj 57 62 tgl 15 0 \$0-write \$0-write write 17 7 0 10 -262144 -1
-1 0 1;
#X obj 362 181 r \$0-rec;
#X msg 362 205 record \$1;
#X obj 130 159 r \$0-abort;
#X msg 542 205 save;
#X obj 7 41 bng 15 250 50 0 \$0-save \$0-save save 17 7 0 10 -262130
-1 -1;
#X obj 542 159 r \$0-save;
#X obj 160 41 tgl 15 0 \$0-print-osc \$0-print-osc osc 17 7 0 10 -262144
-1 -1 0 1;
#X obj 185 239 r \$0-print-midi;
#X obj 489 264 r \$0-print-osc;
#X obj 319 512 r myoscinput;
#X text 303 488 NOT IMPLEMENTED YET;
#X text 321 475 OSC input;
#X obj 470 449 s myoscoutput;
#X obj 56 356 r reload;
#X obj 71 420 r \$0-write;
#X obj 56 441 f;
#X obj 56 377 t b;
#X obj 56 398 del 100;
#X obj 321 251 oscseq \$1 \$2;
#X obj 172 4 bng 15 250 50 0 \$0-bang \$0-bang empty 17 7 0 10 -262144
-1 -1;
#X obj 321 137 r \$0-bang;
#X text 261 2 time display;
#X obj 7 81 hsl 140 15 0 1 0 0 \$0-pos \$0-progress empty -2 -8 0 10
-262144 -1 -1 608 1;
#X obj 153 82 nbx 5 14 0 1e+37 0 0 \$0-time \$0-time empty 0 -8 0 10
-262144 -1 -1 3.1 256 0;
#X obj 17 251 midiseq \$1;
#X obj 94 235 loadbang;
#X msg 242 205 offset \$1;
#X obj 242 181 r \$0-offset;
#N canvas 380 322 450 346 sysex 0;
#X obj 18 25 sysexin;
#X obj 18 55 sel 240;
#X msg 18 79 1;
#X obj 18 176 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 57 80 spigot;
#X obj 57 107 moses 128;
#X msg 108 160 0;
#X obj 57 220 list prepend;
#X obj 147 236 t l;
#X obj 18 198 swap 1;
#X obj 18 220 -;
#X obj 18 245 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 57 261 spigot;
#X obj 108 132 t b b b;
#X obj 57 288 s sysex;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 3 0 9 0;
#X connect 4 0 5 0;
#X connect 5 0 7 0;
#X connect 5 1 13 0;
#X connect 6 0 3 0;
#X connect 7 0 8 0;
#X connect 7 0 12 0;
#X connect 8 0 7 1;
#X connect 9 0 10 0;
#X connect 9 1 10 1;
#X connect 10 0 11 0;
#X connect 11 0 12 1;
#X connect 12 0 14 0;
#X connect 13 0 7 1;
#X connect 13 1 7 0;
#X connect 13 2 6 0;
#X restore 413 51 pd sysex;
#X text 403 25 sysex / MMC support;
#X obj 301 53 s \$0-progress;
#X obj 278 72 s \$0-time;
#X obj 256 93 s \$0-offset;
#N canvas 595 128 396 546 timer 0;
#X obj 113 13 r timer;
#X obj 113 35 route stop offset;
#X obj 113 105 t b b;
#X obj 162 148 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 162 121 0;
#X msg 113 126 0;
#X obj 212 142 f;
#X obj 212 117 max 0;
#X floatatom 162 327 5 0 0 0 - - -, f 5;
#X obj 162 205 f;
#X obj 197 252 max;
#X obj 162 228 t f f;
#X obj 162 298 /;
#X obj 197 273 max 1;
#X obj 162 174 metro 100;
#X obj 193 205 + 100;
#X obj 100 271 / 100;
#X obj 100 298 int;
#X obj 100 327 / 10;
#X obj 228 174 s \$0-len;
#X obj 18 235 *;
#X obj 82 198 r \$0-len;
#X obj 18 198 r \$0-pos;
#X obj 51 271 swap 1;
#X obj 51 294 -;
#X obj 51 319 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 18 343 spigot;
#X obj 51 227 loadbang;
#X msg 51 248 0;
#X obj -17 271 r \$0-time;
#X obj -17 294 * 1000;
#X obj 18 408 outlet;
#X obj 100 409 outlet;
#X obj 162 408 outlet;
#X obj 162 57 route 1 0;
#X obj 162 79 t b f;
#X msg 162 100 1;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 34 0;
#X connect 1 2 7 0;
#X connect 2 0 5 0;
#X connect 2 1 4 0;
#X connect 3 0 14 0;
#X connect 3 0 23 0;
#X connect 4 0 3 0;
#X connect 5 0 9 1;
#X connect 5 0 6 1;
#X connect 6 0 7 1;
#X connect 6 0 10 1;
#X connect 6 0 19 0;
#X connect 7 0 6 0;
#X connect 8 0 33 0;
#X connect 9 0 11 0;
#X connect 9 0 15 0;
#X connect 10 0 13 0;
#X connect 11 0 12 0;
#X connect 11 0 16 0;
#X connect 11 1 10 0;
#X connect 12 0 8 0;
#X connect 13 0 12 1;
#X connect 14 0 9 0;
#X connect 15 0 9 1;
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X connect 18 0 32 0;
#X connect 20 0 16 0;
#X connect 20 0 26 0;
#X connect 21 0 20 1;
#X connect 22 0 20 0;
#X connect 23 0 24 0;
#X connect 23 1 24 1;
#X connect 24 0 25 0;
#X connect 25 0 26 1;
#X connect 26 0 31 0;
#X connect 27 0 28 0;
#X connect 28 0 23 0;
#X connect 29 0 30 0;
#X connect 30 0 26 0;
#X connect 34 0 35 0;
#X connect 34 1 9 0;
#X connect 35 0 36 0;
#X connect 35 1 9 1;
#X connect 36 0 3 0;
#X restore 256 28 pd timer;
#N canvas 393 355 450 300 midi 0;
#X obj 15 243 outlet;
#X obj 16 42 t a a;
#X obj 83 110 route note polytouch ctl pgm touch bend;
#X obj 83 131 noteout;
#X obj 121 151 polytouchout;
#X obj 160 131 ctlout;
#X obj 198 151 pgmout;
#X obj 237 131 touchout;
#X obj 276 151 bendout;
#X obj 83 58 spigot;
#X text 130 57 MIDI Thru;
#X obj 83 84 r midiout;
#X obj 116 31 inlet;
#X obj 16 14 inlet;
#X connect 1 0 0 0;
#X connect 1 1 9 0;
#X connect 2 0 3 0;
#X connect 2 1 4 0;
#X connect 2 2 5 0;
#X connect 2 3 6 0;
#X connect 2 4 7 0;
#X connect 2 5 8 0;
#X connect 9 0 2 0;
#X connect 11 0 2 0;
#X connect 12 0 9 1;
#X connect 13 0 1 0;
#X restore 17 314 pd midi;
#X obj 7 62 bng 15 250 50 0 \$0-send \$0-send send 17 7 0 10 -262144
-1 -1;
#X msg 586 205 send;
#X obj 586 181 r \$0-send;
#X obj 321 276 route record bang;
#X obj 456 314 print oscseq;
#X msg 370 330 bang;
#X obj 321 307 s \$0-rec;
#N canvas 630 283 460 354 transport 0;
#X obj 36 27 r transport;
#X obj 36 71 sel 0 1;
#X msg 36 93 stop;
#X msg 75 141 start;
#X obj 75 94 f;
#X obj 75 119 sel 0 1;
#X msg 118 141 cont;
#X msg 166 93 stop;
#X msg 97 175 1;
#X msg 127 175 0;
#X obj 215 93 s \$0-rec;
#X obj 36 228 s \$0-start;
#X obj 77 248 s \$0-stop;
#X obj 118 228 s \$0-cont;
#X obj 275 93 s \$0-loop;
#X obj 36 49 route play stop rec loop pos;
#X obj 220 157 pack f f;
#X obj 220 199 s transport-info;
#X obj 347 93 s \$0-progress;
#X obj 220 135 r \$0-time;
#X obj 308 135 r \$0-pos;
#X msg 220 179 \$2 \$1;
#X obj 36 175 t a b;
#X obj 166 175 t a b;
#X obj 36 206 route start stop cont;
#X obj 236 18 route save abort clear;
#X obj 236 40 s \$0-save;
#X obj 279 60 s \$0-abort;
#X obj 322 40 s \$0-clear;
#X connect 0 0 15 0;
#X connect 1 0 2 0;
#X connect 1 1 4 0;
#X connect 2 0 22 0;
#X connect 3 0 22 0;
#X connect 4 0 5 0;
#X connect 5 0 3 0;
#X connect 5 1 6 0;
#X connect 6 0 22 0;
#X connect 7 0 23 0;
#X connect 8 0 4 1;
#X connect 9 0 4 1;
#X connect 15 0 1 0;
#X connect 15 1 7 0;
#X connect 15 2 10 0;
#X connect 15 3 14 0;
#X connect 15 4 18 0;
#X connect 15 5 25 0;
#X connect 16 0 21 0;
#X connect 19 0 16 0;
#X connect 20 0 16 1;
#X connect 21 0 17 0;
#X connect 22 0 24 0;
#X connect 22 1 8 0;
#X connect 23 0 24 0;
#X connect 23 1 9 0;
#X connect 24 0 11 0;
#X connect 24 1 12 0;
#X connect 24 2 13 0;
#X connect 25 0 26 0;
#X connect 25 1 27 0;
#X connect 25 2 28 0;
#X restore 212 148 pd transport;
#X connect 1 0 4 0;
#X connect 1 0 58 0;
#X connect 3 0 4 1;
#X connect 4 0 2 0;
#X connect 7 0 15 0;
#X connect 8 0 15 0;
#X connect 9 0 15 0;
#X connect 11 0 12 0;
#X connect 14 0 15 0;
#X connect 15 0 70 0;
#X connect 22 0 14 0;
#X connect 23 0 80 1;
#X connect 24 0 9 0;
#X connect 25 0 8 0;
#X connect 26 0 7 0;
#X connect 27 0 0 0;
#X connect 28 0 27 0;
#X connect 32 0 34 0;
#X connect 33 0 85 0;
#X connect 34 0 64 0;
#X connect 35 0 32 0;
#X connect 37 0 39 0;
#X connect 38 0 40 0;
#X connect 39 0 34 0;
#X connect 40 0 34 0;
#X connect 41 0 64 0;
#X connect 46 0 47 0;
#X connect 47 0 34 0;
#X connect 48 0 8 0;
#X connect 49 0 34 0;
#X connect 51 0 49 0;
#X connect 53 0 11 1;
#X connect 54 0 33 1;
#X connect 55 0 0 0;
#X connect 59 0 62 0;
#X connect 60 0 61 1;
#X connect 61 0 27 0;
#X connect 62 0 63 0;
#X connect 63 0 61 0;
#X connect 64 0 84 0;
#X connect 66 0 64 0;
#X connect 70 0 11 0;
#X connect 70 0 80 0;
#X connect 71 0 70 0;
#X connect 72 0 15 0;
#X connect 72 0 34 0;
#X connect 73 0 72 0;
#X connect 79 0 78 0;
#X connect 79 1 77 0;
#X connect 79 2 76 0;
#X connect 80 0 0 0;
#X connect 82 0 34 0;
#X connect 83 0 82 0;
#X connect 84 0 87 0;
#X connect 84 1 86 0;
#X connect 84 2 33 0;
#X connect 84 2 42 0;
#X connect 86 0 42 0;
#X coords 0 -1 1 1 210 100 1 0 0;