1 files changed, 142 insertions, 0 deletions
diff --git a/exemples/48_pmpd~.pd b/exemples/48_pmpd~.pd
new file mode 100755
index 0000000..104c1c7
--- /dev/null
+++ b/exemples/48_pmpd~.pd
@@ -0,0 +1,142 @@
+#N canvas 125 3 842 750 10;
+#X text 281 321 Id \, M \, X0;
+#X text 312 244 Id \, mass1 \, mass2 \, K \, D;
+#X text 243 170 id \, outlet \, mass \, amplitude;
+#X msg 221 378 reset;
+#X obj 39 413 t a;
+#X msg 202 324 mass 1 10 1;
+#X obj 134 11 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 52 654 tabwrite~ array99;
+#X obj 424 497 metro 100;
+#X obj 424 471 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 190 658 tabwrite~ array98;
+#N canvas 0 0 454 304 graph1 0;
+#X array array97 100 float 0;
+#X coords 0 1 100 -1 150 100 1;
+#X restore 662 269 graph;
+#X msg 201 299 mass 1 10 1;
+#X msg 15 54 \; pd dsp 1 \;;
+#X obj 15 29 loadbang;
+#X obj 450 474 loadbang;
+#X msg 299 402 forceX 2 1;
+#X obj 197 498 phasor~ 1;
+#X obj 77 498 phasor~ 0.3;
+#X floatatom 77 479 5 0 0 0 - - -;
+#X floatatom 197 477 5 0 0 0 - - -;
+#X floatatom 320 478 5 0 0 0 - - -;
+#X msg 203 350 mass 1 10 1;
+#X msg 161 145 out 1 0 1 1;
+#X msg 162 171 out 1 1 2 1;
+#X msg 163 197 out 1 2 3 1;
+#N canvas 0 0 454 304 graph1 0;
+#X array array98 100 float 0;
+#X coords 0 1 100 -1 150 100 1;
+#X restore 662 165 graph;
+#X obj 325 658 tabwrite~ array97;
+#X obj 88 521 tabwrite~ array9;
+#X obj 208 522 tabwrite~ array8;
+#X obj 332 523 tabwrite~ array7;
+#N canvas 0 0 450 300 graph1 0;
+#X array array9 100 float 0;
+#X coords 0 1 100 -1 150 100 1;
+#X restore 507 61 graph;
+#N canvas 0 0 454 304 graph1 0;
+#X array array7 100 float 0;
+#X coords 0 1 100 -1 150 100 1;
+#X restore 507 269 graph;
+#N canvas 0 0 454 304 graph1 0;
+#X array array8 100 float 0;
+#X coords 0 1 100 -1 150 100 1;
+#X restore 507 165 graph;
+#X text 210 89 id \, inlet \, mass \, amplitude;
+#X msg 134 116 in 1 2 3 1;
+#X obj 37 714 dac~;
+#X msg 182 222 link 1 0 1 0.1 0.001;
+#X msg 181 244 link 1 0 2 0.5 0.001;
+#X msg 182 267 link 1 0 3 0.3 0.001;
+#X obj 39 629 hip~ 20;
+#X obj 178 634 hip~ 20;
+#X obj 312 632 hip~ 20;
+#N canvas 0 0 450 300 graph1 0;
+#X array array99 100 float 0;
+#X coords 0 1 100 -1 150 100 1;
+#X restore 662 61 graph;
+#X obj 39 599 pmpd~ 3 3;
+#X obj 320 499 phasor~ 1.5;
+#X msg 133 68 in 1 0 1 1;
+#X msg 133 91 in 1 1 2 1;
+#X obj 134 37 t b b b b b;
+#X obj 405 635 metro 100;
+#X obj 405 609 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 431 612 loadbang;
+#X obj 77 543 /~ 50;
+#X obj 38 689 +~ 0;
+#X obj 197 544 /~ 20;
+#X obj 321 546 /~ 20;
+#X text 159 10 <- create the network;
+#X connect 3 0 4 0;
+#X connect 4 0 44 0;
+#X connect 5 0 4 0;
+#X connect 6 0 48 0;
+#X connect 8 0 28 0;
+#X connect 8 0 29 0;
+#X connect 8 0 30 0;
+#X connect 9 0 8 0;
+#X connect 12 0 4 0;
+#X connect 14 0 13 0;
+#X connect 15 0 8 0;
+#X connect 16 0 4 0;
+#X connect 17 0 29 0;
+#X connect 17 0 54 0;
+#X connect 18 0 28 0;
+#X connect 18 0 52 0;
+#X connect 19 0 18 0;
+#X connect 20 0 17 0;
+#X connect 21 0 45 0;
+#X connect 22 0 4 0;
+#X connect 23 0 4 0;
+#X connect 24 0 4 0;
+#X connect 25 0 4 0;
+#X connect 35 0 4 0;
+#X connect 37 0 4 0;
+#X connect 38 0 4 0;
+#X connect 39 0 4 0;
+#X connect 40 0 7 0;
+#X connect 40 0 53 0;
+#X connect 41 0 10 0;
+#X connect 41 0 53 0;
+#X connect 42 0 27 0;
+#X connect 42 0 53 0;
+#X connect 44 0 40 0;
+#X connect 44 1 41 0;
+#X connect 44 2 42 0;
+#X connect 45 0 30 0;
+#X connect 45 0 55 0;
+#X connect 46 0 4 0;
+#X connect 47 0 4 0;
+#X connect 48 0 46 0;
+#X connect 48 0 47 0;
+#X connect 48 0 35 0;
+#X connect 48 1 23 0;
+#X connect 48 1 24 0;
+#X connect 48 1 25 0;
+#X connect 48 2 37 0;
+#X connect 48 2 38 0;
+#X connect 48 2 39 0;
+#X connect 48 3 12 0;
+#X connect 48 3 5 0;
+#X connect 48 3 22 0;
+#X connect 48 4 3 0;
+#X connect 49 0 7 0;
+#X connect 49 0 10 0;
+#X connect 49 0 27 0;
+#X connect 50 0 49 0;
+#X connect 51 0 49 0;
+#X connect 52 0 44 0;
+#X connect 53 0 36 0;
+#X connect 53 0 36 1;
+#X connect 54 0 44 1;
+#X connect 55 0 44 2;