-
Notifications
You must be signed in to change notification settings - Fork 0
/
xsssad.auto.pd
281 lines (281 loc) · 6.74 KB
/
xsssad.auto.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
#N canvas 9 77 1010 706 10;
#X obj 179 46 inlet;
#X obj 253 75 list prepend \$1;
#X obj 253 180 list trim;
#X obj 253 45 inlet;
#X obj 42 328 b;
#X obj 179 73 b;
#X obj 253 243 route \$1;
#X obj 563 378 b;
#X obj 563 270 spigot;
#X obj 699 92 loadbang;
#X obj 699 270 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 699 214 select 0;
#X obj 731 161 + 1;
#X obj 699 140 t a a;
#X obj 699 236 f 1;
#X obj 305 525 outlet;
#X obj 179 414 route bang;
#X text 277 404 filter out empty lists;
#X obj 630 494 list prepend persist \$1;
#X obj 179 385 list append;
#X text 251 130 on SSSAD we eavesdrop the communication;
#X text 722 269 <- only the first instance responds to "save";
#X text 185 560 2007/2008 fbar;
#X text 864 113 Enhancement by Enrique Erne;
#X obj 563 445 list append;
#X obj 563 468 route bang;
#X text 647 467 filter out empty lists here \, too.;
#X obj 42 246 route set setonly;
#X obj 100 293 route \$1;
#X obj 100 271 list trim;
#X obj 628 344 route \$1;
#X obj 628 322 list trim;
#X obj 563 297 route save saveonly;
#X obj 630 518 list trim;
#X obj 515 33 inlet dyna.loadbang;
#X obj 515 54 s \$0-dyna.loadbang;
#X obj 680 69 r \$0-dyna.loadbang;
#X obj 471 54 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 253 443 route float symbol;
#X obj 783 48 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#N canvas 551 206 330 293 r-SSSAD-AUTO_ADMIN 0;
#N canvas 0 0 450 300 mux2 0;
#X obj 114 121 == 0;
#X obj 190 145 spigot;
#X obj 61 43 inlet;
#X obj 229 66 inlet;
#X obj 61 143 spigot 1;
#X obj 61 186 outlet;
#X obj 190 45 inlet;
#X connect 0 0 4 1;
#X connect 1 0 5 0;
#X connect 2 0 4 0;
#X connect 3 0 0 0;
#X connect 3 0 1 1;
#X connect 4 0 5 0;
#X connect 6 0 1 0;
#X restore 63 177 pd mux2;
#X obj 63 211 outlet;
#X obj 109 75 loadbang;
#X obj 109 117 select 0;
#X msg 109 139 0;
#X msg 162 138 1;
#X obj 109 95 list append \$2;
#X obj 192 66 r \$0-dyna.loadbang;
#X obj 63 16 r SSSAD-AUTO_ADMIN;
#X obj 86 41 r \$2-SSSAD-AUTO_ADMIN;
#X connect 0 0 1 0;
#X connect 2 0 6 0;
#X connect 3 0 4 0;
#X connect 3 1 5 0;
#X connect 4 0 0 2;
#X connect 5 0 0 2;
#X connect 6 0 3 0;
#X connect 7 0 6 0;
#X connect 8 0 0 0;
#X connect 9 0 0 1;
#X restore 42 207 pd r-SSSAD-AUTO_ADMIN;
#N canvas 528 330 322 286 s-SSSAD-AUTO 0;
#X obj 63 38 inlet;
#X obj 123 39 loadbang;
#N canvas 18 93 450 300 demux2 0;
#X obj 114 91 == 0;
#X obj 190 115 spigot;
#X obj 61 43 inlet;
#X obj 229 46 inlet;
#X obj 61 113 spigot 1;
#X obj 61 156 outlet;
#X obj 190 157 outlet;
#X connect 0 0 4 1;
#X connect 1 0 6 0;
#X connect 2 0 4 0;
#X connect 2 0 1 0;
#X connect 3 0 0 0;
#X connect 3 0 1 1;
#X connect 4 0 5 0;
#X restore 63 137 pd demux2;
#X obj 123 81 select 0;
#X msg 123 103 0;
#X msg 176 102 1;
#X obj 123 59 list append \$2;
#X obj 123 39 loadbang;
#X obj 123 81 select 0;
#X msg 123 103 0;
#X msg 176 102 1;
#X obj 123 59 list append \$2;
#X obj 104 15 r \$0-dyna.loadbang;
#X obj 63 176 s SSSAD-AUTO;
#X obj 142 176 s \$2-SSSAD-AUTO;
#X connect 0 0 2 0;
#X connect 1 0 6 0;
#X connect 2 0 13 0;
#X connect 2 1 14 0;
#X connect 3 0 4 0;
#X connect 3 1 5 0;
#X connect 4 0 2 1;
#X connect 5 0 2 1;
#X connect 6 0 3 0;
#X connect 7 0 11 0;
#X connect 8 0 9 0;
#X connect 8 1 10 0;
#X connect 11 0 8 0;
#X connect 12 0 6 0;
#X restore 253 104 pd s-SSSAD-AUTO;
#N canvas 554 229 330 246 r-SSSAD-AUTO 0;
#N canvas 6 47 450 300 mux2 0;
#X obj 114 121 == 0;
#X obj 190 145 spigot;
#X obj 61 43 inlet;
#X obj 229 66 inlet;
#X obj 61 143 spigot 1;
#X obj 61 186 outlet;
#X obj 190 45 inlet;
#X connect 0 0 4 1;
#X connect 1 0 5 0;
#X connect 2 0 4 0;
#X connect 3 0 0 0;
#X connect 3 0 1 1;
#X connect 4 0 5 0;
#X connect 6 0 1 0;
#X restore 63 167 pd mux2;
#X obj 63 201 outlet;
#X obj 109 74 loadbang;
#X obj 109 116 select 0;
#X msg 109 138 0;
#X msg 162 137 1;
#X obj 109 94 list append \$2;
#X obj 205 45 r \$0-dyna.loadbang;
#X obj 63 16 r SSSAD-AUTO;
#X obj 86 41 r \$2-SSSAD-AUTO;
#X connect 0 0 1 0;
#X connect 2 0 6 0;
#X connect 3 0 4 0;
#X connect 3 1 5 0;
#X connect 4 0 0 2;
#X connect 5 0 0 2;
#X connect 6 0 3 0;
#X connect 7 0 6 0;
#X connect 8 0 0 0;
#X connect 9 0 0 1;
#X restore 253 156 pd r-SSSAD-AUTO;
#X obj 699 115 value \$1.\$2.SSSAD-AUTO.req;
#X obj 731 184 value \$1.\$2.SSSAD-AUTO.req;
#N canvas 548 206 330 246 r-SSSAD-AUTO_ADMIN 0;
#N canvas 0 0 450 300 mux2 0;
#X obj 114 121 == 0;
#X obj 190 145 spigot;
#X obj 61 43 inlet;
#X obj 229 66 inlet;
#X obj 61 143 spigot 1;
#X obj 61 186 outlet;
#X obj 190 45 inlet;
#X connect 0 0 4 1;
#X connect 1 0 5 0;
#X connect 2 0 4 0;
#X connect 3 0 0 0;
#X connect 3 0 1 1;
#X connect 4 0 5 0;
#X connect 6 0 1 0;
#X restore 63 177 pd mux2;
#X obj 63 211 outlet;
#X obj 109 75 loadbang;
#X obj 109 117 select 0;
#X msg 109 139 0;
#X msg 162 138 1;
#X obj 109 95 list append \$2;
#X obj 197 68 r \$0-dyna.loadbang;
#X obj 63 16 r SSSAD-AUTO_ADMIN;
#X obj 86 41 r \$2-SSSAD-AUTO_ADMIN;
#X connect 0 0 1 0;
#X connect 2 0 6 0;
#X connect 3 0 4 0;
#X connect 3 1 5 0;
#X connect 4 0 0 2;
#X connect 5 0 0 2;
#X connect 6 0 3 0;
#X connect 7 0 6 0;
#X connect 8 0 0 0;
#X connect 9 0 0 1;
#X restore 563 210 pd r-SSSAD-AUTO_ADMIN;
#N canvas 531 330 322 286 s-SSSAD-AUTO_ADMIN 0;
#X obj 63 39 inlet;
#N canvas 6 77 450 300 demux2 0;
#X obj 114 91 == 0;
#X obj 190 115 spigot;
#X obj 61 43 inlet;
#X obj 229 46 inlet;
#X obj 61 113 spigot 1;
#X obj 61 156 outlet;
#X obj 190 157 outlet;
#X connect 0 0 4 1;
#X connect 1 0 6 0;
#X connect 2 0 4 0;
#X connect 2 0 1 0;
#X connect 3 0 0 0;
#X connect 3 0 1 1;
#X connect 4 0 5 0;
#X restore 63 137 pd demux2;
#X obj 123 39 loadbang;
#X obj 123 81 select 0;
#X msg 123 103 0;
#X msg 176 102 1;
#X obj 123 59 list append \$2;
#X obj 180 19 r \$0-dyna.loadbang;
#X obj 123 176 s \$2-SSSAD-AUTO_ADMIN;
#X obj 63 206 s SSSAD-AUTO_ADMIN;
#X connect 0 0 1 0;
#X connect 1 0 9 0;
#X connect 1 1 8 0;
#X connect 2 0 6 0;
#X connect 3 0 4 0;
#X connect 3 1 5 0;
#X connect 4 0 1 1;
#X connect 5 0 1 1;
#X connect 6 0 3 0;
#X connect 7 0 6 0;
#X restore 630 542 pd s-SSSAD-AUTO_ADMIN;
#X connect 0 0 5 0;
#X connect 1 0 41 0;
#X connect 2 0 6 0;
#X connect 3 0 1 0;
#X connect 4 0 19 0;
#X connect 5 0 19 0;
#X connect 6 0 19 1;
#X connect 6 0 24 1;
#X connect 7 0 24 0;
#X connect 8 0 32 0;
#X connect 9 0 43 0;
#X connect 11 0 14 0;
#X connect 12 0 44 0;
#X connect 13 0 11 0;
#X connect 13 1 12 0;
#X connect 14 0 8 1;
#X connect 14 0 10 0;
#X connect 16 1 38 0;
#X connect 18 0 33 0;
#X connect 19 0 16 0;
#X connect 24 0 25 0;
#X connect 25 1 18 0;
#X connect 27 0 4 0;
#X connect 27 1 29 0;
#X connect 28 0 4 0;
#X connect 29 0 28 0;
#X connect 30 0 7 0;
#X connect 31 0 30 0;
#X connect 32 0 7 0;
#X connect 32 1 31 0;
#X connect 33 0 46 0;
#X connect 34 0 35 0;
#X connect 34 0 37 0;
#X connect 36 0 43 0;
#X connect 38 0 15 0;
#X connect 38 1 15 0;
#X connect 39 0 43 0;
#X connect 40 0 27 0;
#X connect 42 0 2 0;
#X connect 43 0 13 0;
#X connect 45 0 8 0;