put path to project folder into dynamic [declare] statement so these objects can be used for built-in objects too

svn path=/trunk/externals/many/; revision=14530

1 files changed, 85 insertions, 71 deletions

diff --git a/bundle.pd b/bundle.pd
index c2162fc..a3e96e1 100644
--- a/bundle.pd
+++ b/bundle.pd
@@ -1,4 +1,4 @@
-#N canvas 330 263 622 492 10;
+#N canvas 226 299 622 492 10;
 #X obj 26 8 inlet;
 #X obj 99 306 until;
 #X obj 137 333 + 1;
@@ -10,89 +10,104 @@
 #X obj 7 181 float \$1;
 #X obj 136 114 outlet;
 #X text 122 62 <-- open this subpatch to see the instances;
-#N canvas 418 450 400 437 create 0;
+#N canvas 863 482 400 437 create 0;
 #X obj 29 10 inlet;
 #X obj 281 61 float \$1;
-#X obj 155 83 + 50;
 #X obj 173 108 pack float symbol float float;
 #X obj 173 153 list trim;
 #X obj 218 61 symbol \$2;
 #X obj 173 132 list append \$3 \$4 \$5 \$6 \$7;
-#X msg 52 215 connect 1 0 \$1 1;
 #X obj 29 37 trigger anything anything anything bang bang anything
 ;
-#X msg 42 235 connect \$1 0 2 0;
-#X msg 25 259 connect \$1 1 3 0;
 #X obj 173 409 outlet;
 #X msg 173 176 obj 150 \$1 \$2 \$4 \$3 \$5 \$6 \$7 \$8 \$9;
-#X obj 29 141 + 4;
-#X msg 61 193 connect 0 0 \$1 0;
 #X obj 155 61 * 20;
-#N canvas 183 272 316 307 expandpath 0;
-#X obj 59 16 inlet;
-#X obj 55 271 outlet;
-#X obj 59 98 list append;
-#X msg 58 153 symbol \$1/\$2;
-#X obj 59 43 trigger bang anything;
-#X obj 58 67 ggee/getdir 2;
-#X connect 0 0 4 0;
-#X connect 2 0 3 0;
-#X connect 3 0 1 0;
-#X connect 4 0 5 0;
-#X connect 4 1 2 1;
-#X connect 5 0 2 0;
-#X restore 218 81 pd expandpath;
-#X connect 0 0 8 0;
-#X connect 1 0 3 2;
-#X connect 2 0 3 0;
-#X connect 3 0 6 0;
-#X connect 4 0 12 0;
-#X connect 5 0 16 0;
-#X connect 6 0 4 0;
-#X connect 7 0 11 0;
-#X connect 8 0 13 0;
-#X connect 8 2 15 0;
-#X connect 8 3 5 0;
-#X connect 8 4 1 0;
-#X connect 8 5 3 3;
-#X connect 9 0 11 0;
-#X connect 10 0 11 0;
-#X connect 12 0 11 0;
+#X obj 155 83 + 70;
+#X msg 52 215 connect 2 0 \$1 1;
+#X msg 42 235 connect \$1 0 3 0;
+#X msg 25 259 connect \$1 1 4 0;
+#X obj 29 141 + 5;
+#X msg 61 193 connect 1 0 \$1 0;
+#X connect 0 0 6 0;
+#X connect 1 0 2 2;
+#X connect 2 0 5 0;
+#X connect 3 0 8 0;
+#X connect 4 0 2 1;
+#X connect 5 0 3 0;
+#X connect 6 0 14 0;
+#X connect 6 2 9 0;
+#X connect 6 3 4 0;
+#X connect 6 4 1 0;
+#X connect 6 5 2 3;
+#X connect 8 0 7 0;
+#X connect 9 0 10 0;
+#X connect 10 0 2 0;
+#X connect 11 0 7 0;
+#X connect 12 0 7 0;
 #X connect 13 0 7 0;
-#X connect 13 0 9 0;
-#X connect 13 0 10 0;
-#X connect 13 0 14 0;
 #X connect 14 0 11 0;
-#X connect 15 0 2 0;
-#X connect 16 0 3 1;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 14 0 15 0;
+#X connect 15 0 7 0;
 #X restore 106 363 pd create and link instances;
 #X obj 376 464 send;
 #X obj 99 278 trigger 0 bang;
 #X obj 7 160 loadbang;
 #X msg 46 363 loadbang;
-#X obj 397 362 makefilename pd-%s;
 #X obj 46 227 trigger bang anything anything bang bang bang;
 #X msg 349 363 clear;
