Mercurial > hg > beaglert
comparison examples/08-PureData/rubberDuckie/_main.pd @ 464:8fcfbfb32aa0 prerelease
Examples reorder with subdirectories. Added header to each project. Moved Doxygen to bottom of render.cpp.
author | Robert Jack <robert.h.jack@gmail.com> |
---|---|
date | Mon, 20 Jun 2016 16:20:38 +0100 |
parents | |
children | ddb86944e138 |
comparison
equal
deleted
inserted
replaced
463:c47709e8b5c9 | 464:8fcfbfb32aa0 |
---|---|
1 #N canvas 275 573 442 207 10; | |
2 #X obj 39 149 dac~ 1 2; | |
3 #X text 218 143 ---------------------------------; | |
4 #X text 218 133 @krighxz / BELA / heavy / 12/2015; | |
5 #X text 242 152 beaglert.cc / enzienaudio.com; | |
6 #X text 35 32 Rubber Duckie; | |
7 #X text 35 42 =============; | |
8 #N canvas 325 86 823 605 duckie 0; | |
9 #X obj 186 510 *~; | |
10 #X obj 306 517 *~; | |
11 #X obj 372 468 noise~; | |
12 #X obj 372 492 bp~ 3000 10; | |
13 #X obj 366 162 abs~; | |
14 #X obj 509 158 sig~ 0; | |
15 #X obj 467 371 +~; | |
16 #X obj 411 210 -~ 0.55; | |
17 #X obj 411 231 /~ 0.2; | |
18 #X obj 411 252 clip~ 0 1; | |
19 #X obj 411 282 *~; | |
20 #X obj 411 308 *~ 1000; | |
21 #X obj 366 334 +~; | |
22 #X obj 366 308 +~ 800; | |
23 #X obj 186 536 *~ 0.2; | |
24 #X obj 366 282 *~ 800; | |
25 #N canvas 568 775 135 226 <~ 0; | |
26 #X obj 20 -43 -~; | |
27 #X obj 20 27 +~ 1e-37; | |
28 #X obj 20 6 clip~ -1e-37 0; | |
29 #X obj 20 -88 inlet~; | |
30 #X obj 64 -87 inlet~; | |
31 #X obj 20 -64 max~; | |
32 #X obj 20 -19 *~ -1; | |
33 #X obj 20 79 outlet~; | |
34 #X obj 20 48 *~ 1e+37; | |
35 #X connect 0 0 6 0; | |
36 #X connect 1 0 8 0; | |
37 #X connect 2 0 1 0; | |
38 #X connect 3 0 5 0; | |
39 #X connect 4 0 0 1; | |
40 #X connect 4 0 5 1; | |
41 #X connect 5 0 0 0; | |
42 #X connect 6 0 2 0; | |
43 #X connect 8 0 7 0; | |
44 #X restore 186 367 pd <~ 0; | |
45 #N canvas 568 775 135 226 <~ 0; | |
46 #X obj 20 -43 -~; | |
47 #X obj 20 27 +~ 1e-37; | |
48 #X obj 20 6 clip~ -1e-37 0; | |
49 #X obj 20 -88 inlet~; | |
50 #X obj 64 -87 inlet~; | |
51 #X obj 20 -64 max~; | |
52 #X obj 20 -19 *~ -1; | |
53 #X obj 20 79 outlet~; | |
54 #X obj 20 48 *~ 1e+37; | |
55 #X connect 0 0 6 0; | |
56 #X connect 1 0 8 0; | |
57 #X connect 2 0 1 0; | |
58 #X connect 3 0 5 0; | |
59 #X connect 4 0 0 1; | |
60 #X connect 4 0 5 1; | |
61 #X connect 5 0 0 0; | |
62 #X connect 6 0 2 0; | |
63 #X connect 8 0 7 0; | |
64 #X restore 482 181 pd <~; | |
65 #X obj 186 428 *~; | |
66 #X obj 225 345 sig~ 1; | |
67 #X obj 186 394 lop~ 10; | |
68 #X text 524 393 << band-limited pulse; | |
69 #X text 10 367 reed stops when overblown >>; | |
70 #X obj 186 460 *~; | |
71 #X obj 186 480 *~; | |
72 #X text 25 470 exp amplitude response >>; | |
73 #X text 537 238 << detune frequency on change of direction; | |
74 #X obj 482 236 *~ -300; | |
75 #X obj 306 485 *~; | |
76 #X obj 306 449 *~ 0.1; | |
77 #X text 448 493 << noise simulates non-oscillating airflow when overblown | |
78 ; | |
79 #X obj 186 561 outlet~; | |
80 #N canvas 58 1286 407 525 pulse 0; | |
81 #X obj 83 340 *~; | |
82 #X obj 83 366 *~; | |
83 #X obj 31 366 sig~ 1; | |
84 #X obj 52 419 /~; | |
85 #X obj 67 393 +~; | |
86 #X text 116 366 X^2; | |
87 #X text 97 396 1+X^2; | |
88 #X text 84 421 1/(1+X^2); | |
89 #X obj 83 317 osc~; | |
90 #X obj 167 320 clip~ 0 999999; | |
91 #X obj 52 483 outlet~; | |
92 #X text 271 218 << tweak all this; | |
93 #X text 25 14 based on F04.waveshaping.pulse.pd; | |
94 #X obj 83 84 /~ 2; | |
95 #X obj 167 148 -~; | |
96 #X obj 167 170 /~ 127; | |
97 #X obj 52 452 hip~ 5; | |
98 #X obj 167 202 *~; | |
99 #X obj 167 232 *~; | |
100 #X obj 167 262 *~; | |
101 #X obj 167 294 *~ 1000; | |
102 #X obj 118 125 sig~ 139; | |
103 #X obj 83 58 inlet~; | |
104 #N canvas 331 1377 215 174 _ftom 0; | |
105 #X obj -482 -776 tabread4~ _ftom; | |
106 #X obj -482 -818 /~ 10000; | |
107 #X obj -482 -797 *~ 256; | |
108 #N canvas 0 23 450 278 (subpatch) 0; | |
109 #X array _ftom 256 float 3; | |
110 #A 0 0 27.0762 39.0762 46.0958 51.0762 54.9394 58.0958 60.7645 63.0762 | |
111 65.1153 66.9394 68.5894 70.0958 71.4815 72.7645 73.9589 75.0762 76.1258 | |
112 77.1153 78.0514 78.9394 79.784 80.5894 81.359 82.0958 82.8025 83.4815 | |
113 84.1349 84.7645 85.372 85.9589 86.5266 87.0762 87.609 88.1258 88.6276 | |
114 89.1153 89.5897 90.0514 90.5011 90.9394 91.3669 91.784 92.1914 92.5894 | |
115 92.9785 93.359 93.7313 94.0958 94.4528 94.8025 95.1453 95.4815 95.8113 | |
116 96.1349 96.4525 96.7645 97.0709 97.372 97.6679 97.9589 98.2451 98.5266 | |
117 98.8036 99.0762 99.3446 99.609 99.8693 100.126 100.379 100.628 100.873 | |
118 101.115 101.354 101.59 101.822 102.051 102.278 102.501 102.722 102.939 | |
119 103.154 103.367 103.577 103.784 103.989 104.191 104.392 104.589 104.785 | |
120 104.978 105.17 105.359 105.546 105.731 105.914 106.096 106.275 106.453 | |
121 106.629 106.803 106.975 107.145 107.314 107.482 107.647 107.811 107.974 | |
122 108.135 108.294 108.453 108.609 108.764 108.918 109.071 109.222 109.372 | |
123 109.521 109.668 109.814 109.959 110.103 110.245 110.386 110.527 110.666 | |
124 110.804 110.94 111.076 111.211 111.345 111.477 111.609 111.74 111.869 | |
125 111.998 112.126 112.253 112.379 112.504 112.628 112.751 112.873 112.995 | |
126 113.115 113.235 113.354 113.472 113.59 113.706 113.822 113.937 114.051 | |
127 114.165 114.278 114.39 114.501 114.612 114.722 114.831 114.939 115.047 | |
128 115.154 115.261 115.367 115.472 115.577 115.681 115.784 115.887 115.989 | |
129 116.09 116.191 116.292 116.392 116.491 116.589 116.688 116.785 116.882 | |
130 116.978 117.074 117.17 117.265 117.359 117.453 117.546 117.639 117.731 | |
131 117.823 117.915 118.005 118.096 118.186 118.275 118.364 118.453 118.541 | |
132 118.629 118.716 118.803 118.889 118.975 119.06 119.145 119.23 119.314 | |
133 119.398 119.482 119.565 119.647 119.729 119.811 119.893 119.974 120.055 | |
134 120.135 120.215 120.294 120.374 120.453 120.531 120.609 120.687 120.764 | |
135 120.842 120.918 120.995 121.071 121.147 121.222 121.297 121.372 121.446 | |
136 121.521 121.594 121.668 121.741 121.814 121.887 121.959 122.031 122.103 | |
137 122.174 122.245 122.316 122.386 122.457 122.527 122.596 122.666 122.735 | |
138 122.804 122.872 122.94 123.008; | |
139 #X coords 0 127 256 -12 50 50 1 0 0; | |
140 #X restore -546 -793 graph; | |
141 #X obj -482 -838 clip~ 0 10000; | |
142 #X obj -482 -858 inlet~; | |
143 #X obj -482 -755 outlet~; | |
144 #X text -567 -722 shoddy temp replacement for ftom~; | |
145 #X connect 0 0 6 0; | |
146 #X connect 1 0 2 0; | |
147 #X connect 2 0 0 0; | |
148 #X connect 4 0 1 0; | |
149 #X connect 5 0 4 0; | |
150 #X restore 182 125 pd _ftom; | |
151 #X connect 0 0 1 0; | |
152 #X connect 0 0 1 1; | |
153 #X connect 1 0 4 1; | |
154 #X connect 2 0 3 0; | |
155 #X connect 2 0 4 0; | |
156 #X connect 3 0 16 0; | |
157 #X connect 4 0 3 1; | |
158 #X connect 8 0 0 0; | |
159 #X connect 9 0 0 1; | |
160 #X connect 13 0 8 0; | |
161 #X connect 13 0 23 0; | |
162 #X connect 14 0 15 0; | |
163 #X connect 15 0 17 0; | |
164 #X connect 15 0 17 1; | |
165 #X connect 16 0 10 0; | |
166 #X connect 17 0 18 0; | |
167 #X connect 17 0 18 1; | |
168 #X connect 18 0 19 0; | |
169 #X connect 18 0 19 1; | |
170 #X connect 19 0 20 0; | |
171 #X connect 20 0 9 0; | |
172 #X connect 21 0 14 0; | |
173 #X connect 22 0 13 0; | |
174 #X connect 23 0 14 1; | |
175 #X restore 467 394 pd pulse; | |
176 #X obj 366 105 inlet~; | |
177 #X text 295 104 airflow >>; | |
178 #X text 218 118 ('squeeze pressure'); | |
179 #X text 13 20 Sound model of a rubber duckie toy; | |
180 #X text 14 51 Hint: use the differential of a continuous signal as | |
181 input for a realistic response; | |
182 #X text 13 29 ==================================; | |
183 #X obj 366 133 lop~ 0.5; | |
184 #X text 423 132 << airflow resistance; | |
185 #X connect 0 0 14 0; | |
186 #X connect 1 0 14 0; | |
187 #X connect 2 0 3 0; | |
188 #X connect 3 0 1 1; | |
189 #X connect 4 0 7 0; | |
190 #X connect 4 0 15 0; | |
191 #X connect 4 0 29 0; | |
192 #X connect 4 0 18 1; | |
193 #X connect 4 0 16 0; | |
194 #X connect 5 0 17 1; | |
195 #X connect 6 0 32 0; | |
196 #X connect 7 0 8 0; | |
197 #X connect 8 0 9 0; | |
198 #X connect 9 0 10 0; | |
199 #X connect 9 0 10 1; | |
200 #X connect 10 0 11 0; | |
201 #X connect 11 0 12 1; | |
202 #X connect 12 0 6 0; | |
203 #X connect 13 0 12 0; | |
204 #X connect 14 0 31 0; | |
205 #X connect 15 0 13 0; | |
206 #X connect 16 0 20 0; | |
207 #X connect 17 0 27 0; | |
208 #X connect 18 0 23 0; | |
209 #X connect 18 0 23 1; | |
210 #X connect 19 0 16 1; | |
211 #X connect 20 0 18 0; | |
212 #X connect 23 0 24 1; | |
213 #X connect 23 0 24 0; | |
214 #X connect 24 0 0 0; | |
215 #X connect 27 0 6 1; | |
216 #X connect 28 0 1 0; | |
217 #X connect 29 0 28 1; | |
218 #X connect 29 0 28 0; | |
219 #X connect 32 0 0 1; | |
220 #X connect 33 0 39 0; | |
221 #X connect 39 0 4 0; | |
222 #X connect 39 0 17 0; | |
223 #X restore 39 127 pd duckie; | |
224 #X obj 39 77 adc~ 10; | |
225 #N canvas 0 22 504 229 differential 0; | |
226 #X obj 27 80 rzero~ 1; | |
227 #X obj 72 57 sig~ 1; | |
228 #X obj 27 152 *~ 44100; | |
229 #X obj 72 131 samplerate~; | |
230 #X obj 72 110 loadbang; | |
231 #X obj 27 25 inlet~; | |
232 #X obj 27 190 outlet~; | |
233 #X text 84 83 y[n] = x[n] - x[n-1]; | |
234 #X text 121 57 <<< heavy currently requires signal input to set coefficient | |
235 ; | |
236 #X text 91 151 <<< multiply by samplerate to get velocity; | |
237 #X connect 0 0 2 0; | |
238 #X connect 1 0 0 1; | |
239 #X connect 2 0 6 0; | |
240 #X connect 3 0 2 1; | |
241 #X connect 4 0 3 0; | |
242 #X connect 5 0 0 0; | |
243 #X restore 39 101 pd differential; | |
244 #X connect 6 0 0 0; | |
245 #X connect 6 0 0 1; | |
246 #X connect 7 0 8 0; | |
247 #X connect 8 0 6 0; |