1 files changed, 95 insertions, 0 deletions
diff --git a/nqpoly4/nqpoly4.pd b/nqpoly4/nqpoly4.pd
new file mode 100644
index 0000000..aaf1cc6
--- /dev/null
+++ b/nqpoly4/nqpoly4.pd
@@ -0,0 +1,95 @@
+#N canvas 30 116 975 454 10;
+#X obj 16 20 inlet;
+#X obj 114 321 outlet;
+#X obj 290 198 symbol \$0-poly;
+#X obj 93 13 namecanvas \$0-poly;
+#X obj 255 167 t b b;
+#X obj 289 248 t f f;
+#X obj 314 271 + 1;
+#X obj 256 143 until;
+#X obj 147 234 symbol \$0-poly;
+#X obj 172 293 pack s f;
+#X msg 169 336 \; \$1 connect \$2 0 1 0;
+#X obj 451 197 symbol \$2;
+#X obj 547 197 symbol \$3;
+#X obj 607 198 symbol \$4;
+#X obj 671 197 symbol \$5;
+#X obj 736 198 symbol \$6;
+#X obj 260 101 - 1;
+#X obj 255 123 moses 1;
+#X obj 214 20 loadbang;
+#X obj 255 77 \$1;
+#X obj 415 199 + 1;
+#X obj 286 227 f;
+#X obj 392 199 f 1;
+#X text 294 9 usage: nqpoly <number of objects> <abstraction name>
+<up to 4 creation args>;
+#X text 680 24 - don't edit a version of this patch that has been instantiated
+with any arguments (best to just open the nqpoly.pd file directly)
+;
+#X text 680 91 - recreate the "t b b b b" object and the nqpwrap object
+(in that order) by clicking in them and adding a space at the end.
+;
+#X text 297 38 don't save this patch unless you follow the instructions
+to the right.;
+#X text 673 4 editing:;
+#X text 684 137 - increment the indicated numbers if you add any objects
+;
+#X text 176 188 obj index of nqpwrap;
+#X text 212 209 increment;
+#X text 350 221 index of "t b b b b" (increment);
+#X text 336 390 the first argument to the last connect message must
+be the index of the "t b b b b" object (increment);
+#X text 679 70 - delete the connection coming from nqpwrap's outlet
+;
+#X text 313 88 your abstraction is ultimately called with the parameters:
+<index> <number of objects> <arg1> <arg2> <arg3> <arg4>;
+#X obj 294 295 pack f f s s f f s s s s;
+#X text 18 410 nqpoly (v4) - pix.test.at;
+#X obj 517 198 \$1;
+#X obj 188 209 42;
+#X obj 316 220 + 41;
+#X msg 302 327 \; \$3 obj 5 100 nqpwrap4 \$4 \$5 \$6 \$7 \$8 \$9 \$10
+\; \$3 connect \$1 0 \$2 0 \; \$3 connect 41 0 \$2 1;
+#X obj 216 48 t b b b b;
+#X obj 19 117 nqpwrap4 \$2 0 \$1 \$3 \$4 \$5 \$6;
+#X connect 0 0 42 0;
+#X connect 2 0 35 2;
+#X connect 4 0 21 0;
+#X connect 4 1 11 0;
+#X connect 4 1 12 0;
+#X connect 4 1 13 0;
+#X connect 4 1 14 0;
+#X connect 4 1 2 0;
+#X connect 4 1 15 0;
+#X connect 4 1 22 0;
+#X connect 4 1 37 0;
+#X connect 5 0 35 0;
+#X connect 5 1 6 0;
+#X connect 6 0 9 1;
+#X connect 6 0 35 1;
+#X connect 7 0 4 0;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 11 0 35 3;
+#X connect 12 0 35 6;
+#X connect 13 0 35 7;
+#X connect 14 0 35 8;
+#X connect 15 0 35 9;
+#X connect 16 0 17 0;
+#X connect 17 1 7 0;
+#X connect 18 0 41 0;
+#X connect 19 0 16 0;
+#X connect 20 0 22 1;
+#X connect 21 0 5 0;
+#X connect 22 0 20 0;
+#X connect 22 0 35 4;
+#X connect 22 0 39 0;
+#X connect 35 0 40 0;
+#X connect 37 0 35 5;
+#X connect 38 0 9 1;
+#X connect 39 0 21 1;
+#X connect 41 0 42 1;
+#X connect 41 1 8 0;
+#X connect 41 2 19 0;
+#X connect 41 3 38 0;