aboutsummaryrefslogtreecommitdiff
path: root/exemples/42_tentacule.pd
blob: 03bf0527d9ea3d593aee36bf7a72648f1d5a4bfa (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
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
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
#N canvas 165 113 638 442 10;
#N canvas 20 38 1340 956 tentacule 0;
#X obj 482 749 gemhead;
#X obj 114 173 mass3D M 1 1 -0.6 0;
#X obj 277 123 mass3D M 1 0 -0.6 0;
#X obj 364 170 mass3D M 1 -1 -0.6 0;
#X obj 283 231 mass3D M 1 0 1.13 0;
#X obj 115 402 mass3D M 1 1 -0.6 1;
#X obj 305 370 mass3D M 1 0 -0.6 1;
#X obj 414 402 mass3D M 1 -1 -0.6 1;
#X obj 310 479 mass3D M 1 0 1.13 1;
#X obj 351 448 link3D L 0 1;
#X obj 245 446 link3D L 0 1;
#X obj 250 400 link3D L 0 1;
#X obj 324 401 link3D L 0 1;
#X obj 348 336 link3D L2 0 1;
#X obj 280 309 link3D L2 0 1;
#X obj 263 247 link3D L2 0 1;
#X obj 179 332 link3D L2 0 1;
#X obj 77 266 link3D L2 0 1;
#X obj 175 253 link3D L2 0 1;
#X obj 354 258 link3D L2 0 1;
#X obj 395 298 link3D L2 0 1;
#X obj 306 201 link3D L 0 1;
#X obj 218 198 link3D L 0 1;
#X obj 222 152 link3D L 0 1;
#X obj 297 152 link3D L 0 1;
#X obj 838 302 link3D L2 0 1;
#X obj 906 268 link3D L2 0 1;
#X obj 1026 212 link3D L 0 1;
#X obj 949 213 link3D L 0 1;
#X obj 953 167 link3D L 0 1;
#X obj 1028 167 link3D L 0 1;
#X obj 696 325 link3D L2 0 1;
#X obj 617 379 link3D L2 0 1;
#X obj 618 175 link3D L2 0 1;
#X obj 588 296 link3D L2 0 1;
#X obj 496 245 link3D L2 0 1;
#X obj 575 217 link3D L2 0 1;
#X obj 750 232 link3D L2 0 1;
#X obj 770 269 link3D L2 0 1;
#X obj 287 44 link3D L 0 1;
#X obj 431 96 link3D L 0 1;
#X obj 506 147 link3D L 0 1;
#X obj 84 119 link3D L 0 1;
#X msg 88 91 position3D 1 -0.6 0;
#X msg 529 29 position3D -1 -0.6 0;
#X msg 577 122 position3D 0 1.13 0;
#X msg 301 16 position3D 0 -0.6 0;
#X obj 722 46 r M2;
#X obj 722 72 route reset;
#X obj 1003 361 link3D L3 0 1;
#X obj 1051 316 link3D L3 0 1;
#X obj 1108 283 link3D L3 0 1;
#X obj 991 405 link3D L3 0 1;
#X obj 1209 370 r M2;
#X obj 1109 190 mass3D M 1 -0.5 -0.3 1.5;
#X obj 1009 138 mass3D M 1 0 -0.3 1.5;
#X obj 822 188 mass3D M 1 0.5 -0.3 1.5;
#X obj 984 274 mass3D M 1 0 0.58 1.5;
#X obj 465 776 curve3d 5 5;
#X msg 198 573 set 0 1 \$1 \$2 \$3;
#X msg 218 604 set 1 1 \$1 \$2 \$3;
#X msg 239 621 set 2 1 \$1 \$2 \$3;
#X msg 261 644 set 3 1 \$1 \$2 \$3;
#X msg 278 666 set 4 1 \$1 \$2 \$3;
#X msg 395 580 set 0 2 \$1 \$2 \$3;
#X msg 417 606 set 1 2 \$1 \$2 \$3;
#X msg 436 628 set 2 2 \$1 \$2 \$3;
#X msg 458 651 set 3 2 \$1 \$2 \$3;
#X msg 475 673 set 4 2 \$1 \$2 \$3;
#X msg 666 580 set 0 3 \$1 \$2 \$3;
#X msg 686 611 set 1 3 \$1 \$2 \$3;
#X msg 706 628 set 2 3 \$1 \$2 \$3;
#X msg 730 651 set 3 3 \$1 \$2 \$3;
#X msg 746 673 set 4 3 \$1 \$2 \$3;
#X msg 863 587 set 0 4 \$1 \$2 \$3;
#X msg 884 613 set 1 4 \$1 \$2 \$3;
#X msg 903 635 set 2 4 \$1 \$2 \$3;
#X msg 926 658 set 3 4 \$1 \$2 \$3;
#X msg 944 681 set 4 4 \$1 \$2 \$3;
#X obj 43 568 loadbang;
#X msg 88 649 set 2 0 0 -0.3 0;
#X msg 106 687 set 3 0 0 -0.3 0;
#X msg 53 596 set 0 0 0 -0.3 0;
#X msg 70 628 set 1 0 0 -0.3 0;
#X msg 123 709 set 4 0 0 -0.3 0;
#X obj 1152 421 mass3D M 4 0 0 2;
#X msg 6 64 setM \$1;
#X obj 4 40 inlet;
#X msg 148 42 setM \$1;
#X obj 146 18 inlet;
#X obj 836 40 inlet;
#X connect 0 0 58 0;
#X connect 1 0 13 0;
#X connect 1 0 17 1;
#X connect 1 0 22 0;
#X connect 1 0 23 0;
#X connect 1 0 62 0;
#X connect 1 0 42 1;
#X connect 2 0 15 0;
#X connect 2 0 18 1;
#X connect 2 0 23 1;
#X connect 2 0 24 0;
#X connect 2 0 59 0;
#X connect 2 0 63 0;
#X connect 2 0 39 0;
#X connect 3 0 16 1;
#X connect 3 0 20 0;
#X connect 3 0 21 1;
#X connect 3 0 24 1;
#X connect 3 0 60 0;
#X connect 3 0 40 0;
#X connect 4 0 14 0;
#X connect 4 0 19 0;
#X connect 4 0 21 0;
#X connect 4 0 22 1;
#X connect 4 0 61 0;
#X connect 4 0 41 0;
#X connect 5 0 10 0;
#X connect 5 0 11 0;
#X connect 5 0 16 0;
#X connect 5 0 17 0;
#X connect 5 0 67 0;
#X connect 5 0 35 0;
#X connect 5 0 34 0;
#X connect 6 0 11 1;
#X connect 6 0 12 0;
#X connect 6 0 15 1;
#X connect 6 0 19 1;
#X connect 6 0 64 0;
#X connect 6 0 68 0;
#X connect 6 0 33 0;
#X connect 6 0 31 0;
#X connect 7 0 9 1;
#X connect 7 0 12 1;
#X connect 7 0 13 1;
#X connect 7 0 20 1;
#X connect 7 0 65 0;
#X connect 7 0 38 0;
#X connect 7 0 36 0;
#X connect 8 0 9 0;
#X connect 8 0 10 1;
#X connect 8 0 14 1;
#X connect 8 0 18 0;
#X connect 8 0 66 0;
#X connect 8 0 32 0;
#X connect 8 0 37 1;
#X connect 9 0 8 0;
#X connect 9 1 7 0;
#X connect 10 0 5 0;
#X connect 10 1 8 0;
#X connect 11 0 5 0;
#X connect 11 1 6 0;
#X connect 12 0 6 0;
#X connect 12 1 7 0;
#X connect 13 0 1 0;
#X connect 13 1 7 0;
#X connect 14 0 4 0;
#X connect 14 1 8 0;
#X connect 15 0 2 0;
#X connect 15 1 6 0;
#X connect 16 0 5 0;
#X connect 16 1 3 0;
#X connect 17 0 5 0;
#X connect 17 1 1 0;
#X connect 18 0 8 0;
#X connect 18 1 2 0;
#X connect 19 0 4 0;
#X connect 19 1 6 0;
#X connect 20 0 3 0;
#X connect 20 1 7 0;
#X connect 21 0 4 0;
#X connect 21 1 3 0;
#X connect 22 0 1 0;
#X connect 22 1 4 0;
#X connect 23 0 1 0;
#X connect 23 1 2 0;
#X connect 24 0 2 0;
#X connect 24 1 3 0;
#X connect 25 1 56 0;
#X connect 26 1 55 0;
#X connect 27 0 57 0;
#X connect 27 1 54 0;
#X connect 28 0 56 0;
#X connect 28 1 57 0;
#X connect 29 0 56 0;
#X connect 29 1 55 0;
#X connect 30 0 55 0;
#X connect 30 1 54 0;
#X connect 31 0 6 0;
#X connect 31 1 57 0;
#X connect 32 0 8 0;
#X connect 32 1 57 0;
#X connect 33 0 6 0;
#X connect 33 1 55 0;
#X connect 34 0 5 0;
#X connect 34 1 54 0;
#X connect 35 0 5 0;
#X connect 35 1 56 0;
#X connect 36 0 7 0;
#X connect 36 1 56 0;
#X connect 37 0 55 0;
#X connect 37 1 8 0;
#X connect 38 0 7 0;
#X connect 38 1 54 0;
#X connect 39 0 2 0;
#X connect 40 0 3 0;
#X connect 41 0 4 0;
#X connect 42 1 1 0;
#X connect 43 0 42 0;
#X connect 44 0 40 1;
#X connect 45 0 41 1;
#X connect 46 0 39 1;
#X connect 47 0 48 0;
#X connect 48 0 44 0;
#X connect 48 0 45 0;
#X connect 48 0 46 0;
#X connect 48 0 43 0;
#X connect 49 0 55 0;
#X connect 49 1 85 0;
#X connect 50 0 54 0;
#X connect 50 1 85 0;
#X connect 51 0 57 0;
#X connect 51 1 85 0;
#X connect 52 0 56 0;
#X connect 52 1 85 0;
#X connect 53 0 85 0;
#X connect 54 0 27 1;
#X connect 54 0 30 1;
#X connect 54 0 70 0;
#X connect 54 0 38 1;
#X connect 54 0 34 1;
#X connect 54 0 50 0;
#X connect 55 0 26 1;
#X connect 55 0 29 1;
#X connect 55 0 30 0;
#X connect 55 0 69 0;
#X connect 55 0 73 0;
#X connect 55 0 33 1;
#X connect 55 0 37 0;
#X connect 55 0 49 0;
#X connect 56 0 25 1;
#X connect 56 0 28 0;
#X connect 56 0 29 0;
#X connect 56 0 72 0;
#X connect 56 0 35 1;
#X connect 56 0 36 1;
#X connect 56 0 52 0;
#X connect 57 0 27 0;
#X connect 57 0 28 1;
#X connect 57 0 71 0;
#X connect 57 0 32 1;
#X connect 57 0 31 1;
#X connect 57 0 51 0;
#X connect 59 0 58 0;
#X connect 60 0 58 0;
#X connect 61 0 58 0;
#X connect 62 0 58 0;
#X connect 63 0 58 0;
#X connect 64 0 58 0;
#X connect 65 0 58 0;
#X connect 66 0 58 0;
#X connect 67 0 58 0;
#X connect 68 0 58 0;
#X connect 69 0 58 0;
#X connect 70 0 58 0;
#X connect 71 0 58 0;
#X connect 72 0 58 0;
#X connect 73 0 58 0;
#X connect 74 0 58 0;
#X connect 75 0 58 0;
#X connect 76 0 58 0;
#X connect 77 0 58 0;
#X connect 78 0 58 0;
#X connect 79 0 82 0;
#X connect 79 0 83 0;
#X connect 79 0 80 0;
#X connect 79 0 81 0;
#X connect 79 0 84 0;
#X connect 80 0 58 0;
#X connect 81 0 58 0;
#X connect 82 0 58 0;
#X connect 83 0 58 0;
#X connect 84 0 58 0;
#X connect 85 0 74 0;
#X connect 85 0 78 0;
#X connect 85 0 49 1;
#X connect 85 0 50 1;
#X connect 85 0 51 1;
#X connect 85 0 52 1;
#X connect 85 0 75 0;
#X connect 85 0 76 0;
#X connect 85 0 77 0;
#X connect 86 0 17 0;
#X connect 86 0 35 0;
#X connect 86 0 52 0;
#X connect 87 0 86 0;
#X connect 88 0 15 0;
#X connect 88 0 33 0;
#X connect 88 0 49 0;
#X connect 89 0 88 0;
#X connect 90 0 58 0;
#X restore 51 405 pd tentacule;
#X msg 17 56 create \, 1;
#X msg 27 77 0 \, destroy;
#X msg 36 121 lighting 1;
#X obj 367 144 t b b;
#X obj 392 169 s M;
#X obj 398 201 s L;
#X obj 380 220 s L2;
#X obj 480 101 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 500 143 t b b b;
#X obj 566 213 s M;
#X msg 566 190 reset;
#X obj 528 222 s L;
#X obj 510 241 s L2;
#X msg 518 188 resetL;
#X msg 500 167 resetF;
#X obj 593 214 s M2;
#X obj 500 263 s L3;
#X obj 367 242 s L3;
#X obj 17 238 ch_gemwin 50;
#X obj 367 120 gemhead;
#X obj 121 309 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
-1 -1 0 1;
#X obj 121 333 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
-1 -1 0 1;
#X obj 51 359 / 150;
#X obj 84 359 / 150;
#X obj 84 383 + 0.6;
#X obj 51 383 + 0.6;
#X msg 136 356 draw control_line;
#X msg 136 385 draw fill;
#X obj 36 98 loadbang;
#N canvas 0 0 452 302 light 0;
#X obj 43 70 gemhead;
#X obj 43 114 world_light;
#X obj 43 25 gemhead;
#X obj 43 49 world_light;
#X obj 43 92 rotateXYZ 230 0 80;
#X connect 0 0 4 0;
#X connect 2 0 3 0;
#X connect 4 0 1 0;
#X restore 272 222 pd light;
#X obj 500 119 loadbang;
#N canvas 0 0 547 274 init 0;
#X obj 11 125 s M;
#X msg 11 102 setM \$1;
#X msg 17 58 13;
#X msg 91 109 setD \$1;
#X obj 91 138 s L;
#X floatatom 90 86 5 0 0 0 - - -;
#X obj 153 137 s L;
#X floatatom 152 85 5 0 0 0 - - -;
#X msg 153 108 setK \$1;
#X msg 93 59 2;
#X msg 216 109 setD \$1;
#X floatatom 215 86 5 0 0 0 - - -;
#X floatatom 277 85 5 0 0 0 - - -;
#X msg 278 108 setK \$1;
#X msg 218 59 2;
#X obj 216 138 s L2;
#X obj 278 137 s L2;
#X msg 165 55 5;
#X msg 290 55 0.7;
#X msg 343 108 setD \$1;
#X floatatom 342 85 5 0 0 0 - - -;
#X floatatom 416 89 5 0 0 0 - - -;
#X msg 417 112 setK \$1;
#X obj 343 137 s L3;
#X obj 417 141 s L3;
#X msg 429 59 1;
#X msg 345 58 3;
#X obj 84 -14 loadbang;
#X floatatom 9 79 5 0 0 0 - - -;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 4 0;
#X connect 5 0 3 0;
#X connect 7 0 8 0;
#X connect 8 0 6 0;
#X connect 9 0 3 0;
#X connect 10 0 15 0;
#X connect 11 0 10 0;
#X connect 12 0 13 0;
#X connect 13 0 16 0;
#X connect 14 0 10 0;
#X connect 17 0 8 0;
#X connect 18 0 13 0;
#X connect 19 0 23 0;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 22 0 24 0;
#X connect 25 0 22 0;
#X connect 26 0 19 0;
#X connect 27 0 9 0;
#X connect 27 0 17 0;
#X connect 27 0 14 0;
#X connect 27 0 18 0;
#X connect 27 0 26 0;
#X connect 27 0 25 0;
#X connect 27 0 2 0;
#X connect 28 0 1 0;
#X restore 272 247 pd init;
#X text 522 98 <- reset;
#X text 280 319 <- change lenght of some link to distord the structure
;
#X text 283 10 muscle exemples;
#X text 158 26 you can change the lengh of some like to distord the
structure;
#X obj 42 154 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
-1 -1 0 1;
#X obj 64 178 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
-1 -1 0 1;
#X obj 87 201 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
-1 -1 0 1;
#X text 129 136 camera position;
#X connect 1 0 19 0;
#X connect 2 0 19 0;
#X connect 3 0 19 0;
#X connect 4 0 6 0;
#X connect 4 0 7 0;
#X connect 4 0 18 0;
#X connect 4 1 5 0;
#X connect 8 0 9 0;
#X connect 9 0 15 0;
#X connect 9 1 14 0;
#X connect 9 2 11 0;
#X connect 11 0 10 0;
#X connect 11 0 16 0;
#X connect 14 0 12 0;
#X connect 14 0 13 0;
#X connect 14 0 17 0;
#X connect 15 0 10 0;
#X connect 15 0 13 0;
#X connect 15 0 12 0;
#X connect 15 0 17 0;
#X connect 20 0 4 0;
#X connect 21 0 23 0;
#X connect 22 0 24 0;
#X connect 23 0 26 0;
#X connect 24 0 25 0;
#X connect 25 0 0 1;
#X connect 26 0 0 0;
#X connect 27 0 0 2;
#X connect 28 0 0 2;
#X connect 29 0 3 0;
#X connect 31 0 9 0;
#X connect 37 0 19 1;
#X connect 38 0 19 2;
#X connect 39 0 19 3;