-
Notifications
You must be signed in to change notification settings - Fork 0
/
PresetManager.pd
206 lines (206 loc) · 5.55 KB
/
PresetManager.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
#N canvas 352 274 1040 609 10;
#X declare -path ./customGUI;
#X obj 501 101 cnv 15 180 63 empty \$0-PreManager-presetName \$1 5
53 0 14 -228856 -1 0;
#N canvas 84 149 623 390 Premanager-STORE 0;
#X obj 101 101 cnv 15 116 15 empty \$1-store_blink_color empty 20 12
0 14 -44926 -262144 0;
#X floatatom 116 100 5 0 500 0 - - -;
#X obj 101 101 bng 15 250 50 0 empty empty - 5 7 0 10 -261234 -4160
-1;
#X obj 148 101 bng 15 250 50 0 empty empty + 5 7 0 10 -261234 -4160
-1;
#X obj 102 181 i;
#X msg 165 181 1;
#X obj 119 221 +;
#X obj 102 145 t b b;
#X msg 129 181 -1;
#X obj 138 145 t b b;
#X obj 163 101 bng 15 250 50 0 empty empty STORE 17 8 0 10 -261234
-4160 -1;
#X obj 190 273 i;
#X obj 190 340 outlet;
#X obj 415 135 t b b;
#X obj 415 161 del 200;
#X obj 119 242 clip 0 500;
#X obj 415 207 s \$1-store_blink_color;
#X obj 120 47 r \$1-UPDT-number-STORE;
#X obj 119 361 s \$1-UPDT-number-STORE;
#X floatatom 500 143 5 0 0 0 - - -;
#X msg 476 185 color 43;
#X msg 415 185 color 17;
#X connect 1 0 4 1;
#X connect 1 0 11 1;
#X connect 2 0 7 0;
#X connect 3 0 9 0;
#X connect 4 0 6 0;
#X connect 5 0 6 1;
#X connect 6 0 15 0;
#X connect 7 0 4 0;
#X connect 7 1 8 0;
#X connect 8 0 6 1;
#X connect 9 0 4 0;
#X connect 9 1 5 0;
#X connect 10 0 11 0;
#X connect 10 0 13 0;
#X connect 11 0 12 0;
#X connect 13 0 14 0;
#X connect 13 1 20 0;
#X connect 14 0 21 0;
#X connect 15 0 11 1;
#X connect 15 0 18 0;
#X connect 17 0 1 0;
#X connect 19 0 21 0;
#X connect 20 0 16 0;
#X connect 21 0 16 0;
#X coords 0 -1 1 1 118 17 2 100 100;
#X restore 503 128 pd Premanager-STORE;
#N canvas 626 193 638 420 Premanager-ReCALL 0;
#X obj 101 101 cnv 15 116 15 empty \$1-recall_blink_color empty 20
12 0 14 -44926 -262144 0;
#X floatatom 115 100 5 0 500 0 - - -;
#X obj 101 101 bng 15 250 50 0 empty empty - 5 7 0 10 -261234 -4160
-1;
#X obj 147 101 bng 15 250 50 0 empty empty + 5 7 0 10 -261234 -4160
-1;
#X obj 102 210 i;
#X msg 165 210 1;
#X obj 119 250 +;
#X obj 102 174 t b b;
#X msg 129 210 -1;
#X obj 138 174 t b b;
#X obj 162 101 bng 15 250 50 0 empty empty ReCALL 17 8 0 10 -261234
-4160 -1;
#X obj 190 305 i;
#X obj 190 329 outlet;
#X obj 416 135 t b b;
#X obj 415 166 del 200;
#X obj 119 270 clip 0 500;
#X obj 15 33 inlet;
#X floatatom 135 133 5 0 0 0 - - -;
#X obj 15 55 t b a a;
#X obj 415 235 s \$1-recall_blink_color;
#X obj 120 47 r \$1-UPDT-number-RECALL;
#X obj 119 354 s \$1-UPDT-number-RECALL;
#X floatatom 518 143 5 0 0 0 - - -;
#X msg 415 198 color 17;
#X msg 476 198 color 43;
#X connect 1 0 4 1;
#X connect 1 0 11 1;
#X connect 1 0 17 0;
#X connect 2 0 7 0;
#X connect 3 0 9 0;
#X connect 4 0 6 0;
#X connect 5 0 6 1;
#X connect 6 0 15 0;
#X connect 7 0 4 0;
#X connect 7 1 8 0;
#X connect 8 0 6 1;
#X connect 9 0 4 0;
#X connect 9 1 5 0;
#X connect 10 0 11 0;
#X connect 10 0 13 0;
#X connect 11 0 12 0;
#X connect 13 0 14 0;
#X connect 13 1 24 0;
#X connect 14 0 23 0;
#X connect 15 0 11 1;
#X connect 15 0 21 0;
#X connect 16 0 18 0;
#X connect 18 0 10 0;
#X connect 18 1 15 0;
#X connect 18 2 1 0;
#X connect 20 0 1 0;
#X connect 22 0 23 0;
#X connect 23 0 19 0;
#X connect 24 0 19 0;
#X coords 0 -1 1 1 118 17 2 100 100;
#X restore 503 107 pd Premanager-ReCALL;
#X text 82 62 www.jrsv.net;
#X text 41 49 released under GPL license;
#X text 55 77 Edinburgh - Scotland;
#X text 41 34 (c) J.Rafael Subia V. 2019;
#X text 317 36 Argument wil "link" to a family of GUIs;
#X msg 543 296 clear;
#X obj 413 270 t b b;
#X obj 413 294 del 100;
#X obj 413 319 t b b;
#X obj 349 190 cnv 15 15 15 empty empty empty 10 12 0 14 -258113 -66577
0;
#X floatatom 387 132 5 0 10 0 - - -;
#X msg 626 205 click;
#X obj 220 281 s \$1-PRECALL;
#X obj 440 343 s \$1-save_preset;
#X obj 624 107 int_nbx \$1;
#N canvas 316 276 398 295 write-preset-file 0;
#X obj 30 20 inlet;
#X obj 30 200 outlet;
#X obj 51 100 list prepend write;
#X obj 30 140 route list;
#X obj 30 120 list;
#X obj 51 80 makefilename ./PRESETS/\$1-PRST-%d;
#X obj 51 60 inlet;
#X connect 0 0 4 0;
#X connect 2 0 4 1;
#X connect 3 0 1 0;
#X connect 4 0 3 0;
#X connect 5 0 2 0;
#X connect 6 0 5 0;
#X restore 413 416 pd write-preset-file;
#X obj 626 137 bng 15 250 50 0 empty empty PRESET 17 8 0 9 -258113
-257985 -1;
#X obj 814 108 declare -path ./customGUI;
#X msg 653 231 sort;
#X obj 626 180 t b b;
#X obj 599 462 cnv 15 15 15 empty empty empty 10 12 0 14 -4160 -66577
0;
#N canvas 276 244 398 295 read-preset-file 0;
#X obj 30 20 inlet;
#X obj 30 200 outlet;
#X obj 30 140 route list;
#X obj 30 120 list;
#X obj 51 80 makefilename ./PRESETS/\$1-PRST-%d;
#X obj 51 60 inlet;
#X obj 51 100 list prepend read;
#X connect 0 0 3 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 6 0;
#X connect 5 0 4 0;
#X connect 6 0 3 1;
#X restore 239 307 pd read-preset-file;
#X obj 461 240 t b a;
#X obj 220 236 t a b a;
#X obj 543 480 text define \$1-loaded-preset;
#X text 591 276 clears before saving values \, this way deleted GUIs
get eliminated from the preset, f 28;
#X text 402 360 sends the SAVE order to all GUIs;
#X text 243 323 loads the preset before calling, f 21;
#X floatatom 152 294 5 0 0 0 - - -;
#X obj 709 509 print;
#X obj 503 59 r remote-PRST-change-\$1;
#X connect 1 0 25 0;
#X connect 2 0 13 0;
#X connect 2 0 26 0;
#X connect 8 0 27 0;
#X connect 9 0 10 0;
#X connect 9 1 8 0;
#X connect 10 0 11 0;
#X connect 11 0 18 0;
#X connect 11 1 16 0;
#X connect 14 0 27 0;
#X connect 18 0 27 0;
#X connect 19 0 22 0;
#X connect 21 0 27 0;
#X connect 22 0 14 0;
#X connect 22 1 21 0;
#X connect 24 0 27 0;
#X connect 25 0 9 0;
#X connect 25 1 18 1;
#X connect 26 0 15 0;
#X connect 26 0 31 0;
#X connect 26 1 24 0;
#X connect 26 2 24 1;
#X connect 27 1 32 0;
#X connect 33 0 2 0;
#X coords 0 -1 1 1 182 65 2 500 100;