aboutsummaryrefslogtreecommitdiff
path: root/examples/51_pmpd_test.pd
blob: c231d97fc35d677d19cbe4c43018844a051a33be (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
#N canvas 392 22 616 594 10;
#X obj 20 33 loadbang;
#X obj 401 197 print msd;
#X obj 309 58 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
;
#X text 329 56 ON / OFF;
#X obj 33 55 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X msg 83 113 reset;
#X msg 35 229 Xmax 100 \, Xmin 0;
#X msg 128 372 setD souple 0.01;
#X msg 18 371 setK souple 1;
#X msg 128 394 setD souple 1;
#X msg 18 393 setK souple 2;
#X obj 331 392 vsl 15 128 0 100 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 6350 1;
#X obj 354 392 vsl 15 128 0 100 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 6350 1;
#X obj 308 392 vsl 15 128 0 100 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 6350 1;
#X msg 308 538 posX fix \$1;
#X obj 401 392 vsl 15 128 0 100 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 6350 1;
#X obj 377 392 vsl 15 128 0 100 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 6350 1;
#X msg 20 256 0 1 \, 1 2 \, 2 3 \, 3 4;
#X obj 308 347 unpack f f f f f;
#X obj 308 325 route massesPosL;
#X msg 309 103 bang \, massesPosL;
#X msg 20 278 link souple \$1 \$2 10 10;
#X obj 309 31 loadbang;
#X obj 20 77 t b b b b b;
#X text 50 55 reset;
#X text 18 10 creation : 5 masses and 4 links;
#X text 308 10 compute and get masses positions;
#X text 16 349 set rigidity and viscosity of links;
#X text 17 452 add force on all mobile masses;
#X text 443 440 move first slider;
#X text 429 453 to move the fixed mass;
#X msg 19 503 forceX mob 300;
#X msg 19 479 forceX mob -300;
#X text 307 279 display and interaction;
#X msg 51 201 mass mob 1 100 50;
#X msg 51 159 4;
#X obj 51 180 until;
#X msg 67 139 mass fix 0 100 50;
#X obj 309 167 pmpd;
#X obj 83 314 s \$0-pmpdin;
#X obj 19 421 s \$0-pmpdin;
#X obj 18 530 s \$0-pmpdin;
#X obj 319 138 r \$0-pmpdin;
#X obj 309 197 s \$0-pmpdout;
#X obj 308 302 r \$0-pmpdout;
#X obj 308 560 s \$0-pmpdin;
#X obj 309 80 metro 20;
#X text 23 566 COPYRIGHT : Nicolas Montgermont 2010;
#X connect 0 0 23 0;
#X connect 2 0 46 0;
#X connect 4 0 23 0;
#X connect 5 0 39 0;
#X connect 6 0 39 0;
#X connect 7 0 40 0;
#X connect 8 0 40 0;
#X connect 9 0 40 0;
#X connect 10 0 40 0;
#X connect 13 0 14 0;
#X connect 14 0 45 0;
#X connect 17 0 21 0;
#X connect 18 0 13 0;
#X connect 18 1 11 0;
#X connect 18 2 12 0;
#X connect 18 3 16 0;
#X connect 18 4 15 0;
#X connect 19 0 18 0;
#X connect 20 0 38 0;
#X connect 21 0 39 0;
#X connect 22 0 2 0;
#X connect 23 0 17 0;
#X connect 23 1 6 0;
#X connect 23 2 35 0;
#X connect 23 3 37 0;
#X connect 23 4 5 0;
#X connect 31 0 41 0;
#X connect 32 0 41 0;
#X connect 34 0 39 0;
#X connect 35 0 36 0;
#X connect 36 0 34 0;
#X connect 37 0 39 0;
#X connect 38 0 43 0;
#X connect 42 0 38 0;
#X connect 44 0 19 0;
#X connect 46 0 20 0;