-
Notifications
You must be signed in to change notification settings - Fork 0
/
convert-address-barra-a-espacio.pd
189 lines (189 loc) · 4.48 KB
/
convert-address-barra-a-espacio.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
#N canvas 1 88 697 719 10;
#X obj 37 50 t a a;
#X obj 62 522 expr 1-$f1;
#X msg 62 544 list /a/a-bank1 set \$1;
#X obj 250 15 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 247 43 list /a/a-bank1 \$1;
#X obj 67 85 list split 1;
#X obj 67 118 symbol;
#X obj 62 287 route a;
#X obj 67 212 list append;
#X obj 67 234 list trim;
#X obj 104 397 expr 1-$f1;
#X obj 175 467 expr 1-$f1;
#X obj 203 345 expr 1-$f1;
#X obj 362 522 expr 1-$f1;
#X obj 404 397 expr 1-$f1;
#X obj 475 467 expr 1-$f1;
#X obj 503 345 expr 1-$f1;
#X obj 362 309 route b-bank1 b-bank2 b-bank3 b-bank4;
#X msg 362 544 list /a/b-bank1 set \$1;
#X msg 104 419 list /a/a-bank2 set \$1;
#X msg 203 367 list /a/a-bank4 set \$1;
#X msg 175 489 list /a/a-bank3 set \$1;
#X msg 501 369 list /a/b-bank4 set \$1;
#X msg 471 492 list /a/b-bank3 set \$1;
#X msg 404 419 list /a/b-bank2 set \$1;
#X obj 66 657 send toGUI;
#X obj 362 596 t a a;
#X obj 62 596 t a a;
#X obj 343 666 print toGUI;
#N canvas 384 233 595 626 address2address 0;
#X obj 153 78 t s b b;
#X obj 153 100 list fromsymbol;
#X obj 153 144 sel 47;
#X obj 153 196 f;
#X obj 153 250 sel 1;
#X obj 153 223 > 0;
#X msg 168 170 0;
#X obj 187 196 + 1;
#X obj 297 149 t b b;
#X obj 297 221 list;
#X obj 297 243 list tosymbol;
#X obj 335 176 list prepend;
#X obj 335 198 t l l;
#X obj 295 458 symbol;
#X obj 295 336 f 2;
#X obj 335 336 - 1;
#X obj 295 380 == 0;
#X obj 345 458 symbol;
#X obj 294 266 t b b s s;
#X obj 295 402 sel 0;
#X obj 345 431 t b;
#X obj 298 499 list prepend;
#X obj 237 183 t b b;
#N canvas 1 88 720 561 list-drip 0;
#X obj 63 84 t a a;
#X obj 63 241 spigot;
#X obj 102 149 bang;
#X obj 102 168 1;
#X obj 223 149 route bang;
#X obj 183 150 bang;
#X obj 183 169 0;
#X obj 102 114 list split 2;
#X obj 232 379 list split;
#X obj 299 328 list length;
#X obj 299 350 >> 1;
#X obj 63 260 t a a a a;
#X obj 63 446 list split;
#X obj 130 398 list length;
#X obj 130 423 >> 1;
#X obj 31 19 inlet;
#X obj 290 175 outlet;
#X text 73 19 Copyright 2009 by Mathieu Bouchard;
#X obj 31 53 t b a;
#X obj 465 119 outlet;
#X text 520 121 signal end of list;
#X text 381 23 made compatible with [list-drip]: fbar 2009;
#X connect 0 0 1 0;
#X connect 0 1 7 0;
#X connect 1 0 11 0;
#X connect 2 0 3 0;
#X connect 3 0 1 1;
#X connect 4 1 16 0;
#X connect 5 0 6 0;
#X connect 6 0 1 1;
#X connect 7 0 2 0;
#X connect 7 2 4 0;
#X connect 7 2 5 0;
#X connect 8 0 0 0;
#X connect 9 0 10 0;
#X connect 10 0 8 1;
#X connect 11 0 12 0;
#X connect 11 1 13 0;
#X connect 11 2 8 0;
#X connect 11 3 9 0;
#X connect 12 1 0 0;
#X connect 13 0 14 0;
#X connect 14 0 12 1;
#X connect 15 0 18 0;
#X connect 18 0 19 0;
#X connect 18 1 0 0;
#X restore 153 122 pd list-drip;
#X msg 310 309 2;
#X obj 153 43 inlet;
#X obj 298 551 outlet;
#X connect 0 0 1 0;
#X connect 0 1 6 0;
#X connect 0 2 11 1;
#X connect 1 0 23 0;
#X connect 2 0 3 0;
#X connect 2 1 11 0;
#X connect 3 0 7 0;
#X connect 3 0 5 0;
#X connect 4 0 8 0;
#X connect 5 0 4 0;
#X connect 6 0 3 1;
#X connect 7 0 3 1;
#X connect 8 0 9 0;
#X connect 8 1 11 1;
#X connect 9 0 10 0;
#X connect 10 0 18 0;
#X connect 11 0 12 0;
#X connect 12 0 9 1;
#X connect 12 1 11 1;
#X connect 13 0 21 1;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 15 0 14 1;
#X connect 16 0 19 0;
#X connect 17 0 21 0;
#X connect 18 1 14 0;
#X connect 18 2 13 1;
#X connect 18 3 17 1;
#X connect 19 0 13 0;
#X connect 19 1 20 0;
#X connect 20 0 17 0;
#X connect 21 0 26 0;
#X connect 22 0 24 0;
#X connect 22 1 9 0;
#X connect 23 0 2 0;
#X connect 23 1 22 0;
#X connect 24 0 14 1;
#X connect 25 0 0 0;
#X restore 67 166 pd address2address;
#X obj 62 309 route a-bank1 a-bank2 a-bank3 a-bank4;
#X obj 37 2 receive fromGUI;
#X obj 34 726 send toNetwork;
#X connect 0 0 32 0;
#X connect 0 1 5 0;
#X connect 1 0 2 0;
#X connect 2 0 27 0;
#X connect 3 0 4 0;
#X connect 4 0 0 0;
#X connect 5 0 6 0;
#X connect 5 1 8 1;
#X connect 6 0 29 0;
#X connect 7 0 30 0;
#X connect 8 0 9 0;
#X connect 9 0 7 0;
#X connect 10 0 19 0;
#X connect 11 0 21 0;
#X connect 12 0 20 0;
#X connect 13 0 18 0;
#X connect 14 0 24 0;
#X connect 15 0 23 0;
#X connect 16 0 22 0;
#X connect 17 0 13 0;
#X connect 17 1 14 0;
#X connect 17 2 15 0;
#X connect 17 3 16 0;
#X connect 18 0 26 0;
#X connect 19 0 27 0;
#X connect 20 0 27 0;
#X connect 21 0 27 0;
#X connect 22 0 26 0;
#X connect 23 0 26 0;
#X connect 24 0 26 0;
#X connect 26 0 25 0;
#X connect 26 1 28 0;
#X connect 27 0 25 0;
#X connect 27 1 28 0;
#X connect 29 0 8 0;
#X connect 30 0 1 0;
#X connect 30 1 10 0;
#X connect 30 2 11 0;
#X connect 30 3 12 0;
#X connect 30 4 17 0;
#X connect 31 0 0 0;