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
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
|
#N canvas 790 244 452 151 10;
#X declare -lib Gem;
#X obj 23 17 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X text 43 16 reset;
#N canvas 665 446 763 327 gem_stuff 0;
#X msg 137 179 0 \, destroy;
#X obj 118 200 gemwin;
#X obj 118 104 inlet;
#X obj 118 129 sel 1 0;
#X msg 118 156 reset \, create \, 1;
#N canvas 284 227 591 562 linkrender 0;
#X obj 150 9 inlet;
#X obj 150 101 / 12.5;
#X obj 150 124 - 4;
#X obj 204 102 / 12.5;
#X obj 204 125 - 4;
#X obj 67 265 separator;
#X obj 150 148 t b f;
#X obj 67 308 curve 2;
#X obj 264 105 / 12.5;
#X obj 264 128 - 4;
#X obj 318 106 / 12.5;
#X obj 318 129 - 4;
#X obj 180 178 pack f f;
#X msg 180 201 \$1 \$2 0;
#X obj 264 177 pack f f;
#X msg 264 200 \$1 \$2 0;
#X obj 150 53 unpack f f f f f;
#X obj 67 224 gemhead 45;
#X obj 67 116 loadbang;
#X msg 67 174 0;
#X connect 0 0 16 0;
#X connect 1 0 2 0;
#X connect 2 0 6 0;
#X connect 3 0 4 0;
#X connect 4 0 12 1;
#X connect 5 0 7 0;
#X connect 6 0 17 0;
#X connect 6 1 12 0;
#X connect 8 0 9 0;
#X connect 9 0 14 0;
#X connect 10 0 11 0;
#X connect 11 0 14 1;
#X connect 12 0 13 0;
#X connect 13 0 7 1;
#X connect 14 0 15 0;
#X connect 15 0 7 2;
#X connect 16 1 1 0;
#X connect 16 2 3 0;
#X connect 16 3 8 0;
#X connect 16 4 10 0;
#X connect 17 0 5 0;
#X connect 18 0 19 0;
#X connect 19 0 17 0;
#X restore 262 171 pd linkrender;
#X obj 262 110 r \$0-pmpdout;
#N canvas 731 296 454 304 gemmouse 0;
#X obj 189 77 gemmouse;
#X obj 189 184 pack f f;
#X obj 189 218 spigot;
#X obj 103 244 outlet;
#X obj 189 131 - 0;
#X obj 216 131 + 100;
#X obj 189 108 / 5;
#X obj 216 108 / -5;
#X obj 79 51 inlet;
#X obj 109 98 t b;
#X obj 108 139 list;
#X obj 141 42 r mouse_init;
#X connect 0 0 6 0;
#X connect 0 1 7 0;
#X connect 0 2 2 1;
#X connect 1 0 2 0;
#X connect 2 0 10 1;
#X connect 4 0 1 0;
#X connect 5 0 1 1;
#X connect 6 0 4 0;
#X connect 7 0 5 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 3 0;
#X connect 11 0 10 1;
#X restore 404 127 pd gemmouse;
#X obj 404 106 gemhead;
#X msg 405 147 posX fix \$1;
#X msg 406 168 posY fix \$2;
#X obj 405 194 s \$0-pmpdin;
#X obj 262 133 route linksPosNo;
#X connect 0 0 1 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 1 0 0;
#X connect 4 0 1 0;
#X connect 6 0 12 0;
#X connect 7 0 9 0;
#X connect 7 0 10 0;
#X connect 8 0 7 0;
#X connect 9 0 11 0;
#X connect 10 0 11 0;
#X connect 12 0 5 0;
#X restore 23 86 pd gem_stuff;
#X obj 23 64 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
;
#X text 43 63 gem on/off;
#N canvas 487 334 635 333 creation 0;
#X obj 52 15 loadbang;
#X msg 221 71 reset;
#X msg 153 170 50 50;
#X msg 203 91 mass fix 0 100 50 50;
#X msg 169 192 Xmax 100 \, Xmin 0 \, Ymax 100 \, Ymin 0;
#X msg 186 150 mass mob 1 100 \$1 \$2;
#X obj 135 42 t b b b b b b;
#X msg 186 116 20 50 \, 23 61 \, 29 71 \, 39 77 \, 50 80 \, 61 77 \,
71 71 \, 77 61 \, 80 50 \, 77 39 \, 71 29 \, 61 23 \, 50 20 \, 39 23
\, 29 29 \, 23 39;
#X msg 144 211 link intf mob 0 10 2.5;
#X msg 135 234 link inter mob mob 1 2.5;
#X obj 192 270 s mouse_init;
#X obj 135 261 s \$0-pmpdin;
#X obj 239 25 inlet;
#X text 303 226 all links are created with these two messages;
#X connect 0 0 6 0;
#X connect 1 0 11 0;
#X connect 2 0 10 0;
#X connect 3 0 11 0;
#X connect 4 0 11 0;
#X connect 5 0 11 0;
#X connect 6 0 9 0;
#X connect 6 1 8 0;
#X connect 6 2 2 0;
#X connect 6 2 4 0;
#X connect 6 3 7 0;
#X connect 6 4 3 0;
#X connect 6 5 1 0;
#X connect 7 0 5 0;
#X connect 8 0 11 0;
#X connect 9 0 11 0;
#X connect 12 0 6 0;
#X restore 23 40 pd creation;
#N canvas 0 22 450 300 compute 0;
#X obj 53 100 gemhead;
#X obj 53 123 t b;
#X msg 53 145 bang \, get linksPos;
#X obj 53 224 s \$0-pmpdout;
#X obj 63 174 r \$0-pmpdin;
#X obj 53 198 pmpd2d;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 5 0;
#X connect 4 0 5 0;
#X connect 5 0 3 0;
#X restore 23 111 pd compute;
#X text 164 54 create window;
#X text 164 69 and drag the structure with the mouse;
#X text 161 117 copyright Nicolas Montgermont 2010;
#X obj 167 19 declare -lib Gem;
#X connect 0 0 5 0;
#X connect 3 0 2 0;
|
