1 files changed, 173 insertions, 0 deletions
diff --git a/core/hotpack.pd b/core/hotpack.pd
new file mode 100644
index 0000000..7625535
--- /dev/null
+++ b/core/hotpack.pd
@@ -0,0 +1,173 @@
+#N canvas 4 22 859 425 10;
+#N canvas 1321 240 446 500 builder 1;
+#X obj -315 22 initbang;
+#X obj -288 219 s \$0self;
+#X obj -279 128 s \$0inlets;
+#X obj -315 172 list trim;
+#X obj -315 194 t b a;
+#X obj -300 244 r \$0inlets;
+#X obj -93 80 t a b;
+#X obj -315 270 f;
+#X obj -315 318 until;
+#X obj -315 294 t a b;
+#X msg -278 294 0;
+#X obj -250 294 s \$0reset;
+#X obj -300 343 r \$0reset;
+#X obj -315 368 f;
+#X obj -283 369 + 1;
+#X obj -315 45 t b b;
+#X obj -244 53 v \$0objects;
+#X obj -315 403 sel 0;
+#X obj -315 453 s \$0makeFirstInlet;
+#X obj -288 428 s \$0makeRestOfInlets;
+#X text -133 180 25;
+#X obj -315 149 list prepend obj 10 100 pack;
+#X obj -19 145 v \$0objects;
+#X msg -93 50 s s s s s;
+#X msg -66 109 5;
+#X msg -17 110 4;
+#X msg -274 46 4;
+#X obj -244 76 s \$0packObjID;
+#X obj -315 111 dollarg;
+#X connect 0 0 15 0;
+#X connect 3 0 4 0;
+#X connect 4 0 7 0;
+#X connect 4 1 1 0;
+#X connect 5 0 7 1;
+#X connect 6 0 21 0;
+#X connect 6 1 24 0;
+#X connect 6 1 25 0;
+#X connect 7 0 9 0;
+#X connect 8 0 13 0;
+#X connect 9 0 8 0;
+#X connect 9 1 10 0;
+#X connect 10 0 11 0;
+#X connect 12 0 13 1;
+#X connect 13 0 14 0;
+#X connect 13 0 17 0;
+#X connect 14 0 13 1;
+#X connect 15 0 28 0;
+#X connect 15 1 26 0;
+#X connect 17 0 18 0;
+#X connect 17 1 19 0;
+#X connect 21 0 3 0;
+#X connect 23 0 6 0;
+#X connect 24 0 2 0;
+#X connect 25 0 22 0;
+#X connect 26 0 16 0;
+#X connect 26 0 27 0;
+#X connect 28 0 21 0;
+#X connect 28 1 2 0;
+#X restore 14 315 pd builder;
+#N canvas 469 248 424 330 firstinlet 0;
+#X obj 131 92 s \$0self;
+#X obj 194 19 pack f f;
+#X obj 239 -3 + 1;
+#X obj 194 -40 t a a;
+#X msg 194 57 connect \$2 0 \$1 0;
+#X obj 144 -81 v \$0objects;
+#X obj 144 -158 r \$0makeFirstInlet;
+#X msg 275 -91 obj 10 10 inlet;
+#X obj 117 -81 + 2;
+#X msg 286 -70 obj 10 160 outlet;
+#X obj 275 -47 s \$0self;
+#X obj 144 -130 t b b b;
+#X msg 15 58 connect \$1 0 \$2 0;
+#X obj 60 -14 + 2;
+#X obj 15 13 pack f f;
+#X obj 144 -57 t a a;
+#X obj 15 -40 t a a;
+#X connect 1 0 4 0;
+#X connect 2 0 1 1;
+#X connect 3 0 1 0;
+#X connect 3 1 2 0;
+#X connect 4 0 0 0;
+#X connect 5 0 8 0;
+#X connect 5 0 15 0;
+#X connect 6 0 11 0;
+#X connect 7 0 10 0;
+#X connect 8 0 5 0;
+#X connect 9 0 10 0;
+#X connect 11 0 5 0;
+#X connect 11 1 9 0;
+#X connect 11 2 7 0;
+#X connect 12 0 0 0;
+#X connect 13 0 14 1;
+#X connect 14 0 12 0;
+#X connect 15 0 16 0;
+#X connect 15 1 3 0;
+#X connect 16 0 14 0;
+#X connect 16 1 13 0;
+#X restore 14 338 pd firstinlet;
+#N canvas 394 97 493 684 restofinlets 0;
+#X msg 213 232 obj \$1 10 inlet;
+#X obj 186 295 s \$0self;
+#X msg 186 261 obj \$1 30 t b a;
+#X obj 186 199 t a a;
+#X obj 147 53 r \$0makeRestOfInlets;
+#X obj 186 103 * 40;
+#X obj 186 131 + 10;
+#X text 219 106 width of inlet object;
+#X text 218 130 x offset;
+#X obj 86 131 v \$0objects;
+#X obj 58 131 + 2;
+#X obj 166 375 v \$0objects;
+#X obj 147 77 t b a a;
+#X obj 166 325 t b a;
+#X obj 193 350 s \$0inletIndex;
+#X obj 166 410 t a a a;
+#X obj 364 500 + 1;
+#X obj 364 461 t a a;
+#X msg 364 554 connect \$1 0 \$2 0;
+#X obj 364 526 pack f f;
+#X obj 409 500 + 2;
+#X obj 185 483 + 2;
+#X obj 80 513 r \$0inletIndex;
+#X obj 23 460 + 2;
+#X obj 185 619 s \$0self;
+#X obj 185 536 pack f f;
+#X obj 185 453 t a b;
+#X obj 212 504 f;
+#X msg 185 565 connect \$1 0 \$2 0;
+#X obj 23 536 pack f f f;
+#X msg 23 567 connect \$1 1 \$2 \$3;
+#X obj 227 481 r \$0packObjID;
+#X obj 51 492 r \$0packObjID;
+#X connect 0 0 1 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 0;
+#X connect 3 1 0 0;
+#X connect 4 0 12 0;
+#X connect 5 0 6 0;
+#X connect 6 0 3 0;
+#X connect 9 0 10 0;
+#X connect 10 0 9 0;
+#X connect 11 0 15 0;
+#X connect 12 0 9 0;
+#X connect 12 1 13 0;
+#X connect 12 2 5 0;
+#X connect 13 0 11 0;
+#X connect 13 1 14 0;
+#X connect 15 0 23 0;
+#X connect 15 1 26 0;
+#X connect 15 2 17 0;
+#X connect 16 0 19 0;
+#X connect 17 0 16 0;
+#X connect 17 1 20 0;
+#X connect 18 0 24 0;
+#X connect 19 0 18 0;
+#X connect 20 0 19 1;
+#X connect 21 0 25 0;
+#X connect 22 0 29 2;
+#X connect 23 0 29 0;
+#X connect 25 0 28 0;
+#X connect 26 0 21 0;
+#X connect 26 1 27 0;
+#X connect 27 0 25 1;
+#X connect 28 0 24 0;
+#X connect 29 0 30 0;
+#X connect 30 0 24 0;
+#X connect 31 0 27 1;
+#X connect 32 0 29 1;
+#X restore 14 361 pd restofinlets;
+#X obj 14 384 namecanvas \$0self;