aboutsummaryrefslogtreecommitdiff
path: root/bell~.pd
diff options
context:
space:
mode:
Diffstat (limited to 'bell~.pd')
-rw-r--r--bell~.pd288
1 files changed, 288 insertions, 0 deletions
diff --git a/bell~.pd b/bell~.pd
new file mode 100644
index 0000000..ae4dc91
--- /dev/null
+++ b/bell~.pd
@@ -0,0 +1,288 @@
+#N canvas 104 88 455 402 10;
+#N canvas 444 467 701 290 bell1 0;
+#X obj 257 206 clip~ -0.9 0.9;
+#N canvas 0 0 350 192 envelopes 0;
+#X obj 238 82 / 9;
+#X obj 187 82 / 7;
+#X obj 71 85 * 0.9;
+#X msg 120 58 600;
+#X obj 135 83 / 2;
+#X obj 12 85 * 1.2;
+#X obj 120 33 inlet;
+#X obj 12 136 outlet;
+#X obj 71 133 outlet;
+#X obj 135 132 outlet;
+#X obj 187 132 outlet;
+#X obj 238 132 outlet;
+#X text 98 10 envelope ratios;
+#X connect 0 0 11 0;
+#X connect 1 0 10 0;
+#X connect 2 0 8 0;
+#X connect 3 0 0 0;
+#X connect 3 0 1 0;
+#X connect 3 0 2 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 9 0;
+#X connect 5 0 7 0;
+#X connect 6 0 3 0;
+#X restore 251 50 pd envelopes;
+#N canvas 0 0 406 316 part_fund+sub 0;
+#X obj 156 54 osc~;
+#X obj 71 78 osc~;
+#X text 6 112 suboctave hum;
+#X text 129 105 fundamental;
+#X obj 71 52 * 0.5001;
+#X obj 197 258 *~;
+#X obj 214 179 line~;
+#X obj 71 172 *~ 0.1;
+#X msg 216 136 1 \, 0 \$1;
+#X obj 157 221 *~ 0.02;
+#X obj 259 12 inlet;
+#X obj 198 289 outlet~;
+#X obj 93 10 r \$0-fundamental1;
+#X connect 0 0 9 0;
+#X connect 1 0 7 0;
+#X connect 4 0 1 0;
+#X connect 5 0 11 0;
+#X connect 6 0 5 1;
+#X connect 7 0 9 0;
+#X connect 8 0 6 0;
+#X connect 9 0 5 0;
+#X connect 10 0 8 0;
+#X connect 12 0 4 0;
+#X connect 12 0 0 0;
+#X restore 21 116 pd part_fund+sub;
+#N canvas 0 0 327 465 part 0;
+#X obj 21 163 osc~;
+#X obj 154 165 osc~;
+#X obj 79 169 osc~;
+#X text 147 192 Nominal;
+#X obj 80 140 * 4.8;
+#X text 82 192 "Quint";
+#X obj 154 140 * 1.5;
+#X obj 160 368 *~;
+#X obj 226 277 line~;
+#X obj 46 269 *~ 0.2;
+#X obj 95 268 *~ 0.5;
+#X obj 146 268 *~ 0.1;
+#X obj 21 140 * 2.002;
+#X obj 133 97 * 2;
+#X text 8 194 Octave;
+#X msg 228 234 1 \, 0 \$1;
+#X obj 95 302 *~ 0.04;
+#X obj 246 38 inlet;
+#X obj 160 396 outlet~;
+#X text 79 11 primary overtones;
+#X obj 65 38 r \$0-fundamental1;
+#X connect 0 0 9 0;
+#X connect 1 0 11 0;
+#X connect 2 0 10 0;
+#X connect 4 0 2 0;
+#X connect 6 0 1 0;
+#X connect 7 0 18 0;
+#X connect 8 0 7 1;
+#X connect 9 0 16 0;
+#X connect 10 0 16 0;
+#X connect 11 0 16 0;
+#X connect 12 0 0 0;
+#X connect 13 0 4 0;
+#X connect 13 0 6 0;
+#X connect 15 0 8 0;
+#X connect 16 0 7 0;
+#X connect 17 0 15 0;
+#X connect 20 0 12 0;
+#X connect 20 0 13 0;
+#X restore 145 116 pd part primaries;
+#N canvas 0 0 289 383 secondaries 0;
+#X obj 80 104 osc~;
+#X text 19 142 12th overtone;
+#X obj 80 79 * 11;
+#X obj 151 110 osc~;
+#X obj 151 85 * 1.714;
+#X text 149 142 12/7;
+#X obj 13 105 osc~;
+#X obj 13 80 * 1.6666;
+#X obj 109 314 *~;
+#X obj 173 223 line~;
+#X obj 173 255 *~;
+#X msg 173 196 1 \, 0 \$1;
+#X obj 99 53 * 1.5;
+#X obj 172 280 *~;
+#X obj 72 254 *~ 0.2;
+#X obj 72 210 *~ 0.2;
+#X obj 23 210 *~ 0.1;
+#X obj 118 209 *~ 0.1;
+#X text 203 262 cubic;
+#X obj 238 18 inlet;
+#X obj 109 347 outlet~;
+#X obj 80 19 r \$0-fundamental1;
+#X connect 0 0 15 0;
+#X connect 2 0 0 0;
+#X connect 3 0 17 0;
+#X connect 4 0 3 0;
+#X connect 6 0 16 0;
+#X connect 7 0 6 0;
+#X connect 8 0 20 0;
+#X connect 9 0 10 1;
+#X connect 9 0 10 0;
+#X connect 10 0 13 0;
+#X connect 10 0 13 1;
+#X connect 11 0 9 0;
+#X connect 12 0 4 0;
+#X connect 12 0 7 0;
+#X connect 13 0 8 1;
+#X connect 14 0 8 0;
+#X connect 15 0 14 0;
+#X connect 16 0 14 0;
+#X connect 17 0 14 0;
+#X connect 19 0 11 0;
+#X connect 21 0 2 0;
+#X connect 21 0 12 0;
+#X restore 275 116 pd secondaries;
+#N canvas 0 0 389 416 circulars 0;
+#X obj 145 106 osc~;
+#X obj 40 103 osc~;
+#X text 109 140 1st circular;
+#X text 1 139 60 degree mode;
+#X obj 40 80 * 3;
+#X obj 145 82 * 6.242;
+#X text 25 155 "Tierce";
+#X obj 218 105 osc~;
+#X obj 218 81 * 12.483;
+#X text 220 142 2nd circular;
+#X obj 162 325 *~;
+#X obj 228 234 line~;
+#X obj 227 263 *~;
+#X obj 146 237 *~ 0.05;
+#X obj 81 189 *~ 0.1;
+#X text 262 267 square;
+#X msg 228 209 1 \, 0 \$1;
+#X obj 313 16 inlet;
+#X obj 161 362 outlet~;
+#X obj 34 19 r \$0-fundamental1;
+#X connect 0 0 13 0;
+#X connect 1 0 14 0;
+#X connect 4 0 1 0;
+#X connect 5 0 0 0;
+#X connect 7 0 13 0;
+#X connect 8 0 7 0;
+#X connect 10 0 18 0;
+#X connect 11 0 12 1;
+#X connect 11 0 12 0;
+#X connect 12 0 10 1;
+#X connect 13 0 10 0;
+#X connect 14 0 13 0;
+#X connect 16 0 11 0;
+#X connect 17 0 16 0;
+#X connect 19 0 4 0;
+#X connect 19 0 5 0;
+#X connect 19 0 8 0;
+#X restore 384 116 pd circulars;
+#N canvas 0 0 357 436 strike 0;
+#X obj 107 284 *~ 0.03;
+#X obj 67 129 osc~;
+#X obj 67 105 * 16;
+#X obj 108 129 osc~;
+#X obj 108 105 * 24;
+#X text 92 72 strikes;
+#X obj 144 129 noise~;
+#X obj 140 347 *~;
+#X obj 205 264 line~;
+#X obj 204 288 *~;
+#X obj 204 312 *~;
+#X text 244 304 cubic;
+#X msg 205 242 1 \, 0 \$1;
+#X obj 228 25 inlet;
+#X obj 140 375 outlet~;
+#X obj 77 23 r \$0-fundamental1;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 1 0;
+#X connect 3 0 0 0;
+#X connect 4 0 3 0;
+#X connect 6 0 0 0;
+#X connect 7 0 14 0;
+#X connect 8 0 9 1;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 9 0 10 1;
+#X connect 10 0 7 1;
+#X connect 12 0 8 0;
+#X connect 13 0 12 0;
+#X connect 15 0 2 0;
+#X connect 15 0 4 0;
+#X restore 479 116 pd strike;
+#N canvas 0 0 327 216 bodyresonance 0;
+#X obj 96 151 delwrite~ \$0-body 400;
+#X obj 96 50 clip~ -0.2 0.5;
+#X obj 96 123 *~ 0.4;
+#X obj 10 87 bp~ 1243 12;
+#X obj 95 87 bp~ 287 12;
+#X obj 179 87 bp~ 431 12;
+#X obj 95 30 delread~ \$0-body 59;
+#X obj 57 151 *~ 4;
+#X obj 57 191 outlet~;
+#X obj 250 29 inlet~;
+#X text 91 6 body resonance;
+#X connect 1 0 3 0;
+#X connect 1 0 4 0;
+#X connect 1 0 5 0;
+#X connect 2 0 0 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 0;
+#X connect 4 0 2 0;
+#X connect 5 0 2 0;
+#X connect 6 0 1 0;
+#X connect 7 0 8 0;
+#X connect 9 0 0 0;
+#X restore 479 152 pd bodyresonance;
+#X obj 258 227 hip~ 10;
+#X obj 257 254 outlet~;
+#X obj 251 23 inlet;
+#X obj 23 29 s \$0-fundamental1;
+#X obj 23 6 inlet;
+#X obj 256 183 *~ 0.9;
+#X connect 0 0 8 0;
+#X connect 1 0 2 0;
+#X connect 1 1 3 0;
+#X connect 1 2 4 0;
+#X connect 1 3 5 0;
+#X connect 1 4 6 0;
+#X connect 2 0 13 0;
+#X connect 3 0 13 0;
+#X connect 4 0 13 0;
+#X connect 5 0 13 0;
+#X connect 6 0 7 0;
+#X connect 6 0 13 0;
+#X connect 7 0 0 0;
+#X connect 8 0 9 0;
+#X connect 10 0 1 0;
+#X connect 12 0 11 0;
+#X connect 13 0 0 0;
+#X restore 72 224 pd bell1;
+#X obj 60 21 inlet;
+#X obj 73 304 outlet~;
+#X obj 74 196 t b f;
+#X obj 79 168 mtof;
+#X obj 60 105 f 80;
+#X obj 60 52 route bang;
+#X obj 76 263 *~;
+#X obj 160 248 line~;
+#X msg 162 214 \$1 5;
+#X obj 168 146 / 127;
+#X obj 122 84 ./noteSplit;
+#X connect 0 0 7 0;
+#X connect 1 0 6 0;
+#X connect 3 0 0 1;
+#X connect 3 1 0 0;
+#X connect 4 0 3 0;
+#X connect 5 0 4 0;
+#X connect 6 0 5 0;
+#X connect 6 1 11 0;
+#X connect 7 0 2 0;
+#X connect 8 0 7 1;
+#X connect 9 0 8 0;
+#X connect 10 0 9 0;
+#X connect 11 0 4 0;
+#X connect 11 1 10 0;