aboutsummaryrefslogtreecommitdiff
path: root/examples/02_string.pd
blob: 8813e23192dd7c9e1dcaae93cf0380751256aaa1 (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
#N canvas -1562 97 1178 774 10;
#X declare -path ../;
#X obj 379 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 0 1;
#X obj 397 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 0 1;
#X obj 415 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 0 1;
#X obj 433 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 0 1;
#X obj 451 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 0 1;
#X obj 469 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 0 1;
#X obj 361 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 0 1;
#X obj 538 52 metro 10;
#X obj 538 27 loadbang;
#X text 138 362 move the first slider ->;
#X text 570 368 <- or the last one;
#X obj 487 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 0 1;
#X obj 505 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 0 1;
#X obj 538 79 t b b;
#X obj 565 104 s \$0-link;
#X obj 538 130 s \$0-mass;
#X obj 14 196 link \$0-link 0 1 1;
#X obj 145 196 link \$0-link 0 1 1;
#X obj 284 196 link \$0-link 0 1 1;
#X obj 424 195 link \$0-link 0 1 1;
#X obj 565 194 link \$0-link 0 1 1;
#X obj 703 194 link \$0-link 0 1 1;
#X obj 844 193 link \$0-link 0 1 1;
#X obj 981 194 link \$0-link 0 1 1;
#X obj 146 172 mass \$0-mass 30;
#X obj 284 171 mass \$0-mass 30;
#X obj 424 172 mass \$0-mass 30;
#X obj 565 172 mass \$0-mass 30;
#X obj 703 171 mass \$0-mass 30;
#X obj 844 171 mass \$0-mass 30;
#X obj 981 171 mass \$0-mass 30;
#X obj 160 518 mtof;
#X obj 160 567 line;
#X msg 160 543 \$1 15;
#X obj 160 592 osc~;
#X obj 216 518 mtof;
#X obj 216 567 line;
#X msg 216 543 \$1 15;
#X obj 216 592 osc~;
#X obj 271 518 mtof;
#X obj 271 567 line;
#X msg 271 543 \$1 15;
#X obj 271 592 osc~;
#X obj 327 517 mtof;
#X obj 327 566 line;
#X msg 327 542 \$1 15;
#X obj 327 591 osc~;
#X obj 383 516 mtof;
#X obj 383 565 line;
#X msg 383 541 \$1 15;
#X obj 383 590 osc~;
#X obj 438 516 mtof;
#X obj 438 565 line;
#X msg 438 541 \$1 15;
#X obj 438 590 osc~;
#X obj 494 516 mtof;
#X obj 494 565 line;
#X msg 494 541 \$1 15;
#X obj 494 590 osc~;
#X obj 291 644 *~ 0.1;
#X obj 344 644 *~ 0.1;
#X obj 901 476 noise~;
#X obj 811 724 dac~;
#X obj 580 520 bp~ 80 5;
#X obj 650 520 bp~ 160 5;
#X obj 726 521 bp~ 380 5;
#X obj 804 522 bp~ 760 5;
#X obj 601 545 / 127;
#X obj 601 595 *;
#X obj 601 569 t f f;
#X msg 601 621 \$1 10;
#X obj 601 648 line~;
#X obj 581 674 *~;
#X obj 672 546 / 127;
#X obj 672 596 *;
#X obj 672 570 t f f;
#X msg 672 622 \$1 10;
#X obj 672 649 line~;
#X obj 652 675 *~;
#X obj 748 546 / 127;
#X obj 748 596 *;
#X obj 748 570 t f f;
#X msg 748 622 \$1 10;
#X obj 748 649 line~;
#X obj 728 675 *~;
#X obj 830 550 / 127;
#X obj 830 600 *;
#X obj 830 574 t f f;
#X msg 830 626 \$1 10;
#X obj 830 653 line~;
#X obj 810 679 *~;
#X obj 915 547 / 127;
#X obj 915 597 *;
#X obj 915 571 t f f;
#X msg 915 623 \$1 10;
#X obj 915 650 line~;
#X obj 895 676 *~;
#X obj 986 548 / 127;
#X obj 986 598 *;
#X obj 986 572 t f f;
#X msg 986 624 \$1 10;
#X obj 986 651 line~;
#X obj 966 678 *~;
#X obj 1062 548 / 127;
#X obj 1062 598 *;
#X obj 1062 572 t f f;
#X msg 1062 624 \$1 10;
#X obj 1062 651 line~;
#X obj 1042 677 *~;
#X obj 894 522 bp~ 1380 5;
#X obj 956 524 bp~ 3160 5;
#X obj 1040 523 bp~ 6380 5;
#X obj 610 29 declare -path ../;
#X text 22 29 This is the first example of physical modeling: it computes
an elastic string;
#X text 602 67 <- metronome send bangs to masses and links and gives
the general computation speed;
#X text 21 62 All the slider are "linked" together with a link. Slider
got a mass so they have inertial.;
#X text 21 94 You can see the propagation of a wave \, and physical
properties close to an elastic string.;
#X text 247 694 Sound synthesis engine 1;
#X text 743 745 Sound synthesis engine 2;
#X text 612 140 masses and links has to be computed one after the other.
;
#X connect 0 0 31 0;
#X connect 0 0 67 0;
#X connect 1 0 35 0;
#X connect 1 0 73 0;
#X connect 2 0 39 0;
#X connect 2 0 79 0;
#X connect 3 0 43 0;
#X connect 3 0 85 0;
#X connect 4 0 47 0;
#X connect 4 0 91 0;
#X connect 5 0 51 0;
#X connect 5 0 97 0;
#X connect 6 0 16 0;
#X connect 7 0 13 0;
#X connect 8 0 7 0;
#X connect 11 0 55 0;
#X connect 11 0 103 0;
#X connect 12 0 23 1;
#X connect 13 0 15 0;
#X connect 13 1 14 0;
#X connect 16 1 24 0;
#X connect 17 0 24 0;
#X connect 17 1 25 0;
#X connect 18 0 25 0;
#X connect 18 1 26 0;
#X connect 19 0 26 0;
#X connect 19 1 27 0;
#X connect 20 0 27 0;
#X connect 20 1 28 0;
#X connect 21 0 28 0;
#X connect 21 1 29 0;
#X connect 22 0 29 0;
#X connect 22 1 30 0;
#X connect 23 0 30 0;
#X connect 24 0 0 0;
#X connect 24 0 16 1;
#X connect 24 0 17 0;
#X connect 25 0 1 0;
#X connect 25 0 17 1;
#X connect 25 0 18 0;
#X connect 26 0 2 0;
#X connect 26 0 18 1;
#X connect 26 0 19 0;
#X connect 27 0 3 0;
#X connect 27 0 19 1;
#X connect 27 0 20 0;
#X connect 28 0 4 0;
#X connect 28 0 20 1;
#X connect 28 0 21 0;
#X connect 29 0 5 0;
#X connect 29 0 21 1;
#X connect 29 0 22 0;
#X connect 30 0 11 0;
#X connect 30 0 22 1;
#X connect 30 0 23 0;
#X connect 31 0 33 0;
#X connect 32 0 34 0;
#X connect 33 0 32 0;
#X connect 34 0 59 0;
#X connect 35 0 37 0;
#X connect 36 0 38 0;
#X connect 37 0 36 0;
#X connect 38 0 59 0;
#X connect 39 0 41 0;
#X connect 40 0 42 0;
#X connect 41 0 40 0;
#X connect 42 0 59 0;
#X connect 42 0 60 0;
#X connect 43 0 45 0;
#X connect 44 0 46 0;
#X connect 45 0 44 0;
#X connect 46 0 59 0;
#X connect 46 0 60 0;
#X connect 47 0 49 0;
#X connect 48 0 50 0;
#X connect 49 0 48 0;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 51 0 53 0;
#X connect 52 0 54 0;
#X connect 53 0 52 0;
#X connect 54 0 60 0;
#X connect 55 0 57 0;
#X connect 56 0 58 0;
#X connect 57 0 56 0;
#X connect 58 0 60 0;
#X connect 61 0 63 0;
#X connect 61 0 64 0;
#X connect 61 0 65 0;
#X connect 61 0 66 0;
#X connect 61 0 109 0;
#X connect 61 0 110 0;
#X connect 61 0 111 0;
#X connect 63 0 72 0;
#X connect 64 0 78 0;
#X connect 65 0 84 0;
#X connect 66 0 90 0;
#X connect 67 0 69 0;
#X connect 68 0 70 0;
#X connect 69 0 68 0;
#X connect 69 1 68 1;
#X connect 70 0 71 0;
#X connect 71 0 72 1;
#X connect 72 0 62 0;
#X connect 72 0 62 1;
#X connect 73 0 75 0;
#X connect 74 0 76 0;
#X connect 75 0 74 0;
#X connect 75 1 74 1;
#X connect 76 0 77 0;
#X connect 77 0 78 1;
#X connect 78 0 62 0;
#X connect 78 0 62 1;
#X connect 79 0 81 0;
#X connect 80 0 82 0;
#X connect 81 0 80 0;
#X connect 81 1 80 1;
#X connect 82 0 83 0;
#X connect 83 0 84 1;
#X connect 84 0 62 1;
#X connect 84 0 62 0;
#X connect 85 0 87 0;
#X connect 86 0 88 0;
#X connect 87 0 86 0;
#X connect 87 1 86 1;
#X connect 88 0 89 0;
#X connect 89 0 90 1;
#X connect 90 0 62 1;
#X connect 90 0 62 0;
#X connect 91 0 93 0;
#X connect 92 0 94 0;
#X connect 93 0 92 0;
#X connect 93 1 92 1;
#X connect 94 0 95 0;
#X connect 95 0 96 1;
#X connect 96 0 62 0;
#X connect 96 0 62 1;
#X connect 97 0 99 0;
#X connect 98 0 100 0;
#X connect 99 0 98 0;
#X connect 99 1 98 1;
#X connect 100 0 101 0;
#X connect 101 0 102 1;
#X connect 102 0 62 1;
#X connect 102 0 62 0;
#X connect 103 0 105 0;
#X connect 104 0 106 0;
#X connect 105 0 104 0;
#X connect 105 1 104 1;
#X connect 106 0 107 0;
#X connect 107 0 108 1;
#X connect 108 0 62 1;
#X connect 108 0 62 0;
#X connect 109 0 96 0;
#X connect 110 0 102 0;
#X connect 111 0 108 0;