From c723d0c382d0f901ae302cb5c60cecaa2fbf2195 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Mon, 22 Nov 2010 18:40:34 +0000 Subject: barebones working version of [instances] svn path=/trunk/externals/manypoly/; revision=14484 --- instances.pd | 154 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 154 insertions(+) create mode 100644 instances.pd (limited to 'instances.pd') diff --git a/instances.pd b/instances.pd new file mode 100644 index 0000000..60630f2 --- /dev/null +++ b/instances.pd @@ -0,0 +1,154 @@ +#N canvas 287 129 622 492 10; +#X obj 26 8 inlet; +#X obj 99 306 until; +#X obj 137 333 + 1; +#X obj 99 333 float; +#X msg 138 306 0; +#X obj 26 32 send \$0-in1; +#X obj 135 8 inlet; +#X obj 135 32 send \$0-in2; +#X obj 7 181 float \$1; +#X obj 136 114 outlet; +#X text 122 62 <-- open this subpatch to see the instances; +#N canvas 90 404 490 437 make 0; +#X obj 88 14 inlet; +#X obj 210 83 until; +#X obj 210 107 float; +#X obj 248 107 + 1; +#X msg 251 83 0; +#X msg 281 113 route; +#X obj 210 244 list trim; +#X obj 210 223 list prepend obj 10 30; +#X msg 85 225 connect 0 0 4 0; +#X obj 88 57 trigger bang bang anything bang; +#X obj 210 317 outlet; +#N canvas 0 22 450 300 tolist 0; +#X obj 90 40 inlet; +#X obj 169 40 inlet; +#X obj 67 215 outlet; +#X obj 90 150 list; +#X obj 67 171 list; +#X obj 90 127 list prepend; +#X connect 0 0 5 0; +#X connect 1 0 5 1; +#X connect 1 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 5 1; +#X connect 4 0 2 0; +#X connect 5 0 3 0; +#X restore 210 193 pd tolist; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 2 0 11 0; +#X connect 3 0 2 1; +#X connect 4 0 2 1; +#X connect 5 0 11 0; +#X connect 6 0 10 0; +#X connect 7 0 6 0; +#X connect 8 0 10 0; +#X connect 9 0 8 0; +#X connect 9 1 11 1; +#X connect 9 2 1 0; +#X connect 9 3 5 0; +#X connect 9 3 4 0; +#X connect 11 0 7 0; +#X restore 292 363 pd make route; +#N canvas 493 375 432 461 create 0; +#X obj 29 10 inlet; +#X obj 281 61 float \$1; +#X obj 29 141 + 5; +#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 155 61 * 20; +#X obj 173 132 list append \$3 \$4 \$5 \$6 \$7; +#X msg 45 282 connect 1 0 \$1 1; +#X obj 29 37 trigger anything anything anything bang bang anything +; +#X obj 58 225 pack float float; +#X msg 58 247 connect 4 \$2 \$1 0; +#X msg 35 302 connect \$1 0 2 0; +#X msg 18 326 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 connect 0 0 10 0; +#X connect 1 0 4 2; +#X connect 2 0 9 0; +#X connect 2 0 11 0; +#X connect 2 0 13 0; +#X connect 2 0 14 0; +#X connect 3 0 4 0; +#X connect 4 0 8 0; +#X connect 5 0 16 0; +#X connect 6 0 4 1; +#X connect 7 0 3 0; +#X connect 8 0 5 0; +#X connect 9 0 15 0; +#X connect 10 0 2 0; +#X connect 10 1 11 1; +#X connect 10 2 7 0; +#X connect 10 3 6 0; +#X connect 10 4 1 0; +#X connect 10 5 4 3; +#X connect 11 0 12 0; +#X connect 12 0 15 0; +#X connect 13 0 15 0; +#X connect 14 0 15 0; +#X connect 16 0 15 0; +#X restore 106 363 pd create and link instances; +#X obj 466 464 send; +#X obj 99 278 trigger 0 bang; +#X obj 7 160 loadbang; +#X msg 46 363 loadbang; +#X obj 487 362 makefilename pd-%s; +#X obj 46 227 trigger bang anything anything bang bang bang; +#X msg 439 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 384 363 pd xlets; +#X obj 7 205 moses 1; +#X text 59 203 no need to generate anything for 0 instances; +#X obj 487 338 symbol \$0-instances; +#N canvas 48 22 633 512 \$0-instances 0; +#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 connect 0 0 5 0; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 3 0 2 0; +#X connect 3 0 12 0; +#X connect 4 0 3 1; +#X connect 6 0 7 0; +#X connect 8 0 21 0; +#X connect 11 0 13 0; +#X connect 12 0 13 0; +#X connect 14 0 1 0; +#X connect 14 1 4 0; +#X connect 15 0 8 0; +#X connect 16 0 13 0; +#X connect 17 0 13 1; +#X connect 18 0 16 0; +#X connect 18 1 14 0; +#X connect 18 2 11 0; +#X connect 18 3 20 0; +#X connect 18 4 19 0; +#X connect 18 5 23 0; +#X connect 19 0 13 0; +#X connect 20 0 13 0; +#X connect 21 1 18 0; +#X connect 23 0 17 0; +#X connect 26 0 25 0; +#X connect 27 0 9 0; -- cgit v1.2.1