aboutsummaryrefslogtreecommitdiff
path: root/desiredata/doc/3.audio.examples/E01.spectrum.pd
diff options
context:
space:
mode:
Diffstat (limited to 'desiredata/doc/3.audio.examples/E01.spectrum.pd')
-rw-r--r--desiredata/doc/3.audio.examples/E01.spectrum.pd179
1 files changed, 0 insertions, 179 deletions
diff --git a/desiredata/doc/3.audio.examples/E01.spectrum.pd b/desiredata/doc/3.audio.examples/E01.spectrum.pd
deleted file mode 100644
index 6754bda1..00000000
--- a/desiredata/doc/3.audio.examples/E01.spectrum.pd
+++ /dev/null
@@ -1,179 +0,0 @@
-#N canvas 190 29 773 821 12;
-#N canvas 0 0 450 300 graph1 0;
-#X array E01-signal 882 float 0;
-#X coords 0 5 882 -5 200 130 1;
-#X restore 531 41 graph;
-#X obj 40 304 hip~ 5;
-#N canvas 0 0 450 300 graph1 0;
-#X array E01-spectrum 128 float 0;
-#X coords 0 4300 127 -40 257 130 1;
-#X restore 485 226 graph;
-#X text 134 243 <-- click to graph;
-#N canvas 45 83 558 569 fft 0;
-#X obj 19 62 inlet~;
-#X obj 85 214 inlet;
-#X obj 19 92 rfft~;
-#X obj 19 125 *~;
-#X obj 50 125 *~;
-#X obj 19 155 sqrt~;
-#X obj 85 248 tabwrite~ E01-spectrum;
-#X obj 332 109 block~ 4096 1;
-#X obj 19 181 biquad~ 0 0 0 0 1;
-#X text 83 93 Fourier series;
-#X text 88 146 magnitude;
-#X text 86 131 calculate;
-#X text 21 3 This subpatch computes the spectrum of the incoming signal
-with a (rectangular windowed) FFT. FFTs aren't properly introduced
-until much later.;
-#X text 83 62 signal to analyze;
-#X text 182 166 delay two samples;
-#X text 181 182 for better graphing;
-#X obj 90 425 samplerate~;
-#X obj 90 402 bng 18 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
--1;
-#X floatatom 90 472 5 0 0 0 - - -;
-#X obj 90 448 / 256;
-#X obj 90 378 loadbang;
-#X floatatom 90 541 5 0 0 0 - - -;
-#X obj 98 494 s fundamental;
-#X obj 90 517 ftom;
-#X text 146 540 <-just out of curiosity \, here's the pitch;
-#X text 14 319 At load time \, calculate a good choice of fundamental
-frequency for showing spectra: the 16th bin in a 4096-point spectrum
-\, so SR*16/4096 or SR/256.;
-#X text 135 216 "bang" into this inlet to graph it;
-#X connect 0 0 2 0;
-#X connect 1 0 6 0;
-#X connect 2 0 3 0;
-#X connect 2 0 3 1;
-#X connect 2 1 4 0;
-#X connect 2 1 4 1;
-#X connect 3 0 5 0;
-#X connect 4 0 5 0;
-#X connect 5 0 8 0;
-#X connect 8 0 6 0;
-#X connect 16 0 19 0;
-#X connect 17 0 16 0;
-#X connect 18 0 22 0;
-#X connect 18 0 23 0;
-#X connect 19 0 18 0;
-#X connect 20 0 17 0;
-#X connect 23 0 21 0;
-#X restore 51 279 pd fft;
-#X text 531 173 ---- 0.02 seconds ----;
-#X obj 111 244 bng 18 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
--1;
-#X obj 40 332 output~;
-#X obj 111 279 tabwrite~ E01-signal;
-#X text 523 800 updated for Pd version 0.37;
-#X text 516 359 1;
-#X text 550 359 2;
-#X text 582 359 3;
-#X text 614 359 4;
-#X text 647 359 5;
-#X text 677 359 6;
-#X text 708 359 7;
-#X text 484 359 0;
-#X text 520 378 -- partial number --;
-#X text 733 97 0;
-#X obj 42 42 r fundamental;
-#X obj 42 111 osc~;
-#X obj 63 136 tgl 18 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
-;
-#X obj 41 161 *~;
-#X obj 85 111 osc~;
-#X obj 106 136 tgl 18 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
-1;
-#X obj 84 161 *~;
-#X obj 128 111 osc~;
-#X obj 149 136 tgl 18 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
-1;
-#X obj 127 161 *~;
-#X obj 128 88 * 2;
-#X obj 171 111 osc~;
-#X obj 192 136 tgl 18 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
-1;
-#X obj 170 161 *~;
-#X obj 214 111 osc~;
-#X obj 235 136 tgl 18 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
-1;
-#X obj 213 161 *~;
-#X obj 257 111 osc~;
-#X obj 278 136 tgl 18 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
-1;
-#X obj 256 161 *~;
-#X obj 42 88 * 0;
-#X obj 85 88 * 1;
-#X obj 171 88 * 3;
-#X obj 214 88 * 4;
-#X obj 257 88 * 5;
-#X text 303 136 <-- On/Off;
-#X text 337 152 for each;
-#X text 339 168 partial;
-#X text 595 11 WAVEFORM;
-#X text 578 204 SPECTRUM;
-#X text 25 415 The next series of patches demonstrates various kinds
-of modulation: AM \, waveshaping \, and FM. We will need a tool for
-graphing spectra which is introduced here. In this patch the signal
-to be analyzed is a simple sum of up to six partials of a fundamental
-frequency (which is 172 Hz \, close to F below middle C \, if your
-sample rate happens to be 44100 Hz. The fundamental is chosen to agree
-with the analysis patch ("pd FFT") and is computed within it).;
-#X text 25 546 The partials are numbered 0 through 5 \, where 0 means
-DC \, or zero frequency \, 1 is the fundamental \, and so on. The toggle
-switches allow you to turn them on and off separately. You have to
-press the "click to graph" button to update the two graphs.;
-#X text 745 344 0;
-#X text 743 223 1;
-#X text 744 282 0.5;
-#X text 26 631 The upper graph is just the (time domain) waveform \,
-about four periods long. The lower graph is the magnitude spectrum.
-Its peaks are the magnitudes of the partials. Note that a DC signal
-of amplitude one is considered a partial of magnitude 1 \, but the
-other partials \, which have peak amplitudes of 1 (and RMS 0.707) \,
-have peak magnitudes of only 0.5 in the spectrum.;
-#X obj 41 222 *~ 1;
-#X text 733 37 5;
-#X text 734 157 -5;
-#X text 81 221 sum;
-#X text 96 5 GRAPHING SPECTRA OF AUDIO SIGNALS;
-#X text 24 742 Here we're introducing a new feature: multiple signals
-connected to a signal inlet (as in the "*~ 1") are added. This is the
-most convenient way to sum the six partials.;
-#X connect 1 0 7 0;
-#X connect 1 0 7 1;
-#X connect 6 0 4 1;
-#X connect 6 0 8 0;
-#X connect 20 0 40 0;
-#X connect 20 0 41 0;
-#X connect 20 0 30 0;
-#X connect 20 0 42 0;
-#X connect 20 0 43 0;
-#X connect 20 0 44 0;
-#X connect 21 0 23 0;
-#X connect 22 0 23 1;
-#X connect 23 0 56 0;
-#X connect 24 0 26 0;
-#X connect 25 0 26 1;
-#X connect 26 0 56 0;
-#X connect 27 0 29 0;
-#X connect 28 0 29 1;
-#X connect 29 0 56 0;
-#X connect 30 0 27 0;
-#X connect 31 0 33 0;
-#X connect 32 0 33 1;
-#X connect 33 0 56 0;
-#X connect 34 0 36 0;
-#X connect 35 0 36 1;
-#X connect 36 0 56 0;
-#X connect 37 0 39 0;
-#X connect 38 0 39 1;
-#X connect 39 0 56 0;
-#X connect 40 0 21 0;
-#X connect 41 0 24 0;
-#X connect 42 0 31 0;
-#X connect 43 0 34 0;
-#X connect 44 0 37 0;
-#X connect 56 0 4 0;
-#X connect 56 0 1 0;
-#X connect 56 0 8 0;