From c2645dc4003b1391aba9b387a79a66cff1e63d3e Mon Sep 17 00:00:00 2001 From: Thomas Grill Date: Tue, 22 Oct 2002 23:16:30 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r189, which included commits to RCS files with non-trunk default branches. svn path=/trunk/; revision=190 --- externals/grill/pool/pool.pd | 201 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 201 insertions(+) create mode 100644 externals/grill/pool/pool.pd (limited to 'externals/grill/pool/pool.pd') diff --git a/externals/grill/pool/pool.pd b/externals/grill/pool/pool.pd new file mode 100644 index 00000000..ffd49615 --- /dev/null +++ b/externals/grill/pool/pool.pd @@ -0,0 +1,201 @@ +#N canvas 25 23 966 669 12; +#X obj 273 441 pool; +#X msg 236 52 set 1 2 3; +#X obj 272 563 print K; +#X msg 602 156 getall; +#X msg 236 81 set A k g; +#X obj 251 594 print V; +#X obj 290 532 print D; +#X msg 236 111 set A l m; +#X msg 239 140 set 2 34; +#X msg 238 171 set 3 17; +#X msg 423 50 clr A; +#X msg 427 126 get A; +#X msg 427 158 get 2; +#X msg 20 79 echodir \$1; +#X obj 20 58 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 +; +#X obj 20 160 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 +; +#X msg 20 181 absdir \$1; +#X text 422 30 clear value; +#X text 423 104 get value; +#X obj 309 505 print C; +#X text 375 504 command; +#X text 357 531 directory (abs or rel to current); +#X text 320 594 data value; +#X text 338 562 data key; +#X msg 26 279 pool pool1; +#X msg 27 308 pool; +#X text 69 308 set to private; +#X msg 27 370 reset; +#X text 26 349 clear all pool data; +#X msg 608 56 clrall; +#X text 599 34 clear all values in dir; +#X text 602 135 get all values in dir; +#X text 314 442 pool name can be given as argument; +#X text 598 81 clear all values and dirs; +#X msg 606 103 clrrec; +#X msg 600 203 getrec; +#X text 600 181 get all values in dir and subdirs; +#X text 652 232 bang at EOL; +#X text 661 150 bang at EOL; +#X text 655 202 depth may be given; +#X text 22 258 data is shared among pool objects; +#X text 23 237 set pool name; +#X text 20 36 at each command; +#X text 20 20 echo current dir; +#X text 233 27 set values; +#X text 15 141 (default on); +#X text 7 125 report absolute dirs; +#X msg 28 417 help; +#X text 70 418 get some info; +#X text 658 219 default=-1 (= infinite); +#X msg 604 283 cntall; +#X text 663 281 count all values in dir; +#X msg 604 309 cntrec; +#X text 665 307 ... and subdirs; +#X text 661 321 (depth may be given); +#X msg 237 226 add 3 14; +#X text 235 205 set but don't replace; +#N canvas 0 0 421 528 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 239 379 -1 ... infinite; +#X text 161 213 depth may be given; +#X text 162 229 default=1; +#X text 192 348 depth may be given; +#X text 192 365 default=1; +#X text 108 377 count subdirs; +#X msg 111 398 cntsub -1; +#X obj 11 239 outlet; +#X msg 111 458 getdir; +#X text 110 438 get current dir; +#X text 172 457 always absolute; +#X connect 0 0 23 0; +#X connect 1 0 23 0; +#X connect 2 0 23 0; +#X connect 3 0 23 0; +#X connect 6 0 23 0; +#X connect 8 0 23 0; +#X connect 12 0 23 0; +#X connect 13 0 23 0; +#X connect 22 0 23 0; +#X connect 24 0 23 0; +#X restore 713 494 pd dirs; +#X text 710 468 directory operations; +#N canvas 0 0 467 434 file 0; +#X text 117 207 save dir and subdirs; +#X text 117 165 save data in current dir; +#X msg 117 184 svdir c:/temp/pool.dat; +#X msg 117 226 svrec c:/temp/pool.dat; +#X msg 116 272 lddir c:/temp/pool.dat; +#X msg 116 319 ldrec c:/temp/pool.dat; +#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 obj 22 188 outlet; +#X text 117 37 save all; +#X text 117 81 load all (add to existing data); +#X msg 118 100 load c:/temp/pool.dat; +#X msg 120 54 save c:/temp/pool.dat; +#X text 22 12 file operations; +#X connect 2 0 10 0; +#X connect 3 0 10 0; +#X connect 4 0 10 0; +#X connect 5 0 10 0; +#X connect 13 0 10 0; +#X connect 14 0 10 0; +#X restore 714 549 pd file; +#X text 712 526 file operations; +#X text 712 583 clipboard operations; +#N canvas 0 0 529 577 clip 0; +#X obj 17 183 outlet; +#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 171 448 depth (default -1) and; +#X text 173 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 160 523 clear clipboard (free memory); +#X text 22 12 clipboard operations (this is an internal clipboard...) +; +#X connect 2 0 0 0; +#X connect 3 0 0 0; +#X connect 5 0 0 0; +#X connect 6 0 0 0; +#X connect 8 0 0 0; +#X connect 12 0 0 0; +#X connect 15 0 0 0; +#X connect 22 0 0 0; +#X connect 24 0 0 0; +#X restore 714 606 pd clip; +#X text 712 437 more commands:; +#X obj 780 494 s \$0-pool; +#X obj 778 549 s \$0-pool; +#X obj 778 606 s \$0-pool; +#X obj 349 392 r \$0-pool; +#X connect 0 0 5 0; +#X connect 0 1 2 0; +#X connect 0 2 6 0; +#X connect 0 3 19 0; +#X connect 1 0 0 0; +#X connect 3 0 0 0; +#X connect 4 0 0 0; +#X connect 7 0 0 0; +#X connect 8 0 0 0; +#X connect 9 0 0 0; +#X connect 10 0 0 0; +#X connect 11 0 0 0; +#X connect 12 0 0 0; +#X connect 13 0 0 0; +#X connect 14 0 13 0; +#X connect 15 0 16 0; +#X connect 16 0 0 0; +#X connect 24 0 0 0; +#X connect 25 0 0 0; +#X connect 27 0 0 0; +#X connect 29 0 0 0; +#X connect 34 0 0 0; +#X connect 35 0 0 0; +#X connect 47 0 0 0; +#X connect 50 0 0 0; +#X connect 52 0 0 0; +#X connect 55 0 0 0; +#X connect 57 0 64 0; +#X connect 59 0 65 0; +#X connect 62 0 66 0; +#X connect 67 0 0 0; -- cgit v1.2.1