From f18d063d9312c95e25294e0777bc135ee9a3fd8a Mon Sep 17 00:00:00 2001 From: Thomas O Fredericks Date: Sun, 25 Oct 2009 00:39:13 +0000 Subject: Adding mtl svn path=/trunk/abstractions/mtl/; revision=12667 --- instrument~.pd | 88 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 88 insertions(+) create mode 100644 instrument~.pd (limited to 'instrument~.pd') diff --git a/instrument~.pd b/instrument~.pd new file mode 100644 index 0000000..2642a43 --- /dev/null +++ b/instrument~.pd @@ -0,0 +1,88 @@ +#N canvas 19 38 1022 625 10; +#X obj 46 35 inlet notes; +#X obj 46 72 s \$0in; +#X obj 50 304 catch~ \$0out; +#X obj 49 346 outlet~; +#X obj 360 56 loadbang; +#X obj 360 104 iemlib/dollarg; +#X obj 361 139 list split 1; +#N canvas 1263 179 497 429 \$0i 0; +#X restore 47 179 pd \$0i; +#X obj 521 149 sel 0; +#X obj 792 363 ./listBuild; +#X obj 856 317 tof/iterate; +#X obj 810 385 cyclone/prepend obj 0 60 route; +#X obj 722 503 s pd-\$0i; +#X obj 486 216 list; +#X obj 304 201 tof/iterate; +#X obj 622 163 t b b f f; +#X obj 640 285 t b b; +#X obj 306 234 t f f f b; +#X obj 351 267 * 20; +#X obj 300 324 pack f f f; +#X obj 353 292 + 80; +#X obj 700 185 pack f \$0; +#X msg 693 222 clear \, obj 0 0 r \$2in \, obj 0 20 poly \$1 1 \, connect +0 0 1 0 \, obj 0 40 pack f f f \, connect 1 0 2 0 \, connect 1 1 2 +1 \, connect 1 2 2 2 \, obj 200 0 throw~ \$2out \, obj 400 0 r \$2in2 +; +#X obj 186 33 inlet set; +#X msg 693 395 connect 2 0 5 0; +#X obj 320 302 + 6; +#X obj 190 67 s \$0in2; +#X msg 796 462 clear; +#X obj 416 339 cyclone/prepend obj; +#X obj 321 356 t l l; +#X msg 416 316 \$1 \$3; +#X msg 315 416 connect 5 \$1 \$2 0 \, connect \$2 0 3 0 \, connect +4 0 \$2 1; +#X obj 451 60 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 430 371 list; +#X obj 586 387 list trim; +#X obj 358 165 t b f f; +#X msg 205 258 loadbang; +#X obj 880 345 + 1; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 35 0; +#X connect 6 1 13 1; +#X connect 8 1 15 0; +#X connect 9 0 11 0; +#X connect 10 0 37 0; +#X connect 11 0 12 0; +#X connect 13 0 33 1; +#X connect 14 0 17 0; +#X connect 15 1 16 0; +#X connect 15 2 10 0; +#X connect 15 3 21 0; +#X connect 16 0 24 0; +#X connect 16 1 9 0; +#X connect 17 0 19 0; +#X connect 17 1 25 0; +#X connect 17 2 18 0; +#X connect 17 3 13 0; +#X connect 18 0 20 0; +#X connect 19 0 29 0; +#X connect 20 0 19 2; +#X connect 21 0 22 0; +#X connect 22 0 12 0; +#X connect 23 0 26 0; +#X connect 24 0 12 0; +#X connect 25 0 19 1; +#X connect 27 0 12 0; +#X connect 28 0 33 0; +#X connect 29 0 31 0; +#X connect 29 1 30 0; +#X connect 30 0 28 0; +#X connect 31 0 12 0; +#X connect 32 0 5 0; +#X connect 33 0 34 0; +#X connect 34 0 12 0; +#X connect 35 0 36 0; +#X connect 35 1 14 0; +#X connect 35 2 8 0; +#X connect 36 0 12 0; +#X connect 37 0 9 1; -- cgit v1.2.1