svn path=/trunk/externals/nusmuk/; revision=14014

1 files changed, 213 insertions, 0 deletions

diff --git a/msd/msd2D/04_msd2Dperf.pd b/msd/msd2D/04_msd2Dperf.pd
new file mode 100644
index 0000000..d264d8f
--- /dev/null
+++ b/msd/msd2D/04_msd2Dperf.pd
@@ -0,0 +1,213 @@
+#N canvas 521 54 428 182 10;
+#X msg 144 71 forceX mob 100;
+#X msg 144 94 forceX mob -100;
+#X text 141 13 change number of mass to test performance;
+#X text 141 26 (and reset afterwards);
+#X obj 81 19 nbx 5 14 1 20000 1 1 empty empty empty 0 -6 0 10 -262144
+-1 -1 125.925 256;
+#X obj 18 18 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 38 16 reset;
+#N canvas 487 334 635 333 creation 0;
+#X msg 239 84 reset;
+#X obj 167 55 t b b b b b;
+#X obj 441 55 f;
+#X msg 221 104 mass fix 0 100 0 0;
+#N canvas 0 22 450 300 links 0;
+#X obj 136 72 t b;
+#X obj 136 116 + 1;
+#X obj 130 191 f;
+#X obj 92 171 t f b;
+#X obj 91 211 pack f f;
+#X msg 91 233 link souple \$1 \$2 10 0.5;
+#X obj 136 23 inlet;
+#X obj 91 260 outlet;
+#X obj 136 48 until;
+#X obj 202 112 sel 0;
+#X obj 184 154 mod 29;
+#X obj 136 93 f 0;
+#X obj 311 32 inlet;
+#X connect 0 0 11 0;
+#X connect 1 0 10 0;
+#X connect 1 0 2 1;
+#X connect 2 0 4 1;
+#X connect 3 0 4 0;
+#X connect 3 1 2 0;
+#X connect 4 0 5 0;
+#X connect 5 0 7 0;
+#X connect 6 0 8 0;
+#X connect 8 0 0 0;
+#X connect 9 0 8 1;
+#X connect 10 0 9 0;
+#X connect 10 0 11 1;
+#X connect 11 0 1 0;
+#X connect 11 0 3 0;
+#X connect 12 0 10 1;
+#X restore 167 194 pd links;
+#N canvas 557 309 487 357 masses 0;
+#X msg 211 239 mass mob 1 \$1 \$2 \$3;
+#X msg 417 145 seed 1;
+#X msg 342 144 seed 2;
+#X msg 239 126 seed 3;
+#X obj 211 218 pack f f f;
+#X obj 42 14 inlet;
+#X obj 212 307 outlet;
+#X obj 268 47 loadbang;
+#X text 284 101 M;
+#X text 356 106 X;
+#X text 437 106 Y;
+#X obj 223 68 t b b;
+#X obj 42 45 until;
+#X obj 42 78 f;
+#X obj 72 78 + 1;
+#X obj 72 100 mod 30;
+#X obj 90 45 sel 0;
+#X obj 164 15 inlet;
+#X obj 342 165 random 800;
+#X obj 418 165 random 800;
+#X obj 239 146 random 800;
+#X obj 342 186 / 100;
+#X obj 339 206 - 4;
+#X obj 407 193 / 100;
+#X obj 404 213 - 4;
+#X obj 239 166 + 800;
+#X obj 235 186 / 8;
+#X connect 0 0 6 0;
+#X connect 1 0 19 0;
+#X connect 2 0 18 0;
+#X connect 3 0 20 0;
+#X connect 4 0 0 0;
+#X connect 5 0 12 0;
+#X connect 7 0 3 0;
+#X connect 7 0 2 0;
+#X connect 7 0 1 0;
+#X connect 11 0 20 0;
+#X connect 11 1 18 0;
+#X connect 11 1 19 0;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 13 0 11 0;
+#X connect 14 0 15 0;
+#X connect 15 0 13 1;
+#X connect 15 0 16 0;
+#X connect 16 0 12 1;
+#X connect 17 0 15 1;
+#X connect 18 0 21 0;
+#X connect 19 0 23 0;
+#X connect 20 0 25 0;
+#X connect 21 0 22 0;
+#X connect 22 0 4 1;
+#X connect 23 0 24 0;
+#X connect 24 0 4 2;
+#X connect 25 0 26 0;
+#X connect 26 0 4 0;
+#X restore 203 129 pd masses;
+#X msg 185 155 Xmax 4 \, Xmin -4 \, Ymax 4 \, Ymin -4;
+#X obj 166 29 inlet;
+#X obj 205 30 loadbang;
+#X obj 441 33 inlet;
+#X obj 167 221 s \$0-msdin;
+#X connect 0 0 10 0;
+#X connect 1 0 4 0;
+#X connect 1 1 6 0;
+#X connect 1 2 5 0;
+#X connect 1 3 3 0;
+#X connect 1 4 0 0;
+#X connect 2 0 4 1;
+#X connect 2 0 5 1;
+#X connect 3 0 10 0;
+#X connect 4 0 10 0;
+#X connect 5 0 10 0;
+#X connect 6 0 10 0;
+#X connect 7 0 1 0;
+#X connect 8 0 1 0;
+#X connect 9 0 2 0;
+#X restore 18 41 pd creation;
+#N canvas 0 22 450 300 gem 0;
+#X msg 30 99 0 \, destroy;
+#X msg 30 76 reset \, create \, lighting 1 \, 1;
+#X obj 30 148 gemwin;
+#X obj 32 25 inlet;
+#X obj 32 53 sel 1 0;
+#X obj 241 50 gemhead;
+#X obj 241 73 world_light;
+#X connect 0 0 2 0;
+#X connect 1 0 2 0;
+#X connect 3 0 4 0;
+#X connect 4 0 1 0;
+#X connect 4 1 0 0;
+#X connect 5 0 6 0;
+#X restore 18 91 pd gem;
+#X obj 18 68 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
+;
+#X text 38 66 gem on/off;
+#N canvas 0 22 450 300 compute 0;
+#N canvas 643 123 311 308 massrender 0;
+#X obj 24 196 translateXYZ;
+#X obj 24 170 separator;
+#X obj 24 144 gemhead 45;
+#X obj 103 17 inlet;
+#X obj 103 55 unpack f f f;
+#X obj 109 83 t b f;
+#X obj 24 56 loadbang;
+#X msg 24 80 0;
+#X obj 24 222 sphere 0.1;
+#X connect 0 0 8 0;
+#X connect 1 0 0 0;
+#X connect 2 0 1 0;
+#X connect 3 0 4 0;
+#X connect 4 1 5 0;
+#X connect 4 2 0 2;
+#X connect 5 0 2 0;
+#X connect 5 1 0 1;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X restore 133 205 pd massrender;
+#N canvas 284 227 394 269 linkrender 0;
+#X obj 121 20 inlet;
+#X obj 57 175 separator;
+#X obj 57 220 curve 2;
+#X obj 43 130 gemhead 45;
+#X msg 213 69 \$4 \$5 0;
+#X msg 141 65 \$2 \$3 0;
+#X obj 140 94 t b a;
+#X obj 44 46 loadbang;
+#X msg 44 75 0;
+#X connect 0 0 4 0;
+#X connect 0 0 5 0;
+#X connect 1 0 2 0;
+#X connect 3 0 1 0;
+#X connect 4 0 2 2;
+#X connect 5 0 6 0;
+#X connect 6 0 3 0;
+#X connect 6 1 2 1;
+#X connect 7 0 8 0;
+#X connect 8 0 3 0;
+#X restore 52 256 pd linkrender;
+#X obj 52 28 gemhead;
+#X msg 52 85 bang \, get massesPos \, get linksPos;
+#X obj 52 176 route linksPos massesPos;
+#X obj 82 127 r \$0-msdin;
+#X obj 52 153 msd2D;
+#X obj 85 198 inlet;
+#X obj 52 227 spigot;
+#X connect 2 0 3 0;
+#X connect 3 0 6 0;
+#X connect 4 0 8 0;
+#X connect 4 1 0 0;
+#X connect 5 0 6 0;
+#X connect 6 0 4 0;
+#X connect 7 0 8 1;
+#X connect 8 0 1 0;
+#X restore 19 137 pd compute;
+#X obj 144 118 s \$0-msdin;
+#X text 260 80 click to move;
+#X obj 19 115 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X text 39 114 display links;
+#X connect 0 0 12 0;
+#X connect 1 0 12 0;
+#X connect 4 0 7 1;
+#X connect 5 0 7 0;
+#X connect 9 0 8 0;
+#X connect 14 0 11 0;