aboutsummaryrefslogtreecommitdiff
path: root/pal/pradio.pd
blob: 16107e79ecbc707112b5e352d31ed6d4c005aaaf (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
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
#N canvas 0 84 1004 682 12;
#X obj 20 -14 inlet;
#N canvas 219 0 1004 682 show-sym 0;
#X obj -366 14 inlet;
#X obj -366 39 showsym \$1 \$2 SET-BUTTON-COLOR;
#X connect 0 0 1 0;
#X restore 875 153 pd show-sym;
#N canvas 0 0 296 250 label-tgl 0;
#X obj 122 94 sel 0 1;
#X obj 122 66 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 11 20 loadbang;
#X msg 11 46 0;
#X obj 122 194 outlet;
#X msg 122 119 symbol empty;
#X msg 148 148 symbol LABEL;
#X obj 122 28 r \$1-label-tgl;
#X connect 0 0 5 0;
#X connect 0 1 6 0;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 5 0 4 0;
#X connect 6 0 4 0;
#X connect 7 0 1 0;
#X restore 122 531 pd label-tgl;
#X obj 148 507 r \$1-patchname;
#X obj 45 507 loadbang;
#X obj 45 531 symbol \$2;
#X obj 574 291 constrain \$1 \$2;
#X obj 574 319 getGUIsize \$3 \$4 \$5 \$6;
#X obj 217 205 pack;
#X obj 36 338 t b a;
#X obj 217 175 +;
#X obj 258 175 +;
#X obj 36 313 unpack f f f f;
#N canvas 0 0 700 277 swap 0;
#X obj 23 241 outlet;
#X obj 123 238 outlet;
#X obj 23 166 spigot 1;
#X obj 123 166 spigot 0;
#X obj 23 11 inlet;
#X obj 196 11 r \$2-color-swap;
#X obj 214 166 spigot 0;
#X obj 196 37 t a b;
#X obj 196 63 pack f 1;
#X msg 275 63 0;
#X obj 196 89 route 0 1 2;
#X obj 214 238 outlet;
#X connect 2 0 0 0;
#X connect 3 0 1 0;
#X connect 4 0 2 0;
#X connect 4 0 3 0;
#X connect 4 0 6 0;
#X connect 5 0 7 0;
#X connect 6 0 11 0;
#X connect 7 0 8 0;
#X connect 7 1 9 0;
#X connect 8 0 10 0;
#X connect 9 0 2 1;
#X connect 9 0 3 1;
#X connect 9 0 6 1;
#X connect 10 0 2 1;
#X connect 10 1 3 1;
#X connect 10 2 6 1;
#X restore 202 313 pd swap;
#X obj 36 289 spigot;
#X obj 202 289 spigot;
#X obj 202 266 r \$1-rgb-value;
#X obj 36 266 r \$1-label-posNsize;
#X obj 93 290 r \$2-lock;
#X obj 266 381 loadbang;
#X obj 266 405 symbol \$2;
#X obj 217 234 s \$1-helper-xy;
#X obj 537 326 t a;
#X msg 352 460 \; \$3\$2 label \$1;
#X obj 352 435 pack s f s;
#X obj 450 405 loadbang;
#X obj 450 435 symbol \$2;
#X obj 834 356 t b a;
#X obj 834 387 set \$2 xsize ysize;
#X obj 537 95 t a a a;
#X obj 563 265 if-numscroll \$1 \$2 \$3 \$4 \$5 \$6;
#X obj 36 405 pack 0 22 22 f 20 12 10 0 s;
#X msg 36 430 \; \$9\$4 color \$1 \$2 \$3 \; \$9\$4 label_pos \$5 \$6
\; \$9\$4 label_font \$8 \$7;
#X obj 273 337 t b a;
#X obj 219 337 t b a;
#X obj 268 507 loadbang;
#X obj 268 534 symbol \$9;
#X obj 20 562 pack f s \$3 \$4 s s \$7 \$8 s;
#X obj 352 405 label \$1 \$2;
#X obj 822 -10 clean \$1 \$2;
#X obj 675 124 get \$2 id;
#X obj 20 11 pappend \$1 \$2 \$3 \$4 \$5 \$6;
#X obj 82 97 \$7;
#X obj 117 97 \$8;
#X obj 82 69 t b b a;
#X obj 390 329 t a;
#X obj 217 121 get \$2 x0 y0 x y;
#X obj 707 481 loadbang;
#X obj 707 504 symbol \$2;
#X obj 875 116 t a;
#X obj 20 164 t a;
#X obj 442 223 symbol \$2;
#X obj 442 198 loadbang;
#X obj 337 223 pack f f f s;
#X msg 337 250 \; \$4\$3 pos \$1 \$2;
#X obj 360 121 get \$2 x y id;
#X obj 360 146 + 10;
#X obj 410 146 + 10;
#X obj 537 16 lock \$1 \$2;
#X obj 537 42 route change displace deselect select click pappend;
#X obj 863 213 shownum \$1 \$2;
#X obj 506 524 vradio 15 1 0 8 empty empty empty 0 -8 0 10 -262144
-1 -1 0;
#X obj 537 -9 pstruct \$1 \$2 init num n/a n/a n/a;
#X obj 82 122 set \$2 init num;
#X msg 20 590 \; \$6 obj 10 10 \$9 \$3 1 \$7 \$8 \$9 \$2\$1 empty 0
-8 0 10 -262144 -1 -1 0;
#X obj 585 505 pack f f f f s;
#X obj 633 448 int;
#X msg 585 535 \; \$5\$1 size \$2 \; \$5\$1 number \$3;
#X obj 537 153 get \$2 id x0 y0 x y init;
#N canvas 0 0 1004 682 swapIF 0;
#X obj 14 20 inlet;
#X obj 85 22 inlet;
#X obj 14 183 outlet;
#X obj 85 184 outlet;
#X obj 221 9 loadbang;
#X obj 221 34 \$10;
#X obj 170 63 == 0;
#X obj 14 116 spigot;
#X obj 85 116 spigot;
#X obj 150 116 spigot;
#X obj 220 116 spigot;
#X obj 150 145 swap;
#X connect 0 0 7 0;
#X connect 0 0 9 0;
#X connect 1 0 8 0;
#X connect 1 0 10 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 9 1;
#X connect 5 0 10 1;
#X connect 6 0 7 1;
#X connect 6 0 8 1;
#X connect 7 0 2 0;
#X connect 8 0 3 0;
#X connect 9 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 2 0;
#X connect 11 1 3 0;
#X restore 612 366 pd swapIF;
#X obj 526 630 hradio 15 1 0 8 empty empty empty 0 -8 0 10 -262144
-1 -1 0;
#X floatatom 706 403 5 0 0 0 - - -;
#X floatatom 688 457 5 0 0 0 - - -;
#X obj 633 398 / 16;
#X obj 633 423 + 8;
#X connect 0 0 41 0;
#X connect 2 0 37 4;
#X connect 3 0 37 5;
#X connect 4 0 5 0;
#X connect 5 0 37 1;
#X connect 6 0 7 0;
#X connect 6 1 7 1;
#X connect 7 0 28 0;
#X connect 7 0 30 1;
#X connect 7 0 69 0;
#X connect 7 1 27 0;
#X connect 7 1 30 2;
#X connect 7 1 69 1;
#X connect 8 0 21 0;
#X connect 9 0 31 0;
#X connect 9 1 31 4;
#X connect 10 0 8 0;
#X connect 11 0 8 1;
#X connect 12 0 9 0;
#X connect 12 1 31 5;
#X connect 12 2 31 6;
#X connect 12 3 31 7;
#X connect 13 0 31 0;
#X connect 13 1 34 0;
#X connect 13 2 33 0;
#X connect 14 0 12 0;
#X connect 15 0 13 0;
#X connect 16 0 15 0;
#X connect 17 0 14 0;
#X connect 18 0 14 1;
#X connect 18 0 15 1;
#X connect 19 0 20 0;
#X connect 20 0 31 8;
#X connect 22 0 24 1;
#X connect 22 0 31 3;
#X connect 22 0 65 0;
#X connect 24 0 23 0;
#X connect 25 0 26 0;
#X connect 26 0 24 2;
#X connect 27 0 28 0;
#X connect 27 1 28 1;
#X connect 29 0 68 0;
#X connect 29 1 30 0;
#X connect 29 2 49 0;
#X connect 31 0 32 0;
#X connect 33 0 31 0;
#X connect 33 1 31 2;
#X connect 34 0 31 0;
#X connect 34 1 31 1;
#X connect 35 0 36 0;
#X connect 36 0 37 8;
#X connect 37 0 64 0;
#X connect 38 0 24 0;
#X connect 40 0 45 0;
#X connect 41 0 50 0;
#X connect 41 1 44 0;
#X connect 41 1 46 0;
#X connect 42 0 63 0;
#X connect 43 0 63 1;
#X connect 44 0 42 0;
#X connect 44 1 43 0;
#X connect 44 2 63 2;
#X connect 45 0 24 1;
#X connect 45 0 31 3;
#X connect 46 0 10 0;
#X connect 46 1 11 0;
#X connect 46 2 10 1;
#X connect 46 3 11 1;
#X connect 47 0 48 0;
#X connect 48 0 65 4;
#X connect 49 0 28 2;
#X connect 49 0 1 0;
#X connect 50 0 37 0;
#X connect 50 0 31 3;
#X connect 50 0 24 1;
#X connect 51 0 53 3;
#X connect 52 0 51 0;
#X connect 53 0 54 0;
#X connect 55 0 56 0;
#X connect 55 1 57 0;
#X connect 55 2 53 2;
#X connect 56 0 53 0;
#X connect 57 0 53 1;
#X connect 58 0 59 0;
#X connect 59 0 29 0;
#X connect 59 0 46 0;
#X connect 59 0 60 0;
#X connect 59 1 46 0;
#X connect 59 1 55 0;
#X connect 59 3 40 0;
#X connect 59 3 46 0;
#X connect 59 3 49 0;
#X connect 59 3 60 1;
#X connect 59 4 29 0;
#X connect 59 4 60 1;
#X connect 59 4 46 0;
#X connect 59 5 29 0;
#X connect 62 0 58 0;
#X connect 65 0 67 0;
#X connect 66 0 65 2;
#X connect 66 0 72 0;
#X connect 68 0 22 0;
#X connect 68 1 6 0;
#X connect 68 2 6 1;
#X connect 68 5 65 3;
#X connect 69 0 65 1;
#X connect 69 1 71 0;
#X connect 69 1 73 0;
#X connect 73 0 74 0;
#X connect 74 0 66 0;