From dbb44ff54370b9b01e9f48e0abdc1c091213c573 Mon Sep 17 00:00:00 2001 From: "B. Bogart" Date: Thu, 6 Apr 2006 13:14:41 +0000 Subject: Changes to make pT work in pd-extended. svn path=/trunk/abstractions/pixelTANGO/; revision=4820 --- abstractions/pt.filelist.pd | 93 ++++++++++++++++++++++++++------------------- 1 file changed, 54 insertions(+), 39 deletions(-) (limited to 'abstractions/pt.filelist.pd') diff --git a/abstractions/pt.filelist.pd b/abstractions/pt.filelist.pd index 1b7bb71..7aa5cef 100644 --- a/abstractions/pt.filelist.pd +++ b/abstractions/pt.filelist.pd @@ -1,7 +1,7 @@ -#N canvas 394 251 130 112 10; +#N canvas 19 424 609 373 10; #X obj 1 1 cnv 5 128 110 empty empty List_Files 5 6 1 9 -249661 -66577 0; -#N canvas 544 188 599 585 interna 0; +#N canvas 544 188 619 605 interna 0; #X obj 115 20 cnv 15 350 500 empty empty empty 5 8 1 10 -260390 -1 0; #X obj 326 474 prepend file; @@ -12,44 +12,61 @@ #X obj 21 334 outlet; #X obj 326 454 prepend open; #X text 9 4 Facility to glob directories of files; -#X obj 164 218 dirlist; -#X obj 235 145 r \$0-dir; -#X obj 123 145 r \$0-pattern; -#X obj 123 165 prepend pattern; +#X obj 304 202 r \$0-dir; +#X obj 133 211 r \$0-pattern; #X obj 236 50 mementoSetup pt.filelist \$0; -#X obj 236 90 f \$0; -#X obj 164 266 s \$0-files; +#X obj 132 481 s \$0-files; #X obj 326 434 r \$0-file; -#X obj 164 242 prepend options; -#X msg 253 191 set-dir \$1; -#X msg 236 110 \; \$1-set-pattern symbol *; -#X obj 235 219 s \$0-dir-in; -#X obj 124 475 r \$0-reload; -#X obj 124 497 s \$0-set-pattern; -#X obj 304 145 r \$0-dir-out; -#X obj 236 70 delay 65; +#X obj 304 243 s \$0-dir-in; +#X obj 177 240 r \$0-reload; +#X obj 303 265 r \$0-dir-out; #X text 21 533 if the directory is the same then don't send back to symbol; -#X obj 235 165 dirpanel; +#X obj 304 222 dirpanel; +#X obj 132 440 folder_list; +#X msg 132 460 append \$1; +#X text 210 482 2popup; +#X obj 134 310 symbol; +#X obj 185 334 symbol; +#X text 187 312 pattern; +#X text 234 335 directory; +#X obj 133 397 makesymbol %s/%s; +#X obj 133 355 pack s s; +#X obj 266 123 getdir; +#X msg 134 376 list \$2 \$1; +#X obj 133 417 t s b; +#X msg 225 440 options; +#X obj 236 71 delay 250; +#X obj 133 189 s \$0-set-pattern; +#X obj 236 94 t b b; +#X msg 133 169 symbol *; #X connect 1 0 3 0; -#X connect 2 0 13 0; +#X connect 2 0 11 0; #X connect 5 0 6 0; #X connect 7 0 1 0; -#X connect 9 0 17 0; -#X connect 10 0 26 0; -#X connect 11 0 12 0; -#X connect 12 0 9 0; -#X connect 13 0 24 0; -#X connect 13 1 3 0; -#X connect 14 0 19 0; -#X connect 16 0 7 0; -#X connect 17 0 15 0; -#X connect 18 0 9 0; -#X connect 21 0 22 0; -#X connect 23 0 18 0; -#X connect 24 0 14 0; -#X connect 26 0 18 0; -#X connect 26 0 20 0; +#X connect 9 0 18 0; +#X connect 10 0 22 0; +#X connect 11 0 32 0; +#X connect 11 1 3 0; +#X connect 13 0 7 0; +#X connect 15 0 22 0; +#X connect 16 0 23 0; +#X connect 18 0 14 0; +#X connect 19 0 20 0; +#X connect 20 0 12 0; +#X connect 22 0 27 0; +#X connect 23 0 27 1; +#X connect 26 0 30 0; +#X connect 27 0 29 0; +#X connect 28 0 14 0; +#X connect 29 0 26 0; +#X connect 30 0 19 0; +#X connect 30 1 31 0; +#X connect 31 0 12 0; +#X connect 32 0 34 0; +#X connect 34 0 35 0; +#X connect 34 1 28 0; +#X connect 35 0 33 0; #X restore 10 295 pd interna; #X obj 10 273 inlet; #X obj 75 274 inlet; @@ -75,8 +92,7 @@ symbol; #X obj 386 9 r \$0-dir-out; #X obj 386 122 s \$0-dir-in; #X obj 301 97 t b b; -#X msg 17 215 options empty \, name files; -#X obj 3 81 popup 124 25 grey95 files empty; +#X obj 3 81 popup 124 25 grey95 files; #X obj 147 22 r \$0-files; #X connect 1 0 4 0; #X connect 1 1 5 0; @@ -91,7 +107,6 @@ symbol; #X connect 21 0 11 0; #X connect 23 0 12 0; #X connect 23 1 22 0; -#X connect 24 0 25 0; -#X connect 25 1 9 0; -#X connect 26 0 25 0; -#X coords 0 0 1 1 130 112 1; +#X connect 24 1 9 0; +#X connect 25 0 24 0; +#X coords 0 0 1 1 130 112 1 0 0; -- cgit v1.2.1