blob: ea6b64b8b0434a79744c58763f39a8334d42c180 (
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
271
272
273
274
275
276
277
278
|
#N canvas 4 3 943 713 12;
#X msg 296 105 set 1 2 3;
#X obj 238 631 print K;
#X msg 607 211 getall;
#X msg 296 134 set A k g;
#X obj 189 660 print V;
#X obj 287 605 print D;
#X msg 296 164 set A l m;
#X msg 297 195 set 2 34;
#X msg 427 297 clr A;
#X msg 429 105 get A;
#X msg 429 130 get 2;
#X msg 31 132 echodir \$1;
#X obj 31 111 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 31 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X msg 31 234 absdir \$1;
#X text 426 277 clear value;
#X text 425 83 get value;
#X obj 336 576 print C;
#X text 408 576 command;
#X text 360 605 directory (abs or rel to current);
#X text 264 661 data value;
#X text 310 631 data key;
#X msg 32 314 pool pool1;
#X msg 33 343 pool;
#X text 77 343 set to private;
#X msg 33 405 reset;
#X text 32 384 clear all pool data;
#X msg 608 111 clrall;
#X text 599 89 clear all values in dir;
#X text 607 190 get all values in dir;
#X text 175 500 pool name can be given as argument;
#X text 598 136 clear all values and dirs;
#X msg 606 158 clrrec;
#X msg 605 258 getrec;
#X text 605 236 get all values in dir and subdirs;
#X text 670 289 bang at EOL;
#X text 673 208 bang at EOL;
#X text 670 257 depth may be given;
#X text 34 291 set pool name;
#X text 31 89 at each command;
#X text 31 73 echo current dir;
#X text 295 82 set values;
#X text 26 194 (default on);
#X text 18 178 report absolute dirs;
#X msg 34 452 help;
#X text 77 453 get some info;
#X text 670 274 default=-1 (= infinite);
#X msg 609 340 cntall;
#X text 675 338 count all values in dir;
#X msg 609 366 cntrec;
#X text 677 364 ... and subdirs;
#X text 673 378 (depth may be given);
#N canvas 472 45 420 631 dirs 0;
#X msg 111 40 mkdir fld1;
#X msg 113 135 chdir;
#X msg 109 331 updir;
#X msg 110 468 getsub -1;
#X text 112 20 make absolute dir;
#X text 111 64 make relative dir;
#X msg 112 85 mksub fld2;
#X text 111 117 change to absolute dir;
#X msg 112 178 chsub fld2;
#X text 110 159 change to relative dir;
#X text 105 312 change to upper dir;
#X text 106 364 remove absolute dir;
#X msg 107 383 rmdir fld1;
#X msg 109 422 rmsub fld2;
#X text 108 403 remove relative dir;
#X text 108 450 get subdirs;
#X text 250 494 -1 ... infinite;
#X text 166 327 depth may be given;
#X text 167 343 default=1;
#X text 208 463 depth may be given;
#X text 206 479 default=1;
#X text 107 491 count subdirs;
#X msg 110 512 cntsub -1;
#X msg 110 572 getdir;
#X text 109 552 get current dir;
#X text 175 572 always absolute;
#X obj 13 252 s \$0-pool;
#X msg 111 231 mkchdir fld1;
#X text 112 211 make and change to absolute dir;
#X msg 109 276 mkchsub fld2;
#X text 110 256 make and change to relative dir;
#X connect 0 0 26 0;
#X connect 1 0 26 0;
#X connect 2 0 26 0;
#X connect 3 0 26 0;
#X connect 6 0 26 0;
#X connect 8 0 26 0;
#X connect 12 0 26 0;
#X connect 13 0 26 0;
#X connect 22 0 26 0;
#X connect 23 0 26 0;
#X connect 27 0 26 0;
#X connect 29 0 26 0;
#X restore 716 496 pd dirs;
#X text 713 470 directory operations;
#N canvas 0 22 833 465 file 0;
#X text 117 207 save dir and subdirs;
#X text 117 165 save data in current dir;
#X text 117 253 load data into current dir;
#X text 115 300 load data into current dir and below;
#X text 132 340 depth (default -1) and;
#X text 134 356 mkdir flag (default 1) can be given;
#X text 117 37 save all;
#X text 117 81 load all (add to existing data);
#X text 22 12 file operations;
#X obj 22 188 s \$0-pool;
#X text 473 209 save dir and subdirs;
#X text 473 167 save data in current dir;
#X text 473 255 load data into current dir;
#X text 471 302 load data into current dir and below;
#X text 488 342 depth (default -1) and;
#X text 490 358 mkdir flag (default 1) can be given;
#X text 473 39 save all;
#X text 473 83 load all (add to existing data);
#X obj 378 190 s \$0-pool;
#X text 444 12 XML format;
#X msg 120 54 save pool.dat;
#X msg 118 100 load pool.dat;
#X msg 117 184 svdir pool.dat;
#X msg 117 226 svrec pool.dat;
#X msg 116 272 lddir pool.dat;
#X msg 116 319 ldrec pool.dat;
#X msg 476 56 savex pool.xml;
#X msg 474 102 loadx pool.xml;
#X msg 473 186 svxdir pool.xml;
#X msg 473 228 svxrec pool.xml;
#X msg 472 274 ldxdir pool.xml;
#X msg 472 321 ldxrec pool.xml;
#X text 26 398 If the file name is given without a path specification
the folder containing the current patcher will be used.;
#X connect 20 0 9 0;
#X connect 21 0 9 0;
#X connect 22 0 9 0;
#X connect 23 0 9 0;
#X connect 24 0 9 0;
#X connect 25 0 9 0;
#X connect 26 0 18 0;
#X connect 27 0 18 0;
#X connect 28 0 18 0;
#X connect 29 0 18 0;
#X connect 30 0 18 0;
#X connect 31 0 18 0;
#X restore 717 551 pd file;
#X text 715 528 file operations;
#X text 715 585 clipboard operations;
#N canvas 0 22 545 593 clip 0;
#X text 97 56 copy value associated to key into clipboard;
#X msg 100 77 copy A;
#X msg 98 119 cut B;
#X text 96 101 cut value associated to key into clipboard;
#X msg 96 401 paste;
#X msg 98 179 copyall;
#X text 95 158 copy all values in current dir into clipboard;
#X msg 97 221 cutall;
#X text 95 201 cut all values in current dir into clipboard;
#X text 94 263 copy all values in current dir into clipboard;
#X text 94 306 cut all values in current dir into clipboard;
#X msg 97 284 copyrec;
#X text 194 285 depth may be given (default=-1);
#X text 193 326 depth may be given (default=-1);
#X msg 96 326 cutrec 1;
#X text 194 345 1..only with first level subdirs;
#X text 96 379 paste clipboard contents into current directory;
#X text 167 397 depth (default -1) and;
#X text 169 413 mkdir flag (default 1) can be given;
#X text 183 448 depth (default -1) and;
#X text 185 466 mkdir flag (default 1) can be given;
#X msg 95 453 pasteadd;
#X text 95 431 paste but don't replace;
#X msg 94 521 clrclip;
#X text 171 520 clear clipboard (free memory);
#X text 22 12 clipboard operations (this is an internal clipboard...)
;
#X obj 4 193 s \$0-pool;
#X connect 1 0 26 0;
#X connect 2 0 26 0;
#X connect 4 0 26 0;
#X connect 5 0 26 0;
#X connect 7 0 26 0;
#X connect 11 0 26 0;
#X connect 14 0 26 0;
#X connect 21 0 26 0;
#X connect 23 0 26 0;
#X restore 716 606 pd clip;
#X text 715 439 more commands:;
#X obj 237 444 r \$0-pool;
#X text 174 517 data is shared among pool objects with the same name
;
#X obj 26 10 cnv 15 850 45 empty empty pool 10 22 0 24 -260818 -1 0
;
#X obj 386 553 print A;
#X text 458 552 attributes;
#X msg 34 490 getattributes;
#X msg 139 132 getechodir;
#X msg 130 234 getabsdir;
#X msg 141 314 getpool;
#X msg 297 345 add 2 14;
#X obj 260 478 pool @valcnt 10 @dircnt 5;
#X text 330 437 expected value and directory counts;
#X text 330 452 can be given for optimal performance;
#X msg 429 155 get 3;
#X msg 295 222 set 3 -1 1;
#X msg 32 518 getmethods;
#X text 328 466 (see attributes in properties dialog);
#X text 715 638 console printout;
#N canvas 0 22 612 291 print 0;
#X obj 21 231 s \$0-pool;
#X msg 109 80 printall;
#X msg 109 132 printrec;
#X text 110 60 print all values in dir;
#X text 109 112 print values in dir and subdirs;
#X text 190 133 (depth may be given);
#X text 22 12 print-to-console operations;
#X text 201 183 (depth may be given);
#X msg 109 181 printroot;
#X text 109 161 print values in dir and subdirs (starting from root)
;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 8 0 0 0;
#X restore 717 659 pd print;
#X text 272 13 a hierarchical storage object \, (C)2002-2004 Thomas
Grill;
#X text 272 33 http://grrrr.org;
#X msg 428 225 geti \$1;
#X text 426 185 get indexed element;
#X obj 427 205 nbx 5 14 -1e+037 1e+037 0 0 empty empty empty 0 -6 0
10 -262144 -1 -1 0 256;
#X text 297 323 set but don't replace;
#X text 294 256 set value at index;
#X msg 295 276 seti 3 Uhu;
#X text 424 343 clear value at index;
#X msg 425 363 clri 2;
#X connect 0 0 69 0;
#X connect 2 0 69 0;
#X connect 3 0 69 0;
#X connect 6 0 69 0;
#X connect 7 0 69 0;
#X connect 8 0 69 0;
#X connect 9 0 69 0;
#X connect 10 0 69 0;
#X connect 11 0 69 0;
#X connect 12 0 11 0;
#X connect 13 0 14 0;
#X connect 14 0 69 0;
#X connect 22 0 69 0;
#X connect 23 0 69 0;
#X connect 25 0 69 0;
#X connect 27 0 69 0;
#X connect 32 0 69 0;
#X connect 33 0 69 0;
#X connect 44 0 69 0;
#X connect 47 0 69 0;
#X connect 49 0 69 0;
#X connect 59 0 69 0;
#X connect 64 0 69 0;
#X connect 65 0 69 0;
#X connect 66 0 69 0;
#X connect 67 0 69 0;
#X connect 68 0 69 0;
#X connect 69 0 4 0;
#X connect 69 1 1 0;
#X connect 69 2 5 0;
#X connect 69 3 17 0;
#X connect 69 4 62 0;
#X connect 72 0 69 0;
#X connect 73 0 69 0;
#X connect 74 0 69 0;
#X connect 80 0 69 0;
#X connect 82 0 80 0;
#X connect 85 0 69 0;
#X connect 87 0 69 0;
|