path: root/externals/grill/pool/pool.pd

#N canvas 12 3 946 702 12;
#X msg 296 105 set 1 2 3;
#X obj 308 619 print K;
#X msg 607 211 getall;
#X msg 296 134 set A k g;
#X obj 259 648 print V;
#X obj 357 593 print D;
#X msg 296 164 set A l m;
#X msg 299 193 set 2 34;
#X msg 429 102 clr A;
#X msg 429 165 get A;
#X msg 429 190 get 2;
#X msg 40 132 echodir \$1;
#X obj 40 111 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 40 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X msg 40 234 absdir \$1;
#X text 428 82 clear value;
#X text 425 143 get value;
#X obj 406 564 print C;
#X text 478 564 command;
#X text 430 593 directory (abs or rel to current);
#X text 334 649 data value;
#X text 380 619 data key;
#X msg 41 314 pool pool1;
#X msg 42 343 pool;
#X text 86 343 set to private;
#X msg 42 405 reset;
#X text 41 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 43 291 set pool name;
#X text 40 89 at each command;
#X text 40 73 echo current dir;
#X text 293 80 set values;
#X text 35 194 (default on);
#X text 27 178 report absolute dirs;
#X msg 43 452 help;
#X text 86 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);
#X text 295 258 set but don't replace;
#N canvas 0 0 520 546 dirs 0;
#X msg 109 27 mkdir fld1;
#X msg 111 122 chdir;
#X msg 110 217 updir;
#X msg 111 354 getsub -1;
#X text 110 7 make absolute dir;
#X text 109 51 make relative dir;
#X msg 110 72 mksub fld2;
#X text 109 104 change to absolute dir;
#X msg 110 165 chsub fld2;
#X text 108 146 change to relative dir;
#X text 106 198 change to upper dir;
#X text 107 250 remove absolute dir;
#X msg 108 269 rmdir fld1;
#X msg 110 308 rmsub fld2;
#X text 109 289 remove relative dir;
#X text 109 336 get subdirs;
#X text 251 380 -1 ... infinite;
#X text 167 213 depth may be given;
#X text 168 229 default=1;
#X text 209 349 depth may be given;
#X text 207 365 default=1;
#X text 108 377 count subdirs;
#X msg 111 398 cntsub -1;
#X msg 111 458 getdir;
#X text 110 438 get current dir;
#X text 176 458 always absolute;
#X obj 11 239 s \$0-pool;
#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 restore 716 496 pd dirs;
#X text 713 470 directory operations;
#N canvas 0 0 829 461 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 0 541 589 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 298 389 r \$0-pool;
#X text 174 517 data is shared among pool objects with the same name
;
#X obj 26 10 cnv 15 850 40 empty empty pool 10 22 0 24 -260818 -1 0
;
#X text 272 33 http://www.parasitaere-kapazitaeten.net;
#X obj 456 541 print A;
#X text 521 541 attributes;
#X msg 43 490 getattributes;
#X msg 136 132 getechodir;
#X msg 132 232 getabsdir;
#X msg 146 313 getpool;
#X text 272 13 a hierarchical storage object \, (C)2002-2003 Thomas
Grill;
#X msg 297 279 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 215 get 3;
#X msg 300 224 set 3 -1 1;
#X msg 41 518 getmethods;
#X text 328 466 (see attributes in properties dialog);
#X text 715 638 console printout;
#N canvas 0 0 553 284 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 179 131 (depth may be given);
#X text 22 12 print-to-console operations;
#X text 190 185 (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 connect 0 0 72 0;
#X connect 2 0 72 0;
#X connect 3 0 72 0;
#X connect 6 0 72 0;
#X connect 7 0 72 0;
#X connect 8 0 72 0;
#X connect 9 0 72 0;
#X connect 10 0 72 0;
#X connect 11 0 72 0;
#X connect 12 0 11 0;
#X connect 13 0 14 0;
#X connect 14 0 72 0;
#X connect 22 0 72 0;
#X connect 23 0 72 0;
#X connect 25 0 72 0;
#X connect 27 0 72 0;
#X connect 32 0 72 0;
#X connect 33 0 72 0;
#X connect 44 0 72 0;
#X connect 47 0 72 0;
#X connect 49 0 72 0;
#X connect 60 0 72 0;
#X connect 66 0 72 0;
#X connect 67 0 72 0;
#X connect 68 0 72 0;
#X connect 69 0 72 0;
#X connect 71 0 72 0;
#X connect 72 0 4 0;
#X connect 72 1 1 0;
#X connect 72 2 5 0;
#X connect 72 3 17 0;
#X connect 72 4 64 0;
#X connect 75 0 72 0;
#X connect 76 0 72 0;
#X connect 77 0 72 0;