aboutsummaryrefslogtreecommitdiff
path: root/s-controlsurface.pd
blob: 52b247166a3cd03fbe2e2bd448f7f9aac3ddc253 (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
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
#N canvas 239 16 721 668 10;
#N canvas 0 16 999 675 1004data 0;
#X coords 0 0 210 210 210 210 1;
#X restore 13 39 pd \$0data;
#N canvas 507 228 452 378 1004template 0;
#X obj 3 4 struct \$0template float x0 float y0 float id float c;
#X msg 195 257 traverse \$1 \, bang;
#X obj 195 279 pointer;
#X obj 4 107 inlet;
#X obj 3 48 filledpolygon c 0 1 x0(0:200)(0:200) y0(0:200)(0:200) x0(0:200)(10:210)
y0(0:200)(0:200) x0(0:200)(10:210) y0(0:200)(10:210) x0(0:200)(0:200)
y0(0:200)(10:210);
#X msg 4 282 100 100 \$1 \$2;
#X obj 4 304 append \$0template x0 y0 id c;
#X obj 195 235 makefilename pd-%ddata;
#X obj 195 213 \$0;
#X obj 4 131 t l b;
#X connect 1 0 2 0;
#X connect 2 0 6 4;
#X connect 3 0 9 0;
#X connect 5 0 6 0;
#X connect 7 0 1 0;
#X connect 8 0 7 0;
#X connect 9 0 5 0;
#X connect 9 1 8 0;
#X restore 8 602 pd \$0template;
#X obj 8 392 loadbang;
#X msg 8 431 0;
#X obj 8 478 f;
#X obj 39 478 + 1;
#X obj 187 22 bng 14 250 50 0 \$0-add \$0-add add 18 12 0 8 -260818
-1 -1;
#X obj 15 452 r \$0-add;
#X obj 136 22 bng 14 250 50 0 \$0-clear \$0-clear clear 18 12 0 8 -260818
-1 -1;
#X msg 526 85 \; \$1 clear;
#X obj 526 64 makefilename pd-%ddata;
#X obj 526 43 \$0;
#X obj 526 22 r \$0-clear;
#X obj 8 499 t f f;
#X obj 8 581 pack f f;
#X obj 59 557 * 16;
#X obj 69 392 r \$0-clear;
#X obj 261 177 inlet;
#X obj 465 589 outlet;
#X msg 312 451 next;
#X obj 465 484 pointer;
#X obj 465 377 \$0;
#X obj 465 402 makefilename pd-%ddata;
#X obj 261 372 until;
#X obj 291 331 > 0;
#X obj 261 310 t f f;
#X obj 261 352 spigot;
#X obj 261 404 f;
#X obj 289 404 + 1;
#X obj 261 424 t b f;
#X msg 336 355 0;
#X msg 465 426 traverse \$1;
#X obj 364 433 ==;
#X obj 261 270 t f b b f;
#X obj 465 516 spigot;
#X obj 465 540 get \$0template x0 y0 id c;
#X obj 14 40 cnv 15 208 208 empty empty empty 20 12 0 14 -260818 -66577
0;
#X obj 57 498 s \$0-count;
#X obj 261 224 mod;
#X obj 277 202 r \$0-count;
#X obj 465 563 pack f f;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 13 0;
#X connect 4 0 37 0;
#X connect 5 0 4 1;
#X connect 7 0 4 0;
#X connect 10 0 9 0;
#X connect 11 0 10 0;
#X connect 12 0 11 0;
#X connect 13 0 14 0;
#X connect 13 1 15 0;
#X connect 14 0 1 0;
#X connect 15 0 14 1;
#X connect 16 0 3 0;
#X connect 17 0 38 0;
#X connect 19 0 20 0;
#X connect 20 0 34 0;
#X connect 21 0 22 0;
#X connect 22 0 31 0;
#X connect 23 0 27 0;
#X connect 24 0 26 1;
#X connect 25 0 26 0;
#X connect 25 1 24 0;
#X connect 26 0 23 0;
#X connect 27 0 28 0;
#X connect 27 0 29 0;
#X connect 28 0 27 1;
#X connect 29 0 19 0;
#X connect 29 1 32 0;
#X connect 30 0 27 0;
#X connect 31 0 20 0;
#X connect 32 0 34 1;
#X connect 33 0 25 0;
#X connect 33 1 30 0;
#X connect 33 2 21 0;
#X connect 33 3 32 1;
#X connect 34 0 35 0;
#X connect 35 0 40 0;
#X connect 35 1 40 1;
#X connect 38 0 33 0;
#X connect 39 0 38 1;
#X connect 40 0 18 0;
#X coords 0 0 216 232 216 232 1 10 20;