-#N canvas 268 410 566 361 xlets 0;
-#X obj 78 -165 inlet;
-#X obj 78 29 outlet;
-#X text 126 -137 This will create fake "in/outlets" as senders and
-receivers.;
-#X obj 78 -73 float \$0;
-#X msg 78 -47 obj 10 10 receive \$1-in1 \, obj 400 10 receive \$1-in2
-\, obj 10 560 send \$1-out1 \, obj 380 560 send \$1-out2;
-#X connect 0 0 3 0;
-#X connect 3 0 4 0;
-#X connect 4 0 1 0;
-#X restore 294 363 pd xlets;
 #X obj 7 205 moses 1;
 #X text 59 203 no need to generate anything for 0 instances;
-#X obj 397 338 symbol \$0-instances;
-#N canvas 48 22 633 512 \$0-instances 0;
+#N canvas 48 22 633 512 \$0-instances 1;
 #X restore 26 61 pd \$0-instances;
 #X obj 26 113 outlet;
 #X obj 26 89 receive \$0-out1;
 #X obj 136 89 receive \$0-out2;
+#X obj 397 362 symbol pd-\$0-instances;
+#N canvas 231 432 566 361 setup 1;
+#X obj 78 -165 inlet;
+#X obj 78 149 outlet;
+#X text 116 -107 This will create fake "in/outlets" as senders and
+receivers.;
+#X obj 78 17 float \$0;
+#X msg 78 43 obj 10 30 receive \$1-in1 \, obj 400 30 receive \$1-in2
+\, obj 10 560 send \$1-out1 \, obj 380 560 send \$1-out2;
+#N canvas 1084 528 552 411 expandpath 0;
+#X obj 59 16 inlet;
+#X obj 104 371 outlet;
+#X obj 59 98 list append;
+#X msg 59 153 symbol \$1/\$2;
+#X obj 58 67 ggee/getdir 2;
+#X obj 59 184 hcs/stat;
+#X obj 104 349 symbol;
+#X obj 59 43 trigger bang anything;
+#X obj 104 205 bang;
+#X obj 59 233 list split 1;
+#X connect 0 0 1 0;
+#X connect 2 0 3 0;
+#X connect 3 0 5 0;
+#X connect 4 0 2 0;
+#X connect 5 0 9 0;
+#X connect 5 1 8 0;
+#X connect 6 0 1 0;
+#X connect 7 0 4 0;
+#X connect 7 1 2 1;
+#X connect 7 1 6 1;
+#X connect 8 0 6 0;
+#X connect 9 0 6 0;
+#X restore 394 -80 pd expandpath;
+#X obj 177 -29 ggee/getdir 2;
+#X msg 177 -3 obj 10 5 declare -path \$1;
+#X obj 78 -88 trigger bang bang;
+#X connect 0 0 8 0;
+#X connect 3 0 4 0;
+#X connect 4 0 1 0;
+#X connect 6 0 7 0;
+#X connect 7 0 1 0;
+#X connect 8 0 3 0;
+#X connect 8 1 6 0;
+#X restore 289 363 pd setup;
 #X connect 0 0 5 0;
 #X connect 1 0 3 0;
 #X connect 2 0 3 1;
@@ -100,21 +115,20 @@ receivers.;
 #X connect 3 0 11 0;
 #X connect 4 0 3 1;
 #X connect 6 0 7 0;
-#X connect 8 0 20 0;
+#X connect 8 0 18 0;
 #X connect 11 0 12 0;
 #X connect 13 0 1 0;
 #X connect 13 1 4 0;
 #X connect 14 0 8 0;
 #X connect 15 0 12 0;
-#X connect 16 0 12 1;
-#X connect 17 0 15 0;
-#X connect 17 1 13 0;
-#X connect 17 3 19 0;
-#X connect 17 4 18 0;
-#X connect 17 5 22 0;
-#X connect 18 0 12 0;
-#X connect 19 0 12 0;
-#X connect 20 1 17 0;
-#X connect 22 0 16 0;
-#X connect 25 0 24 0;
-#X connect 26 0 9 0;
+#X connect 16 0 15 0;
+#X connect 16 1 13 0;
+#X connect 16 3 25 0;
+#X connect 16 4 17 0;
+#X connect 16 5 24 0;
+#X connect 17 0 12 0;
+#X connect 18 1 16 0;
+#X connect 22 0 21 0;
+#X connect 23 0 9 0;
+#X connect 24 0 12 1;
+#X connect 25 0 12 0;