-
Notifications
You must be signed in to change notification settings - Fork 0
/
0Cellotrope.pd
361 lines (361 loc) · 8.84 KB
/
0Cellotrope.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
#N canvas 59 739 444 248 10;
#X declare -path Fraise;
#X obj 21 38 pied/pied 0 41424;
#X obj 19 141 fruit/fruit 0 fruit1 10 fw;
#X obj 216 78 osc/TelecoMaster;
#N canvas 754 136 974 831 Fraise 1;
#X obj 67 154 fruit/receive fruit1;
#X msg 299 726 L\$1;
#X obj 299 703 tgl 15 0 empty empty set_LED 18 7 0 10 -4034 -1 -1 0
1;
#X obj 194 752 fruit/send fruit1;
#X msg 498 627 c 10 i \$1;
#X obj 501 522 hsl 128 15 0 1023 0 0 empty empty empty -2 -8 0 10 -260097
-1 -1 0 1;
#X obj 527 555 t b f;
#X obj 712 509 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 498 578 list prepend 1023;
#X obj 498 599 -;
#X msg 653 534 1;
#X msg 712 550 0;
#X obj 712 529 del 10;
#X obj 744 611 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 744 631 metro 100;
#X msg 653 477 100;
#X msg 759 580 50;
#X msg 679 476 300;
#X floatatom 656 506 5 0 0 0 - - -;
#X floatatom 663 418 5 0 0 0 - - -;
#X msg 250 568 c 120 c 4 i \$1;
#X obj 253 542 hsl 128 15 -1023 1023 0 0 empty empty empty -2 -8 0
10 -262144 -1 -1 7556 1;
#X msg 250 518 0;
#X floatatom 67 196 7 0 0 0 - - -;
#X obj 112 297 / 1000;
#X obj 214 434 change;
#X obj 226 460 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 112 323 * 16;
#X obj 112 346 i;
#X obj 574 692 t b b;
#X obj 574 713 timer;
#X floatatom 574 734 5 0 0 0 - - -;
#X msg 625 754 1000 \$1;
#X obj 625 775 /;
#X msg 188 280 16;
#X msg 219 279 24;
#X floatatom 208 390 5 0 0 0 - - -;
#X obj 85 254 mod 1000;
#X obj 79 230 +;
#X floatatom 150 192 5 0 0 0 - - -;
#X msg 162 279 12;
#X msg 248 278 32;
#X floatatom 199 322 5 0 0 0 - - -;
#X msg 293 498 200;
#X obj 268 460 sel 0;
#X msg 337 498 400;
#X obj 334 196 t f f;
#X obj 361 247 div 24;
#X obj 334 305 -;
#X floatatom 334 326 5 0 0 0 - - -;
#X obj 361 279 * 24;
#X obj 380 334 < 3;
#X obj 379 357 change;
#X obj 109 229 t b f;
#X obj 85 276 t f f;
#X obj 112 367 / 16;
#X obj 112 388 * 1000;
#X obj 88 411 -;
#X obj 293 150 t b b;
#X obj 293 171 timer;
#X floatatom 293 192 5 0 0 0 - - -;
#X msg 100 727 c 21 c \$1;
#X msg 95 663 16;
#X msg 126 662 24;
#X msg 69 662 12;
#X msg 155 661 32;
#X floatatom 106 705 5 0 0 0 steps - -;
#X obj 294 630 hsl 128 15 0 1023 0 0 empty empty empty -2 -8 0 10 -260097
-1 -1 0 1;
#X msg 291 653 c 20 i \$1;
#X floatatom 107 590 5 0 0 0 - - -;
#X msg 101 612 c 22 c \$1;
#X msg 70 547 1;
#X msg 96 548 2;
#X msg 127 547 3;
#X msg 156 546 4;
#X msg 184 546 6;
#X obj 72 479 hsl 128 30 22 255 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#N canvas 63 440 598 430 simulfw 0;
#X floatatom 246 103 5 0 999 0 - - -;
#X msg 351 100 16;
#X msg 382 99 24;
#X msg 325 99 12;
#X msg 411 98 32;
#X floatatom 362 142 5 0 0 0 - - -;
#X obj 246 183 div 1000;
#X floatatom 195 210 5 0 0 0 - - -;
#X obj 246 162 * 24;
#X obj 246 204 + 1;
#X obj 246 225 * 1000;
#X obj 246 246 / 24;
#X floatatom 246 267 5 0 0 0 - - -;
#X connect 0 0 8 0;
#X connect 1 0 5 0;
#X connect 2 0 5 0;
#X connect 3 0 5 0;
#X connect 4 0 5 0;
#X connect 5 0 8 1;
#X connect 5 0 11 1;
#X connect 6 0 7 0;
#X connect 6 0 9 0;
#X connect 8 0 6 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X restore 520 422 pd simulfw;
#X obj 498 557 * 1;
#X obj 67 175 route P N;
#X floatatom 213 221 5 0 0 0 - - -;
#X obj 347 72 change;
#X obj 347 93 list append 0;
#X obj 347 114 unpack f f;
#X floatatom 347 135 5 0 0 0 - - -;
#X floatatom 405 138 5 0 0 0 - - -;
#X msg 454 725 c 11 c \$1;
#X obj 454 678 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 454 701 == 0;
#X obj 347 41 unpack f f;
#X msg 59 686 0;
#X obj 347 11 route N E, f 31;
#X floatatom 441 53 7 0 0 0 - - -;
#X obj 512 73 print E;
#X obj 478 116 print N;
#X msg 396 565 c 121 c \$1;
#X obj 402 537 tgl 15 0 empty empty stopNextStep 17 7 0 10 -262144
-1 -1 1 1;
#X floatatom 625 796 5 0 0 0 - - -;
#X obj 169 625 r setSteps;
#X obj 396 457 r setSpeed;
#X obj 396 478 * 1023;
#X obj 400 510 r setStopNextStep;
#N canvas 1214 87 556 418 DMX 1;
#X obj 159 296 fruit/send fruit1;
#X obj 162 20 hsl 128 15 0 255 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 159 71 list prepend 1;
#X obj 258 72 hradio 15 1 0 8 empty empty empty 0 -8 0 10 -262144 -1
-1 1;
#X obj 258 92 + 1;
#X floatatom 258 113 5 0 0 0 - - -;
#X msg 159 255 c 30 i \$1 c \$2;
#X floatatom 159 40 5 0 0 0 - - -;
#X msg 67 57 12;
#X msg 100 79 6;
#X obj 75 31 b;
#X obj 69 7 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 100 58 del 1000;
#X obj 241 200 hsl 128 15 12 255 0 0 empty empty speed -2 -8 0 10 -4034
-1 -1 0 1;
#X msg 185 201 0;
#X msg 185 222 2 \$1;
#X msg 211 201 6;
#X obj 188 157 hsl 128 15 0 255 0 0 empty empty dimm -2 -8 0 10 -257985
-1 -1 12700 1;
#X msg 185 177 1 \$1;
#X obj 275 233 hsl 128 15 0 255 0 0 empty empty duration -2 -8 0 10
-4032 -1 -1 0 1;
#X msg 272 253 3 \$1;
#X msg 100 100 0;
#X msg 78 373 c 31 c \$1;
#X obj 78 334 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 86 232 metro 100;
#X obj 93 184 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 217 378 c 32 c \$1;
#X msg 207 341 6;
#X msg 323 357 c 33 c \$1;
#X msg 323 307 6;
#X msg 361 306 12;
#X floatatom 323 331 5 0 0 0 - - -;
#X msg 392 305 30;
#X obj 13 236 metro 100;
#X obj 13 187 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X msg 13 257 1;
#X obj 442 248 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 442 268 c 34 c \$1;
#X obj 385 156 * 255;
#X obj 422 334 r setFlashDuration;
#X obj 385 135 r setFlashDimm;
#X obj 422 355 * 30;
#X obj 422 376 + 7;
#X obj 13 148 r setFlashForce;
#X obj 35 187 sel 0;
#X msg 34 208 0;
#X floatatom 402 187 5 0 0 0 - - -;
#X connect 1 0 7 0;
#X connect 2 0 6 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 2 1;
#X connect 6 0 0 0;
#X connect 7 0 2 0;
#X connect 8 0 1 0;
#X connect 9 0 1 0;
#X connect 10 0 8 0;
#X connect 10 0 12 0;
#X connect 11 0 10 0;
#X connect 12 0 9 0;
#X connect 13 0 15 0;
#X connect 14 0 15 0;
#X connect 15 0 6 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 6 0;
#X connect 19 0 20 0;
#X connect 20 0 6 0;
#X connect 21 0 1 0;
#X connect 22 0 0 0;
#X connect 23 0 22 0;
#X connect 24 0 27 0;
#X connect 25 0 24 0;
#X connect 26 0 0 0;
#X connect 27 0 26 0;
#X connect 28 0 0 0;
#X connect 29 0 31 0;
#X connect 30 0 31 0;
#X connect 31 0 28 0;
#X connect 32 0 31 0;
#X connect 33 0 35 0;
#X connect 34 0 33 0;
#X connect 35 0 23 0;
#X connect 36 0 37 0;
#X connect 37 0 0 0;
#X connect 38 0 17 0;
#X connect 38 0 46 0;
#X connect 39 0 41 0;
#X connect 40 0 38 0;
#X connect 41 0 42 0;
#X connect 42 0 31 0;
#X connect 43 0 34 0;
#X connect 43 0 44 0;
#X connect 44 0 45 0;
#X connect 45 0 23 0;
#X restore 521 390 pd DMX;
#X connect 0 0 79 0;
#X connect 0 0 91 0;
#X connect 1 0 3 1;
#X connect 2 0 1 0;
#X connect 4 0 3 0;
#X connect 5 0 78 0;
#X connect 6 0 78 0;
#X connect 6 1 78 1;
#X connect 7 0 10 0;
#X connect 7 0 12 0;
#X connect 7 0 29 0;
#X connect 8 0 9 0;
#X connect 9 0 4 0;
#X connect 10 0 6 0;
#X connect 11 0 6 0;
#X connect 12 0 11 0;
#X connect 13 0 14 0;
#X connect 14 0 7 0;
#X connect 15 0 18 0;
#X connect 16 0 18 0;
#X connect 17 0 18 0;
#X connect 18 0 14 1;
#X connect 19 0 12 1;
#X connect 20 0 3 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 24 0 27 0;
#X connect 25 0 26 0;
#X connect 27 0 28 0;
#X connect 28 0 36 0;
#X connect 28 0 55 0;
#X connect 29 0 30 0;
#X connect 29 1 30 1;
#X connect 30 0 31 0;
#X connect 30 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 97 0;
#X connect 34 0 42 0;
#X connect 35 0 42 0;
#X connect 36 0 25 0;
#X connect 37 0 54 0;
#X connect 38 0 37 0;
#X connect 39 0 53 0;
#X connect 40 0 42 0;
#X connect 41 0 42 0;
#X connect 42 0 27 1;
#X connect 42 0 55 1;
#X connect 43 0 21 0;
#X connect 44 0 22 0;
#X connect 45 0 21 0;
#X connect 46 0 48 0;
#X connect 46 1 47 0;
#X connect 47 0 50 0;
#X connect 48 0 49 0;
#X connect 48 0 51 0;
#X connect 50 0 48 1;
#X connect 51 0 52 0;
#X connect 53 0 38 0;
#X connect 53 1 38 1;
#X connect 54 0 57 0;
#X connect 54 1 24 0;
#X connect 55 0 56 0;
#X connect 56 0 57 1;
#X connect 57 0 51 0;
#X connect 58 0 59 0;
#X connect 58 1 59 1;
#X connect 59 0 60 0;
#X connect 61 0 3 0;
#X connect 62 0 66 0;
#X connect 63 0 66 0;
#X connect 64 0 66 0;
#X connect 65 0 66 0;
#X connect 66 0 61 0;
#X connect 67 0 68 0;
#X connect 68 0 3 0;
#X connect 69 0 70 0;
#X connect 70 0 3 0;
#X connect 71 0 69 0;
#X connect 72 0 69 0;
#X connect 73 0 69 0;
#X connect 74 0 69 0;
#X connect 75 0 69 0;
#X connect 76 0 69 0;
#X connect 78 0 8 0;
#X connect 79 0 23 0;
#X connect 79 0 38 0;
#X connect 79 0 58 0;
#X connect 81 0 82 0;
#X connect 82 0 83 0;
#X connect 82 0 94 0;
#X connect 83 0 84 0;
#X connect 83 1 85 0;
#X connect 86 0 3 0;
#X connect 87 0 88 0;
#X connect 88 0 86 0;
#X connect 89 0 81 0;
#X connect 89 1 82 1;
#X connect 90 0 66 0;
#X connect 91 0 89 0;
#X connect 91 1 92 0;
#X connect 91 1 93 0;
#X connect 95 0 3 0;
#X connect 96 0 95 0;
#X connect 98 0 66 0;
#X connect 99 0 100 0;
#X connect 100 0 21 0;
#X connect 101 0 96 0;
#X restore 217 55 pd Fraise;
#X obj 21 16 declare -path Fraise;