diff options
Diffstat (limited to 'pd/doc')
346 files changed, 33140 insertions, 0 deletions
diff --git a/pd/doc/1.manual/1.introduction.txt b/pd/doc/1.manual/1.introduction.txt new file mode 100644 index 00000000..c8fa88a8 --- /dev/null +++ b/pd/doc/1.manual/1.introduction.txt @@ -0,0 +1,19 @@ +PD_VERSION + +A real-time graphical programming environment for live interactive +computer music, Pd works on SGI machines, Microsoft Windows, +Linux, and Max OSX. + +Pd is copyrighted, but is free for you to use for any reasonable purpose. +See the file: + PD_BASEDIR/LICENSE.txt + +HTML documentation for Pd lives in: + file:PD_BASEDIR/doc/1.manual/index.htm +or: + http://www.crca.ucsd.edu/~msp/Pd_documentation/index.htm + +The Pd mailing list archive lives in: + http://iem.kug.ac.at/mailinglists/pd-list/ + +Many more useful links are listed in the HTML documentation, section 1.2. diff --git a/pd/doc/1.manual/fig1.1.jpg b/pd/doc/1.manual/fig1.1.jpg Binary files differnew file mode 100644 index 00000000..bfc76f64 --- /dev/null +++ b/pd/doc/1.manual/fig1.1.jpg diff --git a/pd/doc/1.manual/fig1.2.jpg b/pd/doc/1.manual/fig1.2.jpg Binary files differnew file mode 100644 index 00000000..c33c755c --- /dev/null +++ b/pd/doc/1.manual/fig1.2.jpg diff --git a/pd/doc/1.manual/fig1.3.jpg b/pd/doc/1.manual/fig1.3.jpg Binary files differnew file mode 100644 index 00000000..caf29b2d --- /dev/null +++ b/pd/doc/1.manual/fig1.3.jpg diff --git a/pd/doc/1.manual/fig1.4.jpg b/pd/doc/1.manual/fig1.4.jpg Binary files differnew file mode 100644 index 00000000..28a29dc6 --- /dev/null +++ b/pd/doc/1.manual/fig1.4.jpg diff --git a/pd/doc/1.manual/fig1.5.jpg b/pd/doc/1.manual/fig1.5.jpg Binary files differnew file mode 100644 index 00000000..4b01c59f --- /dev/null +++ b/pd/doc/1.manual/fig1.5.jpg diff --git a/pd/doc/1.manual/fig3.1.jpg b/pd/doc/1.manual/fig3.1.jpg Binary files differnew file mode 100644 index 00000000..f8348970 --- /dev/null +++ b/pd/doc/1.manual/fig3.1.jpg diff --git a/pd/doc/1.manual/fig3.10.jpg b/pd/doc/1.manual/fig3.10.jpg Binary files differnew file mode 100644 index 00000000..4625ce0c --- /dev/null +++ b/pd/doc/1.manual/fig3.10.jpg diff --git a/pd/doc/1.manual/fig3.2.jpg b/pd/doc/1.manual/fig3.2.jpg Binary files differnew file mode 100644 index 00000000..994d41c7 --- /dev/null +++ b/pd/doc/1.manual/fig3.2.jpg diff --git a/pd/doc/1.manual/fig3.3.jpg b/pd/doc/1.manual/fig3.3.jpg Binary files differnew file mode 100644 index 00000000..91cac54a --- /dev/null +++ b/pd/doc/1.manual/fig3.3.jpg diff --git a/pd/doc/1.manual/fig3.4.jpg b/pd/doc/1.manual/fig3.4.jpg Binary files differnew file mode 100644 index 00000000..e2f2fe53 --- /dev/null +++ b/pd/doc/1.manual/fig3.4.jpg diff --git a/pd/doc/1.manual/fig3.5.jpg b/pd/doc/1.manual/fig3.5.jpg Binary files differnew file mode 100644 index 00000000..9a79a2b3 --- /dev/null +++ b/pd/doc/1.manual/fig3.5.jpg diff --git a/pd/doc/1.manual/fig3.6.jpg b/pd/doc/1.manual/fig3.6.jpg Binary files differnew file mode 100644 index 00000000..fcbcf3da --- /dev/null +++ b/pd/doc/1.manual/fig3.6.jpg diff --git a/pd/doc/1.manual/fig3.7.jpg b/pd/doc/1.manual/fig3.7.jpg Binary files differnew file mode 100644 index 00000000..84dcd7f7 --- /dev/null +++ b/pd/doc/1.manual/fig3.7.jpg diff --git a/pd/doc/1.manual/fig3.8.jpg b/pd/doc/1.manual/fig3.8.jpg Binary files differnew file mode 100644 index 00000000..ab03a207 --- /dev/null +++ b/pd/doc/1.manual/fig3.8.jpg diff --git a/pd/doc/1.manual/fig3.9.jpg b/pd/doc/1.manual/fig3.9.jpg Binary files differnew file mode 100644 index 00000000..6e9655c7 --- /dev/null +++ b/pd/doc/1.manual/fig3.9.jpg diff --git a/pd/doc/1.manual/fig7.1.jpg b/pd/doc/1.manual/fig7.1.jpg Binary files differnew file mode 100644 index 00000000..b677f6bd --- /dev/null +++ b/pd/doc/1.manual/fig7.1.jpg diff --git a/pd/doc/1.manual/fig7.2.jpg b/pd/doc/1.manual/fig7.2.jpg Binary files differnew file mode 100644 index 00000000..54690d0e --- /dev/null +++ b/pd/doc/1.manual/fig7.2.jpg diff --git a/pd/doc/1.manual/fig7.3.jpg b/pd/doc/1.manual/fig7.3.jpg Binary files differnew file mode 100644 index 00000000..a3b70ed3 --- /dev/null +++ b/pd/doc/1.manual/fig7.3.jpg diff --git a/pd/doc/1.manual/fig7.4.jpg b/pd/doc/1.manual/fig7.4.jpg Binary files differnew file mode 100644 index 00000000..88ba5b40 --- /dev/null +++ b/pd/doc/1.manual/fig7.4.jpg diff --git a/pd/doc/1.manual/fig7.5.jpg b/pd/doc/1.manual/fig7.5.jpg Binary files differnew file mode 100644 index 00000000..f9de4b3b --- /dev/null +++ b/pd/doc/1.manual/fig7.5.jpg diff --git a/pd/doc/1.manual/fig7.6.jpg b/pd/doc/1.manual/fig7.6.jpg Binary files differnew file mode 100644 index 00000000..5f24af7a --- /dev/null +++ b/pd/doc/1.manual/fig7.6.jpg diff --git a/pd/doc/1.manual/fig8.1.jpg b/pd/doc/1.manual/fig8.1.jpg Binary files differnew file mode 100644 index 00000000..57e59313 --- /dev/null +++ b/pd/doc/1.manual/fig8.1.jpg diff --git a/pd/doc/1.manual/fig8.2.jpg b/pd/doc/1.manual/fig8.2.jpg Binary files differnew file mode 100644 index 00000000..1dd48cd9 --- /dev/null +++ b/pd/doc/1.manual/fig8.2.jpg diff --git a/pd/doc/1.manual/fig8.3.jpg b/pd/doc/1.manual/fig8.3.jpg Binary files differnew file mode 100644 index 00000000..165c1c88 --- /dev/null +++ b/pd/doc/1.manual/fig8.3.jpg diff --git a/pd/doc/1.manual/fig8.4.jpg b/pd/doc/1.manual/fig8.4.jpg Binary files differnew file mode 100644 index 00000000..afc89a73 --- /dev/null +++ b/pd/doc/1.manual/fig8.4.jpg diff --git a/pd/doc/1.manual/fig8.5.jpg b/pd/doc/1.manual/fig8.5.jpg Binary files differnew file mode 100644 index 00000000..6fa3d0d1 --- /dev/null +++ b/pd/doc/1.manual/fig8.5.jpg diff --git a/pd/doc/1.manual/fig8.6.jpg b/pd/doc/1.manual/fig8.6.jpg Binary files differnew file mode 100644 index 00000000..2823e032 --- /dev/null +++ b/pd/doc/1.manual/fig8.6.jpg diff --git a/pd/doc/1.manual/fig9.1.jpg b/pd/doc/1.manual/fig9.1.jpg Binary files differnew file mode 100644 index 00000000..bab4b689 --- /dev/null +++ b/pd/doc/1.manual/fig9.1.jpg diff --git a/pd/doc/1.manual/fig9.2.jpg b/pd/doc/1.manual/fig9.2.jpg Binary files differnew file mode 100644 index 00000000..88ef528c --- /dev/null +++ b/pd/doc/1.manual/fig9.2.jpg diff --git a/pd/doc/1.manual/fig9.3.jpg b/pd/doc/1.manual/fig9.3.jpg Binary files differnew file mode 100644 index 00000000..ecb66004 --- /dev/null +++ b/pd/doc/1.manual/fig9.3.jpg diff --git a/pd/doc/1.manual/index.htm b/pd/doc/1.manual/index.htm new file mode 100644 index 00000000..ddaa292d --- /dev/null +++ b/pd/doc/1.manual/index.htm @@ -0,0 +1,161 @@ +<HTML> +<HEAD> +<TITLE>Pd Documentation</TITLE> +</HEAD> +<BODY bgcolor="#ffffff"> +<SMALL> +<div style="width:6.5in; margin-left:.5in"> + +<CENTER> +<FONT size=+5> +<B>Pd Documentation</B><BR> +</FONT></CENTER> +<P> +This is the HTML documentation for Pd, a patchable environment for audio +analysis, synthesis, and processing, +with a rich set of multimedia capabilities. The latest version of this page +can be found at: + <a href="http://www.crca.ucsd.edu/~msp/software.html" name=s1> + http://www.crca.ucsd.edu/~msp/software.html</A> . +<OL> +<LI> <a href="x1.htm" name=s1>introduction </A> +<OL> + <LI> <a href="x1.htm#s1">guide to the documentation </A> + <LI> <a href="x1.htm#s2">other resources </A> +</OL> + +<LI> <A href="x2.htm" name=s2>theory of operation </A> +<OL> + <LI> <A href="x2.htm#s1"> overview </A> + <OL> + <LI> <A href="x2.htm#s1.1"> main window, canvases, and printout </A> + <LI> <A href="x2.htm#s1.2"> object boxes </A> + <LI> <A href="x2.htm#s1.3"> message, number, and symbol boxes </A> + <LI> <A href="x2.htm#s1.4"> patches and files </A> + </OL> + <LI> <A href="x2.htm#s2"> how to edit patches </A> + <OL> + <LI> <A href="x2.htm#s2.1"> edit and run mode </A> + <LI> <A href="x2.htm#s2.2"> creating boxes </A> + <LI> <A href="x2.htm#s2.3"> the selection </A> + <LI> <A href="x2.htm#s2.4"> deleting, cutting, and pasting </A> + <LI> <A href="x2.htm#s2.5"> changing the text </A> + <LI> <A href="x2.htm#s2.6"> connecting and disconnecting boxes </A> + <LI> <A href="x2.htm#s2.7"> properties and help </A> + </OL> + <LI> <A href="x2.htm#s3"> messages </A> + <OL> + <LI> <A href="x2.htm#s3.1"> anatomy of a message </A> + <LI> <A href="x2.htm#s3.2"> depth first message passing </A> + <LI> <A href="x2.htm#s3.3"> + hot and cold inlets and right to left outlet order </A> + <LI> <A href="x2.htm#s3.3"> message boxes </A> + </OL> + <LI> <A href="x2.htm#s4"> audio signals </A> + <OL> + <LI> <A href="x2.htm#s4.1"> sample rate and format </A> + <LI> <A href="x2.htm#s4.2"> tilde objects and audio connections </A> + <LI> <A href="x2.htm#s4.3"> converting to and from messages </A> + <LI> <A href="x2.htm#s4.4"> switching and blocking </A> + <LI> <A href="x2.htm#s4.5"> nonlocal signal connections </A> + </OL> + <LI> <A href="x2.htm#s5"> scheduling </A> + <OL> + <LI> <A href="x2.htm#s5.1"> audio and messages </A> + <LI> <A href="x2.htm#s5.2"> computation load </A> + <LI> <A href="x2.htm#s5.3"> determinism </A> + </OL> + <LI> <A href="x2.htm#s6"> semantics </A> + <OL> + <LI> <A href="x2.htm#s6.1"> creation of objects </A> + <LI> <A href="x2.htm#s6.2"> persistence of data </A> + <LI> <A href="x2.htm#s6.3"> message passing </A> + <LI> <A href="x2.htm#s6.4"> inlets and lists </A> + <LI> <A href="x2.htm#s6.5"> dollar signs </A> + </OL> + <LI> <A href="x2.htm#s7"> subpatches </A> + <OL> + <LI> <A href="x2.htm#s7.1"> abstractions </A> + <LI> <A href="x2.htm#s7.2"> graph-on-parent subpatches </A> + </OL> + <LI> <A href="x2.htm#s8"> numeric arrays </A> + <LI> <A href="x2.htm#s9"> data structures </A> + <OL> + <LI> <A href="x2.htm#s9.1"> abstractions </A> + <LI> <A href="x2.htm#s9.2"> graph-on-parent subpatches </A> + <LI> <A href="x2.htm#s9.3"> limitations </A> + </OL> + +</OL> + +<LI> <a href="x3.htm" name=s3> getting Pd to run </A> +<OL> + <LI> <a href="x3.htm#s1.1">IRIX (SGI) </A> + <LI> <a href="x3.htm#s1.2">Microsoft Windows </A> + <LI> <a href="x3.htm#s1.3">Linux </A> + <LI> <a href="x3.htm#s1.4">Mac OSX </A> + <LI> <a href="x3.htm#s3"> graphics rendering using GEM </A> + <LI> <a href="x3.htm#s4"> The Pd command line </A> + <LI> <a href="x3.htm#s5"> dealing with files </A> +</OL> +<LI> <a href="x4.htm" name=s4> writing Pd objects in C </A> + +<LI> <a href="x5.htm" name=s5> current status </A> +<OL> + <LI> <a href="x5.htm#s1"> release notes </A> + <LI> <a href="x5.htm#s2"> known bugs </A> + <LI> <a href="x5.htm#s3"> differences from Max/MSP </A> +</OL> + +</OL> + +<! + intro: what Pd is + guide to the documentation + other resources + + Theory of operation + main window and canvases + messages + signals + loading, editing, and saving patches + subpatches + one-off and abstractions + blocking for signals + data + + Making Pd work + how to get and install Pd + IRIX + NT + Linux + audio + testing it + the scheduler advance + IRIX + NT + Linux + GEM + getting it + running it + running Pd patches + command line options + opening & saving files + editing + file stuff + the path + abstractions + externs + the help feature + Writing Pd objects in C + release notes + features + bugs + + + + +> + +</BODY> +</HTML> diff --git a/pd/doc/1.manual/x1.htm b/pd/doc/1.manual/x1.htm new file mode 100644 index 00000000..946949e9 --- /dev/null +++ b/pd/doc/1.manual/x1.htm @@ -0,0 +1,112 @@ +<HTML> +<HEAD> +<TITLE>Pd Documentation 1</TITLE> +</HEAD> +<BODY bgcolor="#ffffff"> +<SMALL> +<div style="width:6.5in; margin-left:.5in"> + +<CENTER> <B> +Pd Documentation chapter 1: introduction +</B> </CENTER> +<BR> +<A href=index.htm#s1> back to table of contents </A> + <BR><BR> +<P> +This is the HTML documentation for the Pd computer program. +Pd is free and can be downloaded from the internet; +go to + <A href="http://www.crca.ucsd.edu/~msp/software.html"> + http://www.crca.ucsd.edu/~msp/software.html</A> +to get it. +<H4> <A name=s1> 1.1. guide to the documentation </A> </H4> + +<P> Pd's documentation consists of: + +<UL> +<LI> this HTML manual +<LI> "reference" patches, one for each kind of object in Pd +<LI> "example" patches showing how to do things +<LI> sample C code +</UL> + +<P> +This manual has five sections: + +<OL> +<LI> this overview +<LI> <A href="x2.htm"> + a theory of operations, explaining how Pd works </A> +<LI> <A href="x3.htm"> + instructions on installing Pd and getting it to run </A> +<LI> <A href="x4.htm"> how to write C extensions to Pd </A> +<LI> <A href="x5.htm"> release notes and known bugs </A> +</OL> + +<P> In order to consult the reference and example patches, you'll first have +to get Pd started as explained in this manual. + +<P> +For a list of all the objects you can use in Pd, see the text file, +"0.INTRO.txt" in the directory, "../5.reference". To get help on any +Pd object you can right click on it; or you can browse the help patches +by choosing "Pure Documentation..." in the Pd help menu and looking in +5.reference. + +<P> +The example patches are also available from the "Pure Documentation..." item +in Pd's +"help" menu. The example patches appear in subdirectories named +"2.control.examples", "3.audio.examples" and "4.fft.examples." Some additional +patches in "7.stuff" might also be helpful. + +<P> +To get started writing your own C extensions, refer to chapter 4 of this manual. + +<H4> <A name=s2> 1.2. other resources </A> </H4> + +<P> +Most of the interesting resources related to Pd show up on the Pd mailing list, +maintained by Iohannes Zmoelnig. To subscribe or browse the archives +visit: + <A href="http://iem.kug.ac.at/mailinglists/pd-list/"> + http://iem.kug.ac.at/mailinglists/pd-list/</A>. + +. This is the +best source of recent information regarding installation problems and bugs. It +is perfectly reasonable to post "newbie" questions on this list; alternatively +you can contact msp@ucsd.edu for help. + +<P> Many extensions to Pd are announced on the mailing list. In particular, +for people interested in graphics, there is a A 3D graphics rendering package, +named GEM, based on OpenGL, was written by Mark Danks, adapted to Linux by +Guenter Geiger, and is now maintained by Iohannes Zmoelnig. GEM runs on +Windows and Linux and probably will run with some coaxing on IRIX. You can get +it from: <A href=http://iem.kug.ac.at/GEM>http://iem.kug.ac.at/GEM</A> . + +<P> A video processing package, Framestein, is by Juha Vehvilainen. This runs +on Windows only: <A href=http://framestein.org> http://framestein.org </A>. + +<P> +Here are some more Pd links (in the order I found them): <BR> + +<a href="http://www.crca.ucsd.edu/~msp"> Miller Puckette's home page</a><br> +<a href="http://gige.epy.co.at/"> Guenter Geiger's home page</a><br> +<a href="http://www.danks.org/mark"> Mark Dank's home page</a><br> +<a href="http://wonk.epy.co.at">Pd page on Wonk (Klaus)</a><br> +<a href="http://iem.kug.ac.at/~zmoelnig/index.html"> + Johannes M Zmoelnig</a><br> +<a href="http://iem.kug.ac.at/~math/pd/"> Norbert Math's Pd page</a> <br> +<a href="http://iem.kug.ac.at/iemlib/"> Thomas Musil's IEMLIB</a> <br> +<a href="http://www.pure-data.org/"> jfm3's Pure Data FAQ and downloads</a> +(also available in Japanese translation).<br> +<a href="http://iem.kug.ac.at/pdwiki/"> +Nicolas Lhommet's WikiWikiWeb page for Pd</a><br> +<a href="http://iem.kug.ac.at/pdb/"> Norbert's searchable list of all known +Pd objects</a><br> +<a href="http://suita.chopin.edu.pl/~czaja/miXed/externs/xeq.html"> +Krzysztof Czaja's MIDI file support </a><br> +<a href="http://www.davesabine.com/media/puredata.asp?action=pddp"> +David Sabine's Pd Documentation Project: new, highly detailed help windows</a><br> +</BODY> +</HTML> diff --git a/pd/doc/1.manual/x2.htm b/pd/doc/1.manual/x2.htm new file mode 100644 index 00000000..cc382e67 --- /dev/null +++ b/pd/doc/1.manual/x2.htm @@ -0,0 +1,1215 @@ +<HTML> +<HEAD> +<TITLE>Pd Documentation</TITLE> +</HEAD> +<BODY bgcolor="#ffffff"> +<SMALL> +<div style="width:6.5in; margin-left:.5in"> + +<CENTER> <B> +Pd Documentation chapter 2: theory of operation +</B> </CENTER> +<BR> +<A href=index.htm#s2> back to table of contents</A> + <BR><BR> +<P> + +<P> The purpose of this chapter is to describe Pd's design and how it is +supposed to work. Practical details about how to obtain, install, and run Pd +are described in the next chapter. To learn digital audio processing basics +such as how to generate time-varying sounds that don't click or fold over, a +good reference is Dodge and Jerse, <I> Computer Music </I>. + +<H4> <A name=s1> 2.1 overview </A> </H4> + +Pd is a real-time graphical programming environment for audio and graphical +processing. It resembles the Max/MSP system but is much simpler and more +portable; also Pd has two features not (yet) showing up in Max/MSP: first, +via Mark Dank's GEM package, Pd can be used for simultaneous computer +animation and computer audio. Second, an experimental facility is provided +for defining and accessing data structures. + +<H4> <A name=s1.1> 2.1.1. the main window, canvases, and printout </A> </H4> + +When Pd is running, you'll see a main "Pd" window, and possibly one or more +"canvases" or "patches". The main Pd window looks like this: + +<P><CENTER> + <IMG src="fig1.1.jpg"> +</CENTER><P> + +<P> There are peak level and clip indicators for audio input and output; these +report peak levels over all input and all output channels. Note that DC +shows up as an input level; many cards have DC levels which show up in the +50s. To see an RMS audio level, select "test audio and MIDI" from the help +window. The main window display is intended only to help you avoid clipping +on input and output. You can turn the peak meters on and off using the +control at bottom left. + +<P> At bottom right is a control to turn audio processing on and off globally. +Turning audio off does not relinquish the audio devices, it just stops the +computation. The "audio" menu is also provided, with accelerators "Control-." +to turn audio computation off and "Control-/" to turn it on. When audio is +on, Pd is computing audio samples in real time according to whatever patches +you have open (visible or not.) + +<P> The DIO (Digital I/O) error indicator flashes if there is a synchronization +error for audio input or output. Click there to see a list of recent errors. +This indicator is normally red at startup, and will turn red whenever the +computation runs late (so that the DAC FIFOs fill and/or the ADC FIFOs empty) +or if audio input and output are not running at the same rate. See +<a href="x3.htm#s2"> audio and MIDI support </A>. + +<P> Pd documents are called "patches" or "canvases." +Each open document has one main window and any number of +subwindows. The subwindows can be opened and closed but are always running +whether you can see them or not. Here is a simple Pd patch: + +<P><CENTER> + <IMG src="fig1.2.jpg"> +</CENTER><P> + +There are four <I> text items </I> in this patch: a number box (showing zero), +an object box showing "print," and two comments. The number box and the object +box are connected, the number box's output to the print box's input. Boxes may +have zero or more inputs and/or outputs, with the inputs on top and the outputs +on bottom. + +<P> +Pd's printout appears on its standard output. Normally, you'll run Pd in a +"shell" or "terminal" window which you'll keep open to see any printout or +error messages. + +<H4> <A name=s1.2> 2.1.2. object boxes </A> </H4> +<P> Pd patches can have four types of boxes: <I> object, message, GUI, </I> +and <I> comment </I>. + +<P> You make <I> objects </I> by typing text into object boxes. The text is +divided into <I> atoms </I> separated by white space. The first atom specifies +what type of object Pd will make, and the other atoms, called <I> creation +arguments </I>, tell Pd how to initialize the object. If you type for example, + +<P><CENTER> + <IMG src="fig1.3.jpg"> +</CENTER><P> + +the "+" specifies the <I> class </I> of the object. +In this case the object will be the kind that carries out addition, +and the "13" initializes the amount to add. Atoms are either numbers or <I> +symbols </I> like "+". + +The text you type into an object box determines how +many and what kinds of inlets and outlets the object will have. Some +classes (like "+" always have a fixed arrangement of inlets and outlets, +and in the case of other classes, the inlets and outlets will depend on the +creation arguments. + +<P> +Here for example is a simple MIDI synthesizer: + +<P><CENTER> + <IMG src="fig1.4.jpg"> +</CENTER><P> + +This patch mixes <I> control </I> objects (notein, stripnote, and ftom) with +<I> tilde </I> objects osc~, *~, and dac~. The control objects carry out their +function sporadically, as a result of one or more type of <I> event </I>. In +this case, incoming MIDI note messages set off the control computation. The +result of the computation is, when the note happens to be a "note on" (and not +a "note off", to compute the frequency in cycles per second and pass it on to +the oscillator ("osc~"). + +<P> The second half of the patch, the osc~, *~, and dac~ objects, compute audio +samples, in the same way as an analog synthesizer works. The osc~ object is +acting as the interface between the two regimes, in that it takes control +messages to set its frequency but talks to "*~" using an audio signal. Audio +signals aren't sporadic; they are continuous streams of numbers. As a result +tilde objects act under very different rules from control objects. The audio +portion of the patch is always running, whether MIDI messages arrive or not; +the function of control computations is to insert calculations between the +audio computation which may change audio computation parameters such as +the frequency of an oscillator. + +<H4> <A name=s1.3> 2.1.3. message and GUI boxes </A> </H4> + +The border of a box tells you how its text is interpreted and how the box +functions. Object boxes use the text to create objects when you load a +patch. <I> Message </I> boxes interpret the text as a message to send whenever +the box is activated (by an incoming message or with the mouse.) In the example +below the message box, when clicked, sends the message "21" to an object +box which adds 13 to it. + +<P><CENTER> + <IMG src="fig1.5.jpg"> +</CENTER><P> + +The third box shown is a GUI box. GUI boxes come in many forms including +number boxes (as in this example), toggles, sliders, and so on. Whereas the +appearance of an object or message box is static when a patch is running, a +number box's contents (the text) changes to reflect the current value held by +the box. You can also use a number box as a control by clicking and dragging +up and down, or by typing values in it. (There are also shift- and alt-click +actions; see <A href="x2.htm#s2.7"> getting help </A> to find out how to look +this up). + +<P> You can also create a "symbol" box which is like a number box but deals +in symbols like "cat." You can type your own strings in (followed by "enter") +or use it to display strings which arrive as messages to its inlet. + +<H4> <A name=s1.4> 2.1.4. patches and files </A> </H4> + +When you save a patch to a file, Pd doesn't save the entire state of all the +objects in the patch, but only what you see: the objects' creation arguments +and their interconnections. Certain data-storage objects have functions for +reading and writing other files to save and restore their internal state. + +Pd finds files using a <I> path </I> which can be specified as part of Pd's +startup arguments. The path specifies one or more directories, separated by +colons (semicolons if you're using windows.) Most objects which can read files +search for them along the search path, but when Pd writes files they go to +the directory where the patch was found. + +<H4> <A name=s2> 2.2. editing Pd patches </A> </H4> + +<H4> <A name=s2.1> 2.2.1. edit and run mode </A> </H4> + +<P> A patch can be in edit or run mode; this really only affects how mouse +clicks affect the patch. In edit mode, clicking and dragging selects and +moves boxes or makes and cuts connections; in run mode clicking on boxes sends +them messages which they react to in different ways. In run mode, number and +message boxes can be used as controls. Normally, when you are in a performance +you will stay in run mode; to change the patch you go to edit mode. + +<H4> <A name=s2.2> 2.2.2. creating boxes </A> </H4> + +<P> You can create boxes (objects, messages, GUIs, and comments) using the +"put" menu. Note the handy accelerators. Object and message boxes are empty +at first; drag them where you want them and type in the text. The GUI +objects (which come in several flavors) require no typing; just create and +place them. + +<P> You will often find it more convenient to select a box and "duplicate" it +(in the Edit menu) than to use the "Put" menu. If you select and duplicate +several items, any connections between them will be duplicated as well. + +<H4> <A name=s2.3> 2.2.3. the selection </A> </H4> + +Boxes in a Pd window may be selected by clicking on them. To select more +than one object you may use shift-click or click "outside" and select all +objects within a rectangle. You can't select lines, only boxes. + +Clicking on an unselected object, message, or comment box makes the text +active, i.e., ready to be text edited. If you select using the rectangle +method, the text isn't activated. This affects whether further clicks will +displace teh object or select text within it. + +<H4> <A name=s2.4> 2.2.4. deleting, cutting, and pasting </A> </H4> + +If you select a box but don't activate the text in it, you can "delete" it +by hitting the backspace key. You can "cut" "copy" and "paste" using menu +items. Notice that pasting puts the new object(s) right down on top of the +old ones. + +The "duplicate" menu item performs a copy and paste with a small offset so you +can see the new boxes. You can drag them together to a new place on the +screen. + +You can cut and paste between windows within Pd but cut/paste isn't +integrated with the OS in any way. Cut/copy/paste for text strings isn't +implemented yet, although in Linux and Irix at least you can "X-paste" into +and out of "text" dialogs (created with the "edit text" menu item.) + +<H4> <A name=s2.5> 2.2.5. changing the text </A> </H4> + +<P> To change a text item, you can select it and then edit the text. If you +only click once, the entire text is selected and your typing will replace +everything. Click again and drag to select a portion of the text to retype. + +<P> If there's +more than a small amount of text (in a comment, for example) you might want to +select the text and choose "text editor" from the Edit menu, which opens a text +editing window with a copy of the text in it. Hitting "send" in that window is +exactly equivalent to retyping the text into Pd; you can send it to more than +one box in sequence if you want. + +<P> If you click a box and move the mouse without releasing the button this +displaces the entire box. If you wish to displace a box which is already +sepected, first deselect the box by clicking outside it; otherwise you will be +selecting text instead of moving the box. + +<P> <I> The updated text only becomes part of the patch when you deselect the +object. </I> Changing the text in an "object" box actually deletes the old +object and creates a new one; the internal state of the old one is lost. + +<H4> <A name=s2.6> 2.2.6. connecting and disconnecting boxes </A> </H4> + +To make a connection between two boxes, click on any outlet of the first +one, drag toward an inlet of the second one, and release. You can actually +release the mouse button anywhere within the target object and the connection +will be made to the nearest inlet. + +Connections are broken simply by clicking on them (the cursor changes to an +"X" when appropriate.) + +<H4> <A name=s2.7> 2.2.7. Properties and help </A> </H4> + +<P> all the "clicking" mentioned above is done with the left mouse button. +The right button, instead, gives a popup menu for "properties" and "help". +Properties are enabled for number boxes and graphs (and in the future may +be available for other things as well.) Selecting "help" on an object gets +a Pd patch that demonstrates how to use it. "Help for the canvas as a whole +(click outsize any object) gives a list of all built-in objects. + +<H4> <A name=s2.7> 2.2.8. miscellaneous </A> </H4> + +<P> Control-q "quits" Pd, but asks you to comfirm the quit. To quit without +having to confirm, use command-shift-Q. + +<H4> <A name=s3> 2.3. messages </A> </H4> + +<P> In Pd, objects intercommunicate by sending messages and/or audio signals. +Pd messages are sporadic, like MIDI messages or music N "Note cards." + +<H4> <A name=s3.1> 2.3.1. anatomy of a message </A> </H4> + +Messages contain a selector followed by +any number of arguments. The selector is a symbol, which appears in the patch +as a non-numeric string with no white space, semicolons, or commas. The +arguments may be symbols or numbers. Numbers in Pd are kept in 32-bit floating +point, so that they can represent integers exactly between -8388608 and +8388608. (In Max, there are separate data types for integers and floating +point numbers; Pd uses only float.) + +<P> When a message is passed to something (which is often an inlet of a box +but could be anything that can receive a message), the selector of the message +is checked against the receiver. If the receiver recognizes messages of that +selector, it carries out some corresponding action. For instance, here is a +"float" object: + +<P><CENTER> + <IMG src="fig3.1.jpg"> +</CENTER><P> + +<P> The two rectangles at the top are usually both called "inlets" but +the one at the left directs incoming messages to the "float" object itself, +whereas the one at the right directs messages to an auxilliary "inlet" +object. The float object proper (represented by the left-hand inlet) accepts +messages with selector "float" and "bang". The right-hand inlet takes only +the message selector "float". These two selectors, along with "symbol" and +"list", are usually used to denote an object's main action, whatever it may be, +so that objects can be interconnected with maximum flexibility. + +<P> It is possible to type messages which start with a number, +which cannot be used as a selector. A single number is always given the +"float" selector automatically, and a message with a number followed by other +arguments is given the selector "list". + +<H4> <A name=s3.2> 2.3.2. depth first message passing </A> </H4> + +<P> In Pd whenever a message is initiated, the receiver may then send out +further messages in turn, and the receivers of those messages can send yet +others. So each message sets off a tree of consequent messages. This tree is +executed in depth first fashion. For instance in the patch below: + +<P><CENTER> + <IMG src="fig3.2.jpg"> +</CENTER><P> + +<P> the order of arrival of messages is either A-B-C-D or A-C-D-B. The "C" +message is not done until the "D" one is also, and the "A" is not done until +all four are. It is indeterminate which of "B" or "C" is done first; this +depends on what order you made the connections in (in Max, it's automatically +sorted right to left). + +<P> Message-passing can give rise to infinite loops of the sort shown here: + +<P><CENTER> + <IMG src="fig3.3.jpg"> +</CENTER><P> + +<P> Here the left-hand "+" can't finish processing until the right-hand one has +been sent the result "2", which can't finish processing that until the +left-hand one has been sent "3", and so on. Pd will print an error message +reporting a "stack overflow" if this happens. + +<P> However, it is legal to make a loop if there is a "delay" object somewhere +in it. When the "delay" receives a message it schedules a messsage for the +future (even if the time delay is 0) and is then "finished;" Pd's internal +scheduler will wake the delay back up later. + +<H4> <A name=s3.3> +2.3.3. hot and cold inlets and right to left outlet order </A> </H4> + +<P> With few exceptions (notably "timer"), objects treat their leftmost +inlet as "hot" in the sense that messages to right inlets can result in output +messages. So the following is a legal (and reasonable) loop construct: + +<P><CENTER> + <IMG src="fig3.4.jpg"> +</CENTER><P> + +Here the "f" is an abbreviation for "float". Note that the "+ 1" output is +connected to the right-hand inlet of "f". This "cold" inlet merely stores the +value for the next time the "f" is sent the "bang" message. + +It is frequently desirable to send messages to two or more inlets of an object +to specify its action. For instance, you can use "+" to add two numbers; but +to do it correctly you must make sure the right hand inlet gets its value +first. Otherwise, when the left hand side value comes in, "+" will carry out +the addition (since the left hand inlet is the "hot" one) and will add this +value to whatever was previously sitting in the right hand inlet. + +<P> Problems can arise when a single outlet is connected (either directly or +through arbitrarily long chains of message passing) to different inlets of a +single object. In this case it is indeterminate which order the two inlets will +receive their messages. Suppose for example you wish to use "+" to double a +number. The following is incorrect: + +<P><CENTER> + <IMG src="fig3.5.jpg"> +</CENTER><P> + +<P> Here, I connected the left inlet before connecting the right hand one (although +this is not evident in the appearance of the patch.) The "+" thus adds the +new input (at left) to the previous input (at right). + +<P> The "trigger" object, abbreviated "t", can be used to split out connections +from a single outlet in a determinate order. By convention, all objects in Pd, +when sending messages out more than one outlet, do so from right to left. If +you connect these to inlets of a second object without crossing wires, the +second object will get its leftmost inlet last, which is usually what you +want. Here is how to use "trigger" to disambiguate the previous example: + +<P><CENTER> + <IMG src="fig3.6.jpg"> +</CENTER><P> + +<P> "Cold" (non-leftmost) inlets are almost universally used to store single +values (either numbers or symbols.) With the exception of "line" and "line~", +these values are "sticky," i.e., once you set the value it is good until the +next time you set it. (The "line" exception is for sanity's sake.) + +<P> One more question sometimes comes up in execution order, which is +the order in which two messages are sent to a single "cold" inlet. In this +situation, since the messages are merged, the last value to be received is +the value that is used in the computation. + +<H4> <A name=s3.4> 2.3.4. message boxes </A> </H4> + +Message boxes are text boxes in which you type a message. When the message +box is activated, either by clicking on it or sending something to its inlet, +the message or messages are sent, either to the message box's outlet or +elsewhere as specified. + +<P><CENTER> + <IMG src="fig3.7.jpg"> +</CENTER><P> + +The first of the message boxes above contains the single number 1.5; this +message has an implicit selector of "float." The second is a list with three +numbers in it, and in the third, the selector is "my" and the two arguments are +the number 5 and the symbol "toes." + +<P> Multiple messages may be separated by commas as shown: + +<P><CENTER> + <IMG src="fig3.8.jpg"> +</CENTER><P> +Here the three messages are the numbers 1, 2, and 3, and they are sent in +sequence (with no intervening time between them, as with the "trigger" object, +and having depth-first consequences so that whatever chain of actions depending +on "1" takes place before anything depending on "2" and so on.) + +<P> Semicolons may also separate messages. A message following a semicolon must +specify a symbol giving a destination (in other words, semicolons are like +commas except that they clear the "current destination" +so that the next message specifies a new one). The "current destination" is +at first the message box's own outlet. In the example below, the leading +semicolon immediately redirects messages from the outlet to an object named +"fred" (which is here a receive object), and likewise the next message is sent +to "sue." + + +<P><CENTER> + <IMG src="fig3.9.jpg"> +</CENTER><P> + +Certain other objects (Pd windows, for example, and arrays) have Pd names and +can be sent messages this way. Also, the special object "pd" is defined to +which you may send messages to start and stop DSP. + +<P> You can put variables in message boxes as shown below: + +<P><CENTER> + <IMG src="fig3.10.jpg"> +</CENTER><P> + +Here, "$1", etc., refer to the arguments of the arriving message (and aren't +defined if you send a "bang" message or if you click on the message box to +activate it.) Dollar sign variables are either numbers or symbols depending +on the incoming message; if symbols, you may even use them to specify variable +message selectors or destinations. + +<H4> <A name=s4> 2.4. audio signals </A> </H4> + +<P> +Using Pd you can build audio patches which can synthesize musical sounds, +analyze incoming sounds, process incoming sounds to produce transformed +audio outputs, or integrate audio processing with other media. This section +describes how Pd treats audio signals. + +<H4> <A name=s4.1> 2.4.1. sample rate and format </A> </H4> + +<P> +Pd's audio signals are internally kept as 32-bit floating point numbers, so +you have all the dynamic range you could want. However, depending on your +hardware, audio I/O is usually limited to 16 or 24 bits. Inputs all appear +between the values of -1 and 1; and output values will be clipped to that range. + +<P> +Pd assumes a sample rate of 44100 unless you override this in Pd's command line. +Pd doesn't check that this matches the sample rate of audio input or output, +nor does Pd attempt to set your computer's audio sample rate to its own. If +the audio system is running at the wrong sample rate, audio output will +be transposed (you can check this using the "test audio and MIDI" patch; see +the help menu). + +<P> +Pd can read or write samples to files either in 16-bit or 24-bit fixed point +or in 32-bit floating point, in WAV, AIFF, or AU format, via the soundfiler, +readsf, and writesf objects. + +<H4> <A name=s4.2> 2.4.2. tilde objects and audio connections </A> </H4> + +Audio computations in Pd are carried out by "tilde objects" such as "osc~" +whoswe names conventionally end in a tilde character to warn you what they +are. Tilde objects can intercommunicate via audio connections. When audio +computation is turned on, or when you change the audio network while audio is +on, Pd sorts all the tilde objects into a linear order for running; then this +linear list is run down in blocks of 64 samples each; at 44100 Hz. this means +the audio network runs every 1.45 milliseconds. + +<P> Inlets or outlets are configured in Pd either for messages or audio; it's +an error to connect an audio outlet to a non-audio inlet or vice versa; usually +these errors are detected at "sort time" when audio is started or the network +changed with audio running. An object's leftmost inlet may accept both audio +and messages; any other inlet is either one or the other. There is no quick +way to tell whether an inlet or output is for audio or messages; consult the +help window for the object. + +<P> +The audio network, that is, the tilde objects and their interconnections, +must be acyclic. If there are loops, you will see the error message at "sort +time." When errors are reported at sort time there is no easy way to +find the source of the error. You can build algorithms with feedback using +nonlocal signal connections. + +<P> +Your subpatches can have audio inlets and outlets via the inlet~ and outlet~ +objects. + +<H4> <A name=s4.3> 2.4.3. converting audio to and from messages </A> </H4> + +<P> If you want to use a control value as a signal, you can use the sig~ object +to convert it. The +~, -~, *~, /~, osc~, and phasor~ objects can be configured +to take control or signal inputs. + +<P> The other direction, signal to control, requires that you specify at what +moments you want the signal sampled. This is handled by the snapshot~ object, +but you can also sample a signal with tabwrite~ and then get access it via +tabread or tabread4 (note the missing tildes!). There are also analysis +objects, the simplest of which is "env~", the envelope follower. + +<H4> <A name=s4.4> 2.4.4. switching and blocking </A> </H4> + +You can use the switch~ or block~ objects to turn portions of your audio +computation on and off and to control the block size of computation. There +may be only one switch~ or block~ object in any window; it acts on the entire +window and all of its subwindows, which may still have their own nested +switch~/block~ objects. Switch~ and block~ take a block size and an overlap +factor as arguments; so for instance, "block~ 1024 4" specifies 1024 sample +blocks, overlapped by a factor of 4 relative to the parent window. Switch~ +carries a small computational overhead in addition to whatever overhead is +associated with changing the block size. + +<P> Larger block sizes than 64 should result in small increases in run-time +efficiency. Also, the fft~ and related objects operate on blocks so that +setting the block size also sets the number of FFT channels. You may wish +to use block sizes smaller than 64 to gain finer resolutions of message/audio +interaction, or to reduce "block delay" in feedback algorithms. At the +(untested) extreme, setting the block size to one allows you to write your +own recursive filters. + +<P> You can use switch~ to budget your DSP computations; for instance you might +want to be able to switch between two synthesis algorithms. Put each algorithm +in its own subpatch (which can have sub-sub patches in turn, for a voice bank +for instance), and switch each one off as you switch the other one on. Beware +of clicks; if you have a line~ controlling output level, give it time to ramp to +zero before you switch it off or it will be stuck at a nonzero value for the +next time it comes back on. + +<P> When a subpatch is switched off its audio outputs generate zeros; this costs a +fairly small overhead; a cheaper way to get outputs is to use throw~ inside +the switched module and catch~ outside it. + +<H4> <A name=s4.5> 2.4.5. nonlocal signal connections </A> </H4> + +You may wish to pass signals nonlocally, either to get from one window to another, or +to feed a signal back to your algorithm's input. This can be done using +throw~/catch~, send~/receive~, or delwrite~/delread~ pairs. Throw~ and catch~ +implement a summing bus; throw~ adds into the bus and catch~ reads out the +accumulated signal and zeros the bus for the next time around. There can be +many throw~ objects associated with a single catch~, but a throw~ can't talk to +more than one catch~. You can reset the destination of a throw~ if you want to. + +<P> Send~ just saves a signal which may then be receive~d any number of times; but +a receive~ can only pick up one send~ at a time (but you can switch between +send~s if you want.) + +<P> Don't try to throw~ and catch~ or send~ and receive~ between windows with +different block sizes. The only re-blocking mechanisms which are well tested +are inlet~ and outlet~. + +<P> When you send a signal to a point that is earlier in the sorted list of tilde +objects, the signal doesn't get there until the next cycle of DSP computation, +one block later; so your signal will be delayed by one block (1.45 msec by +default.) Delread~ and delwrite~ have this same restriction, but here the 1.45 +msec figure gives the minimum attainable delay. For nonrecursive algorithms, a +simple flanger for example, you might wish to ensure that your delread~ is +sorted after your delwrite~. The only way to ensure this is to create the +delread~ after you created the delwrite~; if things get out of whack, just +delete and re-create the delread~. + +<H4> <A name=s5> 2.5. scheduling </A> </H4> + +Pd uses 64-bit floating point numbers to represent time, providing sample +accuracy and essentially never overflowing. Time appears to the user +in milliseconds. + +<H4> <A name=s5.1> 2.5.1. audio and messages </A> </H4> + +Audio and message processing are interleaved in Pd. Audio processing is +scheduled every 64 samples at Pd's sample rate; at 44100 Hz. this gives a +period of 1.45 milliseconds. You may turn DSP computation on and off by +sending the "pd" object the messages "dsp 1" and "dsp 0." + +<P> In the intervals between, delays might time out or external conditions +might arise (incoming MIDI, mouse clicks, or whatnot). These may cause a +cascade of depth-first message passing; each such message cascade is completely +run out before the next message or DSP tick is computed. Messages are never +passed to objects during a DSP tick; the ticks are atomic and parameter changes +sent to different objects in any given message cascade take effect +simultaneously. + +<P> In the middle of a message cascade you may schedule another one at a delay +of zero. This delayed cascade happens after the present cascade has finished, +but at the same logical time. + +<H4> <A name=s5.2> 2.5.2. computation load </A> </H4> + +<P> The Pd scheduler maintains a (user-specified) lead on its computations; +that is, it tries to keep ahead of real time by a small amount in order to be +able to absorb unpredictable, momentary increases in computation time. This +is specified using the "audiobuffer" or "frags" command line flags (see <a +href="x3.htm" name=s3>getting Pd to run </A>). + +<P> If Pd gets late with respect to real time, gaps (either occasional or +frequent) will appear in both the input and output audio streams. On the +other hand, disk strewaming objects will work correctly, so that you may use +Pd as a batch program with soundfile input and/or output. The "-nogui" +and "-send" startup flags are provided to aid in doing this. + +<P> Pd's "realtime" computations compete for CPU time with its own GUI, which +runs as a separate process. A flow control mechanism will be provided someday +to prevent this from causing trouble, but it is in any case wise to avoid +having too much drawing going on while Pd is trying to make sound. If a +subwindow is closed, Pd suspends sending the GUI update messages for it; +but not so for miniaturized windows as of version 0.32. You should really +close them when you aren't using them. + +<H4> <A name=s5.3> 2.5.3. determinism </A> </H4> + +All message cascades that are scheduled (via "delay" and +its relatives) to happen before a given audio tick will happen as scheduled +regardless of whether Pd as a whole is running on time; in other words, +calculation is never reordered for any real-time considerations. This is done +in order to make Pd's operation deterministic. + +<P> If a message cascade is started by an external event, a time tag is given +it. These time tags are guaranteed to be consistent with the times at which +timeouts are scheduled and DSP ticks are computed; i.e., time never decreases. +(However, either Pd or a hardware driver may lie about the physical time an +input arrives; this depends on the operating system.) "Timer" objects which +meaure time intervals measure them in terms of the logical time stamps of the +message cascades, so that timing a "delay" object always gives exactly the +theoretical value. (There is, however, a "realtime" object that measures real +time, with nondeterministic results.) + +<P> If two message cascades are scheduled for the same logical time, they are +carried out in the order they were scheduled. + +<H4> <A name=s6> 2.6. semantics </A> </H4> + +This section describes how objects in Pd are created, how they store data and +how object and other boxes they pass messages among themselves. + +<H4> <A name=s6.1> 2.6.1. creation of objects </A> </H4> + +The text in a box has a different function depending on whether it is a message, +atom (number/symbol), or object box. In message boxes the text specifies the +message or messages it will send as output. In atom boxes the text changes +at run time to show the state of the box, which is either a number or a symbol. + +<P> In an object box, as in a message box, the text specifies a message; but +here the message is to be passed to Pd itself, once, and the +message's effect is to create the object in question. When you open a file, +all the objects created are created using their text as "creation messages." +If you type a new message into an object box (or change it), the old object is +destroyed and the message is used to create the new one. + +<P> The selector of the message (the first word in the message) is a selector +which Pd interprets to mean which type of object to create. Any message +arguments (called "creation arguments") are used to parametrize the object +being created. Thus in "makenote 64 250" the selector "makenote" determines +the class of object to create and the creation arguments 64 and 250 become the +initial velocity and duration. + +<H4> <A name=s6.2> 2.6.2. persistence of data </A> </H4> + +Among the design principles of Pd is that patches should be printable, in the +sense that the appearance of a patch should fully determine its functionality. +For this reason, if messages received by an object change its action, since the +changes aren't reflected in the object's appearance, they are not saved as part +of the file which specifies the patch and will be forgotten when the patch is +reloaded. In the same way, if you delete and then recreate an object the +original object's state is not retained but is instead reinitialized (possibly +as specified by creation arguments.) + +<P> An exception is made for subpatches whose "state" is the configuration of +the subpatch; as a special case, this configuration is restored when the +patch is read from a file. Also, if you rename the subpatch, for instance +typing "pd jane" instead of "pd spot," the contents of the patch are preserved +and only the text in the object box and the window title of the subpatch are +changed. + +<P> It is probably bad style to specify creation arguments ala "makenote 64 250" +if you are going to override them later; this is confusing to anyone who tries +to understand the patch. + +<H4> <A name=s6.3> 2.6.3. message passing </A> </H4> + +Messages in Pd consist of a selector (a symbol) and zero or more arguments +(which may be symbols or numbers). To pass a message to an object, Pd first +checks the selector against the class of the object. Message boxes all are +of one class and they all take the same incoming messages and dispense them +according to their state, that is, the text typed into the box. The same +holds for atom boxes (number or symbol) except that their state may change +(it consists of the number or symbol showing). + +<P> Object boxes may have many different classes. The class is usually +determined by the selector of the creation message, i.e., the first atom of the +creation message which is usually a symbol. + +<P> Each class comes with a fixed collection of messages it may be sent. For +esxample, the "float" or "f" object takes "bang" and "float." These messages +are sent to "float" objects (objects whose class is float) via the leftmost, +hot inlet. (The right inlet is a separate, auxiliary object.) Objects of +class "float" respond to the message "bang" by outputting their current value, +that is, by sending a "float" message to their outlet. They respond to "float" +messages by setting their value and then outputting it. + +<P> Each other class (like "float") in Pd has its own protocol for responding +to messages it is sent, and may take "float" and "bang" messages, or others +in addition or instead of them. + +<H4> <A name=s6.4> 2.6.4. inlets and lists </A> </H4> + +The leftmost connection point at the top of most objects represents the object +itself. Any other dark rectangle is a separate object called an "inlet" +although in Pd there are 4 individual inlet classes. The class of the inlet +determines which messages it will take: symbol, float, or other; and the inlet +forwards the message either to the object proper or to some proxy, usually +one that the object creates for the occasion. + +<P> Unless they arrange otherwise by defining a "list" method, objects respond +to the "list" message by distributing the arguments of the message to their +inlets, except for the first argument which is passed as a "float" or +"symbol" message to the object proper. + +<H4> <A name=s6.5> 2.6.5. dollar signs </A> </H4> + +In message or object boxes, message arguments starting with a dollar sign +and a number (like "$1" or "$3-bazoo") are variables which are substituted +with values supplied as part of the environment the message is passed in. +In the case of message boxes, the environment consists of the arguments of +the "list" message (possibly extrapolated from "bang," "float," +or other) that the message box is responding to. Thus, if a message box gets +"23 skidoo" and if it contains the text, "$2 until $1," out comes the message, +"skidoo until 23." + +<P> Object boxes contain text wwhich forms a message to be sent to Pd to create +and initialize the object. Here, $1, etc., are taken from the context in which +the patch was loaded. When the patch is a new document or opened from a file +the "$" variables are undefined. But if the patch is an abstraction (see the +next section) they are +taked from the abstractions' creation arguments. + +<P> Constructions such as "$1-x" are expanded by string concatentation. This +is the mechanism for making local variables. In particular, $0 in an abstraction +is a counter which is guaranteed to be unique to that abstraction, so sends and +receives with names like "$0-bear" can be used as local send/receive pairs. + +<H4> <A name=s7> 2.7. subpatches </A> </H4> + +Pd offers two mechanisms for making subpatches, called "one-off subpatches" +and "abstractions." In either case the subpatch appears as an object box +in a patch. If you type "pd" or "pd my-name" into an object box, this creates +a one-off subpatch. For instance, in this fragment: + +<P><CENTER> <IMG src="fig7.1.jpg"> </CENTER><P> + +the box in the middle, if clicked on, opens the sub-patch shown here: + +<P><CENTER> <IMG src="fig7.2.jpg"> </CENTER><P> + +<P> The contents of the subpatch are saved as part of the parent patch, in +one file. If you make several copies of a subpatch you may change them +individually. + +<P> The objects, "inlet,", "inlet~," "outlet," and "outlet~,", when put in a +subpatch, create inlets and outlets for the object box containing the subpatch. +This works equally for one-off subpatches and abstractions. The inlet~ and +outlet~ versions create inlets and outlets for audio signals. You can't mix +messages and audio in a subpatch inlet or outlet; they must be one or the other +exclusively. Inlets and outlets appear on the invoking box in the same left-to-right +order as they appear in the subpatch. + +<H4> <A name=s7.1> 2.7.1. abstractions </A> </H4> + +<P> To make an abstraction, save a patch with a name such as "abstraction1.pd" +and then invoke it as "abstraction1" in an object box: + +<P><CENTER> <IMG src="fig7.3.jpg"> </CENTER><P> + +<P> Here we're invoking a separate file, "abstraction1.pd", which holds the +patch shown here (the border is the same as for the subpatch above): + +<P><CENTER> <IMG src="fig7.4.jpg"> </CENTER><P> + +You may create many instances of "abstraction1" or invoke it from several +different patches; and changing the contents of "abstraction1" will affect all +invocations of it as they are created. An analogy from the "c" programming +language is that one-off subpatches are like bracketed blocks of code and +abstractions are like subroutines. + +<P> Abstractions are instantiated by typing the name of a patch (minus the ".pd" +extension) into an object box. You may also type arguments; for instance if +you have a file "my-abstraction.pd" you may type "my-abstraction 5" to set the +variable $1 to 5. This is defined only for object boxes (not for messages) in +the abstraction. (For message boxes, "$1", etc, have a different meaning as +described above.) If you want to send a message with a $1 in the sense of a +creation argument of an abstraction, you must generate it with an object box +such as "float $1", "symbol $1", or perhaps "pack $1 $2", which may then be +sent to a message box. + +<P> The corresponding feature in Max (both Opcode and Ircam) was the "#1" +construct. In a Max abstraction, "#1", etc., are replaced by the creation +argument. This has the disadvantage that you can't edit the abstraction as +instantiated in the patch since the "#" variables are substituted. In Pd the +"$" variables in object boxes are spelled literally as "$" variables so that +it's meaningful to edit them from within their calling patch. On the Pd side, +however, there is the disadvantage that it's confusing to have "$" expanded at +a different time in an object box than in a message box. In an object box, the +"$" argument is expanded at creation time, and in a message box, at message +time. + +<H4> <A name=s7.2> 2.7.2. Graph-on-parent subpatches </A> </H4> + +If you open the "properties" dialog for a subpatch or an abstraction, you can +check the "graph on parent" box to have the controls of the subpatch/abstraction +appear on the parent. For instance, here is an invocation of "abstraction2": + +<P><CENTER> <IMG src="fig7.5.jpg"> </CENTER><P> + +where the patch "abstraction2.pd" contains: + +<P><CENTER> <IMG src="fig7.6.jpg"> </CENTER><P> + +Here, the number box in the abstraction shows up on the box that invoked +the abstraction. The "graph on parent" flag is set in the abstraction +(and is saved as part of the abstraction); to set it, open the "properties" +dialog for the "abstraction2" canvas by right-clicking on any white space +in the patch. + +<P> To open the subpatch, right click on the object and select "open". (On +Macintoshes without a 2-button mouse, you can double-click in edit mode +instead.) It doesn't work just to click on the object in run mode since clicks +are sent to visible controls and/or arrays. + +<P> When the sub-patch is closed, all controls in it appear on the object +instead; so the number box in the sub-patch in the example above is the same +one as you see in the box. Only controls are made visible in this way + +<H4> <A name=s8> 2.8. numeric arrays </A> </H4> + +Linear arrays of numbers recur throughout the computer musician's bag of tricks, +beginning with the wavetable oscillator. The wavetable oscillator later was +reinvented as the looping sampler. Also, table lookup is used for nonlinear +distortion of audio signals. In the domain of control, arrays of numbers +can specify control mappings, probability densities, voicing data, and much +more. + +<P> Arrays in Pd should be allocated (and possible read in from a file) before +beginning to make sound, since memory allocation and disk operations may take +long enough to cause audio buffer overruns or underruns. Pd provides two ways +to define new arrays, as "graphs" and "tables". In either case the array +has a pre-defined name and size (i.e., number of points). Elements of the +array are stored as floating-point numbers, 4 bytes apiece + +<P> If you use an array to store a one-second sound at 44.1 kHz you will need +176 kilobytes, or a one-minute sound, 10.6 megabytes. To store a sound with +two or more channels, use a separate array for each channel. + +<P> Arrays are also useful as transfer functions, for example for nonlinear +distortion of an audio signal, or to map a control onto a synthesis parameter. +In situations like this one typically uses much shorter arrays, of no more +than a few hundered elements. They are also useful for storing measured +spectra derived from the fft~ objects, and probably for many other uses. + +<P> Arrays usually appear within subpatches created to house them, whether +in "graph on parent" form (so that you see them within a rectangle drawn on +the containing patch), or as a regular subpatch (which you see as a text box.) +In the "graph on parent" form, an array appears as shown: + +<P><CENTER> <IMG src="fig8.1.jpg"> </CENTER><P> + +<P> Arrays are indexed from 0 to N-1 where N is the number of points in the +array. You can read an array value using the tabread object: + +<P><CENTER> <IMG src="fig8.2.jpg"> </CENTER><P> + +Here we see that the third point of the array (index 2) has the value 0.4. +To write into the array you can use the tabwrite object: + +<P><CENTER> <IMG src="fig8.3.jpg"> </CENTER><P> + +In this example, sending the message sets the third element to 0.5. (You +may also send the two numbers to the two inlets separately.) + +<P> The two previous examples showed control operations to read and write from +and to arrays. These may also be done using audio signals. For example, +the patch below creates a 440 Hz. tone with "array1" as a waveform: + +<P><CENTER> <IMG src="fig8.4.jpg"> </CENTER><P> + +Here phasor~'s outputs a sawtooth wave, repeating 440 times per second, whose +output range is from 0 to 1. The multiplier and adder adjust the range from +1 to 11, and then the values are used as indices for tabread4~, which is a +4-point interpolating table lookup module. (Much more detail is available in +the audio example patches in the "pure documentation" series.) + +<P> To create a new array, select "array" from the "put" menu. Up will come +a dialog window to set initial properties of the array. By default, a +new graph is created to hold the array, but it may also be housed in the +most recently created graph instead. Other properties may be specified there +and/or changed later using the "properties" dialog. + +<P> If you select "properties" on an array in a graph, you two dialogs, one +for the array and one for the graph. The array dialog looks like this: + +<P><CENTER> <IMG src="fig8.5.jpg"> </CENTER><P> + +You may use this to change the name and size, in addition to another property, +"save contents". If "save contents" is selected, the array's values are stored +in the containing patch; otherwise they're initialized to zero each time the +patch is reloaded. If you intend to use arrays to store sounds, you will +probably not wish to store them in the patch but as separate soundfiles. This +will be more efficient, and you may also then use a sound editor to modify them +outside Pd. + +<P> If you check "delete me" and then "OK", the array wil be deleted. This is +an odd interface for deleting an object, and is only provided because Pd +lacks a mechanism for selecting arrays (so that "cut" could serve). + +<P> The graph dialog (which also pops up) is shown here: + +<P><CENTER> <IMG src="fig8.6.jpg"> </CENTER><P> + +<P> The X bounds initially range from 0 to the number of points in the table +minus one (this is a good choice for arrays, although graphs holding other +kinds of objects might require other X bounds.) The Y bounds should be +chosen to reflect the natural range of the table, so that stored sounds +would naturally range from -1 to 1, but a sequence of frequency values might +range from 0 to 20,000. Finally, you choose the screen size of the graph, +width and height, in screen pixels. + +<P> Many other operations are defined for arrays; see the related patches +in the tutorial (starting at 2.control/15.array.pd) for more possibliities. + +<H4> <A name=s8> 2.9. Data structures </A> </H4> +(Note: this section is adapted from an article submitted to ICMC 2002.) + +<P> The original idea in developing Pd was to make a real-time computer music +performance environment like Max, but somehow to include also a facility for +making computer music scores with user-specifiable graphical representations. +This idea has important precedents in Eric Lindemann's Animal and Bill Buxton's +SSSP. An even earlier class of precedents lies in the rich variety of paper +scores for electronic music before it became practical to offer a +computer-based score editor. In this context, scores by Stockhausen (<I> +Kontakte</I> and <I> Studie II</I>) and Yuasa (<I>Toward the Midnight Sun</I>) +come most prominently to mind, but also Xenakis's <I>Mycenae-alpha</I>, which, +although it was realized using a computer, was scored on paper and only +afterward laboriously transcribed into the computer. + +<P> Pd is designed to to offer an extremely unstructured environment for +describing data structures and their graphical appearance. The underlying +idea is to allow the user to display any kind of data he or she wants to, +associating it in any way with the display. To accomplish this Pd introduces +a graphical data structure, somewhat like a data structure out of the C +programming language, but with a facility for attaching shapes and colors to +the data, so that the user can visualize and/or edit it. The data itself can +be edited from scratch or can be imported from files, generated +algorithmically, or derived from analyses of incoming sounds or other data +streams. + +Here is one simple +example of a very short musical sketch realized using Pd: + +<P><CENTER> <IMG src="fig9.1.jpg"> </CENTER><P> + +The example, which only lasts a few seconds, is a polyphonic collection of +time-varying noise bands. The graphical ``score" consists of six objects, each +having a small grab point at left, a black shape to show dynamic, and a colored +shape to show changing frequency and bandwidth. The horizontal axis represents +time and the vertical axis, frequency (although, as explained later, this +behavior isn't built into pd). The dynamic and frequency shapes aren't +constrained to be connected or even to be proximate, but since they pertain to +the same sound their horizontal positions line up. In this example the last +(furthest-right) object is percussive (as seen by the black shape) and has a +fixed frequency and bandwidth, whereas the large, articulated shape in the +center has a complicated trajectory in both frequency and dynamic. The color +of the frequency trace determines the voice number used to realize it. + +<P> Each object is thus composed of a combination of scalar values (color; +aggregate position in X and Y coordinates) and array values (time/value +pairs for the black traces and time/frequency/bandwidth triples for the +colored ones.) This is all specified by the user using Pd's ``template" +mechanism. + +<P> Here is the template associated with the graphical objects +shown above: + +<P><CENTER> <IMG src="fig9.2.jpg"> </CENTER><P> + +Templates consist of a data structure definition (the "struct" object) and +zero or more drawing instructions ("filledpolygon" and "plot"). The "struct" +object gives the template the name, "template-toplevel." The data structure +is defined to contain three floating point numbers named "x", "y", and +"voiceno," and two arrays, one named "pitch" whose elements belong to another +template named "template-pitch," and similarly for the array "amp." + +<P> In general, data structures are built from four data types: scalar floats +and symbols, arrays (whose elements share another, specified template) and +lists (whose elements may have a variety of templates). The contents of a Pd +window themselves form a list. Pd's correlate of Max's "table" object is +implemented as a top-level array whose elements are scalars containing a single +floating-point number. + +<P> Data structures in Pd may nest arbitrarily deeply using the array and list +types. For example, a collection of sinusoidal tracks from an analysis engine +could be implemented as an array of arrays of (pitch, amplitude) +pairs; this appears as example 12 in Pd's FFT object online tutorial. + +<P> After the "struct" object in the template shown above, the remaining +three objects are <I> drawing instructions </I> , first for a rectangle +("filledpolygon"), and then for two arrays. The various graphical +attributes that are specified for drawing instructions may be numerical +constants or data structure field names; in the latter case the value varies +depending on the data. For instance, the second creation argument to +"plot" is the color. The first "plot" plots the "amp" field and the +color is given as 0, or black. The second one plots "pitch" using the color +"voiceno". In this way the color of the second trace is attached to the +"voiceno" slot in the data structure, so that color will vary according to its +"voiceno" slot. + +<H4> <A name=s9.1> 2.9.1. Traversal </A> </H4> + +<P> Pd objects are provided to traverse lists and arrays, and to address +elements of data structures for getting and setting. Here is a patch showing +how these facilities could be used, for example, to sequence the graphical +score shown above: + +<P><CENTER> <IMG src="fig9.3.jpg"> </CENTER><P> + +<P> Pd has no built-in sequencer, nor even any notion that "x" values should be +used as a time axis. (However, a "sort" function is provided, which reorders +a list from left to right, on the assumption that users might often want to use Pd +data collections as x-ordered sequences.) Recording sequences of events into +lists, and/or playing the lists back as sequences, are functionalities that the +user is expected to supply on top of Pd's offerings, which, it is hoped, would +allow those functionalities within a much larger range of possibilities, to +include random reorderings of events, score following, self-modifying scores, +reactive improvisation, and perhaps much more. + +<P> Traversal of data is made possible by adding a new type of atom, "pointer", +to the two previously defined types that make up messages, to wit, numbers and +symbols. Unlike numbers and symbols, pointers have no printed form and thus +can't be uttered in message boxes. Traversal objects such as "pointer" and +"get" (among several others) can generate or use pointers. The pointer data +type is also integrated into pipe-fitting objects such as "pack", +"unpack", +and "route". + +<P> In the patch shown above, the topmost "pointer" object holds a pointer to +the next object to "play" (by sending it to one of the "voice" +abstractions at bottom.) The pointer object takes a "traverse" message to +set it to the head of the list (named "pd-data"), and "next" messages to +move to (and output) the next datum in the list (i.e., the next in the list of +six objects in the score). Another "pointer" object is also used, further +down, as a storage cell for pointers just as "float" is for numbers. + +<P> The center of any sequencer is always the "delay" object, which must be +fed the time difference between each event (including the non-event of hitting +"start") and the next. As we extract each of the six objects in the score, we +must wait the delay for playing that object, and then send its pointer to one +of the "voice" abstractions to play it. However, we have to inspect the +object itself to know the delay before playing it. So, in the loop, we peel off +the first remaining object to play and inspect the time difference between it +and the previous one, using this value to set the delay, but also storing the +pointer in the lower "pointer" and "pack" objects. + +<P> The time difference needed to set the delay object is obtained using the +"get template-toplevel x" object. (This is converted to incremental time +("-"), corrected for tempo, and fed to the delay.) Pd provides +the "get" and "set" +objects for reading and writing values from data structures. +The two "get" objects shown here obtain the "x" and "voiceno" fields +of the current object. The template name (template-toplevel) is supplied +to the "get" objects so that they can look up the offset of the necessary +field(s) in advance, for greater run-time efficiency. + +<P> Once the delay has expired, the object's pointer is recalled (the lower +"pointer" object), and the voice number is recalled. This is packed with +the pointer itself and routed, so that the pointer goes to the appropriate +voice. The voice number is shown as the color of the frequency trace in +"999" units (first digit red, second green, third blue) and the "route" is +arbitrarily set up to select among the six primary and secondary colors plus +black. + +<P> The details of extracting the pitch and dynamic breakpoints from the arrays +defined in the template are managed in the "voice" abstraction. +The "voice" +abstraction receives a +pointer to a given object and manages the sequencing of the arrays; so it +contains two sequencers itself. The nesting of the overall structure of +the sequencer patch mirrors the nesting of the original data structures. +Finally, the voice abstraction puts its audio output on a summing bus. + +<P> More general patches can easily be constructed which access heterogeneous lists +of objects (having different templates). In this way, an arbitrarily rich +personal "score language" can be developed and sequenced. + +<H4> <A name=s9.2> 2.9.2. Accessing and changing data </A> </H4> + +<P> In general, accessing or changing data is done via "pointers" to +"scalars". Numbers and symbols withing scalars are accessed using the +"get" object and changed, in the same way, using "set". Since lists +and arrays are composed of scalars, every actual number or symbol in a data +heap will be a number or symbol element of some scalar. To access them, it +suffices to have objects to chase down elements of lists and arrays (given +either a global name or a pointer to the containing scalar). + +<P> Lists are traversed in the way shown above; to get to a sublist of a scalar, +the "get" object will provide a pointer, in the same way as it provides +"float" or "symbol" elements of scalars. For arrays, an +"element" object is provided which, given a scalar, a field name and +a number, chases down the numbered, scalar, element of the named array field. + +<P> To alter "float" or "symbol" elements of scalars is straightforward +using the "set" object, but arrays and lists can't be set by assignment; +there is no suitable data type available withing messages. Lists could +possibly be "settable" by passing pointers to other lists, but permitting this +would have required either automatically doing deep copies of data structures +to carry out the assignments, or else implementing a garbage collecting memory +management system, either of which would be difficult to realize within +real-time computation time constraints. Instead, all the data hanging from a +scalar is considered as belonging to that scalar, and is left in memory until +the scalar is deleted; the data may be changed atom by atom, but primitives +are not provided which would imply unpredictable execution times. + +<P> The "getsize" and "setsize" objects are provided to access or change +the number of elements in the array. For lists, an "append" object +appends a new scalar for a given template to a list, after the element pointed +to. (To insert a scalar at the beginning of a list, the pointer can be set to +the "head" of the list, a formal location before the first list item.) +Deletion is less flexible; the only operation is to delete an entire list. +(There's no reason not to provide finer-grain deletion mechanisms except that +it's not clear how to protect against stale pointers efficiently, except by +voiding the entire collection of pointers into a list.) + +<H4> <A name=s9.3> 2.9.3. Editing </A> </H4> + +<P> The graphical score shown above can be edited by dragging breakpoints, or +by adding and deleting them, using mouse clicks. Also, entire objects or +collections of them may be copied, pasted, and dragged around the screen. +Alternatively, there is an editable (or computer generate-able or parse-able) +text representation for the data, which may be seen or changed in a dialog +window or read and written to external text files. + +<P> Since the graphical presentation of data objects is determined by drawing +instructions, the drawing instructions are interpreted backwards to alter data +as a result of mouse operations. If a given graphical dimension is controlled +by a variable, that variable is then controlled by dragging along that +dimension; if the dimension is constant, it can't be altered by dragging. + +<P> Tricky situations can arise when the user changes the contents of templates. +A change in drawing instructions can be accommodated by simply tracking +down and redrawing all data objects using the template. However, changing +the "struct" object itself make for less straightforward situations. The +user might wish to reorder fields, delete them, add new ones, or rename them. +When a "struct" object changes, Pd automatically conforms the data from the old +structure to the new one. Fields with the same name as previously are maintained +(reordering them as necessary); and if a field disappears but another of the +same type appears, the new one(s) are taken to be renamings of the old one(s) +in order of appearance. New fields which cannot be matched in this way with +previously existing ones are assumed to be new and are initialized. + +<P> It can happen that two "struct" objects compete to define the same data +structure, or that the user reads in data from a file which expects a different +version of the structure, or alternatively, that the "struct" object for +existing data objects disappears. For this reasn, Pd maintains a private +representation of the last active version of a "struct" until all +similarly named "structs," as well as all data using that "struct", have +disappeared. If the user introduces a new version of the "struct" and only +later deletes the "current" one, the data is only conformed to the new version +once the old one is deleted. In this way we avoid getting into situations +where data is left hanging without its structure definition, or where data ends +up belonging to two or more structures of the same name. The worst that can +happen is that data may lose their drawing instructions, in which case Pd +supplies a simple default shape. + +<H4> <A name=s9.4> 2.9.4. Limitations </A> </H4> + +<P> When examples get more complicated and/or dense than the one shown here, it +becomes difficult to see and select specific features of a data collection; +more work is needed to facilitate this. +There should be some facility for turning drawing instructions on and off, or +perhaps for switching between versions of a template, depending on the user's +desired view. There should also be a callback facility in the template for +when an object is edited with the mouse, so that the user can bind actions to +mouse clicks. + +<P> More generally, the collection of traversal objects that Pd provides is +adequate to support a variety of modes of data collection and use, such as +analysis and sequencing. But the patches required to traverse the data +collections are not always simple. It would be desirable to find a more +straightforward mechanism than that provided by the "pointer", "get" +and "set" objects. + +<P> The "data" facility, although part of the original plan for Pd, has only +recently been implemented in its current form, and as (hopefully) the user base +grows there will surely be occasions for many further extensions of the data +handling primitives and the graphical presentation and editing functions. + +</BODY> +</HTML> diff --git a/pd/doc/1.manual/x3.htm b/pd/doc/1.manual/x3.htm new file mode 100644 index 00000000..18d220a6 --- /dev/null +++ b/pd/doc/1.manual/x3.htm @@ -0,0 +1,854 @@ +<HTML> +<HEAD> +<TITLE>Pd Documentation 3</TITLE> +</HEAD> +<BODY bgcolor="#ffffff"> +<SMALL> +<div style="width:6.5in; margin-left:.5in"> + +<CENTER> <B> +Pd Documentation chapter 3: Getting Pd to run +</B> </CENTER> +<BR> +<A href=index.htm#s3> back to table of contents </A> +<BR><BR> + +Pd runs under Irix, Windows, and Linux. +How to get Pd up and running depends on your operating system, +but the overall strategy is the same. +You must first get and install it, and +then untangle whatever problems arise in handling audio and MIDI input +and output, and finally get Pd to meet its real-time obligations reliably. + +In case of trouble also consult the Pd mailing list archive on + <A href="http://iem.kug.ac.at/mailinglists/pd-list/"> + http://iem.kug.ac.at/mailinglists/pd-list/</A> +, which often has late-breaking news about configuration problems and solutions. + + +<P> +You may be interested in getting only audio output or audio input, or +you may need both to run simultaneously. By default, Pd will try to run +both, but if you don't need either input or output, you may find that Pd +runs more reliably, or at least more efficiently, with the unused direction +turned off. This is controlled by Pd's command line flags. + +<P> +Depending on your application you will have a more or less stringent latency +requirement. Ideally, when any input (audio, MIDI, keyboard, network) is +available, the outputs (in particular the audio output) should react instantly. +In real life, it is necessary to buffer the audio inputs and outputs, trying +always to keep some number of milliseconds ahead of real time to prepare for the +inevitable occasions where the CPU runs off to service some different task +from Pd. How small this latency can be chosen depends on your OS and your +audio driver. + +<P> +To test audio and MIDI, start Pd and select "test Audio and MIDI" from the +"help" menu. + +<P> TIP: If Pd starts up but you get distortion or glitches in the audio +output, this could be either because the "audio I/O buffer" isn't big enough, +or else because the CPU load of the patch you're running is too great for the +machine you have, or else because the ADC and DAC are out of sync or even at +different sample rates. To test for the first possibility, try increasing the +"-audiobuf" parameter in the command line (but see also under your OS below.) +For the second, start up your favorite performance monitor program; and for the +third, try starting Pd up with ADCs disabled. + +<P> Here are instructions for getting and installing Pd for the four +operating systems it runs on: IRIX, MS Windows, Linux, and Max OSX. + +<H4> <A name=s1.1> 3.1. IRIX (SGI machines) </A> </H4> + +<P> Download Pd, which will be a "tar.Z" file. You can unpack this by +typing "zcat [name].tar.Z | tar xf -" to a shell. This creates a directory +named "pd". + +<P> +Starting with release 0.25, Pd should come in "n32" and "o32" versions. +"o32" is the default and will run on IRIX 5.x and up. "n32" runs faster, +but only on 6.x and up. Also, "externs" have to be updated for n32. The +"pd" executable (bin/pd in the distribution) is a symbolic link to either +"pd-o32" or "pd-n32." + +<P> NOTE: "externs" appear to be broken in the N32 version... I'm not sure +how long this has been true. If you want to use external objects, you have +to use the O32 version. + +<P> +Please note that the path to the Pd executable program can't contain +space characters; don't put it in a directory named "Program Files" +for example. + +<P> +If for example you put Pd in ~, the executable program +will be ~/pd/bin/pd. The program looks at its command line to +figure out where it is, so it's best to invoke Pd by its full pathname. +You should always invoke Pd from a Unix shell because many important +messages appear on the standard error. + +<P> +The simplest way to invoke Pd is to +make an alias in your ".cshrc" file (assuming you use the "c" shell) such as: +<PRE> + + alias pd ~/pd/bin/pd + +</PRE> +(assuming your Pd distribution landed in ~, for example). + +<P> +Pd will open the "default" audio input and output devices, without regard +for whether they are in sync or not. This will be bad if they aren't; use +the "-noadc" or "-nodac" flag to disable either the input or output. Pd is +supposed to handle up to 8 channels of audio in and/or out. (But at least +one user had to recompile Pd on his Onyx to get 8 channels working.) + +<P> +As to MIDI, Pd simply attempts to open all available MIDI devices for input and +output, which is probably very bad on anything more recent than my Indy. If +any MIDI ports fail to open either for input or output, all MIDI is disabled. + +<P> Pd has not been fixed to request real-time priority from Irix; it will +compete with all other processes on your machine for CPU time. + +<H5> Audio and MIDI in IRIX </H5> + +<P> +Pd takes command line arguments to set the number of input and output channels +and the sample rate. These don't affect the SGI's audio settings, which you +have to set separately using the "audio panel." Pd does detect the audio +sample rate if you don't specify one on the command line. + +<P> +On SGI machines, you have to work to get MIDI running. Before you start Pd, verify +that least one MIDI port is configured open. Pd opens the FIRST MIDI port +that's open. You might want to get rid of the "software" MIDI port if you're +running 6.x. On Indys, the usual practice is to open serial port number 2 +because some systems configure port 1 as "console" by default. You can use the +GUI if you want, or else just type +<PRE> + + startmidi -d /dev/ttyd2 + +</PRE> +to get port 2 speaking MIDI, and +<PRE> + + stopmidi + +</PRE> +to stop it. You can test whether MIDI is configured by typing, +<PRE> + + ps -dafe | grep midi + +</PRE> +and looking for "startmidi" processes. +<P> +It's a good idea to connect your serial port to your MIDI interface before +typing the "startmidi" command, not afterward, at least in 5.x. We use the +Opcode Studio 3 interface but in principle any Mac-compatible one should work. + +<P> +The O2 apparently has RS232 ports, not RS422. I think SGI's web site says +something about how to deal with this. + +<H4> <A name=s1.2> 3.2. Microsoft Windows </A> </H4> + +<P> Pd is compiled under NT, but shoould work under any version of Windows +since 95. Pd will appear as a "zip" file. Unzip this, creating a directory +such as \pd. (You can put it wherever you like but the path should have no +spaces in it; so "Program Files" would be a bad place.) + +<P> +If for example you put Pd in C:\pd, the executable program will be +C:\pd\bin\pd. You can simply adjust your path to include C:\pd\bin and just +invoke "pd" in a command prompt window. You can also make a "command prompt" +shortcut to start Pd. + +<P> Pd requires "TCP/IP networking" to be turned on. This doesn't mean you +have to be on a real network, but simply that Pd actually consists of two +programs that make a "network link" to intercommunicate. + +<H5> The vanishing window </H5> + +<P> Pd is a "command line" program. Most error and diagnostic +messages from Pd appear on the command prompt window Pd runs from. + +<P> If you start Pd from the "run" menu or as a shortcut, and if there's +a problem with run-time flags (see the Pd command line below), Pd will +print an error and exit. You won't see this error unless you arrange for the +"command prompt" or "msdos" window to stay open after Pd exits. One way +to do this is to make a "batch" file ("run.bat", say) containing the Pd +command line. + +<H5> Audio in Microsoft Windows </H5> + +<P> +You can ask for a list of audio and MIDI devices by typing +"pd -listdev"; you can then specify which audio and MIDI device to use. +Type "pd -help" (or make any mistake) to get the syntax for specifying +which device to use. + +<P> +Most PC sound cards seem to have MIDI built in; you don't seem to have to +do anything special to get Pd to send and receive MIDI. You can list and +choose MIDI devices in the same way as audio. + +<P> +MIDI timing is very poor if you are using simultaneous audio input and output; +if you suppress either audio input or output things will improve somewhat under +NT; you can apparently get the jitter down to ~40 msec. On W95 performance is +simply terrible. W98, with either audio input or output suppressed, offers +fairly good MIDI timing (~5 msec jitter) but crashes occasionally. + +<P> Some NT and W98 drivers greet you with a constant trail of "resyncing +audio" messages. Sometimes you can fix this by invoking Pd with the "-noresync" +flag. + +<H5> ASIO </H5> + +<P> As of version 0.35 Pd supports ASIO. Invoke Pd as "pd -asio" and, if +needed, specify "-sounddev" (etc.) flags to specify which device (see +"the Pd command line" below.) You can also specify a "-blocksize" different +from the default (256 samples) and "-audiobuf" in milliseconds. Pd will +round this down to a power of two buffers, each of "-blocksize" in sample +frames. + +<P> Using an RME Hammerfall, and specifying "-audiobuf 5 -blocksize 32" I +was able to get about 7 milliseconds of throughput delay (as measured by +the latency-measurement patch in 7.stuff/tools.) As always, you can specify +"-channels" to any even number up to the maximum (32, I think) or can specify +channel count separately for input and output (-inchannels and -outchannels). + +<H5> The special joys of Windows 95 </H5> + +<P> +On Windows 95 you can expect a hard time. Every user who tries it seems to +encounter a new problem. The best way to run Pd is to get into the "MSDOS +Prompt" program and type \pb\bin\pd to it (or whatever the path ends up being.) +You can probably put pd's "bin" directory in your path so that you just type +"pd" to the prompt. + +<P> +You don't want to run Pd from the "run" menu because if it fails to start up +the window holding the error message will disappear instantly. Ditto for +clicking on "batch files" or on the Pd executable itself. + +<P> +The most common reason Pd might fail to start up in W95 is not having +"networking" turned on. Pd is actually two programs that establish an IP +interconnection. Beware that this sometimes fools Windows into calling your +ISP for no reason. + +<P> +It is often necessary to specify a huge audio buffer to get steady audio +output in W95; see the command line arguments below. + +<H4> <A name=s1.3> 3.3. Linux </A> </H4> + +<P> What to do depends on which flavor of Linux you are running (e.g., Debian +or Red Hat). The instructions here should work for Pd 0.33 and up regardless of +your situation, but if you have any trouble just mail msp@ucsd.edu and I'll try +to figure out what's wrong and update the instructions accordingly. + +<P> Before you start, you might want to check that you have the resources Pd +needs. The main things you need are the C compiler, X windows (including +the X development package for Pd to link against) and TK. If you're running +Redhat or Mandrake 7.x or up, I think these are all present by default. +The RedHat X client developer "RPM" package is called XFree86-devel. + +<P> You don't absolutely have to have the X server package running; you can run +Pd on the microprocessor in your refrigerator as long as it can connect to an X +server on another machine. + +<P> If you're running RedHat you might want to use RPM to install Pd. For +other linux distributions, download the "tar.gz" version and compile it. + +<H5> Getting Pd as an RPM </H5> + +<P> Download Pd, perhaps from + <a href="http://www.crca.ucsd.edu/~msp/software.html"> + http://www.crca.ucsd.edu/~msp/software.html</A> , +to a file such as "pd-0.33-0.i386.rpm". +Open a "shell" window, cd to +the directory containing the file, and type the command, +<PRE> + rpm -i pd-0.33-0.i386.rpm +</PRE> + +<P> (substituting the real file name.) Then you should be able to type "pd" +to a shell and watch the Pd main window appear. + +<H5> Getting Pd as a .tar.gz </H5> + +<P> +Download Pd, perhaps from + <a href="http://www.crca.ucsd.edu/~msp/software.html"> + http://www.crca.ucsd.edu/~msp/software.html</A> , +to file such as "pd-linux-033.tar.gz". Open a "shell" +window, cd to +the directory containing the file, and type the command, +<PRE> + zcat pd-linux-033.tar.gz | tar xf - +</PRE> +which creates a directory named "pd". I do this from my home directory. +Next, compile it. "CD" to pd and read the INSTALL.txt, or else just cd +to "pd/src" and type + +<BR> ./configure +<BR> make depend +<BR> make + +<P> You can pass flags to "configure" to customize your compilation: + +<PRE> + To enable ALSA 0.9x (the latest one), add "--enable-alsa". + To enable the older ALSA 0.5x, add "--enable-old-alsa". + To enable Ritsch's RME 9652 driver, add --enable-rme". + To put Pd in /usr/bin instead of /usr/local/bin, add "--prefix=/bin". +</PRE> + +<P> After "make", just type "~/pd/bin/pd" to run pd. + +<P> Alternatively, as superuser, you can run "make install" after "make depend" +and then anyone on your system can just type "pd" to run it. + +<H5> TK support trouble </H5> + +Some people have reported a problem with Pd findind the shared libraries, +"libtcl.so" and "libtk.so". I don't know what causes this, but apparently you +can fix it, as root, by linking /usr/lib/libtcl8.3.so to /usr/lib/libtcl.so and +similarly for tk: + +<PRE> + +# cd /usr/lib +# ln -s libtk8.3.so libtk.so +# ln -s libtcl8.3.so libtcl.so + +</PRE> + +<H5> Testing audio and MIDI. </H5> + +<P> +Next try audio. We want to know whether audio output works, whether audio +input works, and whether they work simultaneously. First run "aumix" to +see audio input and output gains and which device is "recording". +Then test audio output by running +<PRE> + pd -noadc +</PRE> +and selecting "test audio and MIDI" from the "help" menu. You should see a +patch. Turn on the test tone and listen. Do the usual where's-the-signal +business. + +<P> +Then quit Pd and test audio input via +<PRE> + pd -nodac +</PRE> +Re-open the test patch and hit "meter"; look at the levels. 100 dB is a +hard clip; arrange gains so that the input signal tops out around 80 or 90, +but no higher. + +<P> Now see if your audio driver can do full duplex by typing "pd" with no +flags. If you see error messages involving /dev/dsp or /dev/dsp2, you're +probably not able to run audio in and out at the same time. If on the other +hand there's no complaint, and if the audio test patch does what you want, you +might wish to experiment with the "-audiobuffer" flag to see what values of +audio latency your audio system can handle. + +<H4> Audio hardware in Linux </H4> + +<P> +Be forewarned: installing and testing audio and MIDI drivers in Linux can take +days or weeks. There apears to be no single place where you can get detailed +information on Linux audio. In addition to the information here, you should +see what's posted on Guenter's page, + + <a href="http://gige.epy.co.at/"> + http://gige.epy.co.at/</A> . + + +<P> +Depending on your hardware and software, you might or might not be able to +run "full duplex," i.e., use audio input and output at the same time. For +many applications it's important to be able to do this, but if by any chance +you don't need simultaneous input and output you will have much less trouble +than if you do. + +<P> +There are two widely-used driver sets, called "OSS" and "ALSA". OSS is +included in the standard Linux kernels since version 2.2. However, for some +audio cards you can find newer versions than are included in the kernel +releases. You can get ALSA from + + <a href="http://www.alsa-project.org/"> + http://www.alsa-project.org/</A> . + +<P> +(There is also a commercial version of the OSS drivers which costs $30 (slightly +more for certain audio cards.) Hit + + <a href="http://www.opensound.com/"> + http://www.opensound.com/</A> . + +These might be easier to use than the free OSS drivers, but I've never tried +them.) + +<P> ALSA is able to emulate OSS, so that you can usually run Pd using the +default "OSS" settings even if it's actually ALSA that's running. + +<H5> Installing and configuring FREE OSS </H5> + +<P> +OSS is really a collection of loadable device drivers. The commands +for loading and unloading the drivers are "insmod" and "rmmod". +You can see if the audio drivers are +running using "lsmod" (as root.) If you see something like: +<PRE> + +Module Pages Used by +eepro100 3 1 (autoclean) +opl3 3 0 +opl3sa2 1 0 +ad1848 4 [opl3sa2] 0 +mpu401 5 [opl3sa2] 0 +sound 15 [opl3 opl3sa2 ad1848 mpu401] 0 +soundcore 1 [sound] 6 +soundlow 1 [sound] 0 +aic7xxx 23 2 + +</PRE> +then OSS is running, and if all you see is: +<PRE> + +eepro100 3 1 (autoclean) +aic7xxx 23 2 + +</PRE> +then it isn't. You can turn OSS off by running "rmmod" repeatedly, starting +with "opl3" (or whatever) so as not to remove any module before you remove +all the modules that depend on it. In the above listing, "opl3*" is device +dependent and you might see different names. + +<P> +The file, "/etc/modules.conf" apparently controls which sound drivers are +started at boot time. The sndconfig program updates this file but you can +also change things manually, for instance to switch between two different sound +cards. In Redhat 6.x and earlier, the file is named "conf.modules." + +<P> Here is a modules.conf file for OSS: + +<PRE> + +alias eth0 e100 +alias parport_lowlevel parport_pc +alias char-major-81 bttv +alias usb-controller usb-uhci +alias sound-slot-0 i810_audio +alias sound-slot-1 es1371 + +</PRE> + +Here the two sound cards are the (motherboard resident) i810 driver and an +ensoniq es1371. + +<P> In RedHat at least, the "sndconfig" program tries to automatically search +for your soundcard. Unfortunlately it only finds the "first" one which is +often not the one you want to use! + +<P> Under OSS, programs can stream sound using either +"block" or "stream" mode. Stream mode is the more modern and better of the +two, but the majority of drivers, even for new sound cards, only +support "block." Pd makes "block" the default. + +<H5> ALSA (Advanced Linux Sound Architecture) </H5> + +<P> ALSA is newer, hence less stable and harder to use, than OSS. +Alsa comes in a "finished" version (0.5.x) and a +different, redesigned, "beta" version, 0.9. Installing ALSA can be tricky +and/or confusing. + +<P> As of version 0.33 Pd works with either 0.5.x or 0.9.x versions. +The RPM version of Pd is compiled for 0.9.x. If you're starting from the +".tar.gz" version, you have to "./configure --enable-alsa" to get it; see +the "INSTALL.txt" file in the installation. + +<P> By default, Pd uses OSS. If you are running ALSA, Pd will use ALSA's OSS +emulation. To make Pd use ALSA "natively", i.e., the way ALSA is designed +to be used, include the "-alsa" flag in the command line. + +<P> In ALSA, you can specify which sound card to use using the "-alsadev" +flag. So, for instance, "-alsadev 3" means your third card, counting from +one. You can also specify it the ALSA way: "-alsadev hw:3,0". + +<H5> Which sound card? </H5> + +<P> +Here's a rundown on my experiences with sound cards so far. See +also the Pd mailing list archives. + +<H6> opl3sa </H6> + +This is the old ISA "Yamaha" audio system. It comes on many Dell machines and +seems to offer reasonable consumer quality audio, at least under NT. I +believe the current version of OSS can get full duplex operation out of an +OPL3sa audio system. +This is an ISA ("plug and play" device and you have to deal with I/O +addresses and all that. + +<H6> cs4232 </H6> + +The 1999 vintage dual-processor Dell machines have "cs4232" audio, which I +couldn't get working. + +<H6> es1370 (old Creative PCI128s; Ensoniq AudioPCI) </H6> + +<P> +The audio inputs and outputs on my PCI128 aren't clearly labelled and various +documents give them inconsistent names. On my card there are 4 stereo +mini jacks and a joystick port, in this order: + +<PRE> +joystick black green red blue + bidirectional line-out mic-in line-in +</PRE> + +<P> It used to be possilbe to get quadraphonic audio in and out +of this card, but I haven't tried this in years. + +<H6> Creative SBLive </H6> + +This seems to work fine either with ALSA or OSS as of Pd version 0.35; earlier +versions of Pd didn't see MIDI input under OSS (the driver's fault, not Pd's, +but I figured out a workaround.) + +<H6> Sonorus Stud I/O </H6> + +This $1000 card is supposed to do multichannel digital I/O +in Linux, via a beta version of a commercial OSS driver ($40). +I don't know if anyone has used it with Pd. + +<H6> RME 9652 (Hammerfall) </H6> + +<P> This is the best sound card out there; it costs around $500 and has 3 ADAT +I/O ports and one SPDIF. There is a "baby hammerfall" also, which I think is +the "9632." DO NOT CONFUSE THE 9652/9632 WITH OTHER RME BOARDS WHICH MIGHT +NOT WORK WITH PD. + +<P> Guenter Geiger has an OSS driver for Hammerfall for 2.4 kernels (such as +RedHat 7.1 and up). You have to download and compile it: + + <A HREF=http://gige.xdv.org/pages/rme> + http://gige.xdv.org/pages/rme </A>. + +<P> You must then run Pd using the "-32bit' flag, because this uses a +non-standard extension of OSS to 32 bit samples. + +<P> There's an older driver by Winfried Ritsch, invoked using the "-rme" +flag to Pd. This only works on 2.2 kernels, and you probably shouldn't +try it. It will probably be discontinued after Pd version 0.35. + +<P> Hammerfalls now have an ALSA driver; from what I hear +it won't work yet with Pd. I was unable to install the ALSA driver on the +two machines I tried ("no such device"). + +<H6> MIDIMAN </H6> + +Midiman sells devices with between 4 and 12 analog channels in and out, for +which there are ALSA drivers. It seems to work fine with the old ALSA driver +(0.5). I'm running mine in Alsa 0.9 beta 10. The driver name is "ice1712". + +<P> Alsa provides an "envy24control" program (in "utils". You should run +this and check that your ice1712's sync source is internal if you have no +SPDIF input, or "SPDIF" if you do. I think the default is now "internal" +but don't take it for granted... + +<H6> i810/i815 </H6> + +In RedHat 7.0, motherboards with native i810 audio systems don't work in +full duplex (they crash linux). Either run Pd -noadc or else (better) install +ALSA. + +<H6> Yamaha YMF724 </H6> + +The OSS driver for this card appears not to support MIDI. I haven't +tried with ALSA. + +<H6> ES1371 </H6> + +In OSS, audio and MIDI seem both to work fine with this chipset. + +<H4> <A name=s1.4> 3.4. Macintosh OSX </A> </H4> + +Pd version 0.35 supports Macintosh OSX, although there are still various +problems. You can either download Pd with Mac OSX binaries, or just download +the sources and compile it yourself. + +<H5> To install the binary OSX release: </H5> + +<P> First download and install TK for OSX +(http://sourceforge.net/projects/tcl/). Get a recent one compiled for +OSX, by chasing through "Mac OS X Tk Snapshots." I got +version 8.4a4-2, in a file named "MacOSXTk8.4a4-2.tar.gz ". Unpacking this +yields three directories: ./Applications/Wish Shell.app, +./Library/Frameworks/Tcl.framework, +and ./Library/Frameworks/Tk.framework. These must be moved, either to: +<pre> + ~/Applications/Wish Shell.app + ~/Library/Frameworks/Tcl.framework + ~/Library/Frameworks/Tk.framework +</pre> +or, if you wish to make them available to other users (or make it possible to +recompile Pd), in /Applications and /Library instead. + +<P> Then download and unpack the Pd binary distribution for OS X. This will +create a directory with a name like ~/Desktop/pd-0.35-test22. You can move +this elsewhere if you wish (to ~/pd, for example). To a shell window, type +either "~/Desktop/pd-0.35-test22/bin/pd" or, if you moved it as suggested, +"~/pd/bin/pd" . If you wish you can put the line, + +<pre> + alias pd ~/pd/bin/pd +</pre> + +in the file, ~/.tcshrc, so that you can later just type "pd" to a shell. (The +shell only reads the ~/.tcshrc file onstartup, so this won't take effect in +any existing shells unless you specially type +<pre> + source ~/.tcshrc +</pre> +to them.) + +<P> In some cases you have to explicitly give "-soundindev" and "-soundoutdev" +flags for Pd to open audio correctly; "pd -listdev" should show you the +correct device numbers. + +<P> To get MIDI working, you have to do the Mac OSX magic to get a USB +MIDI interface installed. I've seen this done with Midisport devices and +I think you just download the OSX driver and follow directions. + +<P> On the machine I tried, it was necessary to type, + +<pre> + pd -midiindev 1 -midioutdev 2 +</pre> + +to get MIDI working. At the moment, using a midiman Midisport 2x2, I'm getting +several lines of debugging printout for each incoming MIDI message; it seems to +be the driver printing it out. I don't know how to turn this off. + +<P> To get Pd running at high priority, so that you'll get fewer skips in the +audio input and output, you must "renice" it. The easiest way to do this is +to make it SETUID and use the "-rt" flag. To do this, become root (you might +have to add a root account to do this) and type: + +<pre> + chown root ~ferguson/pd/bin/pd + chmod 4755 ~ferguson/pd/bin/pd +</pre> +(assuming your username is "ferguson"). + +<H5> To compile your own Pd in OSX: </H5> + +Whether you've downloaded the source or the OSX binary distribution you can +always Pd for yourself, whether to make your own improvements, or possibly +so that you can get the newest version before it shows up compiled +for Mac OS X. + +<P> To be able to compile Pd, you must have installed Tcl/Tk + specifically in +/Applications/Wish Shell.app +and /Library/Frameworks/Tk.framework and /Library/Frameworks/Tcl.framework. + +You must also get the "h" files from XFree86 and put them in +/usr/X11R6/include. You can download just the H files from: +<pre> + http://www.crca.ucsd.edu/~msp/x.tgz +</pre> +(the individual files seem to have adequate copyright notices so that +I can just redistribute them.) + +Then, just as for linux, just unload pd-whatever.tar.gz into a directory +such as ~/pd-0.35-test17 , cd to pd-0.35-test17/src, type "./configure" +and "make". + +then type ~/pd-0.35-test17/bin/pd to a shell and enjoy! + + +<H4> <A name=s3> 3.5. graphics rendering using GEM </A> </H4> + +<P> +GEM, originally by Mark Danks but now supported by Iohannes Zmoelnig, is essentially an extension of Pd that allows you to do OpenGL programming +using a suite of "GEM objects" roughly parallel to the tilde objects built +into Pd for audio. Find out more from +<a href="http://iem.kug.ac.at/~zmoelnig/index.html"> Johannes's page</a>. + + +<H4> <A name=s4> 3.6. The Pd command line </A> </H4> + +Pd is a "command line" program. The best way to run it is from your +"terminal emulator," "shell," or "MSDOS prompt." The command line is: + +<PRE> + + pd [options] [patches to open] + +</PRE> + +although you may have to specify a path so your command interpreter can find +Pd (OS dependent.) Possible options include: + +<PRE> + +audio configuration flags: +-r <n> -- specify sample rate +-inchannels ... -- number of audio in channels (by device, like "2" or "16,8") +-outchannels ... -- number of audio out channels (by device) +-channels ... -- specify both input and output channels +-audiobuf <n> -- specify size of audio buffer in msec +-blocksize <n> -- specify audio I/O block size in sample frames +-sleepgrain <n> -- specify number of milliseconds to sleep when idle +-nodac -- suppress audio output +-noadc -- suppress audio input +-noaudio -- suppress audio input and output (-nosound is synonym) +-listdev -- list audio and MIDI devices +-audioindev ... -- sound in device list; e.g., "2,1" for second and first +-audiooutdev ... -- sound out device list, same as above +-audiodev ... -- specify both -audioindev and -audiooutdev together + +(linux specific audio:) +-frags <n> -- specify number of audio fragments (defeats audiobuf) +-fragsize <n> -- specify log of fragment size ('blocksize' is better...) +-stream -- use stream mode audio (e.g., for es1370 audio cards) +-alsa -- use ALSA audio drivers +-alsadev <n> -- ALSA device # (counting from 1) or name: default hw:0,0 + +MIDI configuration flags: +-midiindev ... -- midi in device list; e.g., "1,3" for first and third +-midioutdev ... -- midi out device list, same format +-mididev ... -- specify -midioutdev and -midiindev together +-nomidiin -- suppress MIDI input +-nomidiout -- suppress MIDI output +-nomidi -- suppress MIDI input and output + +general flags: +-path <path> -- add to file search path +-open <file> -- open file(s) on startup +-lib <file> -- load object library(s) +-font <n> -- specify default font size in points +-verbose -- extra printout on startup and when searching for files +-d <n> -- specify debug level +-noloadbang -- suppress all loadbangs +-nogui -- suppress starting the GUI +-guicmd "cmd..." -- substitute another GUI program (e.g., rsh) +-send "msg..." -- send a message at startup (after patches are loaded) +-rt or -realtime -- use real-time priority (needs root privilege) + +-frags <n> -- specify number of audio fragments (defeats audiobuf) +-fragsize <n> -- specify log of fragment size ('blocksize' is better...) +-blocksize <n> -- specify audio I/O block size in sample frames +-stream -- use stream mode audio (e.g., for es1370 audio cards) +-alsa -- use ALSA audio drivers +-alsadev <n> -- ALSA device # (counting from 1) or name: default hw:0,0 + +(MS Windows specific audio:) +-resync -- resynchronize audio (default if more than 2 channels) +-noresync -- never resynchronize audio I/O (default for stereo) +-asio -- use ASIO audio driver (and not the 'MMIO' default) + +MIDI configuration flags: +-midiindev ... -- midi in device list; e.g., "1,3" for first and third +-midioutdev ... -- midi out device list, same format +-nomidiin -- suppress MIDI input +-nomidiout -- suppress MIDI output +-nomidi -- suppress MIDI input and output + +general flags: +-path <path> -- add to file search path +-open <file> -- open file(s) on startup +-lib <file> -- load object library(s) +-font <n> -- specify default font size in points +-verbose -- extra printout on startup and when searching for files +-d <n> -- specify debug level +-noloadbang -- suppress all loadbangs +-nogui -- suppress starting the GUI +-guicmd "cmd..." -- substitute another GUI program (e.g., rsh) +-send "msg..." -- send a message at startup (after patches are loaded) +-rt or -realtime -- use real-time priority (needs root privilege) + +</PRE> + +Here are some details on some of the audio and MIDI options (but see also the +next section on file management.) + +<H5> sample rate </H5> + +The sample rate controls Pd's logical sample rate which need not be that of +the audio input and output devices. If Pd's sample rate is wrong, time will +flow at the wrong rate and synthetic sounds will be transposed. If the output +and input devices are running at different rates, Pd will constantly drop frames +to re-sync them, which will sound bad. You can disable input or output if this +is a problem. + +<H5> audio buffer size </H5> + +You can specify an audio buffer size in milliseconds, typically between 10 and +300, depending on how responsive your OS and drivers are. If this is set too +low there will be audio I/O errors ("data late"). The higher the value is, +on the other hand, the more throughput delay you will hear from the audio +and/or control inputs (MIDI, GUI) and the audio coming out. + +<P> In Linux and Windows, you can also specify the audio block size in sample +frames (but in Windows, this is only effective when using ASIO). + +<H5> MIDI devices </H5> + +<P> You can specify multiple MIDI input and output devices. For example, +"pd -midiindev 3 -midioutdev 4,2" asks for the third MIDI input device and the +fourth and second MIDI output device. The "channel message" midi objects in Pd +such as notein or pgmout will take channels 1-16 to mean the first open MIDI +port, 17-32 the second one, and so on. The midiin, sysexin, midiout objects +give you a separate inlet to specify which of the open MIDI port numbers +you want. + +<P> In Linux, if you +ask for "pd -midioutdev 1" for instance, you get /dev/midi0 or /dev/midi00 +(or even /dev/midi). "-midioutdev 45" would be /dev/midi44. In NT, device +number 0 is the "MIDI mapper", which is the default MIDI device you selected +from the control panel; counting from one, the device numbers are card +numbers as listed by "pd -listdev." + +<H4> <A name=s5> 3.7. dealing with files </A> </H4> + +Pd has a search path feature; you specify the path on the command line +using the "-path" option. Paths may contain any number of files. If you +specify several files in a single "-path" option they're separated by colons +in unix or semicolons in NT. When Pd searches for an abstraction or an +"extern" it uses the path to try to find the necessary file. The "read" +messages to qlists and arrays (aka tables) work the same way. NO SPACES MAY +APPEAR ANYWHERE IN THE SEARCH PATH, e.g., "c:\my nonsense\goobers" won't +work. + +<P> Filenames in Pd are always separated by (unix-style) forward slashes, even +if you're on Windows (which uses backslashes). This is so that patches can be +ported more easily between operating systems. On the other hand, if you +specify a filename on the command line (as in "pd -path c:\pdlib") the file +separator should agree with the operating system. <BR> + +<P> If a filename in a patch has any "/" characters in it, the "path" is not +used; thus, "../sounds/sample1.wav" causes Pd only to look relative to the +directory containing the patch. (You may also invoke externs that way.) + +<P> As of version 0.35, there may be spaces in the path to Pd itself; also, +the "openpanel" and "savepanel" objects can handle spaces. But still not +the search path. + +</BODY> +</HTML> + + diff --git a/pd/doc/1.manual/x4.htm b/pd/doc/1.manual/x4.htm new file mode 100644 index 00000000..5fe5d25d --- /dev/null +++ b/pd/doc/1.manual/x4.htm @@ -0,0 +1,59 @@ +<HTML> +<HEAD> +<TITLE>Pd Documentation</TITLE> +</HEAD> +<BODY bgcolor="#ffffff"> +<SMALL> +<div style="width:6.5in; margin-left:.5in"> + +<CENTER> <B> +Pd Documentation chapter 4: writing Pd objects in C +</B> </CENTER> +<BR> +<H5> <A href=index.htm#s4> back to table of contents </A></H5> + <BR><BR> +<P> + +You can write your own objects that you and others can use in their Pd +applications. You can write them in C or (if you're smart and brave) in C++ or +FORTRAN. + +<P> HOW EXTERNS ARE LOADED + +<P> Whenever you type the name of an object +(into an "object" text box) that Pd doesn't yet know about, Pd looks for a +relocatable object file, named, for instance, "profile.pd_irix5". Pd looks +first in the directory containing the patch, then in directories in its +"path." Pd will then add whatever object is defined there to its "class list," +which is the set of all Pd classes you can use. If all this works, Pd then +attempts again to create the object you asked for, this time perhaps +sucessfully. There is no difference between an object defined this way and an +object built into Pd. + +<P> Once you load a new object into Pd, it's there for the duration of your Pd +session. If you load another Pd document which supplies a different version of +some Pd object, the object won't be updated. IF you're working on a new object +and decide to change it, you have to exit and re-enter Pd to get the change to +take. + +<P> In the "externs" subdirectory of the documentation you +can find simple examples of "externs" with their source code and test patches; +there are many other on the web (see <a href="x1.htm#s2">section 1.2 </A>). + +<P> Iohannes Zmoelnig has written an excellent guide to writing externs at +<A href="http://iem.kug.ac.at/pd/externals-HOWTO/"> + http://iem.kug.ac.at/pd/externals-HOWTO/</A> . + +<P> A paper by Theo Stojanov on the subject is at: +<A href="http://www.music.mcgill.ca/~theo/html/audio/pd_externs.pdf"> +http://www.music.mcgill.ca/~theo/html/audio/pd_externs.pdf </A> . + +<P> NT HINT: In NT, Pd is compiled using Visual C 6.0. If you have VC 5.x +your externs won't compile against Pd; you'll get an error about "disk full +or bad DLL." Simply recompile Pd under 5.x and the problem goes away. Externs +compiled under 5.x and 6.x are binary compatible; it's just the compilation +that's sensitive. + + +</BODY> +</HTML> diff --git a/pd/doc/1.manual/x5.htm b/pd/doc/1.manual/x5.htm new file mode 100644 index 00000000..2203ebc7 --- /dev/null +++ b/pd/doc/1.manual/x5.htm @@ -0,0 +1,1231 @@ +<HTML> +<HEAD> +<TITLE>Pd Documentation</TITLE> +</HEAD> +<BODY bgcolor="#ffffff"> +<SMALL> +<div style="width:6.5in; margin-left:.5in"> + +<CENTER> <B> +Pd Documentation chapter 5. current status +</B> </CENTER> +<P> +This section tracks changes in Pd's current implementation. +<BR> +<H5> <A href=index.htm#s5> back to table of contents </A></H5> + +<H4> <A name=s2> 5.1. release notes </A> </H4> + +<P> ------------------ 0.35 ------------------------------- + +<P> An experimental new feature called graph-on-parent allows subpatches and abstractions to show +GUI features; so, for instance, you can make an oscillator with a number box to +control the frewuency. This is described in section 2.7.2 of the HTML +documentation and an example is shown in 7.stuff/synth1/. + +<P> Spaces are allowed in pathnames to Pd and to patches; however, the "path" +variable still can't have spaces. (You can address path directories using +relative pathnames as in "../sound" (or ..\sound on Windows), even if there +are spaces further "up" the path to the patch. See 3.7, "dealing with files." + +<P> The soundfile reading routine (used in readsf~ and soundfiler) is much +better at opening wav files with different header sizes and odd chunks. +You can now read floating-point "wav" files -- although you can't write them +yet. + +<P> Templates and data structures are extensively reworked. A "struct" +object replaces "template", so that you specify the name of the structure as +the first argument to "struct" (previously it was derived from the +window name.) You can now have multiple "structs" of the same name; the +oldest one is the "real" one, but if you delete that, the structures are +all conformed to the next-oldest one, and so on. You can alter the contents of +a "struct" and all the associated data will be modified to fit the new +structure definition. Data are persistent, i.e., saved with the containing +patch. You can copy and paste data between patches. If you save data to a file +explicityly, you can read it into another patch and the data are conformed +automatically to the new data structures. + +<P> A new version of Thomas Musil's GUI objects was merged in. + +<P> The testtone patch works for up to 6 channels of audio input and output. + +<P> Lots of improvements got made to audio I/O in general. In NT you may +specify "-asio" to use ASIO drivers; see HTML documentation section 3.2. +You may specify lists of audio input and output devices. In Linux, Pd +will now attempt to open each /dev/dsp* only once, even if it's requested +for reading and writing. + +<P> The "extra" directory is now searched after the directories in the +search path, not before (so now you can override objects like "fiddle~"). + +<P> A bug in paf~ is fixed. + +<P> In Linux, the ".pdrc" is now read before the command line arguments, so +that command line arguments override the .pdrc (it was backwards before.) + +<P> In Linux, "help" now can invoke either mozilla or netscape to start +up the HTML documentation. This doesn't work in Windows or Mac land yet. + +<P> In Linux, the "-32bit" flag was added, which you must now use if +running Guenter's OSS RME Hammerfall driver. (This was necessary because +OSS went and used the same "bit" for a different purpose, so taht Pd tried +to open some other cards in 32bit mode inappropriately.) + +<P> In Linux, MIDI is now opened "-NODELAY" ... this makes the OSS Creative +driver take MIDI input correctly which it didn't before. + +<P> In MS windows, you can now use "readsf~/writesf~" for spooling sounds to +and from disk. + +<P> MS Windows bug fixes: -nosound was ignored, and now works. Also, clicking +to open abstractions, when they were already open anyway, used to lose the +keyboard; this should be fixed now. Finally, "netreceive" didn't work when +running "-nogui". This is fixed, and moreover, you should definitely include +a netreceive object in any -nogui patch in MSW, otherwise it eats up all +available CPU time gratuitously. + +<P> The outlet is removed from the "table" object. + +<P> In MS Windows, Pd now has "-resync" and "-noresync" flags so that you +can specify how to deal with audio input and output blocksize nonsense in +MMIO. If "resync" is on, whenever the audio input and output seem out +of whack the audio driver resynchronizes all input and output devices; +otherwise the situation is simply ignored. "Noresync" is probably best for +consumer stereo cards (and is the default if you're running only 2 channels in +and out). If you're runnimg more than 2 channels in either direction, the +default is "resync". + +<P> In soundfiler's read method, if you specify "-maxsize", that implies +"-resize" (as it ought to.) + +<P> You can use $1-stlye names for arays and tables. + +<P> Pd will now refuse to make duplicate connections between objects. + +<P> Pd is (somewhat shakily) running on Macintosh OS/X. See section 3.4 of +the HTML doc. For Macs with one-button mice, you can double-click in edit +mode to simulate a right click. Unfortunately, the "alt" key doesn't work +yet. + +<P> In Linux, ALSA audio is now fixed to clip, not wrap around, on output +overflows. + +<P> Various problems were fixed with objects changing size. Number boxes never +wrap to two lines (as they used to), and lines are reconnected appropriately +when objects are resized. + +<P> A function call is added to retrieve a unique event-dependent number, +so that objects like "buddy" can be written. + +<P> All the "sound" command-line flags now have "audio" equivalents. + +<P> The "-listdev" flag now works on Mac and MSW/ASIO. + +<P> Help file updates for env~, route, and pointer + +<P> ------------------ 0.34.3 ------------------------------- + +<P> fixed a bug in "udp" netreceive that crashed pd + +<P> fixed a bug in tabosc4~ that caused gritty sound + +<P> changed "specfile" for RPM releases (thanks Fernando) + +<P> adopted Krzysztof's glob_setfilename bug fix + +<P> bug fixes from "the joy of global variables" thread in Pd list + +<P> made a help window for "table". + +<P> ------------------ 0.34.2 ------------------------------- + +<P> fixed ".pdrc" bug + +<P> added an experimental "pd restart-audio" feature for (new) Alsa + +<P> ------------------ 0.34.1 ------------------------------- + +<P> Bug fixes: + +<P> 1. Closing a window with objects selected crashed Pd. + +<P> 2. "find" when it opened a window to show the found object crashed Pd. + +<P> 3. (Linux only) Oversized .pdrc files crashed pd... + +<P> Also, I updated Thomas Musil's IEM GUI objects and their help files. + + +<P> ------------------ 0.34 ------------------------------- + +<P> NEW FEATURES: + +<P> I incorporated Thomas Musil's GUI objects (slider, button, etc.) into +the Pd release so Thomas won't have to publish patches to Pd anymore. I +didn't take the graphical inlets and outlets for reasons explained elsewhere, +but Thomas might decide to continue supplying them on a patch basis. + +<P> Many new examples were added to the "2.control" amd expecially +"3.audio" example patches. A list of differences batween Max/MSP and Pd +now appears at the end of this section. + +<P> Finally, I fixed Pd to notice window iconification and suspend graphical +updates for iconified windows. + +<P> Numbering of versions of Pd will now be as in "0.34.2" instead of +"0.34PATCH2" which was confusing. + +<P> BUGS FIXED: + +<P> I incorporated Krzysztof Czaja's menuclose bug fix in g_canvas.c. + +<P> (lunix) the configure script is more rational. + +<P> the qlist and pack objects were fixed to handle reentrancy correctly. + +<P> Pd now complains about running out of memory (before it dies.) I intend +to provide advance warning and automatically back out of loading patches that +woudl run out of memory, but that's not in place yet. + +<P> Typing into a message box sometimes left you with lines from the output +pointing to the wrong location. Fixed. + +<P> Reading of "wav" and nextstep soundfiles now handles the headers better. + +<P> ------------------ 0.33 ------------------------------- + +<P> AUDIO AND MIDI: + +<P> MIDI time jitter is reduced. Theoretically, it could now be +as low as the audio blocksize (and so if you care about MIDI timing, keep your +audio blocksize low.) If you run Pd with audio in stream mode or without +audio at all, and perhaps in some cases in block more too (?), +the controlling parameter for MIDI jitter is "-sleepgrain", which specifies +the interval of time Pd sleeps when it believes it's idle. + +<P> You can now specify multiple MIDI input and output devices. For example, +"pd -midiindev 3 -midioutdev 4,2" asks for the third MIDI input device and the +fourth and second MIDI output device. The "channel message" midi objects in Pd +such as notein or pgmout will take channels 1-16 to mean the first open MIDI +port, 17-32 the second one, and so on. The midiin, sysexin, midiout objects +give you a separate inlet to specify which of the open MIDI port numbers +you want. + +<P> (linux only) By default, Pd now reads and write audio in "block mode." +Previously you have to specify "-frags" and/or "-fragsize" to get this. +As of this version you have to specify "-streammode" to get the opposite, +streaming mode. This mode seems only to work with a small number of sound +cards, notably Ensoniq ens1370 and ens1371. + +<P> (linux only) Also, "-fragsize" is replaced with a more convenient +"-blocksize" which you specify in sample frames. It defaults to 64 which is +Pd's audio computation block size but may be larger or smaller. Typically you +would specify "-audiobuf" and "-blocksize" and Pd will compute "-frags" for +you; but you can also specify "-frags" explicitly. + +<P> (linux only) OSS and ALSA audio support are improved. You can now talk to +RME9652 using Guenter's OSS driver; this is different from the "-RME" support +which uses Winfried's older driver. Other multichannel OSS drivers might now +work as well. Pd also seems to work with ALSA 0.9 Beta 4; I've tested this +with Midiman Delta 66 and Soundblaster live. I plan to update the linux audio +setup documentation accordingly. + +<P> NEW FEATURES: + +<P> I've put in Shahrokh's new expr, expr~, and fexpr~ objects. The latter +allows you to make expressions referring to prior input and output samples in +case you're interested in writing your own recursive filters, oscillators, +or chaotic sound generators... + +<P> In support of expr, you can now use commas in "object" boxes; they just +become symbols. + +<P> sqrt~ is fixed so that it apparently has 24-bit accurate mantissas. +It turned out to be easier to just make it accurate than to confront the +question of how a reduced-accuracy version should be named. + +<P> The bizarre framp~ object which does phase vocoder analysis got a help +window. The phase vocoder example doesn't use framp~ and I had forgotten +what it did until Guenter dug it back up. + +<P> (linux only) I finally got around to incorporating Guenter's autoconf +stuff, and learned about rpms. Major new linux releases will probably be +in .tar.gz and .rpm formats; "test" releases will probably just be in .tar.gz. +I also fixed it so that the installation prefix is overridden if you invoke +pd by its full pathname, so that you can still use compilations with +installation prefixes before you actually install them. + +<P> (NT only) I added support for directX using the portaudio package +by Ross Bencina and Phil Burk. I couldn't discover any way this would ever +outperform the old "multimedia" API Pd uses. So the release contains the sources, +but you have to recompile Pd to use directX. Use "makefile.nt.portaudio". Only +1 or 2 channels of audio are supported. THe interesting thing is that the same +code will run on Macintosh. There are a couple of other obstacles to a +MacOS port of Pd though; it's hard to predict when this will be feasible. + +<P> BUG FIXES: + +<P> "drawnumber" was broken in 0.32 -- fixed. + +<P> new arrays in 0.32p6 got ill-fitting graphs -- fixed. + +<P> ------------------ 0.32 PATCH 6 ------------------- + +<P> Got array and graph dialogs to behave better when there are more +than one. + +<P> put in mtof~, etc. + +<P> made Pd search the "extra" directory without having to specify it in "path." + +<P> bug fix in exporting patches to Max + +<P> ------------------ 0.32 PATCH 5 ------------------- + +<P> Reversed the order of these release notes so that the newest appear first. + +<P> Arrays can save their content with containing patch; the properties +dialog selects this. The dialog shows up when you create a new array from +the menu, and allows you to set the name and size. Only floating point arrays +can be created and edited this way. + +<P> Bug fix: the figures in the NT web doc were garbage. + +<P> Bug fix: large tables (> 800 pixels and points) no longer crash the GUI. +A related problem remains; large arrays are truncated to either 1000 points +or 1000 pixels. + +<P> Bug fix: doing "save as" on an instantiated abstraction no longer sets +the window title. + +<P> in linux, a couple of status messages on opening /dev/dsp only appear now +if Pd is run "-verbose". + + +<BR> <BR> +<P> ------------------ 0.32 PATCH 2, 3, 4 ------------------- + +<P> Hassled more with font size differnces between NT and Linux, and updated +many help files. Minor bug fixes here and there. + +<P> the table object now takes a second argument to set size in points. + +<P> Improved underflow protection in some DSP objects. + +<P> pointer now has a "vnext" traversal method which goes forward to the +next SELECTED object. + +<P> improvements to throw~ (it now sums) and receive~ fixed to be settable. + +<P> bug fix in which RME driver always thought sample rate was 44100. + +<BR> <BR> +<P> ------------------ 0.32 PATCH 1 ------------------- + +<P> bug fixes (bugs flagged by mik): vcf~ help window crashed; writesf~ +only wrote 1 channel soundfiles; "table" object didn't open when clicked +on; + +<P> new object: tabosc4~ -- finally, a real wavetable oscillator for Pd. + +<P> much work on "data" editing; go to 7.stuff/data-structures, open patches +5 and 7, and try clicking on things. Alt clicks delete or add points; regular +clicks drag values around. The cursor changes to show you what will happen +if you click. + +<BR> <BR> +------------------- 0.32 ----------------- + +<P> <strong> New objects: </strong> + +<P> midiin, sysexin, midiout. (I don't think MIDI sysex is working +in Windows yet though.) + +<P> threshold~ as in Jmax, triggers from audio level. + +<P> value as in Max and Jmax. + +<P> writesf as in Jmax. + +<P> <strong> New startup flags: </strong> + +<P> -sleepgrain: if you aren't using audio I/O, this can reduce time jitter in +MIDI I/O. Otherwise, MIDI I/O jitter is limited by the audio buffer size. + +<P> -noloadbang: cancels loadbangs. + +<P> -nogui: supress starting the GUI. You can then still talk to Pd using, +perhaps among other possibilities, the new network connection programs now +included in the release. + +<P> -guicmd: lets you specify the command string Pd calls to start the GUI, +in case you've written your own GUI to replace the TK one Pd comes with. + +<P> -send: after loading all the patches specified in the command line, +you can specify "startup" messages to send. For example, if you want to use +Pd just to play 50-channel soundfiles from a shell, this is how you can specify +the soundfile name on the command line. + +<P> <strong> bug fixes. </strong> + +<P> A readsf~ problem got fixed. + +<P> hitting the tab key used to cause Pd windows to relinquish the keyboard. + +<P> The $0 feature apperas now to work. + +<P> Inlets and outlets of subpatches sometimes got out of left-to-right order. + +<P> Scrollbars are less out of whack than they were before. + +<P> Pd now knows to de-iconify windows if you "vis" them from the parent. + +<P> <strong> in general: </strong> + +<P> In Linux the treatment of MIDI input is now much more efficient. Also, +bugs were fixed in notin and (for SGI) bendin. + +<P> You can "select all" from the Edit menu. + +<P> standalone programs "pd-send" and "pd-receive" are provided that can send +mesages to Pd or receive messages from Pd via the netsend~ and netreceive~ +objects. This should allow you to interface a wide variety of other programs +with Pd either on the same machine or over the network. Also you should be +able to hack the code into your own programs to make them interoperate with +Pd and/or each other. The underlying protocol is called FUDI. + +<P> "Properties" for scalars, graphs, and number boxes: left click on them. +In particular, number boxes can have fixed widths and finite ranges; if you +make them one character wide they act as toggles. Later you'll be able to +configure them as sliders. + +<P> As to scalars, the properties dialog lets you edit the data in the raw. +Don't try to edit the template though; you can't. + +<P> You can now type into a "pd" object to change its name without losing the +contents. + +<P> An experimental "scalar" _text_ object now allows abstractions to draw +primitive control panels on their parents when you invoke them, as if they were +Moog or Buchla modules. See the "7.stuff/data" examples. + +<P> New help windows for the "data" classes (pointer, append, template, etc.) +and for send/receive which somehow I had neglected. + +<P> When you hit "copy" with nothing selected, the copy buffer used to be +cleared. This is fixed to do nothing. + +<BR> <BR> +------------------- 0.31 ----------------- + +<P> ALSA support in Linux has been completely overhauled. It now works with +Midiman (up to 10 in/12 out!) and es1370. There are problems with SBLive under +ALSA but it works in OSS emulation with a "-frags" setting. See the "getting +started" documentation. + +<P> In NT, the default is now "noresync" if you're running stereo. You can +override this with the "-resync" flag. If you're running more than 2 channels +it's the opposite (as it was before.) + +<P> "symbol" boxes now display symbols and let you type them in. + +<P> There was a bug when you renamed a patch from outside Pd; the old filename +still showed in the title bar (and there were other bad side effects.) FIxed. + +<P> Protection was added against patches opening themselves as abstractions. + +<P> The "route" object's handling of leading symbols was improved. I'm not +sure whether it's Max compatible or not. + +<P> You can draw into arrays with the mouse, at least in the case where there's +at least one pixel per point. (I'm not sure if the other case even makes +sense.) + +<P> Abstractions display their "$1", etc., arguments in the window title bar. + +<P> A "sort" method was added for lists to make them easier to use as +sequencers. + +<P> The "save as" dialog makes a more reasonable choice of start-up directory. + +<P> "Trigger i" is now disallowed (it used to crash Pd.) + +<P> Getbytes and resizebytes now zero out new memory. + +<P> A memory leak reported by Hannes has been partly, hopefully mostly, fixed. + +<P> The "signal_free 2" bug reported by Fogar is fixed. + +<P> New graphs now reliably avoid using already-taken "graph%d" names. + +<P> The old bug which showed up as ".xxxxxxxxx: no such object" is fixed. + +<P> The FFT examples have been reworked and the "pique" and "shift" objects +are moved to "extra". + +<BR> <BR> +------------------- 0.30 ----------------- +<P> in Linux, you can get Pd to promote itself to "real time" priority. +A "watchdog" process protects you from having Pd lock your machine up. You +must request real time by running "pd -rt" or "pd -realtime". You must either +be superuser or make Pd a root-owned SETUID program (chown root .../pd/bin/pd; +chmod 4755 .../pd/bin/pd). For security reasons, Pd relinquishes root +privelige immediately after setting its priority, before loading +any patches or externs. + +<P> Protection was added against message loops. + +<P> loadbang was fixed so that loadbangs in abstractions go off before loadbangs +in the owner patch. Within each patch, loadbangs go off forst in subpatches. + +<P> new object: tabplay~, a non-imterpolating sample reader. + +<P> new objects (in "extra" library): loop~; rev1~. + +<P> The "toys" library was renamed "extra" and incorporated in the Pd release. + +<P> In Linux, timeouts were added to the driver opening and closing code +(which used to hang under some conditions.) + +<P> the "field" object was replaced by "template"; see "data.structures" +examples in 7.stuff. Data lists can be read from and written to files now. + +<P> You can invoke an external object by pathname, as in "../../extra/loop~". + +<P> hip~, etc. should no longer get stuck when they get a NAN on input. + +<P> a bug was fixed in expanding symbols such as "$1-foo". + +<BR> <BR> +------------------- 0.29 ----------------- + +<P> readsf~ - a MAX/FTS style soundfile player, which reads multichannel +soundfiles in wave, aiff, or next formats. The files must be 16 or 24 bit +fixed point or 32 bit floating point (only nextstep headers understand the +latter.) You can also override the header. A "skip" flag lets you read +starting anywhere in the file. (Sorry: linux only for now; I can't find +Posix threads packages for the other platforms.) + +<P> soundfiler - support for reading and writing soundfiles (wave, aiff, +nextstep) to and from arrays. Multichannel soundfiles can be read into or +written from several arrays at once. When reading you can ask that the tables +be automatically resized; in any event the object obligingly outputs the number +of samples actually read. When writing you can specify a sub-segment of the +arrays, and/or request that the soundfile's maximum amplitude be normalized to +one. + +<P> tabplay~ - a non-interpolating sample player + +<P> Garry Kling reports having compiled Pd for "yellowdog" linux on Macintosh +computers. One "fix" has been made to s_linux.c to facilitate this. I don't +have access to a Mac running linux at the moment so I can't verify whether +any particular repease of mine actually works there. + +<P> Signal objects now automatically convert scalars to vectors, so that you +can just run a number box into a signal input. One caveat is that the binops +"+~", "-~", "*~", "/~", "max~", "min~" run slightly faster if you give them +an argument to tell them that their right inlet will be scalar; so the +construction "+~ 0" is still meaningful. This will get fixed at some later +date... + +<P> Font sizes work in what I hope will be a more machine-portable way. On +any machine, the point sizes 8, 10, 12, 14, 16, 24 are DEFINED to be the +largest fonts Pd can find that don't exceed their size on my linux machine. +This way I can write patches that everyone else can read, and others will +at least have fewer portability problems than before. The downside is that +your old patches may appear with a different type size than you want; use the +"font" menu item to fix them. + +<P> The OSS support no longer asks the audio driver whether full duplex +is needed; it just tries to open it. Apparently some drivers (such as +ALSA's OSS emulation) might do full duplex but not implement the call Pd +used to query for it. + +<P> You can give "-nomidi" as a flag (previously you had to type "-nomidiin +-nomidiout".) + +<P> A GUI bug reported by Iain Mott was fixed. + +<P> You can now type symbols such as "$3-poodle" and the "$3" portion gets +expanded properly. Someone was also asking about the FTS-style #0 feature, +but I couldn't figure out how to reconcile it with Pd's usage of "$" for "#" +in abstractions. So I'm still searching for a good way to provide local +symbols. + +<P> the GUI now protects itself from "\", "{" and "}" characters by dropping +them. I wonder how many NT users have crashed Pd trying to type in filenames +with backslashes... + +<P> samphold_set and tabwrite_stop methods added. There turned out to be +no help window for samphold~ so one was supplied. + +<BR> <BR> +------------------- 0.28 ----------------- + +<P> Version 0.28 has a primitive in-box text editor... about time! + +<P> the "front panel" now gives you information on audio levels and +sync errors. + +<P> Message boxes flash, sort of, when you click them. + +<P> +Support has been added for RME 9652 soundcards; see the Linux soundcard section of +the documentation. Support files for RME and PCI128 (Ensoniq es1370) cards +are released separately from Pd. + +<P> The delete and backspace keys clear the current selection. There is +unfortunately no "undo" though; I'm not sure this is a good thing to have +put in. + +<P> The "until" object has a "float" method which limits the number of bangs +it will output. + +<P> The audio setup is better documented for NT and Linux. + +<P> The externs in 4.fft and 6.externs got recompiled and tested. + +<P> BUG FIX: the "read16" message to tables was broken on NT and is now fixed. + +<P> BUG FIX: In Linux, starting Pd up sometimes changed the audio mixer +setting. + +<P> BUG FIX: sending "floats" to inlets expecting lists now works correctly. + +<P> BUG FIX: "route" on symbols now deals better with symbols, floats and lists. + +<BR> <BR> +------------------- 0.27 ----------------- +<P> +The main new feature is the "find" menu stuff. You can search for boxes +containing specified atoms, including semicolons or commas. Most errors are +now trackable, allowing you to "find last error". Look in the "Find" menu. + +<P> +New objects written: change, max, max~, min, min~, and swap. + +<P> +I looked in 0.INTRO.txt in 5.reference, and found that the objects +bag, cputime, realtime, pipe, symbol, poly, and bang were missing. + +<P> +Five or six bug fixes. + +<P> +Some audio problems in 0.25 were addresses. In Linux, audio drivers that +don't support the GETISPACE/GETOSPACE ioctl calls can be called using the +(inferior) "-frags/-fragsize" mechanism. If you specify either a "-frags" +or a "-fragsize" option, the GETIOSPACE calls are cancelled. + +<P> +Under NT, for some audio drivers the 0.26 release gave a constant stream of +"resync" events. I don't know what causes this but I added a "-noresync" +option which simply never resyncs at all. + +<BR> <BR> +------------------- 0.26 ----------------- +<P> +phasor~ and osc~ can be configured to take floating point messages to set +their frequencies, as an alternative to having an input signal to do the +same. Also, +~, etc, can take floating point arguments (and messages) to +add or multiply scalars. THe +~, etc, loops were unrolled to make them +run faster. + +<P> +A switch~ object is provided to let you switch sub-patches on and off. The +inlet~ and outlet~ objects were re-written to avoid adding any overhead when +moving signals in or out of sub patches. + +<P> +In Linux at least, the audio latency is much reduced. It's possible to poll +for audio I/O lateness errors by sending "pd audiostatus". + +<P> +When reading a sample using tabread4~, you can switch between sample tables +using the "set" message. + +<P> +A new "textfile" object is like qlist but more flexible. + +<P> +Many help windows got updated (but at least a dozen more need work urgently). + +<P> +A dsp_addv function was added to allow variable-length DSP calls (for writers +of tilde externs.) + +<P> +It's possible for a tilde extern to have a name ending in "tilde" now. Name +the setup routine "foo_tilde" for "foo~", etc. + +<P> +The dac~ object was fixed to clip its output when out of range (before it +wrapped around.) + +<P> +A first line of protection was added against getting numerical underflow +in delay feedback loops. Before, when a reverberator taled out there was +a sudden jump in CPU usage because the numerical underflows would trap to the +kernel. Now, if any delwrite~ is given a value less than 1e-20 or so, it +records a true zero to avoid this. + +<P> +Signal division checks for divide by zero. + +<P> +A "Font bomb" feature is provided for resizing fonts and stretching and +contracting patches to fit. + +<P> +Pds now bind themselves to the symbol pd-<window-name). + +<P> +IN Linux, if Pd is called as root it tries to promote its run-time +priority. You can make pd a setuid root owned program if you want this +behavior for non-root users who start pd. +(Don't make pd-gui setuid though. That would make a security +hole in your system.) + +<P> +The Pd commend line can take multiple "open" arguments. + +<P> +The file search path feature was fixed amd generalized. + +<P> +Alt-clicking a table gives you a dialog to set its x and y range and pixel +size. + +<BR> <BR> +------------------- 0.25 ----------------- +<P> +Lots of minor, under-the-hood improvements and bug fixes... +<P> +The Netsend/netreceive objects were improved; you can now choose between UDP +and TCP and there's an outlet to tell you whether they're connected. +<P> +You can now alt click on an object to get its help window (and the help +windows got a fair amount of work.) +<P> +multichannel audio I/O -- you can get up to 8 audio cnahhelsin and out. +On SGI this is sdone correctly; on NT it's done using sequential "stereo" +devices. I'm not sure of the status of multichannel in linux... +<P> +The "text" window got new accelerators and a bigger font size +<P> +there are 3 "tool" patches in 7.stuff: filtering, pvoc, ring mod. +<P> +In NT, command-line backslashes are converted to forward slashes. +<P> +There's a load measurement tool in the "help" menu. +<P> +The SGI version contains an n32 binary (look at the "bin" directory). + +<BR> <BR> +------------------- 0.24 --------------- +<P> +new objects: +<BR> - bang - convert any message to a "bang" +<BR> - qlist - message sequencer +<BR> - textfile - file to message converter +<BR> - makefilename - format a name with a variable field +<BR> - openpanel - "Open" dialog +<BR> - savepanel - "Save as" dialog +<P> +Bug fixes: +<BR> - Fixed a bug in "const" message to arrays +<BR> - "exp" was broken on NT, now fixed +<BR> - phase vocoder example improved +<BR> - "read" message to arrays now zero out unread samples +<BR> - bug fix in "key" object +<BR> - bug fix in ifft~ (thanks to Peter Lunden) +<BR> - "print" object fixed to distinguish between lists starting with symbols and + other messages +<BR> - polygon, curve, fpolygon, fcurve renamed to fix name clash with Gem +<BR> - improved "new object" placement on screen +<BR> - fixed help dialog to remember previous directory (thanks to Harry Castle) +<BR> - heterogeneous lists +<P> + +Arrays can be written to and read from text files or from 16-bit +binary files. See ../2.starter/2G for an overview. +<P> + +Guenter Geiger has contributed a Max-style "table" object which +creates an "array" object in a subwindow. +<P> + +Guenter has also put in a "search path" feature for externs, abstractions, +etc. +<P> + +The Help menu got reworked. +<P> + +Select and Route were extended to work Zack-style with symbols. +<P> + +"random" takes seeds now (see the "help" window) +<P> + +Some more work on graphical lists; you can see the current state in +../7.stuff/data-structures. It's still nascent. + +------------------- 0.23 ------------------- +<P> +A first cut at the "pure data" feature is now included. See section 6 +of the documentation for a quick introduction to it; see also patches 12 and +14 in the FFT examples. +<P> +The documentation has been reorganized. The most interesting new features are: +<BR> - some new "tutorial" patches +<BR> - 15 "fft" examples +<BR> - improved help navigation +<P> +more bug fixes: +<BR> - titles on abstractions no longer saved inside file +<BR> - left-to-right sorting of inlets/outlets now seems to work +<BR> - nt audio setup got confused when driver couldn't do full duplex +<BR> - opening window with audio on is now fixed +<BR> - deleting inlets/outlets deletes connections first (used to crash) +<BR> - 1e20 parsed correctly now +<BR> - osc1~ fixed and optimized +<BR> - resizing arrays with DSP on used to crash; now fixed +<BR> - pasting now adds to the end of the list (used to add to beginning) +<BR> - clicking now selects the most recent object when two or more overlap +<BR> - Pd's "open" and "help" dialogs now maintain separate paths +<P> +The phasor~ object's "float" method has been REMOVED -- use the right-hand +inlet to set the internal phase. This is so that I can later fix all tilde +objects to convert messages to signals automatically at all signal inputs. + +<BR> <BR> +------------------- 0.22 ------------------- +<BR> +bug fixes +<BR> - parsing 1e+006 gave symbol (now float) +<BR> - "." parsed as number, should be symbol +<BR> - change GUI polling loop to TK event dispatch (unix only) +<BR> - improved "tidy up" feature +<BR> - size check added to text boxes (used to crash; still not correct.) +<BR> - occasional bug sending text with CRs to tk +<BR> - binop startup bug +<BR> - key accelerators for creators wrong +<BR> - ftom range to 1500 +<BR> - bug in pack, unpack +<BR> - windows restore bigger than saved +<BR> +<BR> + +Nt-specific bug fixes: +<BR> - getsockopt for netreceive fails. Just omitted it for NT. +<BR> - put tcl dlls in tcl bin, not pd bin +<BR> --- archive tcl subsystem for easier version updates +<BR> --- fix README accordingly +<BR> - deal with bell sound +<BR> - turn on optimization +<BR> - looked for audio timeout bug but couldn't find it. +<BR> <BR> + +------------------- 0.21 ------------------- + +<P> +bug fixes: + +<P> +table size change with DSP on: It used to crash Pd to resize an array +when DSP was turned on. This is now fixed. + +<P> +deselect all when locking. When you lock a patch the selection is cleared. + +<P> +unlock when pasting. .. and if you paste into a petch, it's unlocked. + +<P> + +lost keyboard events. Version 0.20 lost keyboard events and +forgot window size changes. This should now be fixed. + +<BR> subpatches came up in wrong font size +<BR> dirty flag on window title bar fixed +<BR> improvement to netreceive suggested by Mark Danks +<BR> style notes fleshed out as suggested by Larry Troxler +<BR> fixed Bill Kleinsasser's bug (short and long array in same graph) + +<P> +new features: + +<BR> phase setting for phasor~ +<BR> fft objects. Also, block~, for specifying block sizes and overlaps for FFTs. +<BR> canvas_makefilename() (used, e.g., by array_read and write) +<BR> "stuff" directory with examples of real Pd applications. + +<BR> <BR> +------------------- 0.20 ------------------- + +<P> +In NT, the 0.19 release turned out not to contain all the files needed to make +TCL run. This problem should now be fixed. + +<P> +Also, the array_write routine was fixed. + +<BR> <BR> +------------------- 0.19 ------------------- + +<BR> +notable new objects: + +<BR> +- vcf~, a bandpass filter with a signal input for center frequency. +<BR> +- delread, delwrite, vd, as in ISPW Max. +<BR> +- various math and midi stuff +<BR> +- catch~, throw~, send~, receive~ for nonlocal signal connections +<P> +- an experimental facility for array of floats is included. You can make a new +array (from the "put" menu) which will be given a name such as "array1". You +can then send it "read <file>", "write <file>", "resize <N>", and "print" +messages. File reading and writing is in ascii. "resize" changes the size of +the array, and "print" prints its vital signs. You can then use "tabread4~" +to do a 4-point interpolating table lookup, and tabwrite~ to write audio +samples into the table. +<P> +Numbers now default to floating point, although certain objects like "spigot" +and "metro" still convert their boolean inputs to integers so that 0.5 is +"false." This behavior will probably change later. The "div" and "mod" +objects are introduced for explicit integer division and remainder. +<P> +Number boxes drag in integer increments, or in hundredths if you hold the +"shift" key down when you click. +<P> +Pd documents now save their font sizes. The font size is global to an entire +document. New documents come up in the font size Pd was started in (using +the "-font" flag.) If you want to change the font size of an existing +document, use a text editor; the font size is the last argument on the first +line. 8, 10, 12, 14, 16, 18, and 24 are supported. +<P> +The abbreviations "t," "f," and "i" stand for "trigger,", "float", and "int." +<P> +Inlets and outlets of subpatches are now sorted correctly; although there is +still a problem deleting inlets/outlets which have connections. +<P> +The size and screen location of Pd documents is saved correctly. +<P> +Tilde objects now work in "subpages" although there is no way to send +signals through their inlets and outlets; use throw~/catch~ or send~/receive~. +<P> +On NT, the default is to open both audio output and input (this used not +to work.) The situation is still shaky; audio seems to hang up sporadically +on my machine; but I seem to have installed my audio driver wrong anyway. +I had to set a huge output FIFO (1/3 sec or so!) to get it to work at all. +You can type "pd -dac", "pd -adc", or "pd -nosound" to get output only, +input only, or no audio at all. +NT's MIDI input and output are supported, but on my machine MIDI output is +flaky. I'm curious how all this will work on other machines... +<P> +The list of classes is now: +<P> + +GENERAL: +field inlet outlet print int float send receive select route pack unpack +trigger spigot moses delay metro line timer makenote stripnote random loadbang +serial get netsend netreceive +<P> + +MATH: ++ - * / == != > < >= <= & && | || % +mod div sin cos tan atan atan2 sqrt log exp abs +mtof ftom powtodb rmstodb dbtopow dbtorms +<P> + +MIDI: +notein ctlin pgmin bendin touchin polytouchin noteout ctlout pgmout bendout +touchout polytouchout +<P> + +SIGNAL: +dac~ adc~ sig~ line~ snapshot~ +~ -~ *~ /~ phasor~ cos~ vcf~ noise~ env~ hip~ +lop~ bp~ biquad~ samphold~ clip~ rsqrt~ sqrt~ wrap~ print~ scope~ tabwrite~ +tabread4~ send~ receive~ catch~ throw~ delwrite~ delread~ vd~ + +<BR> <BR> +------------------- 0.18 ------------------- + +<BR> +Release notes now descrie the three platforms Pd runs on: IRIX and +NT (maintained at UCSD) and LINUX, maintained by Guenter Geiger. + +<P> +menu "close" on a dirty document now checks if you really want to close +without saving (although "quit" will still exit Pd without verification.) + +<P> +Got rid of "dll" error printout when loading abstractions + +<BR> <BR> +------------------- 0.12 - 0.17 ------------------- + +<BR> +got Pd running under NT, although driver problems remain. Gem is also +distributed for both platforms. + +<BR> <BR> +------------------- 0.11 ------------------- + +<BR> +Here's a list of all the objects in this release: + +<BR> +general: print int float send receive select pack unpack trigger spigot +<BR> +time handling: delay metro line timer +<BR> +arithmetic: + + - - * * / / == == != != > > < < >= >= <= <= & && | || % +<BR> +midi: notein noteout makenote stripnote +<BR> +other: random get +<BR> +signals: dac~ adc~ sig~ line~ snapshot~ +~ *~ +<BR> +signal oscillators: phasor~ cos~ +<BR> +signal filters: env~ hip~ +<BR> +signal debugging : print~ scope~ +<BR> +<BR> + +"spigot" replaces "gate" but has the inputs reversed. + +<BR> <BR> +------------------- 0.10 ------------------- +<BR> + +Many bug fixes. This was the first pre-release to be put on the FTP site. + +<BR> <BR> +------------------- 0.09 ------------------- + +<BR> set up the "Help" menu +<BR> Bug in DSP sorting fixed +<BR> "Notein" and "noteout" objects +<BR> Comments from the Put menu say "comment" (they were invisible before) +<BR> The scheduler deals better when sound I/O malfunctions + +<BR> <BR> +------------------- 0.08 ------------------- + +<BR> metro bug +<BR> scrollbars +<BR> scheduler bug +<BR> text box wraparound at 80 chars. +<BR> fixed boxes to reconnect on retype + +<BR> <BR> +------------------- 0.07 ------------------- + +<BR> +- made an adc~ object + +<BR> <BR> +------------------- 0.06 ------------------- + +<BR> +- fixed two bugs in DSP sorting +<BR> +- added DSP on/off gui +<BR> +- added lock/unlock and changed the cursor behavior +<BR> +- fixed -font flag to set font pointsize + +<BR> <BR> +------------------- 0.05 ------------------- +<P> +- added scope~, which is just a stopgap until real sound editing comes up. +<BR> +- improved the open panel slightly. +<BR> +- added atoms (int only). +<BR> +- reworked text editing to reside in Pd, not Pd-gui. +<BR> +- included a dbx-debuggable Pd in the distribution. I haven't yet figured + out how to get dbx to work with externs though. + +<BR> <BR> +------------------- 0.04 ------------------- +<P> +fixed "cut" which crashed 0.03 if DSP was running. +added clip~, print~, line~, snapshot~. + + +<BR> <BR> +------------------- 0.03 ------------------- +<P> +"pd dsp 1", "pd dsp 0" messages added. If you edit a patch with DSP on, +PD resorts the DSP network as needed. Unconnected and multiple signal inlets +are allowed. + +<BR> <BR> +------------------- 0.02 ------------------- +<P> +A DSP network mechanism has been added. DSP objects are: +sig~, +~, *~, phasor~, cos~. +<P> +Loading of externs is provided (although there is no search path mechanism +so the extern has to be in the patch's current directory.) Look in +pd/externs for an example. + +<BR> <BR> + +------------------- 0.01. ------------------- +<P> +This first release serves mostly to test the "release" mechanism. A Pd +"canvas" object is provided which does both graphing and patch editing. +The editing features apply only to the Max-like part; the graphs have +to be edited into a Pd file via text editor. +<P> +Four menu items (in the "put" menu) create the four kinds of "patchable" +objects; they can be dragged and connected as in Max; to break a connection, +just click on it (the cursor becomes a turkey to indicate this.) Cut, +paste, and duplicate seem to work, and a "Pd" class offers subwindows. +<P> +The following max-like objects are included: + + print; + +, *, -, /, ==, !=, >, <, >=, <=, &, |, &&, ||, %; + int, float, pack, unpack, trigger; + delay, metro, timer; + send, receive. +<P> ----------------------------------------- + +<H4> <A name=s2> 5.2. known bugs </A> </H4> + +<P> In the list below, starred items are still things needing attention... + +<P> *1. Timing of MIDI input/output is very shaky. Audio I/O is primitive, but +there's at least a way to detect errors now for linux and NT. + +<P> *2. There is no flow control for graphical updates yet; the +real-time process can easily block trying to write too fast to the GUI. + +<P> 3. PD dies if your patch has an infinite loop [fixed in 0.30 release.] + +<P> *4. If you cut a box which is a "Pd" or abstraction whose subpatch has +items selected, Pd dies. + +<P> *5. Tables and other drawable items can draw far outside the window; there's +no sanity check, Huge tables (>1000 points) are only partially drawn +(the first 1000 points.) + +<P> 6. There's no way to order force a delread~ to make it read after +a delwrite~ has written. [but see under 3.audio.examples how to do this now.] + +<P> 7. Pd doesn't know to suspend graphics updates when you minimize objects. +Presumably minimization makes things better but it doesn't cut off graphics +computation entirely as it should. [fixed for 0.34] + +<P> 8. If you load a nonexistent extern you get a spurious message, +"consistency check failed: canvas_setargs". [fixed for 0.27 release.] + +<P> 9. Typing backslashes into objects upsets Tk [0.29 should suppress all +backslashes; a real fix might come later.] + +<P> 10. Never type a dollar sign into a comment; you may have trouble +opening your patch afterward... [fixed somewhere around 0.32] + +<P> *11. You'd better Turn DSP off before you type into a box that currently +holds a "pd" object with tilde objects in the subpatch. + +<P> *12. In Linux, if you hit control C while Pd is opening MIDI, Pd hangs. + +<P> *13. In linux, Pd doesn't report audio data-late errors yet. + +<P> *14. Several objects, notably dac~, adc~, and env~, are incompatible with +uses of block~ or switch~ objects that change block size frmo the default of +64. Using switch~ without reblocking causes no problem. Don't try to +read/write delay lines or use send~/receive~, or throw~/catch~, between +windows with different block sizes. + +<H4> <A name=s3> 5.3. differences from Max/MSP </A> </H4> + +<P> It wasn't anyone's intention to make Pd a Max/MSP clone, but on the +other hand, if there's no reason for a feature to appear differently in +Pd than in Max/MSP, the choices in Pd tend to hew to those in Max/MSP. +Moreover, some effort has been undertaken (but more is needed) to make the +two interoperable. + +<P> You can use Pd to import and export patches to Max/MSP; just save as +text to a file with extension ".pat", and then open it in Pd. You'll at +least get something. If you stick to common or commonizable features +you can actually develop patches for both platforms. + +<P> When specific objects exist on one platform and not on the other, it's +often possible to make abstractions to imitate the missing objects, in a +kind of personalized compatibility library. + +<P> There are, however, differences in semantics you'll want to know about; +a partial list follows. + +<P> <bold> abstraction arguments. </bold> +In Pd you can edit instantiations of abstractions and save the result back +to the file of the abstraction. This isn't possible in Max, because the +instantiations are different from the abstraction itself in that "#1", etc., +are replaced by the instantiation arguments. In Pd, these arguments appear +as "$1", etc, and are translated at a slightly later stage of the instantiation +process so that you still see them as "$" variables in the instantiation. +<A href="x2.htm#s7.1"> (see Section 2.7. abstractions) </A> + +<P> In Pd, to make current all instantiations of the +abstraction, either delete and recreate them or close and open the patch; +this is done automatically in Max/MSP. + +<P> In Pd, if you select "save" while in a subpatch, the parent is saved. In +Max/MSP, if you do this a dialogue box comes up asking if you want to save the +subpatch as a separate file. (if you want to save a subpatch to a file in Pd, +you have to copy and paste the contents to a new document. + +<P> In Pd, inlets and outlets are ordinary text objects; in Max/MSP they're +"gui" objects from the palette. + +<P> In Max/MSP, if an object's outlet is connected to several destinations, +corresponding messages are always sent in right-to-left screen order. In +Pd, the messages are sent in the order you made the connections in. In either +case, in situations where you care about the order it's appropriate to use +a "trigger" object to specify. + +<P> In Pd, there's no "gate"; instead it's "spigot" with the inlets in the +opposite, more natural order. + +<P> Switching subsets of the DSP patch on and off is done in completely +different ways in Pd and Max/MSP, and block sizes are handled differently as +well. + +<P> Max offers many "GUI" objects such as sliders, dials, VU meters, piano +keyboards, even "bpatchers." Until version 0.34, the only two in Pd were the +number box and graphical arrays. Starting in version 0.34, Pd incorporates +Thomas Musil's GUI objects: sliders, switches, and so on. (Thanks Thomas!) +Beyond this essential collection of GUI objects, it's unlikely you'll ever find +any commonality between the two. Also, as of 0.34, importing and exporting to +Max doesn't know about the Musil objects; I'll try to get that fixed for 0.35. + +<P> In Pd there's no "preset" object (I now think it's basically a bad idea) +and you have to use explicit sends and receives to restore values to number +boxes. Then just make a "message" box to re-send the values you want. + +<P> In Macintosh land, instead of getting tabosc4~ and arrays, you get cycle~ +and buffer~. The only gotcha is that you probably can't draw in buffer~ with +the mouse as you can with arrays, but at least it's possible to +make a patch that copies a "table" into a "buffer~". + +<P> The "bpatcher" feature in Max has a correlate, "graph on parent" subpatches, +in Pd; however, Pd's version is quite different from Max's. + +</BODY> +</HTML> diff --git a/pd/doc/2.control.examples/00.INTRO.txt b/pd/doc/2.control.examples/00.INTRO.txt new file mode 100644 index 00000000..c799044d --- /dev/null +++ b/pd/doc/2.control.examples/00.INTRO.txt @@ -0,0 +1,19 @@ +This series of patches serves as a tutorial for Pd's "control" structure, as +opposed to its audio functions (covered in the next series.) These tutorials +are inspired by Chris Dobrian's Max tutorial patches. + +It's probably best to look at the first section here before going on to the +audio portion, but afterward there's no reason not to browse back and forth +between the two, and even the third series on "fft" based techniques. + +The relationship between "control" and "audio" is described in Pd's HTML +documentation, which is more like a reference manual than an introduction. +Also, you probably will need to look there to get Pd up and running stably so +that you can enjoy the patches here. + +The patches are roughly divided as shown: + +1. objects and connections +2. subpatches, tables, and organization +3. specific techniques. + diff --git a/pd/doc/2.control.examples/01.PART1.hello.pd b/pd/doc/2.control.examples/01.PART1.hello.pd new file mode 100644 index 00000000..e0a4daf1 --- /dev/null +++ b/pd/doc/2.control.examples/01.PART1.hello.pd @@ -0,0 +1,16 @@ +#N canvas 9 21 600 496 12; +#X msg 204 32 hello world; +#X obj 204 105 print; +#X floatatom 321 32 0 0 0; +#X text 215 48 message; +#X text 319 49 atom; +#X text 201 123 object; +#X text 53 150 There are four types of text objects in Pd: message \, atom \, object \, and comment.; +#X text 54 187 Messages respond to mouse clicks by sending their contents to one or more destinations. The usual destination is the "outlet" at the lower left corner of the box.; +#X text 55 239 Click the message box and watch the terminal window Pd was started in. You should see the "hello world" message appear.; +#X text 55 278 Atoms respond to "Dragging" up and down with the mouse \, by changing their contents and sending the result out their outlets. You can also type at an atom after clicking on it \; hit "enter" to output the number or click anywhere else to cancel.; +#X text 52 359 Objects \, like "print" above \, may have all sorts of functions depending on what's typed into them. The "print" object simply prints out every message it receives.; +#X text 53 415 To get help on an object \, right-click it. You should see a "help window" for the object.; +#X text 354 470 updated for release 0.33; +#X connect 0 0 1 0; +#X connect 2 0 1 0; diff --git a/pd/doc/2.control.examples/02.editing.pd b/pd/doc/2.control.examples/02.editing.pd new file mode 100644 index 00000000..a2442ee8 --- /dev/null +++ b/pd/doc/2.control.examples/02.editing.pd @@ -0,0 +1,17 @@ +#N canvas 1 0 581 630 12; +#X msg 195 36 hello world; +#X obj 195 72 print; +#X floatatom 304 36 0 0 0; +#X text 194 15 message; +#X text 304 14 atom; +#X text 255 73 object; +#X text 34 102 When you first open a Pd document like this one \, your cursor will be an arrow. Select "edit mode" in the Edit menu and the cursor will change to the image of a hand. The patch is now in edit mode. You can move any object by dragging it.; +#X text 33 185 Select "Edit mode" again in the Edit menu and you're back to the arrow cursor which acts on objects without moving them.; +#X text 32 373 You can create new objects by duplicating existing ones using the "duplicate" menu item. You can also "cut" and "paste" them. If you duplicate several connected objects the connections will be replicated too.; +#X text 33 237 In Edit mode \, if you click on a message \, object \, or comment \, you can then retype the text. For objects this will create a new object and delete the old one. Pd will try to reconnect the newly created object in the same way as the old one.; +#X text 34 442 Edit mode also lets you make and break connections between objects. Put the "hand" cursor over a line connecting two objects: it turns into an X. Clicking will delete the connection. Hold the cursor over an outlet and it becomes a circle (a patch point). Drag to any box and release \; you will be connected to the nearest inlet.; +#X text 32 320 When you're done changing the contents of the box \, click outside the box to deselect it. This tells Pd to incorporate the new text.; +#X text 328 604 updated for Pd version 0.33; +#X text 35 544 The "put" menu creates new text items of any of the four types. You can also put a "symbol" box \, analogous to a number box but for showing and entering text strings.; +#X connect 0 0 1 0; +#X connect 2 0 1 0; diff --git a/pd/doc/2.control.examples/03.connections.pd b/pd/doc/2.control.examples/03.connections.pd new file mode 100644 index 00000000..3cde81fa --- /dev/null +++ b/pd/doc/2.control.examples/03.connections.pd @@ -0,0 +1,58 @@ +#N canvas 185 28 660 552 12; +#X floatatom 76 400 0 0 0; +#X floatatom 189 401 0 0 0; +#X floatatom 76 307 0 0 0; +#X floatatom 553 161 0 0 0; +#X floatatom 599 162 0 0 0; +#X obj 553 135 +; +#X floatatom 553 105 0 0 0; +#X obj 599 136 +; +#X text 114 16 In Pd \, most objects carry out their functions when +they get messages in their rightmost inlets \, and their other inlets +are for storing values that can modify the next action. Here \, the +"+" object does its thing only when the left-hand input changes.; +#X floatatom 26 109 0 0 0; +#X floatatom 26 17 0 0 0; +#X floatatom 48 41 0 0 0; +#X obj 26 85 +; +#X text 3 64 hot; +#X text 53 66 cold; +#X text 232 105 Here's the downside: drag this--->; +#X text 551 180 good; +#X text 600 181 bad; +#X obj 76 376 *; +#X obj 189 377 -; +#X text 15 400 square; +#X text 229 402 first difference; +#X obj 76 330 trigger float float; +#X text 412 526 updated for Pd version 0.33; +#X text 19 433 Trigger takes any number of "bang" and "float" arguments +(among others) and copies its input to its outlets \, in the requested +forms \, in right-to-left order. Hook it to two inputs without crossing +the wires and you get the expected result. Cross the wires and you +get a memory effect.; +#X text 9 136 In Pd you must sometimes think about what order an object +is going to get its messages in. If an outlet is connected to more +than one inlet it's undefined which inlet will get the cookie first. +I've rigged this example so that the left-hand side box gets its inputs +in the good \, right-to-left order \, so that the hot inlet gets hit +when all the data are good. The "bad adder" happens to receive its +inputs in the wrong order and is perpetually doing its addition before +all the data are in. There's an object that exists solely to allow +you to control message order explicitly:; +#X connect 2 0 22 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 6 0 5 1; +#X connect 6 0 5 0; +#X connect 7 0 4 0; +#X connect 10 0 12 0; +#X connect 11 0 12 1; +#X connect 12 0 9 0; +#X connect 18 0 0 0; +#X connect 19 0 1 0; +#X connect 22 0 18 0; +#X connect 22 0 19 1; +#X connect 22 1 18 1; +#X connect 22 1 19 0; diff --git a/pd/doc/2.control.examples/04.messages.pd b/pd/doc/2.control.examples/04.messages.pd new file mode 100644 index 00000000..a56dd92b --- /dev/null +++ b/pd/doc/2.control.examples/04.messages.pd @@ -0,0 +1,35 @@ +#N canvas 0 0 591 442 12; +#X floatatom 225 110 0 0 0; +#X floatatom 184 109 0 0 0; +#X msg 184 56 5 6; +#X floatatom 132 108 0 0 0; +#X floatatom 64 105 0 0 0; +#X text 30 21 Most Pd messages are just numbers or short lists of numbers:; +#X msg 64 55 5; +#X obj 64 80 + 9; +#X obj 132 83 +; +#X obj 184 84 unpack; +#X msg 288 55 5; +#X obj 288 107 print; +#X obj 288 81 pack 34 78; +#X msg 132 55 5 6; +#X floatatom 195 328 0 0 0; +#X obj 195 303 +; +#X msg 195 254 1.2 3.4; +#X msg 205 277 5 6; +#X text 36 206 Unlike Max \, in Pd all numbers are floating point. Numbers whose values happen to be integers are displayed without decimal points.; +#X text 31 363 For more on messages \, get help on any message box by right-clicking.; +#X text 329 409 updated for Pd release 0.33; +#X text 34 149 If you send a list to an object with more than one inlet \, the items in the list are spread out over the inlets \, as seen in the 5+6 example above.; +#X connect 2 0 9 0; +#X connect 6 0 7 0; +#X connect 7 0 4 0; +#X connect 8 0 3 0; +#X connect 9 0 1 0; +#X connect 9 1 0 0; +#X connect 10 0 12 0; +#X connect 12 0 11 0; +#X connect 13 0 8 0; +#X connect 15 0 14 0; +#X connect 16 0 15 0; +#X connect 17 0 15 0; diff --git a/pd/doc/2.control.examples/05.counter.pd b/pd/doc/2.control.examples/05.counter.pd new file mode 100644 index 00000000..14c48dea --- /dev/null +++ b/pd/doc/2.control.examples/05.counter.pd @@ -0,0 +1,45 @@ +#N canvas 0 0 685 496 12; +#X floatatom 107 424 0 0 0; +#X msg 53 344 bang; +#X obj 107 399 + 1; +#X obj 376 262 + 1; +#X floatatom 152 197 0 0 0; +#X floatatom 108 245 0 0 0; +#X msg 108 196 bang; +#X floatatom 169 107 0 0 0; +#X msg 112 58 bang; +#X obj 169 82 + 1; +#X text 31 21 Here's a simple counter. Click repeatedly on the "bang +message to see it:; +#X text 422 263 to its cold inlet.; +#X text 25 284 The incremented value is stored for the next "bang" +to spit out.; +#X text 28 322 Here's a timed counter. Hit the "bang" to start it... +; +#X obj 53 373 metro 500; +#X msg 99 344 stop; +#X obj 112 83 float; +#X text 28 132 The "float" box is a storage element holding one floating-point +number. The cold inlet (i.e. \, the one on the right) stores numbers. +Sending the message "bang" to the hot inlet gets the number back out: +; +#X obj 108 221 float; +#X obj 53 399 float; +#X text 25 263 Float's outlet above is connected via; +#X text 384 462 updated for Pd version 0.34; +#X text 142 373 <-- new object: metronome. The "500" means every 500 +milliseconds--i.e. \, twice a second.; +#X connect 1 0 14 0; +#X connect 2 0 0 0; +#X connect 2 0 19 1; +#X connect 4 0 18 1; +#X connect 6 0 18 0; +#X connect 8 0 16 0; +#X connect 9 0 7 0; +#X connect 9 0 16 1; +#X connect 14 0 19 0; +#X connect 15 0 14 0; +#X connect 15 0 14 0; +#X connect 16 0 9 0; +#X connect 18 0 5 0; +#X connect 19 0 2 0; diff --git a/pd/doc/2.control.examples/06.more.counters.pd b/pd/doc/2.control.examples/06.more.counters.pd new file mode 100644 index 00000000..e0ef3c40 --- /dev/null +++ b/pd/doc/2.control.examples/06.more.counters.pd @@ -0,0 +1,55 @@ +#N canvas 8 0 659 487 12; +#X floatatom 147 177 0 0 0; +#X obj 147 151 + 1; +#X msg 147 47 bang; +#X obj 147 99 metro 500; +#X msg 56 105 stop; +#X obj 147 125 float; +#X obj 147 73 trigger bang bang; +#X msg 261 105 0; +#X obj 56 79 select 10; +#X text 305 102 first set value to zero; +#X text 304 73 initialization is in two steps; +#X text 305 121 (before starting the metronome); +#X text 9 128 conditionally; +#X text 9 145 stop the; +#X text 10 159 metronome; +#X text 184 46 <--- click here to start; +#X floatatom 85 289 0 0 0; +#X obj 85 315 >= 0; +#X obj 85 341 select 0 1; +#X obj 85 393 float; +#X floatatom 139 420 0 0 0; +#X msg 119 367 bang; +#X obj 139 394 + 1; +#X msg 85 367 -1; +#X text 131 313 <-- are we nonnegative? (1 if true \, 0 if false); +#X text 180 340 <-- selectively bang the first or second outlet; +#X text 167 363 <-- as a result either clear or increment the counter +; +#X text 32 11 Here's a counter that counts from 1 to 10:; +#X text 392 452 updated for Pd version 0.34; +#X text 33 200 We're using one new object \, "select \, " which outputs +a bang when it gets a matching value (10). This is useful for doing +conditional computations \, such as this one which counts while its +input is 0 or positive but clears when negative:; +#X connect 1 0 0 0; +#X connect 1 0 5 1; +#X connect 1 0 8 0; +#X connect 2 0 6 0; +#X connect 3 0 5 0; +#X connect 4 0 3 0; +#X connect 5 0 1 0; +#X connect 6 0 3 0; +#X connect 6 1 7 0; +#X connect 7 0 5 1; +#X connect 8 0 4 0; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 18 0 23 0; +#X connect 18 1 21 0; +#X connect 19 0 22 0; +#X connect 21 0 19 0; +#X connect 22 0 19 1; +#X connect 22 0 20 0; +#X connect 23 0 19 0; diff --git a/pd/doc/2.control.examples/07.time.pd b/pd/doc/2.control.examples/07.time.pd new file mode 100644 index 00000000..69398bd9 --- /dev/null +++ b/pd/doc/2.control.examples/07.time.pd @@ -0,0 +1,39 @@ +#N canvas 0 0 724 474 12; +#X text 34 13 Besides the metronome \, there are three objects for +dealing with time:; +#X obj 64 117 print; +#X msg 64 59 bang; +#X msg 110 61 stop; +#X obj 64 89 delay 2000; +#X text 161 44 The delay objects sechedules an event for a future time +expressed in milliseconds. Unlike in Max \, time values need not be +integers. If a delay has been scheduled and you "bang" it again \, +it is rescheduled (the previously scheduled output is cancelled.); +#X msg 76 190 bang; +#X obj 76 237 timer; +#X text 160 117 The right inlet can be used to set the time value without +scheduling any output.; +#X text 35 156 The timer \, shown below \, measures the time elapsed +between its left and right inlets:; +#X obj 106 212 delay 123.45; +#X floatatom 76 262 0 0 0; +#X text 29 287 Note that all time calculations are idealized \; they +do not show the effects of computation time or OS latency. This way +you can write deterministic algorithms dealing with time passage.; +#X obj 74 385 pipe 2000; +#X floatatom 74 358 0 0 0; +#X floatatom 74 411 0 0 0; +#X text 165 359 The pipe object allocates memory dynamically in order +to schedule any number of delayed events. The events may hold any collection +of data (as usual \, for more details you can consult the help window.) +; +#X text 442 440 updated for Pd version 0.34; +#X connect 2 0 4 0; +#X connect 3 0 4 0; +#X connect 4 0 1 0; +#X connect 6 0 7 0; +#X connect 6 0 10 0; +#X connect 7 0 11 0; +#X connect 10 0 7 1; +#X connect 13 0 15 0; +#X connect 14 0 13 0; diff --git a/pd/doc/2.control.examples/08.depthfirst.pd b/pd/doc/2.control.examples/08.depthfirst.pd new file mode 100644 index 00000000..8820d226 --- /dev/null +++ b/pd/doc/2.control.examples/08.depthfirst.pd @@ -0,0 +1,48 @@ +#N canvas 144 162 632 551 12; +#X msg 64 51 1; +#X obj 89 150 + 1; +#X obj 209 187 print x1; +#X obj 64 209 print x3; +#X obj 114 122 print x2; +#X obj 209 100 + 1; +#X obj 209 129 + 1; +#X obj 209 158 + 1; +#X obj 64 80 t f f f f; +#X obj 89 179 print x2; +#X text 34 13 In Pd \, message passing is depth first \, so that in +this patch:; +#X text 104 51 <-- click here; +#X text 17 243 ... you get "x1" first \, notwidthstanding the fact +that "x2" and "x3" appear to be closer to the source. This means that +you shouldn't do this:; +#X msg 76 304 1; +#X text 116 304 <-- maybe you shouldn't click here; +#X obj 115 334 + 1; +#X obj 76 333 f; +#X floatatom 76 365 0 0 0; +#X text 377 520 updated for Pd version 0.34; +#X text 35 393 ... because the "depth" is infinite. The counters you've +seen always have the message chain terminated somewhere in a cold inlet: +; +#X msg 75 453 1; +#X obj 114 483 + 1; +#X obj 75 482 f; +#X floatatom 75 514 0 0 0; +#X text 115 453 <-- better; +#X connect 0 0 8 0; +#X connect 1 0 9 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 3 0; +#X connect 8 1 1 0; +#X connect 8 2 4 0; +#X connect 8 3 5 0; +#X connect 13 0 16 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 16 0 15 0; +#X connect 20 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 21 0; diff --git a/pd/doc/2.control.examples/09.send_receive.pd b/pd/doc/2.control.examples/09.send_receive.pd new file mode 100644 index 00000000..374a74b5 --- /dev/null +++ b/pd/doc/2.control.examples/09.send_receive.pd @@ -0,0 +1,35 @@ +#N canvas 136 31 738 479 12; +#X floatatom 88 199 0 0 0; +#X obj 88 172 receive crackers; +#X floatatom 248 204 0 0 0; +#X obj 248 177 receive pickles; +#X obj 88 145 send crackers; +#X obj 250 139 send pickles; +#X obj 389 138 send pickles; +#X floatatom 392 203 0 0 0; +#X obj 392 176 receive pickles; +#X msg 51 306 \; pickles 99 \; crackers 56; +#X floatatom 88 118 0 0 0; +#X floatatom 250 112 0 0 0; +#X floatatom 389 111 0 0 0; +#X obj 371 404 r crackers; +#X obj 371 377 s crackers; +#X text 39 392 send and receive can be abbreviated:; +#X text 48 245 You can use the semicolon feature of message boxes to +address receives \, too. This is useful if you want to do a whole list +of things:; +#X text 166 305 The transaction takes place in zero time---i.e. \, +if you tried to use "timer" to measure the time delay between the two +\, you would get zero.; +#X text 459 447 updated for Pd version 0.34; +#X text 51 6 The send and receive objects allow you to make non-local +connections. These work globally--you can use them to make two different +patches intercommunicate if you wish. Any message a "send" gets appears +at the output of every receive of the same name. There can be any number +of sends and receives sharing the same name:; +#X connect 1 0 0 0; +#X connect 3 0 2 0; +#X connect 8 0 7 0; +#X connect 10 0 4 0; +#X connect 11 0 5 0; +#X connect 12 0 6 0; diff --git a/pd/doc/2.control.examples/10.more.messages.pd b/pd/doc/2.control.examples/10.more.messages.pd new file mode 100644 index 00000000..7f0c8539 --- /dev/null +++ b/pd/doc/2.control.examples/10.more.messages.pd @@ -0,0 +1,56 @@ +#N canvas 91 95 675 539 12; +#X obj 211 341 print; +#X msg 52 89 3 \, 4 \, 5; +#X msg 44 62 3 4 5; +#X msg 57 313 3 \$1 5; +#X floatatom 57 286 4 0 0; +#X msg 211 315 \$2 \$1 5; +#X msg 211 290 45 67; +#X msg 289 290 45 67; +#X floatatom 28 425 4 0 0; +#X floatatom 76 425 4 0 0; +#X floatatom 332 179 4 0 0; +#X floatatom 186 182 4 0 0; +#X obj 186 155 receive number9; +#X obj 332 155 receive 9bis; +#X obj 44 178 print; +#X text 27 5 In addition to using semicolons to separate messages \, +you can use commas \, which continue a stream of messages to the same +destination. Thus:; +#X msg 65 116 3 \; number9 5 \; 9bis 45; +#X text 126 89 <-- three separate messages; +#X text 109 58 <-- one message: the list \, "3 4 5".; +#X text 167 114 <-- three separate messages \, with three destinations. +; +#X text 406 511 updated for Pd version 0.34; +#X msg 289 315 \; number9 \$1 \; 9bis \$2; +#X text 9 209 You can use "$1" \, etc. \, as variables in messages. +Send the message box a list whose elements supply the values. A number +is just a list with one element.; +#X obj 57 339 print; +#X text 51 265 one variable:; +#X text 216 263 two variables:; +#X text 1 367 But to really exploit the possibilities using multiple +variables \, you will need the "pack" object to get two or more values +into the same message:; +#X obj 28 507 print; +#X obj 28 455 pack 0 0 0; +#X floatatom 124 425 4 0 0; +#X msg 28 481 cis \$1 \, boom \$2 \, bah \$3; +#X text 124 455 <-- creation arguments to "pack" set the number of +inlets.; +#X connect 1 0 14 0; +#X connect 2 0 14 0; +#X connect 3 0 23 0; +#X connect 4 0 3 0; +#X connect 5 0 0 0; +#X connect 6 0 5 0; +#X connect 7 0 21 0; +#X connect 8 0 28 0; +#X connect 9 0 28 1; +#X connect 12 0 11 0; +#X connect 13 0 10 0; +#X connect 16 0 14 0; +#X connect 28 0 30 0; +#X connect 29 0 28 2; +#X connect 30 0 27 0; diff --git a/pd/doc/2.control.examples/11.review.pd b/pd/doc/2.control.examples/11.review.pd new file mode 100644 index 00000000..9e5b6c95 --- /dev/null +++ b/pd/doc/2.control.examples/11.review.pd @@ -0,0 +1,42 @@ +#N canvas 255 248 675 539 12; +#X text 406 511 updated for Pd version 0.34; +#X obj 39 232 receive; +#X obj 39 203 send; +#X obj 39 289 pack; +#X obj 111 233 r; +#X obj 82 203 s; +#X obj 40 348 timer; +#X obj 40 60 float; +#X obj 39 175 select; +#X obj 40 89 +; +#X obj 40 117 >=; +#X obj 39 146 print; +#X obj 39 260 trigger; +#X obj 95 61 f; +#X obj 100 176 sel; +#X obj 111 259 t; +#X obj 39 318 unpack; +#X obj 40 435 pipe; +#X obj 40 377 delay; +#X obj 40 406 metro; +#X text 20 8 So far we've seen the following objects \, some of which +have abbreviations. Right click on any one to get reference documentation: +; +#X text 150 205 wireless message send; +#X text 151 229 wireless message receive; +#X text 145 175 test for two equal numbers; +#X text 151 258 control message order and format; +#X text 148 293 combine atoms (e.g. \, numbers) into a list; +#X text 146 319 take a list apart into atoms; +#X text 146 146 printout; +#X text 147 90 arithmetic; +#X text 75 89 (etc.); +#X text 74 117 (etc.); +#X text 145 117 comparison; +#X text 145 60 store a number; +#X text 145 348 measure elapsed time; +#X text 145 379 pass a message after delay; +#X text 145 437 multiple delay; +#X text 143 409 repeated message; +#X text 38 473 There are many others... you can see a complete list +in INTRO.txt in the reference patches (../5.reference).; diff --git a/pd/doc/2.control.examples/12.PART2.subpatch.pd b/pd/doc/2.control.examples/12.PART2.subpatch.pd new file mode 100644 index 00000000..5bd40306 --- /dev/null +++ b/pd/doc/2.control.examples/12.PART2.subpatch.pd @@ -0,0 +1,72 @@ +#N canvas 84 47 648 623 12; +#X msg 29 318 bang; +#X floatatom 432 341 0 0 0; +#X text 32 14 You can nest entire windows inside Pd boxes (and so on +\, as deep as you wish.) There are two different ways to do it. First +\, if you just want to add a room to the house \, so to speak \, type +; +#N canvas 344 151 422 119 sample-subpatch 1; +#X text 39 43 this is a subpatch of the main patch.; +#X restore 29 85 pd sample-subpatch; +#X text 201 85 <-- you can give the window a name as an argument; +#N canvas 0 0 654 340 eager-adder 0; +#X obj 62 73 inlet; +#X obj 118 73 inlet; +#X obj 62 188 outlet; +#X obj 118 101 t b f; +#X obj 62 156 +; +#X text 197 23 this is a sample subpatch which maintains the sum of +two inputs \, doing the computation when either input changes. IF it's +the left input \, the "+" object takes care if it \; if the right \, +the "trigger" object first gives the "+" the new value \, then "bangs" +the right inlet to make "+" do the computation.; +#X text 55 232 Aside: this shows why \, in Pd and Max \, objects such +as "+" only trigger on their left inlets: it's easy to build up from +there \, but if more than one inlet were "hot" \, you wouldn't be able +to change both of them without firing the calculation twice.; +#X text 197 112 Because of the two inlets and the one outlet \, the +containing box (int eh parent patch) has two inlets and one outlet. +They respect the left-to-right order of the inlet and outlet objects +in the subpatch.; +#X connect 0 0 4 0; +#X connect 1 0 3 0; +#X connect 3 0 4 0; +#X connect 3 1 4 1; +#X connect 4 0 2 0; +#X restore 135 185 pd eager-adder; +#X floatatom 135 158 0 0 0; +#X floatatom 256 158 0 0 0; +#X floatatom 135 213 0 0 0; +#X text 26 235 There is also a facility for making many copies of a +patch which track any changes you make in the original. The subpatches +are called abstractions. For example \, here's a simple abstraction +that sends a number to a "receive" on command:; +#X obj 29 342 sendnumber 45 cookies; +#X msg 226 314 bang; +#X obj 226 341 sendnumber 67 pretzels; +#X floatatom 519 341 0 0 0; +#X text 27 553 note that "$1" \, etc \, has a different meaning in +object boxes (open one of the "sendnumber" abstractions for comments.) +; +#X text 26 470 If you change one copy of an abstraction the change +isn't automatically made on any other copies. You must keep track \, +save the changes \, and cause Pd to reload the other copies (for example +\, by closing and reopening the containing patch.); +#X obj 432 314 r cookies; +#X obj 519 314 r pretzels; +#X text 31 107 If you click on the box (in run mode) the subwindow +appears. Click on the one below to see how you give a subpatch inlets +and outlets.; +#X text 332 594 updated for Pd version 0.34; +#X text 27 372 There is a separate file in this directory named "sendnumber.pd" +which is loaded every time you type "sendnumber" in a box. Click on +a "sendnumber" box above to see it. You can make changes in the subpatch +and save them. The changes will be saved back to sendnumber.pd and +not as part of this (containing) patch.; +#X connect 0 0 10 0; +#X connect 5 0 8 0; +#X connect 6 0 5 0; +#X connect 7 0 5 1; +#X connect 11 0 12 0; +#X connect 16 0 1 0; +#X connect 17 0 13 0; diff --git a/pd/doc/2.control.examples/13.locality.pd b/pd/doc/2.control.examples/13.locality.pd new file mode 100644 index 00000000..6203ad98 --- /dev/null +++ b/pd/doc/2.control.examples/13.locality.pd @@ -0,0 +1,27 @@ +#N canvas 24 192 606 297 12; +#X floatatom 38 223 0 0 0; +#X floatatom 191 221 0 0 0; +#X text 356 264 updated for Pd version 0.34; +#X text 32 14 You can use dollarsigns in abstractions to get local +sends and receives as shown here.; +#X obj 29 85 dollarsign one; +#X obj 167 86 dollarsign two; +#X obj 38 196 r one-a; +#X obj 191 194 r two-a; +#X floatatom 110 225 0 0 0; +#X floatatom 264 220 0 0 0; +#X obj 110 197 r one-b; +#X obj 264 191 r two-b; +#X text 26 112 Open both copies to see what's happening...; +#X floatatom 29 59 0 0 0; +#X floatatom 124 58 0 0 0; +#X floatatom 167 60 0 0 0; +#X floatatom 264 58 0 0 0; +#X connect 6 0 0 0; +#X connect 7 0 1 0; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 13 0 4 0; +#X connect 14 0 4 1; +#X connect 15 0 5 0; +#X connect 16 0 5 1; diff --git a/pd/doc/2.control.examples/14.dollarsigns.pd b/pd/doc/2.control.examples/14.dollarsigns.pd new file mode 100644 index 00000000..c4b6eee3 --- /dev/null +++ b/pd/doc/2.control.examples/14.dollarsigns.pd @@ -0,0 +1,5 @@ +#N canvas 12 363 561 155 12; +#X text 303 114 updated for Pd version 0.34; +#X obj 34 68 dollarsign2 three 4; +#X text 32 14 An abstraction's creation arguments may be either numbers +or symbols. Gory details are inside:; diff --git a/pd/doc/2.control.examples/15.array.pd b/pd/doc/2.control.examples/15.array.pd new file mode 100644 index 00000000..da054b1e --- /dev/null +++ b/pd/doc/2.control.examples/15.array.pd @@ -0,0 +1,70 @@ +#N canvas 268 28 1030 744 12; +#X text 204 19 ARRAYS; +#N canvas 0 0 450 300 graph1 0; +#X array array99 100 float 0; +#X coords 0 1 99 -1 400 300 1; +#X restore 614 49 graph; +#X msg 179 325 \; array99 resize \$1; +#X floatatom 179 292 0 0 0; +#X floatatom 21 260 0 0 0; +#X obj 21 294 / 100; +#X msg 21 324 \; array99 const \$1; +#X text 22 233 You can send messages to an array object:; +#X msg 341 325 \; array99 print; +#X text 64 262 <-- set to a constant value; +#X text 221 291 resize; +#X text 342 286 print size; +#X text 22 487 read a text file; +#X text 23 558 write a text file; +#X text 271 559 write a WAV format soundfile; +#X obj 104 714 tabread; +#X obj 255 714 tabwrite; +#X text 20 665 Objects are provided for reading and writing the contents +of arrays via control messages:; +#X obj 602 654 tabread4~; +#X obj 602 679 tabwrite~; +#X obj 695 654 tabreceive~; +#X text 593 601 ...and audio signals:; +#X obj 695 630 tabsend~; +#X msg 381 400 \; array99 normalize; +#X msg 382 442 \; array99 normalize 0.5; +#X text 375 378 normalize to 1 or otherwise; +#X obj 266 537 soundfiler; +#X obj 812 631 tabosc4~; +#X msg 19 402 \; array99 sinesum 64 0.2 0.2 0.2 0.2; +#X msg 19 444 \; array99 cosinesum 64 0.2 0.2 0.2 0.2; +#X text 23 378 Fourier synthesis (resizes table); +#X text 257 484 read a soundfile; +#X text 735 698 last updated for release 0.34; +#X obj 175 715 tabread4; +#X obj 602 628 tabread~; +#X msg 267 511 read ../sound/voice2.wav array99; +#X text 19 47 Arrays in Pd provide a unified way to deal with lists +of numbers \, treating them as either audio samples or for "control" +uses. To make one \, select "array" on the "new" menu. Dialogs appear +to help you choose the name \, number of elements \, and various flags. +; +#X text 17 134 You can also change the array size using the "resize" +message shown below. Arrays live in graphs and graphs may hold more +than one array--however \, graphs containing more than one array won't +know how to readjust themselves automatically when the arrays are resized. +; +#X msg 15 507 \; array99 read 15.file.txt; +#X obj 26 581 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 26 600 savepanel; +#X msg 26 623 \; array99 write \$1; +#X obj 270 577 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 270 596 savepanel; +#X obj 270 642 soundfiler; +#X msg 270 619 write \$1 array99; +#X connect 3 0 2 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 35 0 26 0; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 42 0 43 0; +#X connect 43 0 45 0; +#X connect 45 0 44 0; diff --git a/pd/doc/2.control.examples/15.file.txt b/pd/doc/2.control.examples/15.file.txt new file mode 100644 index 00000000..6fc963dd --- /dev/null +++ b/pd/doc/2.control.examples/15.file.txt @@ -0,0 +1,2 @@ +0.3 +-0.6 -0.2 0.8 0 diff --git a/pd/doc/2.control.examples/16.more.arrays.pd b/pd/doc/2.control.examples/16.more.arrays.pd new file mode 100644 index 00000000..cf9eacc1 --- /dev/null +++ b/pd/doc/2.control.examples/16.more.arrays.pd @@ -0,0 +1,23 @@ +#N canvas 19 83 830 601 12; +#X graph graph1 0 -1 5 1 569 304 769 154; +#X array array99 5 float; +#X array array98 7 float; +#X pop; +#X text 135 18 MORE ON ARRAYS; +#X msg 17 229 \; array99 rename george; +#X msg 221 229 \; george rename array99; +#X msg 317 166 \; array99 3 -0.5 0.5; +#X text 17 207 renaming an array:; +#X text 16 276 setting the bounds rectangle:; +#X msg 18 296 \; array99 bounds 0 -2 10 2; +#X msg 245 294 \; array99 bounds 0 -1 5 1; +#X msg 19 395 \; array99 xticks 0 1 1; +#X msg 212 394 \; array99 yticks 0 0.1 5; +#X text 15 342 adding x and y labels: give a point to put a tick \, the interval between ticks \, and the number of ticks overall per large tick.; +#X msg 15 472 \; array99 xlabel -1.1 0 1 2 3 4 5; +#X text 12 436 adding labels. Give a y value and a bunch of x values or vice versa:; +#X msg 17 166 \; array98 0 -1 1 -1 1 -1 1 -1 1 -1; +#X msg 305 472 \; array99 ylabel 5.15 -1 0 1; +#X text 556 575 last updated for release 0.33; +#X text 10 39 Arrays have methods to set their values explicitly \; to set their "bounds" rectangles \, to rename them (but if you have two with the same name this won't necessarily do what you want) and to add markings. To set values by message \, send a list whise first element gives the index to start at. The second example sets two values starting at index three. Indices count up from zero.; +#X text 11 522 You can also change x and y range and size in the "properties" dialog. Note that information about size and ranges is saved \, but ticks \, labels \, and the actual data are lost between Pd sessions.; diff --git a/pd/doc/2.control.examples/17.PART3.midi.pd b/pd/doc/2.control.examples/17.PART3.midi.pd new file mode 100644 index 00000000..b2467cd9 --- /dev/null +++ b/pd/doc/2.control.examples/17.PART3.midi.pd @@ -0,0 +1,35 @@ +#N canvas 47 52 517 445 12; +#X floatatom 108 89 0 0 0; +#X floatatom 72 89 0 0 0; +#X obj 36 62 notein; +#X floatatom 36 88 0 0 0; +#X floatatom 228 91 0 0 0; +#X floatatom 192 91 0 0 0; +#X floatatom 156 90 0 0 0; +#X obj 156 64 ctlin; +#X floatatom 319 90 0 0 0; +#X floatatom 283 89 0 0 0; +#X obj 283 63 bendin; +#X floatatom 329 128 0 0 0; +#X floatatom 285 127 0 0 0; +#X obj 285 157 bendout; +#X text 23 18 Pd offers input and output objects for MIDI:; +#X text 358 154 ... ad nauseam.; +#X text 254 417 updated for Pd version 0.34; +#X obj 39 321 midiout; +#X obj 244 368 sysexin; +#X msg 39 291 240 \, 45 \, 93 \, 3 \, 65 \, 1 \, 2 \, 3 \, 4 \, 247 +; +#X text 32 252 You can format your own SYSEX messages as shown:; +#X text 28 366 and receive SYSEX via:; +#X connect 2 0 3 0; +#X connect 2 1 1 0; +#X connect 2 2 0 0; +#X connect 7 0 6 0; +#X connect 7 1 5 0; +#X connect 7 2 4 0; +#X connect 10 0 9 0; +#X connect 10 1 8 0; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 19 0 17 0; diff --git a/pd/doc/2.control.examples/18.conditional.pd b/pd/doc/2.control.examples/18.conditional.pd new file mode 100644 index 00000000..6bde3747 --- /dev/null +++ b/pd/doc/2.control.examples/18.conditional.pd @@ -0,0 +1,59 @@ +#N canvas 538 239 665 516 12; +#X text 395 489 updated for Pd version 0.26; +#X obj 87 148 select 1 2; +#X floatatom 87 120 0 0 0; +#X obj 87 214 print select-1; +#X obj 119 194 print select-2; +#X obj 152 171 print select-3; +#X floatatom 313 122 0 0 0; +#X obj 313 155 pack; +#X obj 313 182 route 1 2; +#X obj 353 131 t b f; +#X floatatom 353 107 0 0 0; +#X obj 371 210 unpack; +#X floatatom 313 210 0 0 0; +#X floatatom 342 210 0 0 0; +#X floatatom 371 233 0 0 0; +#X floatatom 409 234 0 0 0; +#X text 30 20 Pd provides at least four objects for doing conditioonal +computations. The "select" object tests its input against its argumt(s) +\, and outputs "bang" when they match. The "route" object works similarly +but also copies data. In other wors \, "route" takes a list \, tests +its first element \, and conditionally passes on the rest of the list. +; +#X text 56 262 You also get "spigot" which turns a flow of messages +on and off (like the Gate object in Max \, but with the inputs reversed): +; +#X floatatom 125 316 0 0 0; +#X obj 125 341 spigot; +#X floatatom 162 316 0 0 0; +#X floatatom 125 365 0 0 0; +#X text 192 317 <-- nonzero to open; +#X text 157 365 if open \, messages coming in at left are sent to output. +; +#X text 55 396 And finally \, "moses" sends numbers to the left if +they're less than the argument \, right otherwise:; +#X floatatom 125 427 0 0 0; +#X floatatom 125 476 0 0 0; +#X obj 125 452 moses 5; +#X floatatom 169 476 0 0 0; +#X connect 1 0 3 0; +#X connect 1 1 4 0; +#X connect 1 2 5 0; +#X connect 2 0 1 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 12 0; +#X connect 8 1 13 0; +#X connect 8 2 11 0; +#X connect 9 0 7 0; +#X connect 9 1 7 1; +#X connect 10 0 9 0; +#X connect 11 0 14 0; +#X connect 11 1 15 0; +#X connect 18 0 19 0; +#X connect 19 0 21 0; +#X connect 20 0 19 1; +#X connect 25 0 27 0; +#X connect 27 0 26 0; +#X connect 27 1 28 0; diff --git a/pd/doc/2.control.examples/19.random.pd b/pd/doc/2.control.examples/19.random.pd new file mode 100644 index 00000000..928be29f --- /dev/null +++ b/pd/doc/2.control.examples/19.random.pd @@ -0,0 +1,39 @@ +#N canvas 47 52 722 449 12; +#X text 460 422 updated for Pd version 0.26; +#X text 35 28 Use the "random" object to make pseudo-random integers. +To get continuously variable random numbers \, make a random number +in a large range and divide:; +#X obj 103 121 random 5; +#X msg 103 95 bang; +#X floatatom 103 147 0 0 0; +#X text 137 147 outputs from 0 to 4; +#X msg 337 87 bang; +#X floatatom 336 165 0 0 0; +#X obj 337 113 random 1000; +#X obj 336 141 / 1000; +#X text 402 166 from 0 to 0.999; +#X obj 71 324 random 5; +#X msg 162 255 bang; +#X floatatom 71 350 0 0 0; +#X obj 71 244 loadbang; +#X obj 71 274 timer; +#X text 204 255 <-- click to seed; +#X msg 71 299 seed \$1; +#X msg 163 299 bang; +#X text 204 300 <-- click to get random numbers; +#X text 24 382 If you give two randoms the same seed they give the +same sequence. If you never seed them \, you'll get different sequences +out of each one.; +#X text 34 197 If you don't want the same behavior every time you run +the patch \, use the time from load to first click as a seed:; +#X connect 2 0 4 0; +#X connect 3 0 2 0; +#X connect 6 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 7 0; +#X connect 11 0 13 0; +#X connect 12 0 15 1; +#X connect 14 0 15 0; +#X connect 15 0 17 0; +#X connect 17 0 11 0; +#X connect 18 0 11 0; diff --git a/pd/doc/2.control.examples/20.weighted-random.pd b/pd/doc/2.control.examples/20.weighted-random.pd new file mode 100644 index 00000000..ed964a06 --- /dev/null +++ b/pd/doc/2.control.examples/20.weighted-random.pd @@ -0,0 +1,44 @@ +#N canvas 161 46 660 441 12; +#X msg 103 95 bang; +#X text 389 414 updated for Pd version 0.35; +#X text 44 19 You can generate weighted random numbers from uniformly +distributed ones. If you just want two possible outcomes with a varying +probability for each one \, you can do as shown:; +#X obj 103 121 random 100; +#X obj 102 174 bng 20 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 169 174 bng 20 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X floatatom 205 148 3 0 100; +#X text 250 148 <-- change probablilty; +#X obj 103 149 moses 80; +#X text 152 93 <-- click to test; +#X text 61 219 This outputs a number at left 80% of the time \, otherwise +at right \, unless you override the "80" using the number box. You +may extend this to more than two possible outcomes \, for instance +like this:; +#X msg 106 305 bang; +#X obj 106 331 random 100; +#X obj 105 384 bng 20 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 195 387 bng 20 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X text 155 303 <-- click to test; +#X obj 106 359 moses 10; +#X obj 196 360 moses 30; +#X obj 263 387 bng 20 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X text 103 409 10%; +#X text 193 410 20%; +#X text 265 409 70%; +#X connect 0 0 3 0; +#X connect 3 0 8 0; +#X connect 6 0 8 1; +#X connect 8 0 4 0; +#X connect 8 1 5 0; +#X connect 11 0 12 0; +#X connect 12 0 16 0; +#X connect 16 0 13 0; +#X connect 16 1 17 0; +#X connect 17 0 14 0; +#X connect 17 1 18 0; diff --git a/pd/doc/2.control.examples/21.markov.chain.pd b/pd/doc/2.control.examples/21.markov.chain.pd new file mode 100644 index 00000000..36ca0db8 --- /dev/null +++ b/pd/doc/2.control.examples/21.markov.chain.pd @@ -0,0 +1,105 @@ +#N canvas 296 90 662 442 12; +#X obj 84 251 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 +-1; +#X obj 81 336 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 +-1; +#X obj 162 335 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 +-1; +#X obj 199 337 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 +-1; +#X msg 81 358 1; +#X msg 162 360 2; +#X msg 199 361 3; +#X obj 81 386 s state; +#X obj 66 173 bng 20 250 50 0 empty empty empty 20 8 0 8 -262144 -1 +-1; +#X obj 105 164 r state; +#X obj 83 225 sel 1 2 3; +#X obj 255 253 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 +-1; +#X obj 252 338 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 +-1; +#X obj 334 340 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 +-1; +#X obj 373 343 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 +-1; +#X msg 252 361 1; +#X msg 329 366 2; +#X msg 373 367 3; +#X obj 252 394 s state; +#X obj 419 254 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 +-1; +#X obj 419 339 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 +-1; +#X obj 499 338 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 +-1; +#X obj 538 341 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 +-1; +#X msg 419 362 1; +#X msg 499 363 2; +#X msg 538 364 3; +#X obj 418 395 s state; +#X msg 236 186 \; state 1; +#X obj 83 199 f 1; +#X obj 84 279 random 100; +#X obj 83 308 moses 30; +#X obj 162 309 moses 60; +#X obj 255 280 random 100; +#X obj 255 310 moses 10; +#X obj 334 311 moses 60; +#X obj 419 281 random 100; +#X obj 419 310 moses 70; +#X obj 499 310 moses 80; +#X floatatom 134 188 3 0 0; +#X text 236 166 reset; +#X text 49 152 STEP; +#X text 34 20 Here is how to construct a simple \, three-valued Markov +chain using "random." Each time you click on "step" the previous output +("state") determines which of three random networks to invoke \, each +having a different probability distribution for the next value of "state." +For instance if the state was 3 \, the next state will be 1 70% of +the time \, state 2 10% \, and state 3 20%.; +#X text 408 422 updated for Pd version 0.35; +#X connect 0 0 29 0; +#X connect 1 0 4 0; +#X connect 2 0 5 0; +#X connect 3 0 6 0; +#X connect 4 0 7 0; +#X connect 5 0 7 0; +#X connect 6 0 7 0; +#X connect 8 0 28 0; +#X connect 9 0 28 1; +#X connect 9 0 38 0; +#X connect 10 0 0 0; +#X connect 10 1 11 0; +#X connect 10 2 19 0; +#X connect 11 0 32 0; +#X connect 12 0 15 0; +#X connect 13 0 16 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 18 0; +#X connect 17 0 18 0; +#X connect 19 0 35 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 0; +#X connect 23 0 26 0; +#X connect 24 0 26 0; +#X connect 25 0 26 0; +#X connect 28 0 10 0; +#X connect 29 0 30 0; +#X connect 30 0 1 0; +#X connect 30 1 31 0; +#X connect 31 0 2 0; +#X connect 31 1 3 0; +#X connect 32 0 33 0; +#X connect 33 0 12 0; +#X connect 33 1 34 0; +#X connect 34 0 13 0; +#X connect 34 1 14 0; +#X connect 35 0 36 0; +#X connect 36 0 20 0; +#X connect 36 1 37 0; +#X connect 37 0 21 0; +#X connect 37 1 22 0; diff --git a/pd/doc/2.control.examples/22.sequencing.pd b/pd/doc/2.control.examples/22.sequencing.pd new file mode 100644 index 00000000..efddcb21 --- /dev/null +++ b/pd/doc/2.control.examples/22.sequencing.pd @@ -0,0 +1,20 @@ +#N canvas 47 52 679 466 12; +#X text 465 442 updated for Pd version 0.26; +#X text 35 28 You can use "qlist" or "textfile" objects for sequencing. Qlist is simpler to use than the (more versatile) textfile.; +#X obj 355 146 r receive1; +#X obj 441 146 r receive2; +#X msg 205 88 clear \, add receive1 1 \, add 1000 receive1 0 \, add receive2 2 \, add 1000 receive2 0 \, add receive1 3 \, bang; +#X obj 205 129 qlist; +#X floatatom 355 172; +#X floatatom 441 171; +#X text 23 210 The "add" messages add lines to the qlist \, so that it contains:; +#X text 155 238 receive1 1; +#X text 121 259 1000 receive1 0; +#X text 155 279 receive2 2; +#X text 120 299 1000 receive2 0; +#X text 155 317 receive1 3; +#X text 17 342 and the "bang" instructs qlist to play the sequence by sending messages to "receive" objects. MEssages starting with numbers request that amount of delay.; +#X text 16 391 If you have more than 5 lines or so wou will probably want to store them as a separate file and have qlist read it. You can also write files \, set tempo \, and single step... see the help patch for details.; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 5 0; diff --git a/pd/doc/2.control.examples/dollarsign.pd b/pd/doc/2.control.examples/dollarsign.pd new file mode 100644 index 00000000..0697a570 --- /dev/null +++ b/pd/doc/2.control.examples/dollarsign.pd @@ -0,0 +1,35 @@ +#N canvas 62 73 586 361 12; +#X obj 207 44 inlet; +#X obj 207 71 s \$1-a; +#X obj 302 72 s \$1-b; +#X text 331 337 updated for Pd version 0.34; +#X text 63 7 This is an abstraction used in example 12 \, "locality". +; +#X obj 302 47 inlet; +#X obj 62 249 s \$1-c; +#X obj 62 279 r \$1-c; +#X floatatom 62 218 5 0 0; +#X floatatom 62 307 5 0 0; +#X obj 164 250 s here's-what-happens-if-you-dont; +#X obj 163 280 r here's-what-happens-if-you-dont; +#X floatatom 163 308 5 0 0; +#X floatatom 164 220 5 0 0; +#X floatatom 487 224 5 0 0; +#X floatatom 488 307 5 0 0; +#X obj 487 251 s \$0-d; +#X obj 488 281 r \$0-d; +#X text 47 94 The sends above get named "one-a" \, etc. The window +title bar tells you the creation arguments for this particular instance. +You can use this to make internal local connections as shown below. +The "$1-c" boxes act locally whereas the middle boxes get crosstalk +between the windows. The boxes at right also get unique names but in +this case you don't have to secify "$0" \, it's just something unique. +; +#X connect 0 0 1 0; +#X connect 5 0 2 0; +#X connect 7 0 9 0; +#X connect 8 0 6 0; +#X connect 11 0 12 0; +#X connect 13 0 10 0; +#X connect 14 0 16 0; +#X connect 17 0 15 0; diff --git a/pd/doc/2.control.examples/dollarsign2.pd b/pd/doc/2.control.examples/dollarsign2.pd new file mode 100644 index 00000000..c3d149f6 --- /dev/null +++ b/pd/doc/2.control.examples/dollarsign2.pd @@ -0,0 +1,54 @@ +#N canvas 22 54 588 671 12; +#X text 324 642 updated for Pd version 0.34; +#X text 34 6 This is an abstraction used in example 13 \, "dollarsigns". +; +#X obj 88 107 send \$1; +#X obj 199 106 + \$2; +#X floatatom 303 88 0 0 0; +#X obj 303 139 print; +#X msg 303 113 blah \$1; +#X text 36 163 This may sound inconsistant \, but it's not--object +and message boxes are both actually messages \, but in the case of +the Object box the message is passed at creation time \, and for the +Message box \, at message time.; +#X msg 188 272 bang; +#X obj 188 300 symbol \$1; +#X msg 98 272 bang; +#X obj 98 300 float \$2; +#X floatatom 98 327 5 0 0; +#X symbolatom 188 329 10 0 0; +#X text 36 233 So how do you put creation arguments in messages? Use +"float" and "symbol" as shown:; +#X msg 97 383 bang; +#X obj 97 407 float \$2; +#X msg 97 434 five \$1; +#X text 41 357 Then if you wish \, connect to a message box as in: +; +#X obj 97 459 print; +#X msg 143 512 bang; +#X obj 143 564 symbol \$1; +#X obj 237 560 f \$2; +#X obj 143 540 t b b; +#X obj 142 587 pack symbol float; +#X msg 142 613 six \$1 \$2; +#X obj 142 640 print; +#X text 31 485 For messages combining more than one creation argument +try:; +#X text 37 50 In Object boxes \, dollar signs refer to the abstraction's +creation arguments. In Messages \, they change dynamically:; +#X connect 4 0 6 0; +#X connect 6 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 13 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 17 0 19 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 24 1; +#X connect 23 0 21 0; +#X connect 23 1 22 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; diff --git a/pd/doc/2.control.examples/sendnumber.pd b/pd/doc/2.control.examples/sendnumber.pd new file mode 100644 index 00000000..00f2eb04 --- /dev/null +++ b/pd/doc/2.control.examples/sendnumber.pd @@ -0,0 +1,20 @@ +#N canvas 171 73 718 283 12; +#X obj 34 60 inlet; +#X obj 34 88 float \$1; +#X obj 34 116 send \$2; +#X text 26 225 For obvious reasons you might not want to call a patch +as an abstraction from itself.; +#X text 151 183 In this case \$1 is a number you can specify and \$2 +is a "send" destination.; +#X text 461 260 updated for Pd version 0.26; +#X text 154 103 When you call an abstraction by typing \, say \, "sendnumber +1 x" in an object box. the subpatch can access the values of the creation +arguments (1 and x) as "$1" and "$2" innside object boxes. Typing \$1 +inside a message box has a different meaning (see the message box help +window.); +#X text 155 31 This window is used by 11.subpatch.pd to demonstrate +the abstraction mechanism in Pd. If you've opened this window directly +\, you might also want to open the other one to see how it's used. +; +#X connect 0 0 1 0; +#X connect 1 0 2 0; diff --git a/pd/doc/3.audio.examples/00.INTRO.txt b/pd/doc/3.audio.examples/00.INTRO.txt new file mode 100644 index 00000000..af9e3c96 --- /dev/null +++ b/pd/doc/3.audio.examples/00.INTRO.txt @@ -0,0 +1,43 @@ +This is the second of three tutorial series on Pd. The first one shows how to +use Pd to do "control" computations. This one shows the time-domain audio +processing features. + +Here is an approximate table of contents... + +1. sinusoids + oscillators + amplitudes + frequency and pitch + FM + +2. wavetable synthesis + +3. synthetic waveforms, classic and modern + pulses + rectangles and sawtooth waves + additive synthesis + +4. sampling + +5. envelopes + two flavors of ADSR envelope + log/linear conversion + +6. control structures + analog-style sequencing + monophonic keyboard synthesizer + sample and hold + envelope following + +7. processing + filters + modulation + delays + +8. formant synthesis + +9. strategies + quartic curves in envelopes + triggering notes from qlists + order of execution and block size + diff --git a/pd/doc/3.audio.examples/01.PART1.sinewave.pd b/pd/doc/3.audio.examples/01.PART1.sinewave.pd new file mode 100644 index 00000000..091d7f6b --- /dev/null +++ b/pd/doc/3.audio.examples/01.PART1.sinewave.pd @@ -0,0 +1,20 @@ +#N canvas 6 2 628 515 12; +#X obj 108 109 osc~ 440; +#X obj 108 168 dac~; +#X text 176 110 <-- 440 Hz. sine wave at full blast; +#X text 175 138 <-- reduce volume; +#X obj 108 138 *~ 0.05; +#X text 174 168 <-- send to the audio output device; +#X text 202 3 MAKING A SINE WAVE; +#X text 32 195 Audio computation can be turned on and off by sending messages to the global "pd" object as follows:; +#X msg 98 239 \; pd dsp 1; +#X msg 202 239 \; pd dsp 0; +#X text 113 276 ON; +#X text 222 276 OFF; +#X text 29 297 You should see the Pd window change to reflect whether audio is on or off. You can also turn audio on and off using the "audio" menu \, but the buttons are provided as a shortcut.; +#X text 30 368 When DSP is on \, you should hear a tone whose pitch is A 440 and whose amplitude is 0.05. If instead you are greeted with silence \, you might want to read the HTML documentation on setting up audio.; +#X text 28 434 In general when you start a work session with Pd \, you will want to choose "test audio and MIDI" from the help window \, which opens a more comprehensive test patch than this one.; +#X text 32 23 Audio computation in Pd is done using "tilde objects" such as the three below. THey use continuous audio streams to intercommunicate. They can be controlled by sending them messages. A few analysis modules take audio streams in and put control messages back out.; +#X text 378 491 updated for Pd version 0.33; +#X connect 0 0 4 0; +#X connect 4 0 1 0; diff --git a/pd/doc/3.audio.examples/02.amplitude.pd b/pd/doc/3.audio.examples/02.amplitude.pd new file mode 100644 index 00000000..814d7d7c --- /dev/null +++ b/pd/doc/3.audio.examples/02.amplitude.pd @@ -0,0 +1,37 @@ +#N canvas 73 190 702 512 12; +#X obj 64 65 osc~ 440; +#X obj 64 283 dac~; +#X text 145 66 <-- 440 Hz. sine wave at full blast; +#X msg 431 7 \; pd dsp 1; +#X msg 514 7 \; pd dsp 0; +#X text 456 45 ON; +#X text 534 43 OFF; +#X text 164 18 CONTROLLING AMPLITUDE; +#X text 35 327 Amplitudes of audio signals can have any reasonable +range \, but when you output a signal via the dac~ object \, the samples +should range between -1 and +1. Values out of that range will be "clipped." +; +#X obj 64 202 *~ 0; +#X floatatom 103 163 0 0 0; +#X obj 91 130 dbtorms; +#X floatatom 91 98 0 0 80; +#X text 137 98 <-- set amplitude here in dB; +#X text 211 133 <-- this converts dB to linear units; +#X text 114 282 <-- and out. We'resending to both channels now.; +#X text 210 164 <-- this shows the linear gain; +#X text 116 204 <-- multiply the sine wave by the gain \, reducing +its amplitude. You can also use the "*~" object to multiply two signals. +The "0" argument here instructs it that we'll just send it messages +to set the multiplier.; +#X text 35 396 Here we calculate a gain for the multiplier (*~) using +a "dbtorms" object (acronym for "dB to RMS"). 100 dB is normalized +to one \, and zero dB artificially outputs a true 0; +#X text 34 452 Pd assumes you have a two channel audio system unless +you tell it otherwise.; +#X text 440 486 updated for Pd version 0.33; +#X connect 0 0 9 0; +#X connect 9 0 1 0; +#X connect 9 0 1 1; +#X connect 11 0 9 1; +#X connect 11 0 10 0; +#X connect 12 0 11 0; diff --git a/pd/doc/3.audio.examples/03.line.pd b/pd/doc/3.audio.examples/03.line.pd new file mode 100644 index 00000000..535152f2 --- /dev/null +++ b/pd/doc/3.audio.examples/03.line.pd @@ -0,0 +1,50 @@ +#N canvas 30 68 683 481 12; +#X obj 56 79 osc~ 440; +#X obj 56 309 dac~; +#X msg 446 79 \; pd dsp 1; +#X msg 538 79 \; pd dsp 0; +#X text 467 112 ON; +#X text 555 112 OFF; +#X obj 56 269 *~; +#X obj 72 235 line~; +#X text 129 235 <--- ramp generator; +#X text 124 78 <-- sine wave; +#X msg 72 103 0.1 2000; +#X msg 72 169 0 2000; +#X msg 72 125 0.1 50; +#X msg 72 191 0 50; +#X msg 72 147 0.1; +#X msg 72 213 0; +#X text 274 124 ON; +#X text 154 105 <-- slow; +#X text 144 126 <-- fast; +#X text 111 146 <-- instantly; +#X text 271 189 OFF; +#X text 136 170 <-- slow; +#X text 129 191 <-- fast; +#X text 109 211 <-- instantly; +#X text 135 159 ----------------------; +#X text 93 268 <-- multiply the sine wave by the ramp. There's no longer +a "0" argument; +#X text 97 308 <-- out; +#X text 103 7 CONTROLLING AMPLITUDE USING LINE~; +#X text 38 342 Line~'s left inlet is a target value \; it reaches that +target in the time specified (in milliseconds) to its right inlet. +; +#X text 39 396 The line~ object (and its control brother \, line) treat +their right inlet specially. The inlets don't retain values the way +other inlets do but revert to zero whenever a target is received.; +#X text 14 27 In this patch \, the multiplier is configured to multiply +two signals. The amplitude is now a signal computed by the line~ object. +; +#X text 415 457 updated for Pd version 0.33; +#X connect 0 0 6 0; +#X connect 6 0 1 0; +#X connect 6 0 1 1; +#X connect 7 0 6 1; +#X connect 10 0 7 0; +#X connect 11 0 7 0; +#X connect 12 0 7 0; +#X connect 13 0 7 0; +#X connect 14 0 7 0; +#X connect 15 0 7 0; diff --git a/pd/doc/3.audio.examples/04.line2.pd b/pd/doc/3.audio.examples/04.line2.pd new file mode 100644 index 00000000..c6dd1679 --- /dev/null +++ b/pd/doc/3.audio.examples/04.line2.pd @@ -0,0 +1,59 @@ +#N canvas 30 68 949 754 12; +#X obj 67 77 osc~ 440; +#X obj 67 329 dac~; +#X obj 67 242 *~; +#X obj 86 180 line~; +#X text 116 330 <-- out; +#X text 124 9 LINES GRAPHED; +#X text 24 33 Here again is a line~ controlling the amplitude of an +osc~ \, but with the outputs graphed:; +#X obj 149 89 r graphit; +#X obj 151 179 r graphit; +#X obj 151 246 r graphit; +#X obj 86 149 r to-line; +#X graph graph1 0 -1.02 44100 1.02 631 480 831 350; +#X array product 44100 float 0; +#X pop; +#X graph graph1 0 -1.02 44100 1.02 631 150 831 20; +#X array osc-output 44100 float 0; +#X pop; +#X graph graph1 0 -1.02 44100 1.02 631 315 831 185; +#X array line-output 44100 float 0; +#X pop; +#X obj 149 119 tabwrite~ osc-output; +#X obj 67 299 *~ 0.1; +#X msg 38 401 \; pd dsp 1 \; to-line 0 \, 1 500 \; graphit bang; +#X msg 210 401 \; pd dsp 1 \; to-line 1 \, 0 500 \; graphit bang; +#X obj 151 209 tabwrite~ line-output; +#X obj 151 276 tabwrite~ product; +#X text 70 379 ramp up; +#X text 235 378 ramp down; +#X text 406 376 to 1/2; +#X msg 375 400 \; pd dsp 1 \; to-line 0.5 1000 \; graphit bang; +#X text 634 491 ------ 1 second ------; +#X text 38 485 Click the message boxes above to try it. Note that in +the first two boxes \, the line~ objects get two messages. The first +one \, with no time value \, causes the line~ to jump immediately to +the value. The third box takes line~'s previous value as a point of +departure. What you see will depend on which box you last clicked and +how long you waited between the two.; +#X text 662 727 updated for Pd version 0.33; +#X text 41 600 On most machines \, you will hear an interruption in +the sound one second after you click on the first or third box. This +is because the graphical updates are likely to eat more CPU time than +your audio buffer has pre-buffered for. You can avoid this if you keep +your graphs in sub-windows and open them only when you need them. In +some future version of Pd this behavior will be improved. Until then +\, you'll have to avoid having arrays getting re-drawn during music +performances.; +#X connect 0 0 2 0; +#X connect 0 0 14 0; +#X connect 2 0 15 0; +#X connect 2 0 19 0; +#X connect 3 0 2 1; +#X connect 3 0 18 0; +#X connect 7 0 14 0; +#X connect 8 0 18 0; +#X connect 9 0 19 0; +#X connect 10 0 3 0; +#X connect 15 0 1 0; diff --git a/pd/doc/3.audio.examples/05.output.subpatch.pd b/pd/doc/3.audio.examples/05.output.subpatch.pd new file mode 100644 index 00000000..ab0dc724 --- /dev/null +++ b/pd/doc/3.audio.examples/05.output.subpatch.pd @@ -0,0 +1,97 @@ +#N canvas 68 39 635 486 12; +#X floatatom 70 181 0 0 100; +#N canvas 331 136 786 621 output 0; +#X obj 455 510 t b; +#X obj 455 450 f; +#X obj 455 390 inlet; +#X obj 455 540 f; +#X msg 566 532 0; +#X msg 455 420 bang; +#X obj 455 480 moses 1; +#X obj 566 502 t b f; +#X obj 535 460 moses 1; +#X obj 107 121 dbtorms; +#X obj 535 430 r master-lvl; +#X obj 107 28 r master-lvl; +#X obj 455 570 s master-lvl; +#X obj 36 228 inlet~; +#X obj 250 258 inlet; +#X obj 268 283 s master-lvl; +#X msg 119 57 set \$1; +#X obj 119 87 outlet; +#X msg 250 309 \; pd dsp 1; +#X obj 107 181 line~; +#X obj 36 258 *~; +#X obj 36 288 dac~; +#X obj 107 151 pack 0 50; +#X text 23 205 audio in; +#X text 2 313 out both channels; +#X text 273 182 Level input. Send to master-lvl and start DSP (we infer +that if you're changing the level you want to hear the network.) If +you start DSP when it's already running there's no effect.; +#X text 59 542 here is the previous nonzero master-lvl -->; +#X text 98 451 recall previous value of master-lvl -->; +#X text 239 482 test if less than 1 -->; +#X text 203 510 if true convert to bang -->; +#X text 218 351 Mute control. If the master level is zero \, restore +to the last nonzero one \, otherwise zero it.; +#X text 182 86 <-- update the number box to show new level; +#X text 178 120 <-- convert from dB to linear units; +#X text 196 150 <-- make a smooth ramp to avoid clicks or zipper noise +; +#X text 333 318 <-- automatically start DSP; +#X connect 0 0 3 0; +#X connect 1 0 6 0; +#X connect 2 0 5 0; +#X connect 3 0 12 0; +#X connect 4 0 12 0; +#X connect 5 0 1 0; +#X connect 6 0 0 0; +#X connect 6 1 7 0; +#X connect 7 0 4 0; +#X connect 8 1 3 1; +#X connect 9 0 22 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 16 0; +#X connect 13 0 20 0; +#X connect 14 0 15 0; +#X connect 14 0 18 0; +#X connect 16 0 17 0; +#X connect 19 0 20 1; +#X connect 20 0 21 0; +#X connect 20 0 21 1; +#X connect 22 0 19 0; +#X restore 32 214 pd output; +#X msg 108 182 MUTE; +#X obj 32 27 osc~ 440; +#X obj 54 55 osc~ 550; +#X obj 54 116 osc~ 660; +#X obj 32 88 +~; +#X obj 32 142 +~; +#X text 122 216 <-- this is a subwindow--click on it to see inside. +; +#X text 158 182 <-- output amplitude and mute control; +#X text 383 463 updated for Pd version 0.34; +#X text 24 408 The output control automatically starts DSP whenever +you touch the level control. "MUTE" toggles between the current level +and zero.; +#X text 157 115 <-- Here we make a simple triad as a test signal.; +#X text 261 20 CONTROLLING OUTPUT AMPLITUDE; +#X text 25 263 In this and subsequent patches \, we'll use a subwindow +\, "output" \, to control overall amplitude. The amplitudes are in +decibels \, with 100 being full blast. In this example \, you can't +actually push the output amplitude past 90 or so without clipping. +You'll know you're clipping if \, instead of an A major chord \, you +hear a single \, distorted tone two octaves down. The clipping happens +at Pd's last stage of audio output. All audio signals internal to Pd +have essentially no level limit.; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 3 0 6 0; +#X connect 4 0 6 1; +#X connect 5 0 7 1; +#X connect 6 0 7 0; +#X connect 7 0 1 0; diff --git a/pd/doc/3.audio.examples/06.frequency.pd b/pd/doc/3.audio.examples/06.frequency.pd new file mode 100644 index 00000000..5bc94801 --- /dev/null +++ b/pd/doc/3.audio.examples/06.frequency.pd @@ -0,0 +1,123 @@ +#N canvas 8 17 693 642 12; +#X graph graph1 0 -1.02 4410 1.02 473 297 673 167; +#X array osc-output 4410 float 0; +#X pop; +#X obj 128 259 tabwrite~ osc-output; +#X floatatom 53 294 0 0 100; +#N canvas 331 136 786 621 output 0; +#X obj 455 510 t b; +#X obj 455 450 f; +#X obj 455 390 inlet; +#X obj 455 540 f; +#X msg 566 532 0; +#X msg 455 420 bang; +#X obj 455 480 moses 1; +#X obj 566 502 t b f; +#X obj 521 458 moses 1; +#X obj 107 174 dbtorms; +#X obj 521 428 r master-lvl; +#X obj 107 56 r master-lvl; +#X obj 455 570 s master-lvl; +#X obj 36 228 inlet~; +#X obj 251 229 inlet; +#X obj 269 257 s master-lvl; +#X msg 119 85 set \$1; +#X obj 119 115 outlet; +#X msg 251 283 \; pd dsp 1; +#X obj 107 236 line~; +#X obj 36 258 *~; +#X obj 36 290 dac~; +#X obj 107 204 pack 0 50; +#X text 23 205 audio in; +#X text 2 313 out both channels; +#X text 246 157 Level input. Send to master-lvl and start DSP (we infer +that if you're changing the level you want to hear the network.) If +you start DSP when it's already running there's no effect.; +#X text 59 542 here is the previous nonzero master-lvl -->; +#X text 98 451 recall previous value of master-lvl -->; +#X text 239 482 test if less than 1 -->; +#X text 203 510 if true convert to bang -->; +#X text 218 351 Mute control. If the master level is zero \, restore +to the last nonzero one \, otherwise zero it.; +#X text 182 114 <-- update the number box to show new level; +#X connect 0 0 3 0; +#X connect 1 0 6 0; +#X connect 2 0 5 0; +#X connect 3 0 12 0; +#X connect 4 0 12 0; +#X connect 5 0 1 0; +#X connect 6 0 0 0; +#X connect 6 1 7 0; +#X connect 7 0 4 0; +#X connect 8 1 3 1; +#X connect 9 0 22 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 16 0; +#X connect 13 0 20 0; +#X connect 14 0 15 0; +#X connect 14 0 18 0; +#X connect 16 0 17 0; +#X connect 19 0 20 1; +#X connect 20 0 21 0; +#X connect 20 0 21 1; +#X connect 22 0 19 0; +#X restore 15 327 pd output; +#X msg 91 295 MUTE; +#X msg 128 230 bang; +#X floatatom 280 66 0 0 0; +#X text 177 229 <-- click to graph; +#X obj 15 206 r frequency; +#X obj 15 232 osc~ 0; +#X msg 280 37 set \$1; +#X floatatom 6 66 0 0 0; +#X obj 6 8 r frequency; +#X msg 6 37 set \$1; +#X obj 19 90 s frequency; +#X obj 280 8 r pitch; +#X obj 289 90 s pitch; +#X obj 280 116 mtof; +#X obj 280 145 s frequency; +#X obj 6 145 s pitch; +#X obj 6 116 ftom; +#X text 105 66 <-- set frequency; +#X text 372 65 <-- set MIDI pitch; +#X text 15 429 Frequency and pitch are converted using the "ftom" and +"mtof" objects. Frequency refers to the number of cycles per second. +Pitch is "60" for Middle C \, 61 for C sharp \, 72 for the next C up +\, and so on.; +#X text 476 308 ---- 0.1 seconds ----; +#X text 447 6 FREQUENCY AND PITCH; +#X text 16 363 The osc~ object \, if you give it an argument \, expects +floating-point messages to set its frequency. Without arguments \, +its frequency is controlled by connecting an audio signal to its input. +; +#X text 14 496 Mtof and ftom work fine for microtones (non-integral +"MIDI pitch" ) and don't have MIDI's range restriction-- for example +\, MIDI -36 is about 1 Hz.; +#X text 15 553 Note also the "set" messages going to the number boxes +so that they can each update the other without bringing on an infinite +loop. (get help on number boxes for details.); +#X text 437 619 updated for Pd version 0.34; +#X text 141 295 <-- output level; +#X text 51 116 <-- convert frequency; +#X text 106 134 to "MIDI" pitch; +#X text 327 117 <-- convert "MIDI" pitch to frequency; +#X connect 2 0 3 1; +#X connect 3 0 2 0; +#X connect 4 0 3 2; +#X connect 5 0 1 0; +#X connect 6 0 16 0; +#X connect 6 0 17 0; +#X connect 8 0 9 0; +#X connect 9 0 1 0; +#X connect 9 0 3 0; +#X connect 10 0 6 0; +#X connect 11 0 14 0; +#X connect 11 0 20 0; +#X connect 12 0 13 0; +#X connect 13 0 11 0; +#X connect 15 0 10 0; +#X connect 17 0 18 0; +#X connect 20 0 19 0; diff --git a/pd/doc/3.audio.examples/07.frequency.mod.pd b/pd/doc/3.audio.examples/07.frequency.mod.pd new file mode 100644 index 00000000..a7bab032 --- /dev/null +++ b/pd/doc/3.audio.examples/07.frequency.mod.pd @@ -0,0 +1,105 @@ +#N canvas 52 144 760 640 12; +#X obj 256 180 *~; +#X floatatom 256 95 0 0 0; +#X floatatom 166 130 0 0 0; +#X obj 166 200 +~; +#X graph graph1 0 -1.02 440 1.02 527 170 727 40; +#X array fm-output 441 float 0; +#X pop; +#X floatatom 204 300 0 0 100; +#N canvas 159 26 516 274 output 1; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 396 182 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 391 110 moses 1; +#X obj 83 148 dbtorms; +#X obj 391 85 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 20 182 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 104 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 90 outlet; +#X msg 214 65 \; pd dsp 1; +#X obj 83 198 line~; +#X obj 20 207 *~; +#X obj 20 232 dac~; +#X obj 83 173 pack 0 50; +#X text 20 159 audio; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 21 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X restore 166 328 pd output; +#X msg 242 301 MUTE; +#X text 283 301 <-- output amplitude; +#X msg 242 248 bang; +#X text 284 248 <-- click to graph; +#X obj 242 272 tabwrite~ fm-output; +#X floatatom 278 150 0 0 0; +#X text 163 87 carrier; +#X text 162 105 frequency; +#X text 241 71 frequency; +#X text 242 54 modulation; +#X text 33 8 FREQUENCY MODULATION ("FM") USING TWO OSCILLATORS; +#X obj 166 252 osc~; +#X text 50 234 "carrier"; +#X text 32 252 oscillator -->; +#X text 40 161 add modulator; +#X text 39 179 to carrier; +#X text 37 198 frequency -->; +#X text 317 162 index; +#X text 319 143 modulation; +#X text 477 601 updated for Pd version 0.34; +#X obj 256 120 osc~; +#X text 52 363 This shows the classical FM synthesis technique developed +by John Chowning. It's nothing but an oscillator with vibrato controlled +by another "modulation" oscillator. First \, to understand the patch +\, set carrier frequency to 400 or so \, modulation frequency between +5 and 10 \, and try modulation index values between 0 and 400 \, say. +You'll hear a sine wave with vibrato.; +#X text 531 172 --- 0.01 seconds ----; +#X text 51 478 To get the FM sound \, set all three of carrier frequency +\, modulation frequency \, and modulation index in the hundreds. Note +that you get a timbral change as you sweep modulation index \, because +this changes the amplitudes of the components of the output sound but +not their frequencies.; +#X text 48 564 The component frequencies are equal to the carrier frequency +\, plus or minus multiples of the modulator frequency.; +#X connect 0 0 3 1; +#X connect 1 0 27 0; +#X connect 2 0 3 0; +#X connect 3 0 18 0; +#X connect 5 0 6 1; +#X connect 6 0 5 0; +#X connect 7 0 6 2; +#X connect 9 0 11 0; +#X connect 12 0 0 1; +#X connect 18 0 11 0; +#X connect 18 0 6 0; +#X connect 27 0 0 0; diff --git a/pd/doc/3.audio.examples/08.phase.mod.pd b/pd/doc/3.audio.examples/08.phase.mod.pd new file mode 100644 index 00000000..716ba6ab --- /dev/null +++ b/pd/doc/3.audio.examples/08.phase.mod.pd @@ -0,0 +1,246 @@ +#N canvas 36 68 722 738 12; +#X obj 216 145 *~; +#X floatatom 216 88 0 0 0; +#X obj 297 125 line~; +#X floatatom 128 108 0 0 0; +#X obj 128 222 cos~; +#X obj 128 178 +~; +#X floatatom 166 299 0 0 100; +#N canvas 159 26 495 270 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 182 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 159 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 128 326 pd output; +#X msg 204 299 MUTE; +#X obj 216 113 osc~ 0; +#X obj 297 99 pack 0 50; +#X floatatom 297 46 0 0 0; +#X obj 297 73 / 100; +#X text 271 8 modulation index; +#X text 271 23 in hundredths; +#X text 125 65 carrier; +#X text 124 83 frequency; +#X text 201 64 frequency; +#X text 202 47 modulation; +#X text 33 119 carrier; +#X text 33 134 phase -->; +#X text 6 162 phase; +#X text 5 177 modulation-->; +#X text 12 204 output; +#X text 11 221 waveform -->; +#X text 527 6 PHASE MODULATION; +#X text 417 703 updated for Pd version 0.34; +#X text 13 377 Most implementations of "FM" actually use phase \, not +frequency \, modulation \, because it extends in a more natural way +to "multi-operator FM" with three or more oscillators.; +#X text 15 437 To do phase modulation \, we split the "carrier oscillator" +into its phase calculation (phasor~) and its waveform lookup (cos~). +These together would be equivalent to an osc~ object \, but the "+~" +between them adds the modulating oscillator's output to the phase. +; +#X text 18 587 The units of the "modulation" index change--it is now +dimensionless and relative to the modulation frequency \, and "good" +values tend to be between 0 and 1 In this patch it's in hundredths. +; +#X text 19 658 We also have to use a line~ to smooth changes in the +modulation index \, which wasn't necessary in the previous patch.; +#X obj 128 135 phasor~; +#X obj 117 557 cos~; +#X obj 117 529 phasor~; +#X text 60 539 this:; +#X text 219 532 is the same; +#X text 220 551 as this:; +#X obj 335 544 osc~; +#X graph graph2 0 -1 440 1 509 330 709 190; +#X array phase-out 441 float 1; +#A 0 0.43245 0.433463 0.434452 0.435418 0.43636 0.43728 0.438178 0.439056 +0.439912 0.440749 0.441567 0.442366 0.443148 0.443912 0.444659 0.445391 +0.446107 0.446809 0.447497 0.448172 0.448834 0.449484 0.450122 0.450751 +0.451369 0.451978 0.452579 0.453172 0.453758 0.454338 0.454911 0.45548 +0.456045 0.456606 0.457164 0.457719 0.458274 0.458827 0.45938 0.459934 +0.460489 0.461046 0.461605 0.462168 0.462735 0.463306 0.463883 0.464466 +0.465056 0.465654 0.466259 0.466873 0.467497 0.468131 0.468776 0.469433 +0.470102 0.470783 0.471479 0.472188 0.472913 0.473653 0.474409 0.475182 +0.475973 0.476782 0.477611 0.478459 0.479327 0.480216 0.481127 0.48206 +0.483015 0.483994 0.484997 0.486024 0.487077 0.488156 0.48926 0.490392 +0.491552 0.49274 0.493957 0.495203 0.496479 0.497785 0.499123 0.500493 +0.501896 0.503332 0.504801 0.506304 0.507842 0.509415 0.511023 0.512667 +0.514348 0.516066 0.517821 0.519615 0.521447 0.523318 0.525228 0.527179 +0.52917 0.531202 0.533275 0.53539 0.537547 0.539747 0.541992 0.54428 +0.546613 0.548989 0.551411 0.553877 0.556389 0.558947 0.561551 0.564202 +0.5669 0.569645 0.572437 0.575278 0.578166 0.581104 0.58409 0.587125 +0.59021 0.593345 0.596529 0.599764 0.603051 0.606389 0.609778 0.613219 +0.61671 0.620254 0.62385 0.627497 0.631197 0.634949 0.638754 0.642612 +0.646522 0.650486 0.654503 0.658573 0.662696 0.666873 0.671104 -0.324611 +-0.320273 -0.315881 -0.311434 -0.306931 -0.302375 -0.297764 -0.2931 +-0.288381 -0.283608 -0.278781 -0.2739 -0.268964 -0.263975 -0.258931 +-0.253833 -0.248682 -0.243476 -0.238217 -0.232904 -0.227537 -0.222116 +-0.216642 -0.211115 -0.205534 -0.1999 -0.194211 -0.18847 -0.182675 +-0.176829 -0.170929 -0.164978 -0.158975 -0.152919 -0.146813 -0.140655 +-0.134446 -0.128186 -0.121875 -0.115514 -0.109103 -0.102642 -0.0961313 +-0.0895714 -0.0829625 -0.0763049 -0.0695988 -0.0628447 -0.056041 -0.0491896 +-0.0422913 -0.0353461 -0.0283546 -0.0213171 -0.0142339 -0.00710538 +6.80089e-05 0.00728586 0.0145478 0.0218535 0.0292025 0.0365944 0.0440286 +0.0515049 0.0590228 0.0665818 0.0741815 0.0818213 0.0895009 0.0972198 +0.104978 0.112776 0.120611 0.128484 0.136393 0.144339 0.15232 0.160337 +0.168388 0.176473 0.184592 0.192744 0.200929 0.209146 0.217393 0.225672 +0.233981 0.24232 0.250688 0.259084 0.267509 0.27596 0.284439 0.292944 +0.301475 0.310031 0.318611 0.327215 0.335842 0.344491 0.353162 0.361854 +0.370566 0.379298 0.38805 0.39682 0.405608 0.414413 0.423234 0.432072 +0.440924 0.449792 0.458673 0.467567 0.476474 0.485394 0.494324 0.503265 +0.512216 0.521176 0.530145 0.539121 0.548104 0.557094 0.566089 0.575089 +0.584094 0.593102 0.602113 0.611126 0.620141 0.629157 0.638173 0.647189 +0.656203 0.665215 0.674225 0.683232 0.692234 0.701231 0.710224 0.71921 +0.728189 0.737161 0.746124 0.755079 0.764024 0.772959 0.781884 0.790796 +0.799697 0.808584 0.817458 0.826318 0.835162 0.843992 0.852804 0.861601 +0.870379 0.879139 0.887879 0.8966 0.905301 0.913981 0.92264 0.931276 +0.93989 0.94848 0.957046 0.965588 0.974105 0.982595 0.99106 0.999497 +1.00791 1.01629 1.02464 1.03296 1.04126 1.04952 1.05775 1.06595 1.07412 +1.08225 1.09035 1.09841 1.10645 1.11444 1.1224 1.13033 1.13822 1.14607 +1.15388 1.16166 1.1694 1.17709 1.18475 1.19237 1.19995 1.20749 1.21498 +1.22244 1.22985 1.23722 1.24454 1.25182 1.25906 1.26625 1.2734 0.280502 +0.287559 0.29457 0.301536 0.308454 0.315325 0.32215 0.328926 0.335655 +0.342335 0.348967 0.35555 0.362084 0.368568 0.375003 0.381388 0.387722 +0.394004 0.400235 0.406415 0.412544 0.418621 0.424647 0.430621 0.436542 +0.442412 0.448228 0.453993 0.459704 0.465363 0.470969 0.476521 0.48202 +0.487466 0.492858 0.498196 0.503481 0.508712 0.513889 0.519011 0.524077 +0.52909 0.534049 0.538953 0.543804 0.5486 0.553342 0.55803 0.562664 +0.567243 0.571769 0.57624 0.580658 0.585021 0.589331 0.593587 0.597789 +0.601938 0.606033 0.610075 0.614064 0.617999 0.621879 0.625706 0.629481 +0.633203 0.636873 0.640491 0.644057 0.647571 0.651033 0.654445 0.657805 +0.661114 0.664372 0.66758 0.670739 0.673847 0.676905 0.679914 0.682875 +; +#X array cos-out 441 float 1; +#A 0 -0.911256 -0.913872 -0.916365 -0.918789 -0.921097 -0.923342 -0.925486 +-0.927564 -0.92956 -0.931483 -0.93335 -0.935129 -0.936867 -0.938528 +-0.940137 -0.941707 -0.943197 -0.944657 -0.946072 -0.947426 -0.948755 +-0.95004 -0.951276 -0.952491 -0.953672 -0.954806 -0.955924 -0.957024 +-0.958071 -0.959106 -0.960132 -0.961119 -0.962086 -0.963047 -0.963993 +-0.964903 -0.965811 -0.966718 -0.967595 -0.968461 -0.969329 -0.970192 +-0.971025 -0.971863 -0.972707 -0.973527 -0.974343 -0.975168 -0.975986 +-0.976786 -0.977597 -0.978414 -0.979202 -0.980003 -0.980816 -0.981596 +-0.982391 -0.983194 -0.983968 -0.984757 -0.985543 -0.98631 -0.987093 +-0.987851 -0.98861 -0.98937 -0.990102 -0.990852 -0.991557 -0.992275 +-0.99296 -0.993642 -0.994295 -0.994935 -0.995544 -0.996137 -0.996687 +-0.997227 -0.997705 -0.998173 -0.998575 -0.998944 -0.999273 -0.999527 +-0.999743 -0.999894 -0.999966 -0.999981 -0.999927 -0.999765 -0.999526 +-0.999202 -0.998785 -0.99824 -0.997586 -0.996816 -0.995923 -0.994897 +-0.99373 -0.992413 -0.990934 -0.989283 -0.987458 -0.985449 -0.983247 +-0.980843 -0.978222 -0.975372 -0.972288 -0.968961 -0.965377 -0.96153 +-0.95741 -0.952995 -0.948265 -0.943231 -0.937881 -0.932182 -0.926128 +-0.919728 -0.912938 -0.905762 -0.898197 -0.890198 -0.881799 -0.87293 +-0.863637 -0.853855 -0.843612 -0.832873 -0.821629 -0.809886 -0.797593 +-0.784764 -0.771394 -0.757466 -0.742953 -0.727864 -0.712189 -0.695918 +-0.679041 -0.661549 -0.643437 -0.624697 -0.605324 -0.585314 -0.564664 +-0.543374 -0.521441 -0.498869 -0.475658 -0.451811 -0.427334 -0.402219 +-0.376482 -0.350131 -0.323174 -0.295626 -0.267508 -0.238824 -0.2096 +-0.179853 -0.149603 -0.118875 -0.0876953 -0.0560885 -0.0240874 0.00827867 +0.040974 0.0739643 0.107208 0.140666 0.174297 0.208056 0.241893 0.275757 +0.309603 0.343385 0.377036 0.410498 0.443712 0.476616 0.509148 0.541242 +0.572835 0.603858 0.634244 0.66391 0.692797 0.720837 0.747961 0.774084 +0.799131 0.823051 0.845758 0.867169 0.887248 0.90588 0.923037 0.938628 +0.952605 0.964885 0.975433 0.984153 0.991037 0.995988 0.998986 0.999997 +0.998938 0.995807 0.990576 0.983211 0.973668 0.961961 0.948075 0.932007 +0.913757 0.893328 0.87073 0.845995 0.81915 0.790227 0.759268 0.726324 +0.691452 0.654714 0.616181 0.57593 0.534037 0.490599 0.445716 0.399491 +0.352033 0.303459 0.253886 0.203441 0.152259 0.100478 0.0482368 -0.00432081 +-0.057045 -0.109786 -0.162386 -0.214696 -0.266564 -0.317814 -0.368301 +-0.417864 -0.466337 -0.513584 -0.559424 -0.603732 -0.646344 -0.687125 +-0.725934 -0.762631 -0.797101 -0.829205 -0.858847 -0.8859 -0.91028 +-0.931885 -0.950636 -0.966466 -0.97929 -0.989092 -0.995773 -0.999358 +-0.999773 -0.997042 -0.991152 -0.982099 -0.969941 -0.954655 -0.936332 +-0.915008 -0.890737 -0.863625 -0.833713 -0.801132 -0.765979 -0.728348 +-0.688394 -0.646219 -0.601975 -0.555817 -0.507869 -0.45832 -0.407319 +-0.355036 -0.301652 -0.247328 -0.192258 -0.136617 -0.0805873 -0.0243537 +0.0319027 0.0879985 0.143752 0.198986 0.253526 0.307194 0.359834 0.411262 +0.461345 0.509907 0.556823 0.601935 0.645131 0.686266 0.725245 0.761935 +0.796272 0.828125 0.857461 0.884158 0.9082 0.929508 0.948044 0.9638 +0.976698 0.986778 0.99402 0.998404 0.999981 0.998763 0.994751 0.988022 +0.978621 0.966582 0.95197 0.93487 0.915357 0.893512 0.869405 0.843139 +0.814817 0.784538 0.752408 0.718535 0.68303 0.646007 0.607581 0.567872 +0.526996 0.485074 0.442227 0.398573 0.354231 0.30932 0.263957 0.218256 +0.172326 0.126282 0.0802317 0.0342922 -0.0114471 -0.0568861 -0.101931 +-0.146492 -0.190474 -0.233802 -0.276394 -0.318171 -0.359072 -0.399015 +-0.437958 -0.475821 -0.512573 -0.548149 -0.582512 -0.615632 -0.647446 +-0.677951 -0.707119 -0.734897 -0.761296 -0.786293 -0.80988 -0.83204 +-0.852773 -0.872085 -0.88998 -0.906462 -0.921542 -0.935229 -0.94754 +-0.95849 -0.968102 -0.976397 -0.9834 -0.989136 -0.993613 -0.996882 +-0.998976 -0.99993 -0.999748 -0.998484 -0.996188 -0.99286 -0.988563 +-0.983336 -0.977186 -0.970195 -0.962347 -0.953732 -0.944344 -0.934249 +-0.923482 -0.912051 -0.900028 -0.887441 -0.874296 -0.860659 -0.846562 +-0.832035 -0.817101 -0.801792 -0.786149 -0.770201 -0.753977 -0.737507 +-0.720826 -0.703952 -0.686912 -0.669731 -0.652436 -0.635043 -0.617572 +-0.600055 -0.582513 -0.564966 -0.547418 -0.529898 -0.512429 -0.495016 +-0.477676 -0.460438 -0.443287 -0.426265 -0.409364; +#X pop; +#X obj 251 241 tabwrite~ phase-out; +#X obj 251 268 tabwrite~ cos-out; +#X msg 251 216 bang; +#X text 298 215 <-- graph them; +#X text 386 99 <-- change smoothly to avoid clicks; +#X connect 0 0 5 1; +#X connect 1 0 9 0; +#X connect 2 0 0 1; +#X connect 3 0 31 0; +#X connect 4 0 7 0; +#X connect 4 0 40 0; +#X connect 5 0 4 0; +#X connect 5 0 39 0; +#X connect 6 0 7 1; +#X connect 7 0 6 0; +#X connect 8 0 7 2; +#X connect 9 0 0 0; +#X connect 10 0 2 0; +#X connect 11 0 12 0; +#X connect 12 0 10 0; +#X connect 31 0 5 0; +#X connect 33 0 32 0; +#X connect 41 0 39 0; +#X connect 41 0 40 0; diff --git a/pd/doc/3.audio.examples/09.review.pd b/pd/doc/3.audio.examples/09.review.pd new file mode 100644 index 00000000..4e683e3c --- /dev/null +++ b/pd/doc/3.audio.examples/09.review.pd @@ -0,0 +1,43 @@ +#N canvas 36 68 701 588 12; +#X text 444 567 updated for Pd version 0.34; +#X text 39 14 PART 1 REVIEW; +#X obj 66 131 tabwrite~; +#X obj 66 105 line~; +#X obj 54 298 +; +#X obj 66 79 +~; +#X obj 66 209 cos~; +#X obj 66 157 osc~; +#X obj 66 183 phasor~; +#X obj 54 324 pack; +#X obj 52 536 r; +#X obj 53 512 s; +#X obj 54 433 inlet; +#X obj 53 487 f; +#X obj 53 461 t; +#X obj 54 350 moses; +#X obj 54 403 dbtorms; +#X obj 97 376 mtof; +#X obj 54 375 ftom; +#X obj 105 433 outlet; +#X obj 66 235 dac~; +#X text 26 52 So far we've seen these audio ("tilde") objects:; +#X text 123 104 -- ramp generator; +#X text 157 131 -- sampler (which we've only used for graphing so far) +; +#X text 111 157 -- a cosine wave oscillator; +#X text 139 183 -- phase generator for making your own oscillator; +#X text 112 209 -- cosine waveshape lookup; +#X text 112 236 -- audio output ("digital/analog converter" -- a misnomer) +; +#X text 31 266 ... and these "control" objects:; +#X text 145 374 -- frequency to pitch conversion; +#X text 126 403 -- decibel to amplitude conversion; +#X text 167 434 -- input and output to a subpatch; +#X text 90 462 ("trigger") -- message ordering and conversion; +#X text 93 487 ("float") -- store a (floating point) number; +#X text 90 513 ("send") -- wireless message sending; +#X text 91 538 ("receive") ... and receiving; +#X text 106 78 (etc.) -- arithmetic on audio signals; +#X text 92 296 (etc.) -- arithmetic; +#X text 99 323 -- combine two or more values in a single message; +#X text 107 350 -- arithmetic "if"; diff --git a/pd/doc/3.audio.examples/10.PART2.wavetables.pd b/pd/doc/3.audio.examples/10.PART2.wavetables.pd new file mode 100644 index 00000000..925988ad --- /dev/null +++ b/pd/doc/3.audio.examples/10.PART2.wavetables.pd @@ -0,0 +1,104 @@ +#N canvas 19 22 722 608 12; +#X floatatom 164 43 0 0 0; +#X graph graph1 0 -1.02 258 1.02 445 177 703 47; +#X array table10 259 float 1; +#A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0.612 0.612 0.612 0.612 0.612 0.627692 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 -0.470769 -0.470769 -0.470769 -0.470769 -0.470769 +-0.470769 -0.470769 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0.627692 0.627692 0.627692 0.643385 0.643385 0.643385 +0.659077 0 -0.502154 -0.502154 -0.502154 -0.486462 -0.486462 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 0.580615 0.596308 0.596308 0.596308 0.596308 +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; +#X pop; +#X floatatom 202 171 0 0 100; +#N canvas 159 26 532 285 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 426 180 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 397 110 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 85 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 20 182 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 105 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 90 outlet; +#X msg 214 65 \; pd dsp 1; +#X obj 83 198 line~; +#X obj 20 207 *~; +#X obj 20 232 dac~; +#X obj 83 173 pack 0 50; +#X text 20 159 audio; +#X text 96 114 show level; +#X obj 426 155 t b; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 26 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 21 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 5 0; +#X restore 164 199 pd output; +#X msg 240 172 MUTE; +#X text 30 123 oscillator -->; +#X text 456 587 updated for Pd version 0.34; +#X text 33 8 WAVETABLE OSCILLATORS; +#X text 36 106 wavetable; +#X obj 164 70 mtof; +#X floatatom 164 97 0 0 0; +#X obj 164 123 tabosc4~ table10; +#X text 94 42 pitch->; +#X text 35 309 Note that I selected "save contents" in the properties +dialog for table10 (right click on the table to see.) If this isn't +set \, the waveform won't be remembered as part of the patch but will +be reinitialized to zero when the patch is reopened.; +#X msg 35 549 \; table10 cosinesum 256 0.2 -0.2 0.2 -0.2 0.2 -0.2 0.2 +; +#X msg 578 240 \; table10 const 0; +#X text 597 217 CLEAR TABLE; +#X text 35 395 For efficiency's sake tabosc4~ requires that the table +have a power of two plus three points (64+3=67 \, 128+3=131 \, 256+3=259 +\, etc.) If you want wraparound to work smoothly \, you should make +the last three points copies of the first three. This is done because +tabread4~ does 4-point interpolation.; +#X text 38 494 If you want a specific sinusoidal composition \, you +can send table10 a message \, as below (see 11.arrays in the control +examples):; +#X text 36 240 Here \, in place of the "osc~" cosine wave oscillator +\, we introduce the tabosc4~ oscillator which produces an arbitrary +waveform. You can draw in the waveform with the mouse.; +#X connect 0 0 9 0; +#X connect 2 0 3 1; +#X connect 3 0 2 0; +#X connect 4 0 3 2; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 3 0; diff --git a/pd/doc/3.audio.examples/11.wavetable.FM.pd b/pd/doc/3.audio.examples/11.wavetable.FM.pd new file mode 100644 index 00000000..c4cc6d60 --- /dev/null +++ b/pd/doc/3.audio.examples/11.wavetable.FM.pd @@ -0,0 +1,147 @@ +#N canvas 74 98 749 466 12; +#X graph graph1 0 -1.02 258 1.02 475 298 733 168; +#X array waveform11 259 float 1; +#A 0 -0.0896033 0 0.0896033 0.178356 0.265425 0.350007 0.431348 0.508756 +0.58161 0.649372 0.711597 0.767935 0.818137 0.862053 0.89963 0.930912 +0.956028 0.975187 0.988669 0.996811 1 0.998655 0.993223 0.984158 0.971919 +0.956953 0.939691 0.920538 0.899867 0.878018 0.85529 0.831945 0.808204 +0.784252 0.760239 0.736284 0.712477 0.688888 0.665568 0.642553 0.619872 +0.59755 0.575607 0.554066 0.532953 0.512296 0.49213 0.472491 0.453419 +0.434957 0.417147 0.400027 0.383632 0.367992 0.353126 0.339046 0.32575 +0.313227 0.301453 0.290394 0.280002 0.270224 0.260995 0.252248 0.24391 +0.235908 0.22817 0.220628 0.213219 0.205888 0.198586 0.191278 0.183936 +0.176545 0.169098 0.1616 0.154063 0.146505 0.138954 0.131437 0.123987 +0.116636 0.109415 0.102354 0.0954784 0.0888083 0.08236 0.0761442 0.0701659 +0.0644253 0.0589178 0.0536354 0.0485669 0.0436994 0.0390194 0.0345135 +0.0301695 0.0259776 0.0219306 0.0180245 0.0142591 0.0106377 0.00716724 +0.00385775 0.000722025 -0.00222511 -0.0049675 -0.00748845 -0.00977153 +-0.0118014 -0.0135644 -0.0150493 -0.0162479 -0.0171551 -0.0177693 -0.0180928 +-0.0181312 -0.0178936 -0.017392 -0.0166417 -0.0156601 -0.0144666 -0.0130822 +-0.0115294 -0.00983114 -0.0080113 -0.00609396 -0.0041034 -0.00206402 +-2.23572e-07 0.00206358 0.00410297 0.00609353 0.00801089 0.00983075 +0.011529 0.0130819 0.0144663 0.0156599 0.0166416 0.0173919 0.0178935 +0.0181312 0.0180929 0.0177695 0.0171552 0.0162481 0.0150496 0.0135647 +0.0118018 0.009772 0.00748897 0.00496807 0.00222573 -0.000721367 -0.00385706 +-0.00716651 -0.010637 -0.0142583 -0.0180237 -0.0219297 -0.0259767 -0.0301686 +-0.0345125 -0.0390184 -0.0436984 -0.0485658 -0.0536343 -0.0589167 -0.0644241 +-0.0701647 -0.0761429 -0.0823587 -0.0888069 -0.0954769 -0.102353 -0.109414 +-0.116634 -0.123985 -0.131435 -0.138952 -0.146504 -0.154061 -0.161598 +-0.169097 -0.176543 -0.183935 -0.191276 -0.198584 -0.205886 -0.213218 +-0.220627 -0.228169 -0.235906 -0.243908 -0.252246 -0.260993 -0.270222 +-0.28 -0.290392 -0.301451 -0.313224 -0.325747 -0.339043 -0.353123 -0.367989 +-0.383629 -0.400023 -0.417143 -0.434954 -0.453415 -0.472486 -0.492125 +-0.512292 -0.532948 -0.554062 -0.575602 -0.597545 -0.619868 -0.642548 +-0.665563 -0.688883 -0.712472 -0.736279 -0.760234 -0.784247 -0.808199 +-0.83194 -0.855285 -0.878013 -0.899863 -0.920533 -0.939687 -0.956949 +-0.971916 -0.984156 -0.993221 -0.998655 -1 -0.996813 -0.988671 -0.975191 +-0.956033 -0.930918 -0.899638 -0.862061 -0.818147 -0.767947 -0.71161 +-0.649386 -0.581625 -0.508772 -0.431366 -0.350025 -0.265443 -0.178375 +-0.0896226 -1.94061e-05 0.089584; +#X pop; +#X floatatom 202 171 0 0 100; +#N canvas 159 26 532 285 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 426 180 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 397 110 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 85 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 20 155 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 105 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 90 outlet; +#X msg 214 65 \; pd dsp 1; +#X obj 83 198 line~; +#X obj 20 207 *~; +#X obj 20 232 dac~; +#X obj 83 173 pack 0 50; +#X text 20 132 audio; +#X text 96 114 show level; +#X obj 426 155 t b; +#X obj 20 181 hip~ 1; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 26 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 27 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 5 0; +#X connect 27 0 21 0; +#X restore 164 199 pd output; +#X msg 240 172 MUTE; +#X text 30 123 oscillator -->; +#X text 485 445 updated for Pd version 0.34; +#X text 33 8 WAVETABLE OSCILLATORS; +#X text 36 106 wavetable; +#X text 88 54 pitch->; +#X graph graph2 0 0 258 1000 475 155 734 15; +#X array pitch11 259 float 1; +#A 0 757.143 757.143 735.714 700 671.429 650 621.429 600 571.429 550 +521.429 507.143 485.714 464.286 442.857 428.571 414.286 400 378.571 +364.286 342.857 328.571 928.571 921.429 921.429 914.286 907.143 892.857 +885.714 878.571 864.286 850 828.571 807.143 792.857 785.714 775 764.286 +753.571 742.857 735.714 728.571 721.429 714.286 703.571 692.857 682.143 +671.429 650 628.571 617.857 607.143 596.429 585.714 575 564.286 553.571 +542.857 532.143 521.429 510.714 500 485.714 478.571 464.286 450 435.714 +428.571 400 392.857 385.714 378.571 357.143 350 342.857 335.714 328.571 +314.286 292.857 285.714 271.429 264.286 571.429 571.429 571.429 571.429 +571.429 564.286 564.286 278.571 271.429 271.429 278.571 278.571 278.571 +278.571 571.429 571.429 571.429 575 578.571 578.571 278.571 278.571 +285.714 285.714 278.571 278.571 278.571 878.571 878.571 878.571 878.571 +878.571 321.429 325 328.571 328.571 328.571 328.571 885.714 885.714 +885.714 885.714 207.143 207.143 207.143 200 207.143 207.143 207.143 +214.286 214.286 221.429 228.571 228.571 242.857 250 257.143 264.286 +278.571 292.857 307.143 321.429 335.714 350 371.429 392.857 421.429 +435.714 471.429 500 542.857 571.429 628.571 664.286 700 728.571 757.143 +792.857 828.571 885.714 928.571 978.571 1000 1007.14 1007.14 1000 1000 +992.857 985.714 885.714 914.286 671.429 671.429 671.429 671.429 671.429 +671.429 671.429 671.429 671.429 671.429 678.571 635.714 635.714 678.571 +714.286 714.286 678.571 635.714 635.714 635.714 742.857 742.857 685.714 +685.714 635.714 621.429 685.714 792.857 792.857 678.571 521.429 521.429 +521.429 864.286 857.143 857.143 471.429 471.429 471.429 471.429 921.429 +921.429 385.714 385.714 385.714 964.286 964.286 964.286 328.571 328.571 +328.571 328.571 885.714 885.714 885.714 685.714 214.286 214.286 207.143 +207.143 921.429 921.429 921.429 921.429 207.143 207.143 200 200 957.143 +957.143 950 214.286 214.286 207.143 207.143 957.143 957.143 950 200 +207.143 207.143 942.857 942.857 942.857 950 950; +#X pop; +#X obj 164 87 tabosc4~ pitch11; +#X obj 164 123 tabosc4~ waveform11; +#X obj 164 55 sig~ 0.5; +#X text 13 319 Here's a tabosc4~ controlling the frequency of another +one. If you get properties on the two arrays \, you'll see that the +top graph has a vertical scale from 0 to 1000 \; we're looping through +that at a frequency of 0.5 Hz. and the output is used as the frequency +input of the second tabosc4~. I've detected Klingons \, Captain Kirk... +; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 10 0 11 0; +#X connect 11 0 2 0; +#X connect 12 0 10 0; diff --git a/pd/doc/3.audio.examples/12.tabread4.pd b/pd/doc/3.audio.examples/12.tabread4.pd new file mode 100644 index 00000000..b045485c --- /dev/null +++ b/pd/doc/3.audio.examples/12.tabread4.pd @@ -0,0 +1,128 @@ +#N canvas 55 137 820 651 12; +#X graph graph1 0 -1.02 130 1.02 462 160 720 30; +#X array waveform12 131 float 1; +#A 0 -0.172615 -0.172615 -0.172615 -0.172615 -0.172615 -0.141231 -0.109846 +-0.0941538 -0.0627692 -0.0470769 0.0156923 0.0784615 0.125538 0.188308 +0.235385 0.298154 0.360923 0.392308 0.470769 0.533538 0.596308 0.643385 +0.674769 0.721846 0.753231 0.784615 0.816 0.831692 0.847385 0.878769 +0.894462 0.910154 0.910154 0.910154 0.910154 0.910154 0.894462 0.894462 +0.894462 0.894462 0.878769 0.863077 0.816 0.800308 0.768923 0.737538 +0.706154 0.674769 0.643385 0.596308 0.564923 0.533538 0.470769 0.423692 +0.376615 0.313846 0.266769 0.204 0.172615 0.109846 0.0627692 0.0156923 +0 -0.0313846 -0.0627692 -0.0784615 -0.0941538 -0.109846 -0.141231 -0.156923 +-0.172615 -0.204 -0.219692 -0.219692 -0.235385 -0.235385 -0.235385 +-0.219692 -0.219692 -0.219692 -0.204 -0.156923 -0.125538 -0.0784615 +0 0.172615 0.313846 0.470769 0.564923 0.627692 0.690462 0.721846 0.737538 +0.753231 0.768923 0.768923 0.753231 0.737538 0.706154 0.674769 0.612 +0.580615 0.549231 0.517846 0.486462 0.423692 0.392308 0.360923 0.282462 +0.219692 0.109846 -0.0156923 -0.0941538 -0.109846 -0.141231 -0.156923 +-0.172615 -0.188308 -0.204 -0.204 -0.219692 -0.204 -0.204 -0.219692 +-0.219692 -0.204 -0.204 -0.204 -0.204 -0.204 -0.188308; +#X pop; +#X floatatom 194 299 0 0 100; +#N canvas 159 26 532 285 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 426 180 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 397 110 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 85 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 20 155 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 105 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 90 outlet; +#X msg 214 65 \; pd dsp 1; +#X obj 83 198 line~; +#X obj 20 207 *~; +#X obj 20 232 dac~; +#X obj 83 173 pack 0 50; +#X text 20 132 audio; +#X text 96 114 show level; +#X obj 426 155 t b; +#X obj 20 181 hip~ 1; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 26 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 27 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 5 0; +#X connect 27 0 21 0; +#X restore 156 327 pd output; +#X msg 232 300 MUTE; +#X text 554 624 updated for Pd version 0.34; +#X text 33 8 WAVETABLE OSCILLATORS; +#X obj 156 95 phasor~; +#X obj 156 184 tabread4~ waveform12; +#X obj 156 157 +~ 1; +#X floatatom 156 66 4 0 0; +#X floatatom 250 59 4 0 1000; +#X obj 250 111 pack 0 50; +#X obj 250 137 line~; +#X obj 156 131 *~; +#X text 21 81 phase; +#X text 20 96 generation -->; +#X text 25 117 range; +#X text 24 132 adjustment -->; +#X text 250 38 squeeze; +#X text 133 40 frequency; +#X graph graph3 0 -1 440 1 481 330 781 190; +#X array wave-out12 441 float 0; +#X pop; +#X obj 177 247 tabwrite~ wave-out12; +#X msg 177 216 bang; +#X text 223 217 <--click to graph; +#X obj 250 84 + 128; +#X text 25 360 The tabread4~ module is available for situations requiring +more control than tabosc4~ offers. The relationship between the two +is the same as between cos~ and osc~ \, although the units are different +between cos~ and tabread4~. Cos~ assumes input is normalized from 0 +to 1 (and will wrap around as needed.) Tabread4~ takes values from +1 to n-2 where n is the number of points in the table-- for a 259-point +table such as we have here \, it's 1 to 129 (so the "good" segment +is 128 samples long.); +#X text 30 508 You would use tabread4~ (as opposed to tabosc4~) if +you need direct control of the phase \, for instance if you to advance +nonlinearly through the table. In the case shown here \, the "squeeze" +factor makes the phase grow to a value at least \, and possibly much +graeater than \, 129 (to which tabread4~ then limits it). So the resulting +waveform is compressed in time.; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 6 0 13 0; +#X connect 7 0 2 0; +#X connect 7 0 21 0; +#X connect 8 0 7 0; +#X connect 9 0 6 0; +#X connect 10 0 24 0; +#X connect 11 0 12 0; +#X connect 12 0 13 1; +#X connect 13 0 8 0; +#X connect 22 0 21 0; +#X connect 24 0 11 0; diff --git a/pd/doc/3.audio.examples/13.tabread4.interpolation.pd b/pd/doc/3.audio.examples/13.tabread4.interpolation.pd new file mode 100644 index 00000000..18aef089 --- /dev/null +++ b/pd/doc/3.audio.examples/13.tabread4.interpolation.pd @@ -0,0 +1,44 @@ +#N canvas 137 102 781 520 12; +#X graph graph1 0 -1.02 10 1.02 468 159 648 29; +#X array waveform13 11 float 1; +#A 0 1 1 1 1 1 1 1 -1 -1 -1 -1; +#X pop; +#X text 533 502 updated for Pd version 0.34; +#X obj 156 157 +~ 1; +#X text 21 81 phase; +#X text 20 96 generation -->; +#X text 25 117 range; +#X text 24 132 adjustment -->; +#X graph graph3 0 -1.02 440 1.02 469 362 769 222; +#X array wave-out13 441 float 0; +#X pop; +#X msg 177 216 bang; +#X text 223 217 <--click to graph; +#N canvas 11 418 523 216 other-stuff 0; +#X obj 41 49 loadbang; +#X msg 39 81 \; waveform13 0 1 1 1 1 1 1 1 -1 -1 -1 -1 \; waveform13 +xlabel -1.2 0 1 2 3 4 5 6 7 8 9 10 \; pd dsp 1; +#X connect 0 0 1 0; +#X restore 626 426 pd other-stuff; +#X obj 156 247 tabwrite~ wave-out13; +#X obj 156 184 tabread4~ waveform13; +#X obj 156 131 *~ 8; +#X obj 156 95 phasor~ 220; +#X text 36 22 4-POINT INTERPOLATION IN DETAIL; +#X obj 216 316 sig~ 220; +#X obj 216 346 tabosc4~ waveform13; +#X text 35 293 (this would be; +#X text 36 313 equivalent to the; +#X text 110 333 above) -->; +#X text 18 409 This patch demonstrates 4-point interpolation in tabread4~. +The 11-point table \, waveform13 \, contains a transition from from +1 to -1 \, which is "smoothed" as seen in wave-out13. There's no such +transition at the wraparoind point--the interpolation always happens +between 4 consccutive samples of the table \, disregarding wraparound. +; +#X connect 2 0 12 0; +#X connect 8 0 11 0; +#X connect 12 0 11 0; +#X connect 13 0 2 0; +#X connect 14 0 13 0; +#X connect 16 0 17 0; diff --git a/pd/doc/3.audio.examples/14.more.tabread.pd b/pd/doc/3.audio.examples/14.more.tabread.pd new file mode 100644 index 00000000..22ff2846 --- /dev/null +++ b/pd/doc/3.audio.examples/14.more.tabread.pd @@ -0,0 +1,106 @@ +#N canvas 55 137 777 467 12; +#X graph graph1 0 -1.02 130 1.02 462 160 720 30; +#X array pitchmod14 131 float 1; +#A 0 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 +0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.863077 +0.863077 0.863077 0.863077 0.863077 0.863077 0.863077 0.863077 0.863077 +0.863077 0.863077 0.863077 0.863077 0.863077 0.863077 0.863077 0.863077 +0.863077 0.863077 0.863077 0.863077 0.863077 0.831692 0.847385 0.847385 +0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 +0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 +0.847385 0.863077 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 +-0.800308 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.768923 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.768923 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.800308 -0.800308 +-0.800308 -0.800308 -0.800308 -0.800308 -0.800308; +#X pop; +#X floatatom 194 299 0 0 100; +#N canvas 159 26 532 285 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 426 180 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 397 110 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 85 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 20 155 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 105 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 90 outlet; +#X msg 214 65 \; pd dsp 1; +#X obj 83 198 line~; +#X obj 20 207 *~; +#X obj 20 232 dac~; +#X obj 83 173 pack 0 50; +#X text 20 132 audio; +#X text 96 114 show level; +#X obj 426 155 t b; +#X obj 20 181 hip~ 1; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 26 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 27 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 5 0; +#X connect 27 0 21 0; +#X restore 156 327 pd output; +#X msg 232 300 MUTE; +#X text 521 439 updated for Pd version 0.34; +#X floatatom 153 95 4 0 0; +#X text 153 69 frequency; +#X text 33 8 MORE ON FREQUENCY MODULATION; +#X floatatom 195 206 4 0 0; +#X text 155 50 modulation; +#X obj 152 157 *~; +#X text 255 150 modulation; +#X text 253 169 depth; +#X floatatom 201 157 4 0 0; +#X obj 152 205 +~; +#X text 250 212 frequency; +#X obj 152 237 osc~; +#X obj 153 122 tabosc4~ pitchmod14; +#X text 254 194 carrier; +#X text 44 379 This patch is like the original FM patch except in having +a settable wavetable for the modulation oscillator. Try changing the +waveform as well as the three familiar parameters.; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 5 0 17 0; +#X connect 8 0 14 1; +#X connect 10 0 14 0; +#X connect 13 0 10 1; +#X connect 14 0 16 0; +#X connect 16 0 2 0; +#X connect 17 0 10 0; diff --git a/pd/doc/3.audio.examples/15.table.switching.pd b/pd/doc/3.audio.examples/15.table.switching.pd new file mode 100644 index 00000000..558f91c4 --- /dev/null +++ b/pd/doc/3.audio.examples/15.table.switching.pd @@ -0,0 +1,127 @@ +#N canvas 55 137 835 504 12; +#X graph graph1 0 -1.02 130 1.02 565 153 823 23; +#X array waveshape15a 131 float 1; +#A 0 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 +0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.863077 +0.863077 0.863077 0.863077 0.863077 0.863077 0.863077 0.863077 0.863077 +0.863077 0.863077 0.863077 0.863077 0.863077 0.863077 0.863077 0.863077 +0.863077 0.863077 0.863077 0.863077 0.863077 0.831692 0.847385 0.847385 +0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 +0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 +0.847385 0.863077 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 +-0.800308 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.768923 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.768923 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.800308 -0.800308 +-0.800308 -0.800308 -0.800308 -0.800308 -0.800308; +#X pop; +#X floatatom 194 299 0 0 100; +#N canvas 159 26 532 285 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 426 180 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 397 110 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 85 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 20 155 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 105 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 90 outlet; +#X msg 214 65 \; pd dsp 1; +#X obj 83 198 line~; +#X obj 20 207 *~; +#X obj 20 232 dac~; +#X obj 83 173 pack 0 50; +#X text 20 132 audio; +#X text 96 114 show level; +#X obj 426 155 t b; +#X obj 20 181 hip~ 1; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 26 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 27 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 5 0; +#X connect 27 0 21 0; +#X restore 156 327 pd output; +#X msg 232 300 MUTE; +#X text 581 481 updated for Pd version 0.34; +#X text 33 8 SWITCHING BETWEEN TABLES; +#X graph graph1 0 -1.02 130 1.02 565 308 823 178; +#X array waveshape15b 131 float 1; +#A 0 -0.659077 -0.643385 -0.643385 -0.627692 -0.612 -0.612 -0.596308 +-0.596308 -0.580615 -0.580615 -0.580615 -0.580615 -0.580615 -0.580615 +-0.580615 -0.596308 -0.596308 -0.596308 -0.596308 -0.596308 -0.596308 +-0.596308 -0.596308 -0.580615 -0.580615 -0.580615 -0.580615 -0.580615 +-0.580615 -0.580615 -0.580615 -0.564923 -0.549231 -0.549231 -0.533538 +-0.517846 -0.517846 -0.517846 -0.517846 -0.517846 -0.517846 -0.517846 +-0.517846 -0.533538 -0.549231 -0.580615 -0.580615 0.847385 0.847385 +0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 0.863077 +0.847385 0.847385 0.847385 0.847385 0.847385 0.847385 -0.800308 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.768923 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.768923 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 -0.784615 +-0.784615 -0.784615 -0.784615 -0.800308 -0.800308 -0.800308 -0.800308 +-0.800308 -0.800308 -0.800308; +#X pop; +#X obj 156 274 tabosc4~ waveshape15a; +#X obj 156 186 sig~ 110; +#X msg 181 215 set waveshape15a; +#X msg 182 244 set waveshape15b; +#X text 20 51 During a performance you're unlikely to want to draw +or recalculate wavetables on the fly \, because you don't want to give +Pd computationally intensive atomic tasks that could make Pd miss a +DAC deadline. Instead \, use "set" mesages to switch tabosc~ or tabread4~ +between pre-prepared tables. Indeed \, you will eventually want to +save screen space by throwing all your wavetables in a subpatch somewhere. +; +#X obj 161 401 table waveshape15c 131; +#X text 41 362 There's also a "text object" hook so that you can have +arrays with parametrizable names and sizes:; +#X text 31 431 You would use this if you want to include one or more +arrays in an abstraction. In this invocation you can't save the state +of the array--instead \, juts read it in from a file or calculate it +at startup.; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 7 0 2 0; +#X connect 8 0 7 0; +#X connect 9 0 7 0; +#X connect 10 0 7 0; diff --git a/pd/doc/3.audio.examples/16.table.spectrum.pd b/pd/doc/3.audio.examples/16.table.spectrum.pd new file mode 100644 index 00000000..65ccccde --- /dev/null +++ b/pd/doc/3.audio.examples/16.table.spectrum.pd @@ -0,0 +1,143 @@ +#N canvas 227 120 801 403 12; +#X graph graph3 0 0 126 50 496 276 796 136; +#X array spectrum-tab 127 float 1; +#A 0 42.8571 42.5 43.2143 43.2143 43.2143 43.2143 43.2143 42.8571 42.8571 +42.8571 42.8571 42.8571 42.8571 42.5 42.5 42.5 42.5 42.5 42.5 42.5 +42.5 42.5 42.5 42.5 42.5 42.5 42.5 42.5 42.5 42.5 42.5 42.5 42.5 42.5 +42.5 42.5 42.1429 42.1429 41.7857 41.0714 40.3571 39.6429 39.2857 38.2143 +37.5 37.1429 36.0714 35.3571 33.9286 33.2143 32.8571 31.4286 31.0714 +30.3571 28.9286 28.2143 27.5 26.4286 25.7143 23.9286 23.2143 21.7857 +21.0714 20.7143 20 19.6429 19.6429 23.2143 28.2143 31.4286 33.5714 +36.4286 37.8571 38.9286 43.9286 45.7143 47.8571 47.8571 47.8571 47.8571 +47.5 47.1429 43.2143 40.3571 36.4286 33.9286 32.1429 29.2857 18.2143 +16.7857 16.7857 17.5 19.6429 22.1429 28.2143 33.9286 33.9286 33.9286 +33.5714 22.5 18.5714 16.7857 4.64286 4.64286 18.2143 17.1429 8.92857 +4.28571 11.4286 10 7.5 6.42857 5.71429 5.35714 5 4.64286 4.28571 3.92857 +3.92857 3.57143 3.57143 2.85714 2.5 2.14286 1.78571 0.714286 0.357143 +; +#X pop; +#X floatatom 57 351 0 0 0; +#N canvas 159 26 526 286 output 0; +#X obj 345 163 t b; +#X obj 345 112 f; +#X obj 345 61 inlet; +#X text 351 30 mute; +#X obj 345 189 f; +#X msg 434 182 0; +#X msg 345 87 bang; +#X obj 345 138 moses 1; +#X obj 405 119 moses 1; +#X obj 85 151 dbtorms; +#X obj 405 94 r master-lvl; +#X obj 85 43 r master-lvl; +#X obj 345 214 s master-lvl; +#X obj 22 185 inlet~; +#X obj 203 42 inlet; +#X text 203 18 level; +#X obj 203 102 s master-lvl; +#X msg 98 67 set \$1; +#X obj 98 91 outlet; +#X msg 218 65 \; pd dsp 1; +#X obj 85 198 line~; +#X obj 22 216 *~; +#X obj 22 246 dac~; +#X obj 85 175 pack 0 50; +#X text 20 162 audio; +#X obj 434 155 t b; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 25 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 21 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 25 0 5 0; +#X restore 19 376 pd output; +#X msg 95 350 MUTE; +#N canvas 98 16 694 474 oscbank 0; +#X obj 36 53 spectrum-partial 1; +#X obj 36 79 spectrum-partial 2; +#X obj 36 105 spectrum-partial 3; +#X obj 36 131 spectrum-partial 4; +#X obj 36 157 spectrum-partial 5; +#X obj 36 183 spectrum-partial 6; +#X obj 36 209 spectrum-partial 7; +#X obj 36 235 spectrum-partial 8; +#X obj 36 261 spectrum-partial 9; +#X obj 36 287 spectrum-partial 10; +#X obj 216 53 spectrum-partial 11; +#X obj 122 382 loadbang; +#X obj 122 407 metro 30; +#X obj 122 433 s poll-table; +#X text 107 21 This is the bank of oscillators--open one to see:; +#X text 72 345 And here we send bangs to "poll-table" needed by the +abstraction.; +#X obj 216 79 spectrum-partial 12; +#X obj 216 105 spectrum-partial 13; +#X obj 216 131 spectrum-partial 14; +#X obj 216 157 spectrum-partial 15; +#X obj 216 183 spectrum-partial 16; +#X obj 216 209 spectrum-partial 17; +#X obj 216 235 spectrum-partial 18; +#X obj 215 261 spectrum-partial 19; +#X obj 215 287 spectrum-partial 20; +#X obj 395 53 spectrum-partial 21; +#X obj 395 78 spectrum-partial 22; +#X obj 395 104 spectrum-partial 23; +#X obj 395 130 spectrum-partial 24; +#X obj 395 156 spectrum-partial 25; +#X obj 395 182 spectrum-partial 26; +#X obj 395 207 spectrum-partial 27; +#X obj 396 234 spectrum-partial 28; +#X obj 395 260 spectrum-partial 29; +#X obj 395 287 spectrum-partial 30; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X restore 17 251 pd oscbank; +#X obj 19 321 catch~ sum-bus; +#X obj 16 153 s pitch; +#X floatatom 16 125 4 0 0; +#X text 43 18 DRAWABLE SPECTRA; +#X floatatom 14 183 4 0 0; +#X obj 14 211 s whammybar; +#N canvas 0 0 650 341 table-setup 0; +#X obj 39 227 loadbang; +#X msg 39 261 \; spectrum-tab xlabel -5 0 12 24 36 48 60 72 84 96 108 +120; +#X text 82 60 comment; +#X connect 0 0 1 0; +#X restore 17 283 pd table-setup; +#X msg 596 65 \; spectrum-tab const 0; +#X text 555 381 Updated for Pd version 0.34; +#X text 26 42 In this array \, you can draw a spectral envelope that +will be synthesized by an oscillator bank. Each oscillator in the bank +computes its own frequency and uses it to look up amplitude from the +array.; +#X text 113 254 <-- the oscillator bank; +#X text 71 128 <-- pitch; +#X text 61 185 <-- left or right shift (normally 0); +#X text 157 318 <-- here we just collect the sum of all the partials +which are computed in "oscbank".; +#X text 662 44 CLEAR; +#X text 148 283 <-- make the number labels; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 5 0 2 0; +#X connect 7 0 6 0; +#X connect 9 0 10 0; diff --git a/pd/doc/3.audio.examples/17.foldover.pd b/pd/doc/3.audio.examples/17.foldover.pd new file mode 100644 index 00000000..81757423 --- /dev/null +++ b/pd/doc/3.audio.examples/17.foldover.pd @@ -0,0 +1,112 @@ +#N canvas 17 89 590 637 12; +#X graph graph1 0 -1.02 130 1.02 295 415 553 285; +#X array table17 131 float 1; +#A 0 -0.399997 0 0.399997 0.107489 0.0789648 0.218247 0.115563 0.169861 +0.178655 0.138352 0.235708 0.164533 0.125264 0.214359 0.169042 0.134156 +0.0997789 0.118172 0.270954 0.293566 0.289833 0.12888 -0.215992 -0.0145419 +0.203984 -0.159792 -0.11901 0.135321 -0.0665301 -0.0776689 0.0247374 +-0.0222149 0.0755675 4.97363e-06 -0.049046 0.232851 0.2132 -0.0357245 +-0.101696 -0.125624 -0.0530428 0.0608632 0.111596 0.0910138 -0.0326553 +0.100844 0.22303 -0.0649953 0.00678476 0.247437 -0.0319972 -0.064833 +0.141408 0.00354245 -0.0891558 -0.227284 -0.293046 0.100474 0.173878 +-0.071401 0.0482414 0.0773852 -0.0590095 0.00509727 0.0421473 2.40106e-06 +-0.0421444 -0.00510817 0.0590137 -0.0773699 -0.0482621 0.0714097 -0.173852 +-0.100516 0.293024 0.227308 0.0891607 -0.0035225 -0.141411 0.0648073 +0.0320313 -0.247433 -0.00682219 0.0650219 -0.223015 -0.100872 0.0326609 +-0.0910026 -0.1116 -0.0608712 0.0530287 0.125624 0.101698 0.035742 +-0.213174 -0.232876 0.0490274 1.49209e-05 -0.0755759 0.0222125 -0.024735 +0.0776516 0.066554 -0.135321 0.118972 0.159827 -0.203967 0.0144949 +0.216008 -0.128842 -0.289832 -0.293563 -0.270967 -0.118185 -0.0997734 +-0.134155 -0.169034 -0.214362 -0.125272 -0.164519 -0.235713 -0.138359 +-0.178646 -0.169872 -0.115556 -0.218244 -0.0789868 -0.107456 -0.399993 +-7.20319e-05 0.4; +#X pop; +#X floatatom 73 385 0 0 100; +#N canvas 159 26 532 285 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 426 180 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 397 110 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 85 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 20 182 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 105 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 90 outlet; +#X msg 214 65 \; pd dsp 1; +#X obj 83 198 line~; +#X obj 20 207 *~; +#X obj 20 232 dac~; +#X obj 83 173 pack 0 50; +#X text 20 159 audio; +#X text 96 114 show level; +#X obj 426 155 t b; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 26 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 21 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 5 0; +#X restore 35 413 pd output; +#X msg 111 386 MUTE; +#X text 343 617 updated for Pd version 0.34; +#X msg 310 531 \; table17 const 0; +#X text 362 513 CLEAR; +#X obj 35 356 tabosc4~ table17; +#X obj 35 329 line~; +#X text 229 3 FOLDOVER; +#X msg 28 532 \; table17 const 0 \, 0 1 1 1 1 1; +#X msg 28 443 \; table17 sinesum 128 1 1 1 1 0 0 0 0 1 0 0 0 0 0 0 +1 0 0 0 0 0 0 1 0 0 0 0 0 0 1 0 0 0 0 1 0 0 0 0 0 1 0 0 0 0 1 \, normalize +0.4; +#X msg 35 278 500 \, 1423 4000; +#X text 26 26 WARNING: THIS IS REALLY OBNOXIOUS--TURN YOUR AMP DOWN! +; +#X floatatom 43 303 5 0 0; +#X text 25 125 Foldover occurs when you synthesize frequencies greater +than the Nyquist frequency (half the sample rate). In this example +\, the fundamental only reaches 1423 \, but the tables contain high +partials. As the partials sweep upward you hear them reflect off the +Nyquist frequency. Also \, partials can come into contact with each +other causing beating. The value of 1423 was chosen to make the beating +effect especially strong \, but it's clearly audible even for a 440-Hz. +sawtooth wave \, for example.; +#X text 25 58 Use this patch sparingly... it's probably bad for your +ears. Don't amuse yourself by playing this as part of your club act +unless you want your country's health department to inquire.; +#X text 16 572 Synthesis techniques vary in their tendency to make +foldover. For higher pitched sounds you'll want to try out relatively +folvover-resistant ones.; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 7 0 2 0; +#X connect 8 0 7 0; +#X connect 12 0 8 0; +#X connect 14 0 8 0; diff --git a/pd/doc/3.audio.examples/18.PART3.pulse.pd b/pd/doc/3.audio.examples/18.PART3.pulse.pd new file mode 100644 index 00000000..8efe6390 --- /dev/null +++ b/pd/doc/3.audio.examples/18.PART3.pulse.pd @@ -0,0 +1,126 @@ +#N canvas 15 126 821 582 12; +#X obj 285 163 line~; +#X floatatom 66 64 0 0 0; +#X obj 43 315 cos~; +#X graph graph1 0 -1.02 882 1.02 599 472 799 342; +#X array pulse-output 882 float 0; +#X pop; +#X floatatom 72 407 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 43 435 pd output; +#X msg 111 405 MUTE; +#X text 158 406 <-- output amplitude; +#X obj 66 91 phasor~ 0; +#X obj 285 139 pack 0 50; +#X floatatom 285 54 0 0 0; +#X text 63 43 frequency; +#X obj 66 115 -~ 0.5; +#X obj 66 207 *~; +#X obj 285 78 / 10; +#X obj 43 265 clip~ -0.5 0.5; +#X obj 43 371 hip~ 5; +#X graph graph1 0 -1.02 882 1.02 599 168 799 108; +#X array phase-output 882 float 0; +#X pop; +#X graph graph1 0 -1.02 882 1.02 599 335 799 205; +#X array clip-output 882 float 0; +#X pop; +#X text 280 34 bandwidth; +#X text 130 114 phase -1/2 to 1/2; +#X text 152 91 phase 0 to 1; +#X text 132 5 PULSE GENERATOR; +#X obj 32 234 tabwrite~ phase-output; +#X obj 32 346 tabwrite~ pulse-output; +#X text 116 372 high pass filter to cut DC; +#X msg 32 147 bang; +#X text 332 79 fix range; +#X text 337 100 force; +#X text 337 117 nonnegative; +#X text 339 164 smooth it; +#X text 327 187 add 1; +#X text 78 148 <-- click to graph; +#X text 96 209 increase amplitude; +#X text 177 264 clip back to range -1/2 to 1/2; +#X text 103 316 cosine wave lookup (-1/2 and 1/2 give -1); +#X text 24 470 This patch computes a pulse train \, with a "bandwidth" +control that essentually squeezes the pulses. If "bandwidth" is zero +you get a pure cosine wave \, and for larger values of the bandwidth +\, the cosine wave is squeezed to fill smaller portions of the waveform. +; +#X obj 285 188 +~ 1; +#X obj 32 292 tabwrite~ clip-output; +#X text 601 478 ---- 0.02 seconds ----; +#X obj 285 102 max 0; +#X text 544 551 updated for Pd version 0.34; +#X connect 0 0 37 0; +#X connect 1 0 8 0; +#X connect 2 0 16 0; +#X connect 2 0 24 0; +#X connect 4 0 5 1; +#X connect 5 0 4 0; +#X connect 6 0 5 2; +#X connect 8 0 12 0; +#X connect 9 0 0 0; +#X connect 10 0 14 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 13 0 23 0; +#X connect 14 0 40 0; +#X connect 15 0 2 0; +#X connect 15 0 38 0; +#X connect 16 0 5 0; +#X connect 26 0 23 0; +#X connect 26 0 24 0; +#X connect 26 0 38 0; +#X connect 37 0 13 1; +#X connect 40 0 9 0; diff --git a/pd/doc/3.audio.examples/19.just.say.pd b/pd/doc/3.audio.examples/19.just.say.pd new file mode 100644 index 00000000..b82b4953 --- /dev/null +++ b/pd/doc/3.audio.examples/19.just.say.pd @@ -0,0 +1,152 @@ +#N canvas 32 67 900 421 12; +#X obj 39 247 cos~; +#X graph graph1 0 -1.02 44100 1.02 452 206 652 76; +#X array env-output 44100 float 0; +#X pop; +#X floatatom 71 305 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 39 333 pd output; +#X msg 115 306 MUTE; +#X msg 162 93 bang; +#X text 203 93 <-- click to graph; +#X obj 39 168 -~ 0.5; +#X obj 39 192 *~; +#X obj 39 219 clip~ -0.5 0.5; +#X obj 39 274 hip~ 5; +#X obj 126 60 *~; +#X floatatom 205 142 0 0 0; +#X floatatom 205 168 0 0 0; +#X obj 126 27 phasor~ -4; +#X obj 126 191 +~ 0.5; +#X obj 162 117 tabwrite~ env-output; +#X text 451 211 --------- 1 second ---------; +#X floatatom 205 194 0 0 0; +#X obj 126 142 lop~ 130; +#N canvas 168 232 351 420 freq 0; +#X obj 180 176 t f f; +#X obj 181 202 *; +#X obj 60 320 line 0 30; +#X obj 90 132 t b b; +#X obj 90 107 metro 100; +#X obj 61 287 pack; +#X obj 60 376 outlet; +#X floatatom 89 82 0 0 0; +#X floatatom 54 243 0 0 0; +#X floatatom 94 248 0 0 0; +#X obj 60 348 pack 0 30; +#X obj 55 202 + 150; +#X obj 88 34 loadbang; +#X msg 89 58 1; +#X obj 56 175 random 300; +#X obj 181 226 + 100; +#X obj 179 152 random 35; +#X connect 0 0 1 0; +#X connect 0 1 1 1; +#X connect 1 0 15 0; +#X connect 2 0 10 0; +#X connect 3 0 14 0; +#X connect 3 1 16 0; +#X connect 4 0 3 0; +#X connect 5 0 2 0; +#X connect 7 0 4 0; +#X connect 8 0 5 0; +#X connect 9 0 5 1; +#X connect 10 0 6 0; +#X connect 11 0 8 0; +#X connect 12 0 13 0; +#X connect 13 0 7 0; +#X connect 14 0 11 0; +#X connect 15 0 4 1; +#X connect 15 0 9 0; +#X connect 16 0 0 0; +#X restore 38 94 pd freq; +#X obj 39 119 line~; +#X obj 39 144 phasor~; +#X text 225 19 negative frequency; +#X text 226 35 makes falling sawtooth; +#X text 155 59 square it to make a curve; +#X text 245 152 you can; +#X text 243 170 adjust these; +#X text 247 189 values; +#X text 334 250 We interrupt this series of patches to bring you an +important message from Nancy Reagan. If \, anywhere \, at any time +\, someone offers you an illicit drug \, just say one word in reply... +; +#X text 334 313 Now that I'm sure you've heard this important message +\, we can return to the essentially frivolous occupation of making +turn-of-the-millenium western art music.; +#X obj 126 165 *~ 6; +#X text 561 384 updated for Pd version 0.34; +#X text 156 305 <-- output; +#X connect 0 0 10 0; +#X connect 2 0 3 1; +#X connect 3 0 2 0; +#X connect 4 0 3 2; +#X connect 5 0 16 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 3 0; +#X connect 11 0 16 0; +#X connect 11 0 19 0; +#X connect 12 0 19 1; +#X connect 13 0 31 1; +#X connect 14 0 11 0; +#X connect 14 0 11 1; +#X connect 15 0 8 1; +#X connect 18 0 15 1; +#X connect 19 0 31 0; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 22 0 7 0; +#X connect 31 0 15 0; diff --git a/pd/doc/3.audio.examples/20.pulse.spectrum.pd b/pd/doc/3.audio.examples/20.pulse.spectrum.pd new file mode 100644 index 00000000..49d21cbd --- /dev/null +++ b/pd/doc/3.audio.examples/20.pulse.spectrum.pd @@ -0,0 +1,136 @@ +#N canvas 15 126 887 588 12; +#X obj 189 166 line~; +#X obj 42 187 cos~; +#X graph graph1 0 -1.02 882 1.02 633 508 833 378; +#X array pulse-output 882 float 0; +#X pop; +#X floatatom 71 317 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 42 345 pd output; +#X msg 118 319 MUTE; +#X obj 189 142 pack 0 50; +#X floatatom 189 41 0 0 0; +#X text 598 545 updated for Pd version 0.26; +#X obj 43 114 -~ 0.5; +#X obj 43 140 *~; +#X obj 189 67 / 10; +#X obj 189 91 moses 0; +#X msg 189 115 0; +#X obj 42 163 clip~ -0.5 0.5; +#X obj 42 289 hip~ 5; +#X graph graph1 0 0 128 500 503 285 759 155; +#X array spectrum 128 float 0; +#X pop; +#X text 184 23 bandwidth; +#X obj 115 267 tabwrite~ pulse-output; +#X msg 105 229 bang; +#X text 143 226 <-- click to graph; +#X obj 189 191 +~ 1; +#N canvas 204 17 358 238 fft 0; +#X obj 46 48 inlet~; +#X obj 159 181 tabwrite~ spectrum; +#X obj 159 145 inlet; +#X obj 46 78 rfft~; +#X obj 46 111 *~; +#X obj 77 111 *~; +#X obj 46 141 sqrt~; +#X obj 191 45 block~ 1024 1; +#X connect 0 0 3 0; +#X connect 2 0 1 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 1 5 0; +#X connect 3 1 5 1; +#X connect 4 0 6 0; +#X connect 5 0 6 0; +#X connect 6 0 1 0; +#X restore 53 267 pd fft; +#X obj 43 90 phasor~ 172.266; +#X obj 42 211 +~ 1; +#X text 63 1 PULSE SPECTRUM MEASUREMENT; +#X text 16 377 Here is a measured amplitude spectrum for the pulse +train. Nutice that \, other than a smallish spillover \, the energy +sits in one "lobe" whose changing width justifies our calling the squeeze +factor the "bandwidth."; +#X text 16 442 The spectrum is in units of amplitude. THe sidelobes +\, although they look small \, are actually only about 34 dB down. +You can design more complicated pulse trains \, little Blackman window +functions \, which control the sidelobes much better.; +#X text 17 518 The spectrum measurement is done in the "pd fft" subwindow +\, but see the "FFT examples" for information about that.; +#X text 501 291 0; +#X text 749 288 5512; +#X text 633 511 ---- 0.02 seconds ----; +#X text 160 319 <-- output; +#X connect 0 0 21 0; +#X connect 1 0 24 0; +#X connect 3 0 4 1; +#X connect 4 0 3 0; +#X connect 5 0 4 2; +#X connect 6 0 0 0; +#X connect 7 0 11 0; +#X connect 9 0 10 0; +#X connect 10 0 14 0; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 12 1 6 0; +#X connect 13 0 6 0; +#X connect 14 0 1 0; +#X connect 15 0 4 0; +#X connect 19 0 18 0; +#X connect 19 0 22 1; +#X connect 21 0 10 1; +#X connect 23 0 9 0; +#X connect 24 0 22 0; +#X connect 24 0 15 0; +#X connect 24 0 18 0; diff --git a/pd/doc/3.audio.examples/21.more.pulses.pd b/pd/doc/3.audio.examples/21.more.pulses.pd new file mode 100644 index 00000000..1aa97555 --- /dev/null +++ b/pd/doc/3.audio.examples/21.more.pulses.pd @@ -0,0 +1,138 @@ +#N canvas 15 126 902 581 12; +#X obj 220 171 line~; +#X msg 350 15 \; pd dsp 1; +#X msg 434 16 \; pd dsp 0; +#X text 371 46 ON; +#X text 451 47 OFF; +#X floatatom 68 303 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 39 331 pd output; +#X msg 106 303 MUTE; +#X text 150 302 <-- output amplitude; +#X obj 220 147 pack 0 50; +#X floatatom 220 46 0 0 0; +#X text 640 544 updated for Pd version 0.26; +#X obj 70 108 *~; +#X obj 220 72 / 10; +#X obj 220 96 moses 0; +#X msg 220 120 0; +#X obj 39 275 hip~ 5; +#X graph graph1 0 0 128 300 620 491 876 361; +#X array spectrum 128 float 0; +#X pop; +#X text 215 28 bandwidth; +#X msg 135 235 bang; +#X text 177 234 <-- click to graph; +#N canvas 204 17 358 238 fft 0; +#X obj 46 48 inlet~; +#X obj 159 181 tabwrite~ spectrum; +#X obj 159 145 inlet; +#X obj 46 78 rfft~; +#X obj 46 111 *~; +#X obj 77 111 *~; +#X obj 46 141 sqrt~; +#X obj 191 45 block~ 1024 1; +#X connect 0 0 3 0; +#X connect 2 0 1 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 1 5 0; +#X connect 3 1 5 1; +#X connect 4 0 6 0; +#X connect 5 0 6 0; +#X connect 6 0 1 0; +#X restore 68 237 pd fft; +#X text 618 497 0; +#X text 851 492 5512; +#X obj 78 141 *~; +#X obj 18 141 sig~ 1; +#X obj 39 194 /~; +#X obj 54 168 +~; +#X obj 70 79 osc~ 86.1328; +#X text 103 107 call this X; +#X text 111 141 X^2; +#X text 84 171 1+X^2; +#X text 71 196 1/(1+X^2); +#X text 10 357 This is the form of pulse train used in the Phase Aligned +Formant (PAF) algorithm. It has the neat property that its amplitude +spectrum drops off as a perfectly exponential function of frequency. +This algorithm is protected by French and US patents. contact Vincent +Puig to learn what restrictions may apply.; +#X text 11 457 On the other hand \, there are rumors that exp(-X*X) +actually sounds better than 1/(1+X*X). To compute exp(-X*X) efficiently +you will want to employ tabread4~ with a stored bell curve. I don't +want to know you're doing this. However \, the first Pd user who e-mails +me the correct formula for the output spectrum wins a free CO2 fire +extinguisher.; +#X text 28 4 ANOTHER PULSE WIDTH MOD ALGORITHM; +#X connect 0 0 12 1; +#X connect 5 0 6 1; +#X connect 6 0 5 0; +#X connect 7 0 6 2; +#X connect 9 0 0 0; +#X connect 10 0 13 0; +#X connect 12 0 24 0; +#X connect 12 0 24 1; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 14 1 9 0; +#X connect 15 0 9 0; +#X connect 16 0 6 0; +#X connect 19 0 21 1; +#X connect 24 0 27 1; +#X connect 25 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 16 0; +#X connect 26 0 21 0; +#X connect 27 0 26 1; +#X connect 28 0 12 0; diff --git a/pd/doc/3.audio.examples/22.pulse.width.mod.pd b/pd/doc/3.audio.examples/22.pulse.width.mod.pd new file mode 100644 index 00000000..214d250a --- /dev/null +++ b/pd/doc/3.audio.examples/22.pulse.width.mod.pd @@ -0,0 +1,98 @@ +#N canvas 27 355 931 532 12; +#X floatatom 86 104 0 0 0; +#X graph graph1 0 -1.02 882 1.02 669 456 869 326; +#X array difference-output 882 float 0; +#X pop; +#X floatatom 123 324 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 86 351 pd output; +#X msg 162 324 MUTE; +#X obj 86 137 phasor~ 0; +#X text 83 86 frequency; +#X graph graph1 0 -1.02 882 1.02 668 179 868 49; +#X array phasor1-output 882 float 0; +#X pop; +#X msg 191 77 bang; +#X text 231 76 <-- click to graph; +#X text 57 9 CLASSICAL PULSE WIDTH MODULATION; +#X obj 102 196 phasor~ 0; +#X obj 102 172 + 0.2; +#X obj 86 246 -~; +#X graph graph1 0 -1.02 882 1.02 668 316 868 186; +#X array phasor2-output 882 float 0; +#X pop; +#X obj 191 164 tabwrite~ phasor1-output; +#X obj 191 222 tabwrite~ phasor2-output; +#X obj 191 276 tabwrite~ difference-output; +#X text 12 386 This patch demonstrates pulse width modulation \, which +is accomplished simply by subtracting two sawtooth waves at a varying +phase difference. Here their frequencies are set to differ by 1/5 Hz. +so that the relative phase wanders continuously.; +#X text 669 459 ---- 0.02 seconds ----; +#X text 665 498 updated for Pd version 0.34; +#X text 203 325 <-- output; +#X connect 0 0 5 0; +#X connect 0 0 12 0; +#X connect 2 0 3 1; +#X connect 3 0 2 0; +#X connect 4 0 3 2; +#X connect 5 0 13 0; +#X connect 5 0 15 0; +#X connect 8 0 15 0; +#X connect 8 0 16 0; +#X connect 8 0 17 0; +#X connect 11 0 13 1; +#X connect 11 0 16 0; +#X connect 12 0 11 0; +#X connect 13 0 17 0; +#X connect 13 0 3 0; diff --git a/pd/doc/3.audio.examples/23.stereo.pd b/pd/doc/3.audio.examples/23.stereo.pd new file mode 100644 index 00000000..1c417df5 --- /dev/null +++ b/pd/doc/3.audio.examples/23.stereo.pd @@ -0,0 +1,87 @@ +#N canvas 27 355 553 341 12; +#X floatatom 59 63; +#X msg 340 12 \; pd dsp 1; +#X msg 407 12 \; pd dsp 0; +#X text 361 45 ON; +#X text 424 43 OFF; +#X floatatom 123 196; +#N canvas 159 26 618 383 output 0; +#X obj 393 156 t b; +#X obj 393 106 f; +#X obj 393 56 inlet; +#X text 399 25 mute; +#X obj 393 181 f; +#X msg 480 174 0; +#X msg 393 81 bang; +#X obj 393 131 moses 1; +#X obj 480 149 t b f; +#X obj 452 113 moses 1; +#X obj 138 144 dbtorms; +#X obj 452 88 r master-lvl; +#X obj 138 38 r master-lvl; +#X obj 393 206 s master-lvl; +#X obj 22 181 inlet~; +#X obj 254 37 inlet; +#X text 254 14 level; +#X obj 254 96 s master-lvl; +#X msg 151 61 set \$1; +#X obj 151 85 outlet; +#X msg 269 60 \; pd dsp 1; +#X obj 138 190 line~; +#X obj 22 212 *~; +#X obj 138 167 pack 0 50; +#X text 34 159 audio; +#X text 148 106 show level; +#X obj 73 182 inlet~; +#X obj 73 213 *~; +#X obj 22 241 dac~ 1; +#X obj 73 241 dac~ 2; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 23 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 21 0 27 1; +#X connect 22 0 28 0; +#X connect 23 0 21 0; +#X connect 26 0 27 0; +#X connect 27 0 29 0; +#X restore 61 224 pd output; +#X msg 152 196 MUTE; +#X text 186 195 <-- output amplitude; +#X obj 59 111 phasor~ 0; +#X text 56 45 frequency; +#X text 331 323 updated for Pd version 0.26; +#X text 57 9 CLASSICAL PULSE WIDTH MODULATION; +#X obj 131 110 phasor~ 0; +#X obj 59 134 -~ 0.5; +#X obj 131 85 + 0.5; +#X obj 131 135 -~ 0.5; +#X obj 131 160 *~ -1; +#X text 34 262 Here's what happens if you take the previous patch but \, instead of subtracting the two sawtooth waves \, we put them in two speakers with opposite phase.; +#X connect 0 0 9 0; +#X connect 0 0 15 0; +#X connect 5 0 6 2; +#X connect 6 0 5 0; +#X connect 7 0 6 3; +#X connect 9 0 14 0; +#X connect 13 0 16 0; +#X connect 14 0 6 0; +#X connect 15 0 13 0; +#X connect 16 0 17 0; +#X connect 17 0 6 1; diff --git a/pd/doc/3.audio.examples/24.even.odd.pd b/pd/doc/3.audio.examples/24.even.odd.pd new file mode 100644 index 00000000..bfa950a9 --- /dev/null +++ b/pd/doc/3.audio.examples/24.even.odd.pd @@ -0,0 +1,116 @@ +#N canvas 213 27 840 639 12; +#X floatatom 45 74 0 0 0; +#X obj 99 164 wrap~; +#X graph graph1 0 -1.02 882 1.02 624 153 824 23; +#X array phasor-output 882 float 0; +#X pop; +#X obj 45 102 phasor~ 0; +#X text 81 73 frequency; +#X obj 45 130 -~ 0.5; +#X obj 99 192 -~ 0.5; +#X obj 36 244 -~; +#X obj 98 244 +~; +#X graph graph1 0 -1.02 882 1.02 625 288 825 158; +#X array wrap-output 882 float 0; +#X pop; +#X graph graph1 0 -1.02 882 1.02 626 423 826 293; +#X array sum 882 float 0; +#X pop; +#X graph graph1 0 -1.02 882 1.02 626 563 826 433; +#X array difference 882 float 0; +#X pop; +#X obj 172 166 tabwrite~ phasor-output; +#X obj 172 218 tabwrite~ wrap-output; +#X obj 172 282 tabwrite~ sum; +#X obj 172 327 tabwrite~ difference; +#X msg 172 120 bang; +#X text 106 13 BUCHLA'S METHOD; +#X floatatom 119 369 0 0 0; +#N canvas 159 26 618 383 output 0; +#X obj 393 156 t b; +#X obj 393 106 f; +#X obj 393 56 inlet; +#X text 399 25 mute; +#X obj 393 181 f; +#X msg 480 174 0; +#X msg 393 81 bang; +#X obj 393 131 moses 1; +#X obj 480 149 t b f; +#X obj 452 113 moses 1; +#X obj 138 144 dbtorms; +#X obj 452 88 r master-lvl; +#X obj 138 38 r master-lvl; +#X obj 393 206 s master-lvl; +#X obj 22 181 inlet~; +#X obj 254 37 inlet; +#X text 254 14 level; +#X obj 254 96 s master-lvl; +#X msg 151 61 set \$1; +#X obj 151 85 outlet; +#X msg 269 60 \; pd dsp 1; +#X obj 138 190 line~; +#X obj 22 212 *~; +#X obj 138 167 pack 0 50; +#X text 34 159 audio; +#X text 148 106 show level; +#X obj 73 182 inlet~; +#X obj 73 213 *~; +#X obj 22 241 dac~ 1; +#X obj 73 241 dac~ 2; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 23 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 21 0 27 1; +#X connect 22 0 28 0; +#X connect 23 0 21 0; +#X connect 26 0 27 0; +#X connect 27 0 29 0; +#X restore 81 392 pd output; +#X msg 156 369 MUTE; +#X text 13 430 A patch to split a sawtooth into even and odd harmonics +ala Buchla. The wrap~ object folds its input into the interval [0 \, +1) so taht \, for instance \, subtracting 1/5 from a phasor and wrapping +it gives another phasor a half cycle out of phase frmo the original. +Adding and subtracting the two give the results shown and heard. (Listen +to the two outputs separately \, then together.); +#X text 631 567 ---- 0.02 seconds ----; +#X text 577 613 updated for Pd version 0.34; +#X text 193 369 <-- output; +#X connect 0 0 3 0; +#X connect 1 0 6 0; +#X connect 3 0 5 0; +#X connect 5 0 1 0; +#X connect 5 0 12 0; +#X connect 5 0 8 0; +#X connect 5 0 7 0; +#X connect 6 0 13 0; +#X connect 6 0 8 1; +#X connect 6 0 7 1; +#X connect 7 0 15 0; +#X connect 7 0 19 0; +#X connect 8 0 14 0; +#X connect 8 0 19 1; +#X connect 16 0 13 0; +#X connect 16 0 14 0; +#X connect 16 0 15 0; +#X connect 16 0 12 0; +#X connect 18 0 19 2; +#X connect 19 0 18 0; +#X connect 20 0 19 3; diff --git a/pd/doc/3.audio.examples/25.bandlimited.pd b/pd/doc/3.audio.examples/25.bandlimited.pd new file mode 100644 index 00000000..f49bcb68 --- /dev/null +++ b/pd/doc/3.audio.examples/25.bandlimited.pd @@ -0,0 +1,166 @@ +#N canvas 21 90 540 752 12; +#X floatatom 183 91; +#X obj 183 115 mtof; +#X floatatom 340 183; +#X obj 164 431 -~; +#N canvas 391 51 561 806 tables 1; +#X graph graph1 0 -1 1002 1 99 322 499 22; +#X array array1 1002 float; +#X pop; +#X graph graph1 0 -1 882 1 96 684 496 384; +#X array array2 882 float; +#X pop; +#X text 138 326 ---------------- 1002 samples ---------------; +#X text 150 693 ---------------- 0.02 sec ---------------; +#X restore 33 201 pd tables; +#N canvas 104 390 728 408 make-table 0; +#X obj 469 146 cos~; +#X obj 303 146 cos~; +#X obj 255 141 cos~; +#X msg 199 210 bang; +#X obj 255 229 tabwrite~ array1; +#X text 366 79 period is 2000 samples \, twice the table length; +#X msg 94 94 \; pd dsp 1; +#X text 118 286 this network puts a half cycle of a band-limited square wave into the table "array1."; +#X text 114 335 logically the half-cycle is in samples 1 through 1000 \; samples 0 and 1001 are provided so that the 4-point interpolation will work everywhere.; +#X text 401 57 back the phase up one sample; +#X msg 336 56 -0.0005; +#X obj 171 16 loadbang; +#X obj 303 120 *~ 3; +#X obj 468 122 *~ 5; +#X obj 303 171 *~ 0.33333; +#X obj 468 172 *~ -0.2; +#X obj 255 169 *~ -1; +#X msg 171 38 bang; +#X obj 254 80 phasor~ 22.05; +#X obj 255 202 *~ 0.57692; +#X connect 0 0 15 0; +#X connect 1 0 14 0; +#X connect 2 0 16 0; +#X connect 3 0 4 0; +#X connect 10 0 18 1; +#X connect 11 0 17 0; +#X connect 12 0 1 0; +#X connect 13 0 0 0; +#X connect 14 0 19 0; +#X connect 15 0 19 0; +#X connect 16 0 19 0; +#X connect 17 0 10 0; +#X connect 17 0 6 0; +#X connect 17 0 3 0; +#X connect 18 0 2 0; +#X connect 18 0 12 0; +#X connect 18 0 13 0; +#X connect 19 0 4 0; +#X restore 34 224 pd make-table; +#X obj 183 163 sig~; +#X obj 341 283 /~; +#X obj 357 256 clip~ 1 999999; +#X obj 183 218 phasor~; +#X obj 196 301 *~; +#X obj 196 325 clip~ -0.5 0.5; +#X floatatom 183 139; +#X obj 196 397 tabread4~ array1; +#X floatatom 340 135; +#X obj 340 206 * 0.33333; +#X obj 340 159 mtof; +#X text 374 110 band limit (MIDI units); +#X text 220 78 pitch; +#X obj 340 87 loadbang; +#X msg 340 111 130; +#X obj 340 230 sig~; +#X text 246 139 frequency; +#X obj 196 349 *~ 1000; +#X obj 196 373 +~ 501; +#X obj 183 242 -~ 0.5; +#X floatatom 206 441; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 177 469 pd output; +#X msg 235 441 MUTE; +#X text 276 440 <-- output amplitude; +#X text 27 503 Patch to make an approximately band-limited sawtooth. This is useful if you intend to use sawtooth generators above about 200 Hz. \, perhaps to use any of the techniques shown in the previous four patches.; +#X text 28 562 We generate a perfect square wave at Nyquist/6 \; this will have partials 1 \, 3 \, and 5 \, but the Nyquist frequency at partial 6 will cut off the rest of the partials. This is stored in array1 using the "make-table" subpatch.; +#X text 64 34 BAND-LIMITED SAWTOOTH GENERATOR; +#X obj 43 459 tabwrite~ array2; +#X msg 44 435 bang; +#X text 28 632 Now any time we wish to make a discontinuity in the output signal \, we make it look exactly like the bandlimited square wave looks. We do this by reading through the table we recorded \, carefully adding a "digital" \, non-band-limited \, sawtooth to "array1" so that the discontinuities in the two cancel out and what you have left is the transition in the table.; +#X text 338 737 updated for Pd version 0.26; +#X text 41 409 graph output; +#X connect 0 0 1 0; +#X connect 1 0 12 0; +#X connect 2 0 15 0; +#X connect 3 0 27 0; +#X connect 3 0 33 0; +#X connect 6 0 8 0; +#X connect 6 0 9 0; +#X connect 7 0 10 1; +#X connect 8 0 7 1; +#X connect 9 0 25 0; +#X connect 10 0 11 0; +#X connect 11 0 23 0; +#X connect 12 0 6 0; +#X connect 13 0 3 0; +#X connect 14 0 16 0; +#X connect 15 0 21 0; +#X connect 16 0 2 0; +#X connect 19 0 20 0; +#X connect 20 0 14 0; +#X connect 21 0 7 0; +#X connect 23 0 24 0; +#X connect 24 0 13 0; +#X connect 25 0 10 0; +#X connect 25 0 3 1; +#X connect 26 0 27 1; +#X connect 27 0 26 0; +#X connect 28 0 27 2; +#X connect 34 0 33 0; diff --git a/pd/doc/3.audio.examples/26.additive.pd b/pd/doc/3.audio.examples/26.additive.pd new file mode 100644 index 00000000..9070b08b --- /dev/null +++ b/pd/doc/3.audio.examples/26.additive.pd @@ -0,0 +1,92 @@ +#N canvas 59 99 696 468 12; +#X floatatom 81 408 0 0 0; +#N canvas 159 26 534 281 output 1; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X obj 425 153 t b; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 26 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 21 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 5 0; +#X restore 43 435 pd output; +#X msg 119 408 MUTE; +#X text 153 407 <-- output amplitude; +#X obj 43 377 catch~ sum; +#X obj 381 288 s frequency; +#X floatatom 381 264 0 0 0; +#X floatatom 495 265 0 0 0; +#X obj 495 289 s duration; +#X msg 260 276 \; trigger bang; +#X obj 45 221 partial 0.67 0.56 0 1; +#X obj 45 245 partial 1 0.56 1 0.9; +#X obj 45 269 partial 1 0.92 0 0.65; +#X obj 45 294 partial 1.8 0.94 0 0.55; +#X floatatom 495 217 0 0 0; +#X obj 495 241 * 100; +#X obj 381 240 mtof; +#X floatatom 381 216 0 0 0; +#X text 87 15 ADDITIVE SYNTHESIS; +#X text 32 73 This patch demonstrates using an abstraction \, "partial" +\, to make a simple additive synthesis instrument.; +#X text 28 114 Partial takes as arguments an amplitude \, a relative +frequency \, a detuning frequency \, and a relative duration. You set +absolute duration and pitch using the controls below. Hit hte trigger +to make sound.; +#X text 460 435 updated for Pd version 0.26; +#X text 535 207 duration in tenths; +#X text 535 222 of a second; +#X text 419 215 pitch; +#X text 251 253 click to start; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 4 0 1 0; +#X connect 6 0 5 0; +#X connect 7 0 8 0; +#X connect 14 0 15 0; +#X connect 15 0 7 0; +#X connect 16 0 6 0; +#X connect 17 0 16 0; diff --git a/pd/doc/3.audio.examples/27.PART4.samplers.pd b/pd/doc/3.audio.examples/27.PART4.samplers.pd new file mode 100644 index 00000000..e7aee0cd --- /dev/null +++ b/pd/doc/3.audio.examples/27.PART4.samplers.pd @@ -0,0 +1,111 @@ +#N canvas 11 3 930 640 12; +#X msg 306 14 \; pd dsp 1; +#X msg 391 14 \; pd dsp 0; +#X text 327 45 ON; +#X text 408 45 OFF; +#X floatatom 75 275 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 46 303 pd output; +#X msg 114 273 MUTE; +#X text 148 272 <-- output amplitude; +#X obj 46 239 hip~ 5; +#X text 102 240 high pass filter to cut DC; +#X graph graph1 0 -1.02 44103 1.02 594 172 794 42; +#X array sample-table 44104 float 0; +#X pop; +#X obj 46 207 tabread4~ sample-table; +#X obj 46 172 line~; +#X obj 46 123 * 441; +#X floatatom 46 69 0 0 0; +#X obj 46 147 pack 0 100; +#X text 102 13 SCRATCH MACHINE; +#X text 81 70 <-- read point in 100ths of a second; +#X text 103 123 convert to SAMPLES (441 samples in 0.01 sec); +#X obj 414 257 loadbang; +#X text 248 195 read from the table; +#X text 239 213 (the input is the index in samples); +#X text 23 516 For more on reading and writing soundfiles to tables +\, setting their lengths \, etc \, see "arrays" in the "control examples" +series.; +#X text 20 385 This patch introduces the "tabread4~" object \, which +reads audio samples out of a floating-point array \, often called a +"sample table." The input is the index of the sample to read \, counting +from zero. The output is calculated using 4-point cubic interpolation +\, which is adequate for most purposes. Because of the interpolation +scheme \, tabread4~'s input cannot be less than one or greater than +the table length minus two.; +#X text 22 565 Fanatics take note: if you want really high-fidelity +sampling \, use a high-quality resampling program to up-sample your +soundfile to 88200 to drastically reduce interpolation error.; +#X text 600 195 (one second plus three extra; +#X text 602 214 for 4-point interpolation); +#X text 407 330 message to read a soundfile into the table (automatically +sent when you load this patch by the "loadbang" object.); +#X text 93 172 convert smoothly to audio signal; +#X text 93 84 (range is 0-100.) YOU ONLY HEAR OUTPUT; +#X text 94 100 WHEN THIS IS 0-100 AND ACTIVELY CHANGING.; +#X text 605 611 updated for Pd version 0.33; +#X text 593 173 --- 44103 samples ---; +#X msg 414 281 read ../sound/voice.wav sample-table; +#X obj 414 306 soundfiler; +#X connect 4 0 5 1; +#X connect 5 0 4 0; +#X connect 6 0 5 2; +#X connect 8 0 5 0; +#X connect 11 0 8 0; +#X connect 12 0 11 0; +#X connect 13 0 15 0; +#X connect 14 0 13 0; +#X connect 15 0 12 0; +#X connect 19 0 33 0; +#X connect 33 0 34 0; diff --git a/pd/doc/3.audio.examples/28.sampler.loop.pd b/pd/doc/3.audio.examples/28.sampler.loop.pd new file mode 100644 index 00000000..5d2687a6 --- /dev/null +++ b/pd/doc/3.audio.examples/28.sampler.loop.pd @@ -0,0 +1,124 @@ +#N canvas 143 17 993 674 12; +#X graph graph1 0 -1.02 44100 1.02 630 370 830 240; +#X array tabread4-out 44100 float 0; +#X pop; +#X msg 354 13 \; pd dsp 1; +#X msg 437 13 \; pd dsp 0; +#X text 379 51 ON; +#X text 457 51 OFF; +#X graph graph1 0 -1.02 44103 1.02 631 144 831 14; +#X array sample-table 44103 float 0; +#X pop; +#X obj 564 556 loadbang; +#X obj 92 318 tabwrite~ tabread4-out; +#X floatatom 90 396 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 406 192 t b; +#X obj 406 132 f; +#X obj 406 72 inlet; +#X text 413 35 mute; +#X obj 406 222 f; +#X msg 510 214 0; +#X msg 406 102 bang; +#X obj 406 162 moses 1; +#X obj 510 184 t b f; +#X obj 476 140 moses 1; +#X obj 100 178 dbtorms; +#X obj 476 110 r master-lvl; +#X obj 100 50 r master-lvl; +#X obj 406 252 s master-lvl; +#X obj 26 217 inlet~; +#X obj 239 49 inlet; +#X text 239 22 level; +#X obj 239 120 s master-lvl; +#X msg 115 78 set \$1; +#X obj 115 107 outlet; +#X msg 257 77 \; pd dsp 1; +#X obj 100 233 line~; +#X obj 26 254 *~; +#X obj 26 289 dac~; +#X obj 100 205 pack 0 50; +#X text 24 190 audio; +#X text 112 132 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 55 430 pd output; +#X msg 125 396 MUTE; +#X text 166 395 <-- output amplitude; +#X obj 55 361 hip~ 5; +#X obj 55 248 tabread4~ sample-table; +#X floatatom 55 60 0 0 0; +#X text 254 251 read from the table; +#X text 110 16 LOOPING SAMPLER; +#X text 104 60 <-- frequency (Hz.); +#X floatatom 83 121 0 0 0; +#X obj 83 154 * 441; +#X obj 55 181 *~ 0; +#X obj 55 211 +~ 1; +#X text 136 286 <-- click to display output; +#X obj 55 92 phasor~ 0; +#X msg 91 283 bang; +#X text 130 120 <-- chunk size (100ths of a second); +#X text 25 460 This is a looping sampler in which you specify the number +of loops per second (the frequency) and the size of the chunk to loop. +If the frequency is less than about 20 \, you will hear repetition +and the chunk size will sound like transposition. For frequencies above +50 or so \, you hear a tone whose timbre is controlled by the chunk +size (best kept below 5 or so.) Remember to use the "shift" key on +number boxes to make fine adjustments.; +#X obj 558 426 adc~ 1; +#X obj 558 455 hip~ 5; +#X obj 558 515 tabwrite~ sample-table; +#X msg 576 482 bang; +#X text 614 483 <-- click here to record your own sample; +#X text 674 561 v-- re-read the original sample; +#X text 23 597 In this patch you will frequently hear discontinuities +at the looping point. If you're working in a studio \, you can sometimes +find "good" loop points for samples. Another approach \, better for +live situations \, is shown in the next patch.; +#X text 101 180 <-- readjust phase for range 0 - (chunk size); +#X text 100 211 <-- add one to avoid beginning of table; +#X msg 564 584 read ../sound/voice.wav sample-table; +#X obj 564 609 soundfiler; +#X text 748 653 updated for Pd version 0.33; +#X text 629 153 ---- 44103 samples ----; +#X text 641 376 ---- 1 second ------; +#X connect 6 0 36 0; +#X connect 8 0 9 1; +#X connect 9 0 8 0; +#X connect 10 0 9 2; +#X connect 12 0 9 0; +#X connect 13 0 12 0; +#X connect 13 0 7 0; +#X connect 14 0 23 0; +#X connect 18 0 19 0; +#X connect 19 0 20 1; +#X connect 20 0 21 0; +#X connect 21 0 13 0; +#X connect 23 0 20 0; +#X connect 24 0 7 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 30 0 29 0; +#X connect 36 0 37 0; diff --git a/pd/doc/3.audio.examples/29.sampler.loop.smooth.pd b/pd/doc/3.audio.examples/29.sampler.loop.smooth.pd new file mode 100644 index 00000000..52551163 --- /dev/null +++ b/pd/doc/3.audio.examples/29.sampler.loop.smooth.pd @@ -0,0 +1,148 @@ +#N canvas 75 15 1014 733 12; +#X graph graph1 0 -1.02 44100 1.02 764 446 964 316; +#X array cos-output 44100 float 0; +#X pop; +#X graph graph1 0 -1.02 44103 1.02 761 148 961 18; +#X array sample-table 44103 float 0; +#X pop; +#X obj 593 579 loadbang; +#X floatatom 96 489 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 67 517 pd output; +#X msg 133 490 MUTE; +#X text 176 490 <-- output amplitude; +#X obj 67 460 hip~ 5; +#X obj 47 408 tabread4~ sample-table; +#X floatatom 46 50 0 0 0; +#X text 85 49 <-- frequency (Hz.); +#X floatatom 97 358 0 0 0; +#X obj 97 385 * 441; +#X obj 47 358 *~ 0; +#X obj 47 383 +~ 1; +#X text 271 274 <-- click to display output; +#X msg 229 275 bang; +#X text 136 357 <-- chunk size (100ths of a second); +#X obj 588 471 adc~ 1; +#X obj 588 495 hip~ 5; +#X obj 588 545 tabwrite~ sample-table; +#X msg 603 518 bang; +#X text 635 518 <-- click here to record your own sample; +#X text 704 583 v-- re-read the original sample; +#X text 40 9 ENVELOPING YOUR LOOPING SAMPLER; +#X obj 88 101 -~ 0.5; +#X obj 88 259 clip~ -0.5 0.5; +#X obj 88 237 *~ 1; +#X graph graph1 0 -1.02 44100 1.02 763 311 963 181; +#X array cos-input 44100 float 0; +#X pop; +#X obj 229 303 tabwrite~ cos-input; +#X obj 88 284 cos~; +#X obj 88 126 wrap~; +#X obj 88 155 -~ 0.5; +#X obj 88 332 *~ -0.5; +#X obj 88 307 -~ 1; +#X obj 229 329 tabwrite~ cos-output; +#X floatatom 119 187 0 0 0; +#X obj 67 433 *~; +#X text 157 98 subtracting 0.5 and wrapping produces a sawtooth wave +180 degrees out of phase from the original.; +#X text 153 150 as before we subtract 1/2 again to center the sawtooth +from -1/2 to 1/2.; +#X text 153 188 <-- sharpness (at least 1); +#X msg 593 608 read ../sound/voice.wav sample-table; +#X obj 593 633 soundfiler; +#X text 776 150 -- 44103 samples ---; +#X text 767 447 ----- 1 second ------; +#X obj 119 211 max 1; +#X obj 46 77 phasor~; +#X text 24 560 Here we apply an amplitude envelope to protect against +discontinuities at the loop point. The envelope is based on the pulse +width modulation example \, except that the widening is applied to +the "1" part of the pulse \, not the "0" part.; +#X text 23 647 To see the envelope \, put the phasor on 2 Hz \, select +"sharpness" values between 1 and 3 \, and look at "cos-input" and "cos-output." +You should both see and hear the effect of the "sharpness" parameter. +; +#X text 734 688 updated for Pd version 0.34; +#X connect 2 0 41 0; +#X connect 3 0 4 1; +#X connect 4 0 3 0; +#X connect 5 0 4 2; +#X connect 7 0 4 0; +#X connect 8 0 37 0; +#X connect 9 0 46 0; +#X connect 11 0 12 0; +#X connect 12 0 13 1; +#X connect 13 0 14 0; +#X connect 14 0 8 0; +#X connect 16 0 29 0; +#X connect 16 0 35 0; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 21 0 20 0; +#X connect 25 0 31 0; +#X connect 26 0 30 0; +#X connect 26 0 29 0; +#X connect 27 0 26 0; +#X connect 30 0 34 0; +#X connect 31 0 32 0; +#X connect 32 0 27 0; +#X connect 33 0 35 0; +#X connect 33 0 37 1; +#X connect 34 0 33 0; +#X connect 36 0 45 0; +#X connect 37 0 7 0; +#X connect 41 0 42 0; +#X connect 45 0 27 1; +#X connect 46 0 13 0; +#X connect 46 0 25 0; diff --git a/pd/doc/3.audio.examples/30.sampler.scratch.pd b/pd/doc/3.audio.examples/30.sampler.scratch.pd new file mode 100644 index 00000000..d4602050 --- /dev/null +++ b/pd/doc/3.audio.examples/30.sampler.scratch.pd @@ -0,0 +1,175 @@ +#N canvas 33 19 1046 749 12; +#X msg 354 13 \; pd dsp 1; +#X msg 437 13 \; pd dsp 0; +#X text 379 51 ON; +#X text 457 51 OFF; +#X graph graph1 0 -1.02 44100 1.02 757 142 957 12; +#X array sample-table 44103 float 0; +#X pop; +#X floatatom 71 466 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 406 192 t b; +#X obj 406 132 f; +#X obj 406 72 inlet; +#X text 413 35 mute; +#X obj 406 222 f; +#X msg 510 214 0; +#X msg 406 102 bang; +#X obj 406 162 moses 1; +#X obj 510 184 t b f; +#X obj 476 140 moses 1; +#X obj 100 178 dbtorms; +#X obj 476 110 r master-lvl; +#X obj 100 50 r master-lvl; +#X obj 406 252 s master-lvl; +#X obj 26 217 inlet~; +#X obj 239 49 inlet; +#X text 239 22 level; +#X obj 239 120 s master-lvl; +#X msg 115 78 set \$1; +#X obj 115 107 outlet; +#X msg 257 77 \; pd dsp 1; +#X obj 100 233 line~; +#X obj 26 254 *~; +#X obj 26 289 dac~; +#X obj 100 205 pack 0 50; +#X text 24 190 audio; +#X text 112 132 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 36 499 pd output; +#X msg 106 466 MUTE; +#X text 145 465 <-- output amplitude; +#X obj 36 427 hip~ 5; +#X obj 55 368 tabread4~ sample-table; +#X floatatom 55 60 0 0 0; +#X text 102 59 <-- frequency (Hz.); +#X floatatom 109 152 0 0 0; +#X obj 109 181 * 441; +#X obj 55 152 *~ 0; +#X obj 55 181 +~ 1; +#X obj 55 89 phasor~ 0; +#X msg 172 246 bang; +#X text 156 151 <-- chunk size (100ths of a second); +#X obj 598 451 adc~ 1; +#X obj 598 480 hip~ 5; +#X obj 598 540 tabwrite~ sample-table; +#X msg 616 508 bang; +#X text 654 507 <-- click here to record your own sample; +#X text 64 17 ENVELOPING YOUR LOOPING SAMPLER; +#X graph graph2 0 0 44100 44100 760 345 960 215; +#X array table-index 44100 float 0; +#X pop; +#X obj 172 308 tabwrite~ table-index; +#X obj 36 398 *~; +#N canvas 160 476 591 415 envelope 0; +#X obj 97 82 -~ 0.5; +#X obj 100 331 clip~ -0.5 0.5; +#X obj 100 305 *~ 1; +#X obj 152 272 moses 1; +#X msg 115 272 1; +#X obj 100 361 cos~; +#X obj 97 112 wrap~; +#X obj 97 146 -~ 0.5; +#X obj 100 419 *~ -0.5; +#X obj 100 389 -~ 1; +#X floatatom 152 234 0 0 0; +#X text 162 78 subtracting 0.5 and wrapping produces a sawtooth wave +180 degrees out of phase from the original.; +#X text 156 139 as before we subtract 1/2 again to center the sawtooth +from -1/2 to 1/2.; +#X text 212 234 <-- sharpness (at least 1); +#X obj 97 50 inlet~; +#X obj 100 455 outlet~; +#X obj 152 208 inlet; +#X connect 0 0 6 0; +#X connect 1 0 5 0; +#X connect 2 0 1 0; +#X connect 3 0 4 0; +#X connect 3 1 2 1; +#X connect 4 0 2 1; +#X connect 5 0 9 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 15 0; +#X connect 9 0 8 0; +#X connect 10 0 3 0; +#X connect 14 0 0 0; +#X connect 16 0 10 0; +#X restore 36 122 pd envelope; +#X floatatom 146 124 0 0 0; +#X text 187 123 <-- envelope sharpness; +#X obj 74 304 line~; +#X obj 74 246 * 441; +#X floatatom 174 215 0 0 0; +#X obj 74 275 pack 0 100; +#X text 216 214 <-- read point in 100ths of a second; +#X obj 55 338 +~; +#X text 31 529 In this patch we can loop in any "window" of the input +sample. The "read point" (0-100) gives the starting point of the window +and "chunk" is its size (both in 100ths of a second.) Try \, for example +\, frequency 4 \, sharpness 10 \, chunk size 25 \, and vary the read +point from -25 to 100 \, listening to the result.; +#X text 220 246 <-- graph table index; +#X text 34 627 You should hear some doppler shift as you change the +read point. To see why \, click on "graph table index" and quickly +start changing the read point--- you should see entertaining pictures +in "table-index". THe next patch shows how to prevent this if you wish +to.; +#X text 763 356 ----- 1 second ------; +#X obj 602 583 loadbang; +#X text 711 597 v-- re-read the original sample; +#X msg 602 670 \; graph2 ylabel 48000 0 44100; +#X msg 662 619 read ../sound/voice.wav sample-table; +#X obj 662 643 soundfiler; +#X text 766 719 updated for Pd version 0.33; +#X text 755 151 ---- 44103 samples ---; +#X connect 5 0 6 1; +#X connect 6 0 5 0; +#X connect 7 0 6 2; +#X connect 9 0 6 0; +#X connect 10 0 28 1; +#X connect 11 0 17 0; +#X connect 13 0 14 0; +#X connect 14 0 15 1; +#X connect 15 0 16 0; +#X connect 16 0 37 0; +#X connect 17 0 15 0; +#X connect 17 0 29 0; +#X connect 18 0 27 0; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 23 0 22 0; +#X connect 28 0 9 0; +#X connect 29 0 28 0; +#X connect 30 0 29 1; +#X connect 32 0 37 1; +#X connect 33 0 35 0; +#X connect 34 0 33 0; +#X connect 35 0 32 0; +#X connect 37 0 27 0; +#X connect 37 0 10 0; +#X connect 42 0 44 0; +#X connect 42 0 45 0; +#X connect 45 0 46 0; diff --git a/pd/doc/3.audio.examples/31.sampler.nodoppler.pd b/pd/doc/3.audio.examples/31.sampler.nodoppler.pd new file mode 100644 index 00000000..fca63bb9 --- /dev/null +++ b/pd/doc/3.audio.examples/31.sampler.nodoppler.pd @@ -0,0 +1,180 @@ +#N canvas 113 57 1004 644 12; +#X msg 409 9 \; pd dsp 1; +#X msg 495 10 \; pd dsp 0; +#X text 430 40 ON; +#X text 511 41 OFF; +#X graph graph1 0 -1.02 44100 1.02 631 140 831 10; +#X array sample-table 44103 float 0; +#X pop; +#X obj 586 483 loadbang; +#X floatatom 60 462 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 31 490 pd output; +#X msg 89 462 MUTE; +#X text 124 455 <-- output amplitude; +#X obj 31 430 hip~ 5; +#X obj 47 381 tabread4~ sample-table; +#X floatatom 46 50 0 0 0; +#X text 85 49 <-- frequency (Hz.); +#X floatatom 165 122 0 0 0; +#X obj 164 145 * 441; +#X obj 46 220 +~ 1; +#X obj 46 74 phasor~ 0; +#X msg 151 262 bang; +#X text 204 121 <-- chunk size (100ths of a second); +#X obj 580 379 adc~ 1; +#X obj 580 403 hip~ 5; +#X obj 580 453 tabwrite~ sample-table; +#X msg 595 426 bang; +#X text 627 425 <-- click here to record your own sample; +#X text 695 497 v-- re-read the original sample; +#X graph graph2 0 0 44100 44100 633 309 833 179; +#X array table-index 44100 float 0; +#X pop; +#X obj 151 354 tabwrite~ table-index; +#X obj 31 406 *~; +#N canvas 160 476 591 415 envelope 0; +#X obj 81 68 -~ 0.5; +#X obj 83 276 clip~ -0.5 0.5; +#X obj 83 254 *~ 1; +#X obj 127 227 moses 1; +#X msg 96 227 1; +#X obj 83 301 cos~; +#X obj 81 93 wrap~; +#X obj 81 122 -~ 0.5; +#X obj 83 349 *~ -0.5; +#X obj 83 324 -~ 1; +#X floatatom 127 195 0 0 0; +#X text 135 65 subtracting 0.5 and wrapping produces a sawtooth wave +180 degrees out of phase from the original.; +#X text 130 116 as before we subtract 1/2 again to center the sawtooth +from -1/2 to 1/2.; +#X text 177 195 <-- sharpness (at least 1); +#X obj 81 42 inlet~; +#X obj 83 379 outlet~; +#X obj 127 173 inlet; +#X connect 0 0 6 0; +#X connect 1 0 5 0; +#X connect 2 0 1 0; +#X connect 3 0 4 0; +#X connect 3 1 2 1; +#X connect 4 0 2 1; +#X connect 5 0 9 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 15 0; +#X connect 9 0 8 0; +#X connect 10 0 3 0; +#X connect 14 0 0 0; +#X connect 16 0 10 0; +#X restore 30 102 pd envelope; +#X floatatom 149 84 0 0 0; +#X text 183 83 <-- envelope sharpness; +#X obj 65 308 line~; +#X obj 65 260 * 441; +#X floatatom 150 238 0 0 0; +#X obj 65 284 pack 0 100; +#X text 185 237 <-- read point in 100ths of a second; +#X obj 47 356 +~; +#X text 191 262 <-- graph table index; +#X obj 65 332 samphold~; +#X text 26 522 This example differs from the previous one in having +samphold~ objects which allow the chunk size and especially the read +point to change only at points where the phase wraps around. This removes +signal discontinuities (when the chunk size changes) and doppler shift +for changing read point.; +#X obj 99 195 samphold~; +#X obj 164 170 sig~; +#X obj 47 196 *~; +#X text 229 192 explicitly to use samphold~...; +#X text 200 173 <-- you often have to convert to audio; +#X text 643 315 ----- 1 second ------; +#X text 631 144 ---- 44103 samples ---; +#X msg 586 570 \; graph2 ylabel 48000 0 44100; +#X text 739 621 updated for Pd version 0.33; +#X msg 646 519 read ../sound/voice.wav sample-table; +#X obj 646 543 soundfiler; +#X text 21 8 SLIDING STABLE LOOPS WITHOUT DOPPLER SHIFT; +#X connect 5 0 48 0; +#X connect 5 0 50 0; +#X connect 6 0 7 1; +#X connect 7 0 6 0; +#X connect 8 0 7 2; +#X connect 10 0 7 0; +#X connect 11 0 28 1; +#X connect 12 0 17 0; +#X connect 14 0 15 0; +#X connect 15 0 42 0; +#X connect 16 0 37 0; +#X connect 17 0 29 0; +#X connect 17 0 39 1; +#X connect 17 0 41 1; +#X connect 17 0 43 0; +#X connect 18 0 27 0; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 23 0 22 0; +#X connect 28 0 10 0; +#X connect 29 0 28 0; +#X connect 30 0 29 1; +#X connect 32 0 39 0; +#X connect 33 0 35 0; +#X connect 34 0 33 0; +#X connect 35 0 32 0; +#X connect 37 0 27 0; +#X connect 37 0 11 0; +#X connect 39 0 37 1; +#X connect 41 0 43 1; +#X connect 42 0 41 0; +#X connect 43 0 16 0; +#X connect 50 0 51 0; diff --git a/pd/doc/3.audio.examples/32.sampler.transpose.pd b/pd/doc/3.audio.examples/32.sampler.transpose.pd new file mode 100644 index 00000000..02d937f4 --- /dev/null +++ b/pd/doc/3.audio.examples/32.sampler.transpose.pd @@ -0,0 +1,207 @@ +#N canvas 50 103 992 682 12; +#X graph graph1 0 -1.02 44100 1.02 599 426 799 296; +#X array sample-table 44103 float 0; +#X pop; +#X obj 502 568 loadbang; +#X floatatom 88 616 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 50 641 pd output; +#X msg 126 614 MUTE; +#X text 168 613 <-- output amplitude; +#X obj 50 586 hip~ 5; +#X obj 50 510 tabread4~ sample-table; +#X floatatom 16 306 0 0 0; +#X obj 16 331 * 441; +#X obj 16 453 +~ 1; +#X obj 35 249 phasor~ 0; +#X text 57 303 <-- chunk size (100ths of a second); +#X obj 497 460 adc~ 1; +#X obj 497 485 hip~ 5; +#X obj 497 534 tabwrite~ sample-table; +#X msg 512 507 bang; +#X text 544 506 <-- click here to record your own sample; +#X text 595 575 v-- re-read the original sample; +#X obj 50 561 *~; +#X text 599 432 -------- 44103 samples ------; +#N canvas 160 476 591 415 envelope 0; +#X obj 81 68 -~ 0.5; +#X obj 83 276 clip~ -0.5 0.5; +#X obj 83 254 *~ 1; +#X obj 127 227 moses 1; +#X msg 96 227 1; +#X obj 83 301 cos~; +#X obj 81 93 wrap~; +#X obj 81 122 -~ 0.5; +#X obj 83 349 *~ -0.5; +#X obj 83 324 -~ 1; +#X floatatom 127 195 0 0 0; +#X text 135 65 subtracting 0.5 and wrapping produces a sawtooth wave +180 degrees out of phase from the original.; +#X text 130 116 as before we subtract 1/2 again to center the sawtooth +from -1/2 to 1/2.; +#X text 177 195 <-- sharpness (at least 1); +#X obj 81 42 inlet~; +#X obj 83 379 outlet~; +#X obj 127 173 inlet; +#X connect 0 0 6 0; +#X connect 1 0 5 0; +#X connect 2 0 1 0; +#X connect 3 0 4 0; +#X connect 3 1 2 1; +#X connect 4 0 2 1; +#X connect 5 0 9 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 15 0; +#X connect 9 0 8 0; +#X connect 10 0 3 0; +#X connect 14 0 0 0; +#X connect 16 0 10 0; +#X restore 88 560 pd envelope; +#X floatatom 179 535 0 0 0; +#X text 212 534 <-- envelope sharpness; +#X obj 112 456 line~; +#X obj 112 406 * 441; +#X floatatom 112 381 0 0 0; +#X obj 112 431 pack 0 100; +#X text 158 383 <-- read point in 100ths of a second; +#X obj 50 485 +~; +#X obj 112 481 samphold~; +#X obj 16 381 samphold~; +#X obj 16 356 sig~; +#X obj 16 428 *~; +#X text 18 5 CALCULATING LOOP FREQUENCY AS FUNCTION OF TRANSPOSITION +; +#X obj 88 535 r~ phase; +#X obj 35 274 s~ phase; +#X obj 74 356 r~ phase; +#X obj 32 403 r~ phase; +#X obj 170 457 r~ phase; +#X obj 157 351 s chunk-size; +#X floatatom 22 50 0 0 0; +#X text 66 49 <-- transposition (10ths of a halftone); +#X obj 22 75 / 120; +#X obj 36 149 pow; +#X obj 22 100 t b f; +#X msg 22 125 2; +#X text 86 103 2 to the power (octaves); +#X text 85 125 gives speed change for the; +#X text 85 148 desired transposition; +#X obj 157 326 * 0.01; +#X text 270 339 chunk size; +#X text 270 361 in seconds; +#X obj 46 175 r chunk-size; +#X obj 46 200 t b f; +#X obj 35 224 /; +#X text 105 201 divide speed change by chunk; +#X text 103 222 size to get loop frequency; +#X text 402 74 The transposition is frequency in Hz. divided by chunk +size in seconds. This patch calculates the loop frequency as a function +of desired transposition; +#X text 77 75 transposition in octaves; +#X text 404 124 Notice now that we get Doppler effects when the chunk +size changes. You can suppress that if you don't want it \, by converting +the chunk size to an audio signal \, sampling and holding it. But then +there would be more work to deal with very low frequencies never triggering +the sample and hold...; +#X text 403 208 You might also want to have a way to retrigger the +loop to sync it with some other process. By the time we had all this +built the patch would be fairly involved. For now \, we'll move on +to note-oriented samplers instead.; +#X text 665 650 updated for Pd version 0.33; +#X msg 502 595 read ../sound/voice.wav sample-table; +#X obj 502 622 soundfiler; +#X obj 21 28 loadbang; +#X connect 1 0 63 0; +#X connect 2 0 3 1; +#X connect 3 0 2 0; +#X connect 4 0 3 2; +#X connect 6 0 3 0; +#X connect 7 0 19 0; +#X connect 8 0 9 0; +#X connect 8 0 50 0; +#X connect 9 0 32 0; +#X connect 10 0 29 0; +#X connect 11 0 36 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 16 0 15 0; +#X connect 19 0 6 0; +#X connect 21 0 19 1; +#X connect 22 0 21 1; +#X connect 24 0 30 0; +#X connect 25 0 27 0; +#X connect 26 0 25 0; +#X connect 27 0 24 0; +#X connect 29 0 7 0; +#X connect 30 0 29 1; +#X connect 31 0 33 0; +#X connect 32 0 31 0; +#X connect 33 0 10 0; +#X connect 35 0 21 0; +#X connect 37 0 31 1; +#X connect 38 0 33 1; +#X connect 39 0 30 1; +#X connect 41 0 43 0; +#X connect 43 0 45 0; +#X connect 44 0 55 0; +#X connect 45 0 46 0; +#X connect 45 1 44 1; +#X connect 46 0 44 0; +#X connect 50 0 40 0; +#X connect 53 0 54 0; +#X connect 54 0 55 0; +#X connect 54 1 55 1; +#X connect 55 0 11 0; +#X connect 63 0 64 0; +#X connect 65 0 41 0; diff --git a/pd/doc/3.audio.examples/33.sampler.oneshot.pd b/pd/doc/3.audio.examples/33.sampler.oneshot.pd new file mode 100644 index 00000000..75ce9153 --- /dev/null +++ b/pd/doc/3.audio.examples/33.sampler.oneshot.pd @@ -0,0 +1,143 @@ +#N canvas 34 0 994 773 12; +#X msg 538 26 \; pd dsp 1; +#X msg 622 26 \; pd dsp 0; +#X text 563 64 ON; +#X text 641 64 OFF; +#X graph graph1 0 -1.02 176403 1.02 746 290 946 160; +#X array sample-table 176403 float 0; +#X pop; +#X obj 583 520 loadbang; +#X floatatom 72 407 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 406 192 t b; +#X obj 406 132 f; +#X obj 406 72 inlet; +#X text 413 35 mute; +#X obj 406 222 f; +#X msg 510 214 0; +#X msg 406 102 bang; +#X obj 406 162 moses 1; +#X obj 510 184 t b f; +#X obj 476 140 moses 1; +#X obj 100 178 dbtorms; +#X obj 476 110 r master-lvl; +#X obj 100 50 r master-lvl; +#X obj 406 252 s master-lvl; +#X obj 26 217 inlet~; +#X obj 239 49 inlet; +#X text 239 22 level; +#X obj 239 120 s master-lvl; +#X msg 115 78 set \$1; +#X obj 115 107 outlet; +#X msg 257 77 \; pd dsp 1; +#X obj 100 233 line~; +#X obj 26 254 *~; +#X obj 26 289 dac~; +#X obj 100 205 pack 0 50; +#X text 24 190 audio; +#X text 112 132 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 37 440 pd output; +#X msg 107 407 MUTE; +#X text 157 406 <-- output amplitude; +#X obj 37 374 hip~ 5; +#X obj 37 288 tabread4~ sample-table; +#X obj 593 379 adc~ 1; +#X obj 593 409 hip~ 5; +#X obj 564 473 tabwrite~ sample-table; +#X msg 564 340 bang; +#X text 697 525 v-- re-read the original sample; +#X text 18 15 ONE-SHOT SAMPLER USING LINE~ AS PHASE; +#X obj 37 258 line~; +#X obj 77 340 line~; +#X obj 37 340 *~; +#X obj 77 313 r cutoff; +#X obj 37 228 r phase; +#X msg 130 161 \; phase 1 \, 4.41e+08 1e+07 \; cutoff 1 5; +#X msg 30 71 bang; +#X obj 130 126 delay 5; +#X text 83 71 <-- play the sample; +#X msg 30 162 \; cutoff 0 5; +#X text 40 119 cut the; +#X text 40 138 sound off; +#X text 210 111 Wait for the; +#X text 208 131 cutoff to finish; +#X text 355 155 set the upper line~ to start; +#X text 355 174 at the first sample and go; +#X text 354 195 forever (until the next trigger); +#X text 24 479 In this example we're using a line~ object in place +of the phaser~-based network that controls read location.; +#X text 24 520 To start a note \, first we have to mute the output +in case ther's already something playing---otherwise we'll get a click. +The "cutoff" line~ then takes 5 msec to get to zero. After that amount +of delay \, we reset the phase to sample number 1 and set it in motion. +We want the line~ output to increase by 1 each sample of output \, +so we ask for it to do 4.41e+08 samples in 1e+07 milliseconds.; +#X text 24 636 The cutoff mechanism is still safe if we happen to ask +for two notes in under 5 msec. The second request would reset the delay +\, so that there's no way the delay can possibly fire without the cutoff +line~ at zero.; +#X text 602 339 <-- record; +#X obj 628 439 line~; +#X obj 593 444 *~; +#X text 710 328 ------ 4 seconds ------; +#X msg 551 418 1; +#X obj 661 376 del 3990; +#X msg 661 404 0 10; +#X text 712 405 <--stop recording; +#X text 25 706 We avoid clicking at the end of the table by getting +the table's own contents to go smoothly to zero. To do this we added +a level control to the recording patch that cuts off just before the +recording reaches the end of the table.; +#X text 595 641 this is.; +#X text 596 615 My apologies to Jonathan Harvey whose bell; +#X msg 583 550 read ../sound/bell.aiff sample-table; +#X obj 583 579 soundfiler; +#X text 725 751 updated for Pd version 0.33; +#X connect 5 0 49 0; +#X connect 6 0 7 1; +#X connect 7 0 6 0; +#X connect 8 0 7 2; +#X connect 10 0 7 0; +#X connect 11 0 20 0; +#X connect 12 0 13 0; +#X connect 13 0 40 0; +#X connect 15 0 14 0; +#X connect 15 0 43 0; +#X connect 15 0 42 0; +#X connect 18 0 11 0; +#X connect 19 0 20 1; +#X connect 20 0 10 0; +#X connect 21 0 19 0; +#X connect 22 0 18 0; +#X connect 24 0 27 0; +#X connect 24 0 25 0; +#X connect 25 0 23 0; +#X connect 39 0 40 1; +#X connect 40 0 14 0; +#X connect 42 0 39 0; +#X connect 43 0 44 0; +#X connect 44 0 39 0; +#X connect 49 0 50 0; diff --git a/pd/doc/3.audio.examples/34.sampler.notes.pd b/pd/doc/3.audio.examples/34.sampler.notes.pd new file mode 100644 index 00000000..9b08a10a --- /dev/null +++ b/pd/doc/3.audio.examples/34.sampler.notes.pd @@ -0,0 +1,321 @@ +#N canvas 12 0 1074 786 12; +#X msg 862 17 \; pd dsp 1; +#X msg 946 17 \; pd dsp 0; +#X text 887 53 ON; +#X text 965 53 OFF; +#X floatatom 64 512 0 0 0; +#N canvas 159 26 495 262 output 0; +#X obj 406 192 t b; +#X obj 406 132 f; +#X obj 406 72 inlet; +#X text 413 35 mute; +#X obj 406 222 f; +#X msg 510 214 0; +#X msg 406 102 bang; +#X obj 406 162 moses 1; +#X obj 510 184 t b f; +#X obj 476 140 moses 1; +#X obj 100 178 dbtorms; +#X obj 476 110 r master-lvl; +#X obj 100 50 r master-lvl; +#X obj 406 252 s master-lvl; +#X obj 26 217 inlet~; +#X obj 239 49 inlet; +#X text 239 22 level; +#X obj 239 120 s master-lvl; +#X msg 115 78 set \$1; +#X obj 115 107 outlet; +#X msg 257 77 \; pd dsp 1; +#X obj 100 233 line~; +#X obj 26 254 *~; +#X obj 26 289 dac~; +#X obj 100 205 pack 0 50; +#X text 24 190 audio; +#X text 112 132 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 29 546 pd output; +#X msg 98 512 MUTE; +#X text 143 511 <-- output amplitude; +#X msg 253 7 bang; +#X obj 253 35 delay 5; +#X text 493 269 end of note; +#X obj 359 35 r note; +#N canvas 459 46 678 451 samples 0; +#X graph graph1 0 -1.02 176403 1.02 262 171 462 41; +#X array sample1 176403 float 0; +#X pop; +#X text 264 376 ------ 4 seconds ------; +#X graph graph1 0 -1.02 176403 1.02 262 356 462 226; +#X array sample2 176403 float 0; +#X pop; +#X restore 29 277 pd samples; +#N canvas 21 287 947 410 recorder 0; +#X obj 318 43 inlet; +#X obj 272 196 adc~ 1; +#X obj 272 224 hip~ 5; +#X obj 341 254 line~; +#X obj 272 253 *~; +#X msg 341 226 1; +#X obj 400 191 del 3990; +#X msg 377 226 0 10; +#X obj 272 304 tabwrite~ sample1; +#X obj 124 110 makefilename sample%1; +#X msg 124 139 set \$1 \, bang; +#X msg 446 162 stop; +#X msg 400 162 bang; +#X obj 557 182 loadbang; +#X obj 660 137 openpanel; +#X msg 660 109 bang; +#X text 702 108 <-- browse for samples; +#X text 628 233 v-- re-read original samples; +#X obj 318 72 route record stop reload browse; +#X obj 557 319 soundfiler; +#X msg 557 261 read ../sound/bell.aiff sample1 \, read ../sound/voice2.wav +sample2; +#X msg 660 164 read \$1 sample1; +#X obj 660 191 soundfiler; +#X connect 0 0 18 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 3 0 4 1; +#X connect 4 0 8 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 3 0; +#X connect 9 0 10 0; +#X connect 10 0 8 0; +#X connect 11 0 6 0; +#X connect 12 0 6 0; +#X connect 13 0 20 0; +#X connect 14 0 21 0; +#X connect 15 0 14 0; +#X connect 18 0 9 0; +#X connect 18 0 12 0; +#X connect 18 0 5 0; +#X connect 18 1 7 0; +#X connect 18 1 11 0; +#X connect 18 2 20 0; +#X connect 18 3 15 0; +#X connect 20 0 19 0; +#X connect 21 0 22 0; +#X restore 29 443 pd recorder; +#X msg 29 305 record 1; +#X msg 29 360 stop; +#N canvas 700 402 671 621 playback 0; +#X obj 37 79 line~; +#X obj 56 271 line~; +#X obj 37 302 *~; +#X obj 56 242 r cutoff; +#X obj 37 50 r phase; +#X obj 37 626 outlet~; +#X obj 37 598 hip~ 5; +#X obj 49 113 r sample-number; +#X obj 49 142 makefilename sample%d; +#X msg 49 170 set \$1; +#X obj 37 211 tabread4~ sample1; +#X obj 55 338 r envelope; +#X obj 55 396 dbtorms; +#X obj 55 367 unpack; +#X obj 55 425 sqrt; +#X obj 55 454 sqrt; +#X obj 55 482 line~; +#X obj 37 569 *~; +#X obj 55 511 *~; +#X obj 55 540 *~; +#X text 107 51 messages to the phase generating line~; +#X text 188 114 setting the sample number.; +#X text 238 143 compute the name; +#X text 110 171 and send a "set" message to the tabread4~.; +#X text 116 270 line~ for de-clicking; +#X text 156 341 The envelope generator. Rather than sending our message +straight to the line~ we unpack it in order to fool with the amplitude +field.; +#X text 126 397 convert amplitude to linear units.; +#X text 121 426 take the fourth root. This because we want to raies +the line~'s output to the 4th power afterward. This is an inexpensive +way to give the rise and decay a more natural sounding evolution than +just a straight line.; +#X text 94 514 square the output twice to get the fourth power.; +#X connect 0 0 10 0; +#X connect 1 0 2 1; +#X connect 2 0 17 0; +#X connect 3 0 1 0; +#X connect 4 0 0 0; +#X connect 6 0 5 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 10 0 2 0; +#X connect 11 0 13 0; +#X connect 12 0 14 0; +#X connect 13 0 12 0; +#X connect 13 1 16 1; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 16 0 18 0; +#X connect 16 0 18 1; +#X connect 17 0 6 0; +#X connect 18 0 19 0; +#X connect 18 0 19 1; +#X connect 19 0 17 1; +#X restore 29 480 pd playback; +#X msg 29 332 record 2; +#X text 641 25 ARGUMENTS FOR NOTES:; +#X text 662 53 pitch in halftones; +#X text 662 77 amplitude (dB); +#X text 662 125 sample number; +#X text 662 101 duration (msec); +#X text 662 149 start location (msec); +#X text 662 173 rise time (msec); +#X text 662 197 decay time (msec); +#X obj 359 62 unpack 0 0 0 0 0 0 0; +#X text 46 6 CHOCOLATE SAMPLER; +#X obj 517 168 f; +#X obj 452 142 f; +#X obj 383 142 f; +#X obj 346 142 f; +#X obj 314 142 f; +#X obj 220 142 f; +#X obj 220 169 mtof; +#X obj 220 197 / 261.62; +#X obj 220 224 * 4.41e+08; +#X obj 220 252 +; +#X obj 485 142 delay; +#X obj 314 312 pack 0 0 0 0 0; +#X obj 253 62 t b b b; +#X text 494 346 This starts the note \, sending to "receives" in the +playback subptach. The new receive "envelope" is an amplitude control +in parallel with the cutoff control. The "sample-number" switches the +tabread4~ between tables.; +#X msg 152 44 \; pd dsp 1 \; cutoff 0 5; +#X obj 383 197 + 1; +#X msg 552 467 60 100 10000 1 0 0 0; +#X obj 552 737 s note; +#X msg 517 196 \; envelope 0 \$1; +#X msg 671 691 62; +#X msg 706 691 64; +#X msg 637 691 60; +#X msg 608 691 55; +#X msg 739 691 72; +#X msg 576 691 48; +#X msg 638 734 60.5; +#X msg 552 494 60 90 10000 1 0 0 0; +#X msg 552 522 60 100 10000 2 0 0 0; +#X msg 552 550 60 100 10000 1 3000 0 0; +#X obj 383 169 * 44.1; +#X msg 552 605 60 100 100 1 0 0 0; +#X msg 552 632 60 100 100 1 0 0 1000; +#X msg 552 577 60 100 10000 1 0 1000 0; +#X msg 314 340 \; envelope 0 \, \$1 \$2 \; phase \$3 \, \$4 1e+07 \; +sample-number \$5 \; cutoff 1 5 \;; +#X text 108 315 <-- record; +#X msg 29 388 reload; +#X msg 29 415 browse; +#X text 6 109 transposition works; +#X text 6 133 by altering the phase; +#X text 6 181 The mtof and / 261; +#X text 6 205 calculate speed change; +#X text 6 229 considering 60 as unity.; +#X text 20 43 as before we; +#X text 11 64 mute and wait; +#X text 6 157 target ($4 below right.); +#X text 446 303 combine amplitude \, rise time \, start phase \, end +phase \, and sample number in one message; +#X text 16 594 This patch take the same principle as the previous one +\, but allows you to parametrize sample playback. Since we must wait +5 msec before starting the playback \, we store all the parameters +in "f" objects \, and recall them to construct the new note. Transposition +is done by altering the amount to play back in the (artificial) ten +thousand seconds (1e+07). The playback segment can be altered to start +in the middle of the sample instead of the beginning \, and you can +change the duration and rise and decay times.; +#X text 744 468 straight playback; +#X text 749 495 change amplitude; +#X text 752 523 change sample number; +#X text 755 550 change start location; +#X text 754 576 change rise time; +#X text 754 609 change duration; +#X text 755 633 ... and decay time; +#X text 688 736 microtones OK too.; +#X text 576 667 If you omit values they stay unchanged; +#X text 799 759 updated for Pd version 0.33; +#X text 548 426 Here are buttons to demonstrate the effect of varying +the parameters one by one.; +#X connect 4 0 5 1; +#X connect 5 0 4 0; +#X connect 6 0 5 2; +#X connect 8 0 9 0; +#X connect 8 0 42 0; +#X connect 9 0 40 0; +#X connect 11 0 26 0; +#X connect 14 0 13 0; +#X connect 15 0 13 0; +#X connect 16 0 5 0; +#X connect 17 0 13 0; +#X connect 26 0 33 1; +#X connect 26 0 8 0; +#X connect 26 1 32 1; +#X connect 26 2 38 1; +#X connect 26 3 31 1; +#X connect 26 4 30 1; +#X connect 26 5 29 1; +#X connect 26 6 28 1; +#X connect 28 0 46 0; +#X connect 29 0 39 1; +#X connect 30 0 57 0; +#X connect 31 0 39 4; +#X connect 32 0 39 0; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 36 0; +#X connect 36 0 37 0; +#X connect 37 0 39 3; +#X connect 38 0 28 0; +#X connect 39 0 61 0; +#X connect 40 0 32 0; +#X connect 40 1 33 0; +#X connect 40 2 29 0; +#X connect 40 2 30 0; +#X connect 40 2 31 0; +#X connect 40 2 38 0; +#X connect 43 0 39 2; +#X connect 43 0 37 1; +#X connect 44 0 45 0; +#X connect 47 0 45 0; +#X connect 48 0 45 0; +#X connect 49 0 45 0; +#X connect 50 0 45 0; +#X connect 51 0 45 0; +#X connect 52 0 45 0; +#X connect 53 0 45 0; +#X connect 54 0 45 0; +#X connect 55 0 45 0; +#X connect 56 0 45 0; +#X connect 57 0 43 0; +#X connect 58 0 45 0; +#X connect 59 0 45 0; +#X connect 60 0 45 0; +#X connect 63 0 13 0; +#X connect 64 0 13 0; diff --git a/pd/doc/3.audio.examples/35.qlist.txt b/pd/doc/3.audio.examples/35.qlist.txt new file mode 100644 index 00000000..0c412767 --- /dev/null +++ b/pd/doc/3.audio.examples/35.qlist.txt @@ -0,0 +1,147 @@ +note 60 90 50 2 50 30 30; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +15 note 60; +100 note 59 90 100; +comment measure 1; +100 note 60 90 150 2 0; + note 36 90 200 2 50; +200 note 48 90 250 2 0; + note 40 90 200 2 50; + note 43 90 200 2 50; +200 note 48 90 250 2 0; + note 31 90 200 2 50; +200 note 55 90 100; + note 41 90 200; + note 43 90 200; +100 note 53 90 100; +100 note 52 90 100; + note 36 90 200; +100 note 55 90 100; +100 note 60 90 100; + note 40 90 200; + note 43 90 200; +100 note 59 90 100; +100 note 60 90 100; + note 25 90 200; +100 note 64 90 100; +100 note 62 90 100; + note 39 90 200; + note 43 90 200; +100 note 61 90 100; + +comment measure 2; +100 note 62 90 150 2 0; + note 26 90 200; +200 note 50 90 250 2 50; + note 41 90 200; + note 42 90 200; +200 note 50 90 250; + note 29 90 200; +200 note 50 90 100; + note 30 90 200; + note 44 90 200; + note 48 90 200; +100 note 48 90 100; +100 note 47 90 100; + note 31 90 200; + note 43 90 200; + note 47 90 200; +100 note 50 90 100; +100 note 55 90 100; + note 34 90 200; + note 42 90 200; + note 46 90 200; +100 note 54 90 100; +100 note 55 90 200; + note 35 90 200; + note 42 90 200; + note 45 90 200; +200 note 57 90 100; + note 41 90 200; + note 47 90 200; +100 note 59 90 100; +comment measure 3; +100 note 60 90 100; + note 24 90 200; + note 40 90 200; + note 48 90 200 2 0; + +100 note 59 90 100 2 50; +100 note 57 90 100; +100 note 55 90 100; + +100 note 57 90 100; + note 28 90 200; + note 38 90 200; + note 46 90 200; +100 note 55 90 100; +100 note 53 90 100; +100 note 52 90 100; + +100 note 53 90 100; + note 29 90 100; + note 36 90 100; + note 45 90 100; +100 note 52 90 100; +100 note 50 90 100; + note 29 90 300; + note 36 90 300; + note 45 90 300; +100 note 48 90 100; + +100 note 50 90 100; +100 note 48 90 100; +100 note 47 90 100; + note 29 90 300; + note 38 90 300; + note 44 90 300 2 0; +100 note 45 90 100 2 50; + +comment measure 4; +100 note 43 90 100; + note 31 90 200; + note 38 90 200; +100 note 48 90 100; +100 note 47 90 100; + note 31 90 300; + note 40 90 300; + note 43 90 300 2 0; +100 note 50 90 100 2 50; + +100 note 48 90 100; +100 note 52 90 100; +100 note 50 90 100; + note 31 90 300 2 0; + note 41 90 300; + note 43 90 300; +100 note 53 90 100 2 50; + +100 note 52 90 200; + note 31 90 300 2 50; +200 note 48 90 200; + note 19 90 200 2 50; + note 29 90 200 2 50; + note 36 90 200 2 50; + +200 note 48 90 100 2 50 0 4000; + note 12 90 300; + note 28 90 300; + note 36 90 300; + + + diff --git a/pd/doc/3.audio.examples/35.sampler.poly.pd b/pd/doc/3.audio.examples/35.sampler.poly.pd new file mode 100644 index 00000000..e42b586d --- /dev/null +++ b/pd/doc/3.audio.examples/35.sampler.poly.pd @@ -0,0 +1,228 @@ +#N canvas 66 253 1119 674 12; +#X floatatom 582 562 0 0 0; +#N canvas 159 26 495 262 output 0; +#X obj 406 192 t b; +#X obj 406 132 f; +#X obj 406 72 inlet; +#X text 413 35 mute; +#X obj 406 222 f; +#X msg 510 214 0; +#X msg 406 102 bang; +#X obj 406 162 moses 1; +#X obj 510 184 t b f; +#X obj 476 140 moses 1; +#X obj 100 178 dbtorms; +#X obj 476 110 r master-lvl; +#X obj 100 50 r master-lvl; +#X obj 406 252 s master-lvl; +#X obj 26 217 inlet~; +#X obj 239 49 inlet; +#X text 239 22 level; +#X obj 239 120 s master-lvl; +#X msg 115 78 set \$1; +#X obj 115 107 outlet; +#X msg 257 77 \; pd dsp 1; +#X obj 100 233 line~; +#X obj 26 254 *~; +#X obj 26 289 dac~; +#X obj 100 205 pack 0 50; +#X text 24 190 audio; +#X text 112 132 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 547 595 pd output; +#X msg 617 562 MUTE; +#X text 660 561 <-- output amplitude; +#N canvas 0 0 600 392 samples 0; +#N canvas 0 0 450 300 graph1 0; +#X array sample1 176403 float 0; +#X coords 0 1.02 176403 -1.02 200 130 1; +#X restore 262 41 graph; +#X text 282 385 ------ 4 seconds ------; +#N canvas 0 0 450 300 graph1 0; +#X array sample2 176403 float 0; +#X coords 0 1.02 176403 -1.02 200 130 1; +#X restore 262 226 graph; +#X restore 931 97 pd samples; +#N canvas 52 219 967 340 recorder 0; +#X obj 220 21 inlet; +#X obj 174 174 adc~ 1; +#X obj 174 202 hip~ 5; +#X obj 243 232 line~; +#X obj 174 231 *~; +#X msg 243 204 1; +#X obj 302 169 del 3990; +#X msg 279 204 0 10; +#X obj 174 282 tabwrite~ sample1; +#X obj 26 88 makefilename sample%1; +#X msg 26 117 set \$1 \, bang; +#X msg 348 140 stop; +#X msg 302 140 bang; +#X obj 220 50 route record stop reload browse; +#X obj 411 158 loadbang; +#X obj 514 113 openpanel; +#X msg 514 85 bang; +#X text 556 84 <-- browse for samples; +#X text 482 209 v-- re-read original samples; +#X obj 411 295 soundfiler; +#X msg 411 237 read ../sound/bell.aiff sample1 \, read ../sound/voice2.wav +sample2; +#X msg 514 140 read \$1 sample1; +#X obj 514 167 soundfiler; +#X connect 0 0 13 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 3 0 4 1; +#X connect 4 0 8 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 3 0; +#X connect 9 0 10 0; +#X connect 10 0 8 0; +#X connect 11 0 6 0; +#X connect 12 0 6 0; +#X connect 13 0 9 0; +#X connect 13 0 12 0; +#X connect 13 0 5 0; +#X connect 13 1 7 0; +#X connect 13 1 11 0; +#X connect 13 2 20 0; +#X connect 13 3 16 0; +#X connect 14 0 20 0; +#X connect 15 0 21 0; +#X connect 16 0 15 0; +#X connect 20 0 19 0; +#X connect 21 0 22 0; +#X restore 931 284 pd recorder; +#X msg 931 146 record 1; +#X msg 931 202 stop; +#X msg 931 174 record 2; +#X text 19 49 ARGUMENTS FOR NOTES:; +#X text 19 71 pitch in halftones; +#X text 19 95 amplitude (dB); +#X text 19 143 sample number; +#X text 19 119 duration (msec); +#X text 19 167 start location (msec); +#X text 19 191 rise time (msec); +#X text 19 215 decay time (msec); +#X msg 931 229 reload; +#X msg 931 257 browse; +#X text 47 10 POLYPHONIC SAMPLER; +#X obj 547 522 sampvoice; +#X obj 547 494 sampvoice; +#X obj 547 467 sampvoice; +#X obj 547 439 sampvoice; +#X obj 547 412 sampvoice; +#X obj 547 384 sampvoice; +#X obj 547 356 sampvoice; +#X obj 547 329 sampvoice; +#X obj 631 17 r note; +#X obj 631 44 unpack 0 0 0 0 0 0 0; +#X obj 604 76 t b f; +#X obj 544 109 f; +#X obj 580 109 + 1; +#X obj 552 146 mod 1e+06; +#X obj 544 175 makenote 64; +#X obj 544 203 poly 8 1; +#X obj 544 230 stripnote; +#X obj 617 272 pack 0 0 0 0 0 0 0 0; +#X obj 617 300 route 1 2 3 4 5 6 7 8; +#X text 929 124 record \, etc.; +#X text 206 142 increment mod 1e+06 to make fake pitch; +#X text 326 177 supply note-off message; +#X text 336 207 allocate sampler voice; +#X text 359 232 drop note off again; +#X obj 736 516 qlist; +#X obj 870 520 r comment; +#X text 732 445 sailors to untie him...; +#X text 735 395 Lashed to the mast of his boat \, Ulysses; +#X text 735 420 hears beautiful singing. He begs his; +#X text 19 271 Here we take the previous patch and make it polyphonic +\, with 8 voices. The single voice which we had before has been made +into an abstraction \, "sampvoice.pd" \, which we instantiate in 8 +copies. Earlier we used sends and receives to pass messages to "cutoff" +\, etc \, but here if we did that the copies of sampvoice would be +sending messages to each other \, so we combine the control and the +audio computation in the sampvoice abstraction without using send and +receive. Click on one to see how.; +#X text 20 421 The "poly" object essentially repeats pitch and velocity +pairs to its output \, but also sending a voice number from its left +outlet. To use it \, we unpack the 7 parameters \, calculate the voice +number \, repack the message as 8 parameters with voice number first +\, and use "route" to send it to one of the 8 voices.; +#X text 20 523 There's some bother because poly expects to track note +on and note off messages separately as they would come from a MIDI +keyboard. So we assign each note a unique fake "pitch" \, use makenote +to generate the note-off messages \, and run poly on the resulting +stream. We then discard both pitch and velocity (using the velocity +only to strip note-offs) and rebuild the original message adding the +voice number we just scored.; +#X text 854 639 updated for Pd version 0.33; +#X msg 736 486 read 35.qlist.txt \, rewind \, tempo 1 \, bang; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 6 0 5 0; +#X connect 7 0 5 0; +#X connect 8 0 5 0; +#X connect 17 0 5 0; +#X connect 18 0 5 0; +#X connect 20 0 1 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 23 0 22 0; +#X connect 24 0 23 0; +#X connect 25 0 24 0; +#X connect 26 0 25 0; +#X connect 27 0 26 0; +#X connect 28 0 29 0; +#X connect 29 0 30 0; +#X connect 29 1 37 2; +#X connect 29 2 34 2; +#X connect 29 2 37 3; +#X connect 29 3 37 4; +#X connect 29 4 37 5; +#X connect 29 5 37 6; +#X connect 29 6 37 7; +#X connect 30 0 31 0; +#X connect 30 1 37 1; +#X connect 31 0 32 0; +#X connect 31 0 34 0; +#X connect 32 0 33 0; +#X connect 33 0 31 1; +#X connect 34 0 35 0; +#X connect 34 1 35 1; +#X connect 35 0 36 0; +#X connect 35 2 36 1; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 38 0 27 1; +#X connect 38 1 26 1; +#X connect 38 2 25 1; +#X connect 38 3 24 1; +#X connect 38 4 23 1; +#X connect 38 5 22 1; +#X connect 38 6 21 1; +#X connect 38 7 20 1; +#X connect 53 0 44 0; diff --git a/pd/doc/3.audio.examples/36.PART5.envelopes.pd b/pd/doc/3.audio.examples/36.PART5.envelopes.pd new file mode 100644 index 00000000..61e7a6d7 --- /dev/null +++ b/pd/doc/3.audio.examples/36.PART5.envelopes.pd @@ -0,0 +1,90 @@ +#N canvas 173 105 609 433 12; +#X floatatom 96 358 0 0 100; +#N canvas 448 68 641 420 output 0; +#X obj 430 203 t b; +#X obj 430 143 f; +#X obj 430 83 inlet; +#X obj 430 233 f; +#X msg 541 225 0; +#X msg 430 113 bang; +#X obj 430 173 moses 1; +#X obj 496 151 moses 1; +#X obj 107 174 dbtorms; +#X obj 496 121 r master-lvl; +#X obj 107 56 r master-lvl; +#X obj 430 263 s master-lvl; +#X obj 36 202 inlet~; +#X obj 251 229 inlet; +#X obj 269 257 s master-lvl; +#X msg 119 85 set \$1; +#X obj 119 115 outlet; +#X msg 251 283 \; pd dsp 1; +#X obj 107 236 line~; +#X obj 36 258 *~; +#X obj 36 290 dac~; +#X obj 107 204 pack 0 50; +#X text 23 179 audio in; +#X text 2 313 out both channels; +#X obj 36 231 hip~ 1; +#X obj 541 194 t b; +#X connect 0 0 3 0; +#X connect 1 0 6 0; +#X connect 2 0 5 0; +#X connect 3 0 11 0; +#X connect 4 0 11 0; +#X connect 5 0 1 0; +#X connect 6 0 0 0; +#X connect 6 1 25 0; +#X connect 7 1 3 1; +#X connect 8 0 21 0; +#X connect 9 0 1 1; +#X connect 9 0 7 0; +#X connect 10 0 8 0; +#X connect 10 0 15 0; +#X connect 12 0 24 0; +#X connect 13 0 14 0; +#X connect 13 0 17 0; +#X connect 15 0 16 0; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 20 1; +#X connect 21 0 18 0; +#X connect 24 0 19 0; +#X connect 25 0 4 0; +#X restore 58 391 pd output; +#X msg 134 359 MUTE; +#X msg 247 180 bang; +#X msg 328 180 bang; +#X text 244 152 attack; +#X text 325 150 release; +#X obj 247 281 line~; +#X msg 328 254 0 500; +#X text 134 10 ENVELOPE GENERATORS; +#X obj 58 246 phasor~ 50; +#X obj 58 301 *~; +#X obj 58 328 wrap~; +#X msg 247 248 1 2500; +#X obj 58 275 -~ 0.5; +#X msg 179 247 10 200; +#X obj 247 221 del 200; +#X text 349 405 updated for Pd version 0.34; +#X text 39 35 This patch uses an envelope generator to control a sound. +When you hit "attack" two things happen. First \, the line~ object +rises to 10 in 200 milliseconds. Then after a "delay" of the same 200 +msec \, the second message sends the line~ back down to 1 over another +2500 msec. The "release" just ramps us down to zero at the end.; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 3 0 15 0; +#X connect 3 0 16 0; +#X connect 4 0 8 0; +#X connect 7 0 11 1; +#X connect 8 0 7 0; +#X connect 10 0 14 0; +#X connect 11 0 12 0; +#X connect 12 0 1 0; +#X connect 13 0 7 0; +#X connect 14 0 11 0; +#X connect 15 0 7 0; +#X connect 16 0 13 0; diff --git a/pd/doc/3.audio.examples/37.adsr.pd b/pd/doc/3.audio.examples/37.adsr.pd new file mode 100644 index 00000000..06fa21b7 --- /dev/null +++ b/pd/doc/3.audio.examples/37.adsr.pd @@ -0,0 +1,34 @@ +#N canvas 141 83 672 516 12; +#X text 412 489 updated for Pd version 0.26; +#X graph graph1 0 -1.02 44100 1.02 395 235 595 105; +#X array adsr-output 44100 float 0; +#X pop; +#X text 394 244 ------ 1 second ------; +#X obj 32 74 r trigger; +#X obj 32 148 tabwrite~ adsr-output; +#X obj 54 123 r graphit; +#X msg 31 176 bang; +#X text 75 177 <-- attack and delayed release; +#X obj 42 200 del 500; +#X text 146 283 <-- attack only; +#X msg 31 264 \; pd dsp 1 \; trigger 1 \; graphit bang; +#X text 147 360 <-- release only; +#X msg 30 334 \; pd dsp 1 \; trigger 0 \; graphit bang; +#X msg 42 225 \; trigger 0; +#X text 598 221 -1; +#X text 600 96 1; +#X text 35 24 This patch introduces a simple "adsr" abstraction we'll +use frequently. You can click on the "adsr" object to see what's inside. +; +#X text 30 402 The active ingredient of the ADSR envelope generator +is a single line~ which gets passed messages to make the attack and +release behavior. You can retrigger the ADSR envelope generator all +you wish without having to wait for attacks or releases to finish; +#X text 104 5 ENVELOPE GENERATOR ABSTRACTION; +#X obj 32 100 adsr 1 100 200 50 300; +#X connect 3 0 19 0; +#X connect 5 0 4 0; +#X connect 6 0 10 0; +#X connect 6 0 8 0; +#X connect 8 0 13 0; +#X connect 19 0 4 0; diff --git a/pd/doc/3.audio.examples/38.envelope.dB.pd b/pd/doc/3.audio.examples/38.envelope.dB.pd new file mode 100644 index 00000000..8ec1d1ae --- /dev/null +++ b/pd/doc/3.audio.examples/38.envelope.dB.pd @@ -0,0 +1,158 @@ +#N canvas 112 44 674 673 12; +#X obj 32 80 r trigger; +#X text 85 8 USING ADSR'S OUTPUT AS dB; +#X text 34 28 For natural sounding amplitude control \, you will want +to use the ADSR's output as log amplitude. In practice this is best +done using a lookup table:; +#X obj 32 131 tabread4~ dbtorms; +#N canvas 0 0 450 300 graph1 0; +#X array dbtorms 123 float 1; +#A 0 0 0 1.25893e-05 1.41254e-05 1.58489e-05 1.77828e-05 1.99526e-05 +2.23872e-05 2.51189e-05 2.81838e-05 3.16228e-05 3.54813e-05 3.98107e-05 +4.46684e-05 5.01187e-05 5.62341e-05 6.30957e-05 7.07946e-05 7.94328e-05 +8.91251e-05 1e-04 0.000112202 0.000125893 0.000141254 0.000158489 0.000177828 +0.000199526 0.000223872 0.000251189 0.000281838 0.000316228 0.000354813 +0.000398107 0.000446684 0.000501187 0.000562341 0.000630957 0.000707946 +0.000794328 0.000891251 0.001 0.00112202 0.00125893 0.00141254 0.00158489 +0.00177828 0.00199526 0.00223872 0.00251189 0.00281838 0.00316228 0.00354813 +0.00398107 0.00446684 0.00501187 0.00562341 0.00630957 0.00707946 0.00794328 +0.00891251 0.01 0.0112202 0.0125893 0.0141254 0.0158489 0.0177828 0.0199526 +0.0223872 0.0251189 0.0281838 0.0316228 0.0354813 0.0398107 0.0446684 +0.0501187 0.0562341 0.0630957 0.0707946 0.0794328 0.0891251 0.1 0.112202 +0.125893 0.141254 0.158489 0.177828 0.199526 0.223872 0.251189 0.281838 +0.316228 0.354813 0.398107 0.446684 0.501187 0.562341 0.630957 0.707946 +0.794328 0.891251 1 1.12202 1.25893 1.41254 1.58489 1.77828 1.99526 +2.23872 2.51189 2.81838 3.16228 3.54813 3.98107 4.46684 5.01187 5.62341 +6.30957 7.07946 7.94328 8.91251 10 11.2202 12.5893; +#X coords 0 10 123 0 200 100 1; +#X restore 387 83 graph; +#N canvas 461 495 663 358 make-table 0; +#X obj 97 195 moses 2; +#X msg 81 44 bang; +#X obj 81 73 t b b; +#X obj 152 134 f; +#X obj 190 134 + 1; +#X msg 174 106 0; +#X obj 81 102 until; +#X obj 73 162 sel 122; +#X msg 97 226 0; +#X obj 141 227 dbtorms; +#X obj 152 162 t f f; +#X obj 97 259 tabwrite dbtorms; +#X floatatom 435 103 0 0 0; +#X floatatom 435 186 0 0 0; +#X obj 435 157 tabread4 dbtorms; +#X floatatom 331 183 0 0 0; +#X obj 331 154 dbtorms; +#X text 35 12 bang to recalculate the table; +#X text 268 62 check accuracy of reading table against; +#X text 268 81 the "real" dbtorms object.; +#X connect 0 0 8 0; +#X connect 0 1 9 0; +#X connect 1 0 2 0; +#X connect 2 0 6 0; +#X connect 2 1 5 0; +#X connect 3 0 4 0; +#X connect 3 0 7 0; +#X connect 3 0 10 0; +#X connect 4 0 3 1; +#X connect 5 0 3 1; +#X connect 6 0 3 0; +#X connect 7 0 6 1; +#X connect 8 0 11 0; +#X connect 9 0 11 0; +#X connect 10 0 0 0; +#X connect 10 1 11 1; +#X connect 12 0 14 0; +#X connect 12 0 16 0; +#X connect 14 0 13 0; +#X connect 16 0 15 0; +#X restore 288 328 pd make-table; +#X text 258 299 here's the patch I used to make the table:; +#X obj 48 156 osc~ 440; +#X text 589 176 0; +#X text 590 77 10; +#X text 406 186 ------ 123 samples ------; +#X floatatom 61 204 0 0 0; +#N canvas 159 26 532 285 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X obj 425 153 t b; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 26 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 21 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 5 0; +#X restore 32 232 pd output; +#X msg 108 205 MUTE; +#X text 149 204 <-- output amplitude; +#X text 112 276 <-- attack; +#X text 113 333 <-- release; +#X msg 32 319 \; pd dsp 1 \; trigger 0; +#X obj 32 182 *~; +#X msg 31 264 \; pd dsp 1 \; trigger 1; +#X text 29 431 Notice how the attack sounds different when you retrigger +than when you start from zero. This is because if you go from the steady +state you only rise 30 dB instead of 100 \, so it sounds slower.; +#X obj 32 106 adsr 100 100 200 70 300; +#X text 29 381 The table is indexed from 1 to 120 so that 1 gives a +true zero out and 120 gives 10 (a 20 dB boost.) The extra 20 dB are +for headroom.; +#X text 28 498 If this is a problem you have at least 2 ways of dealing +with it. The best might be to adjust the attack time inside the abstraction +using snapshot~ to find out where you're slewing from \, as demonstrated +in the next patch.; +#X text 406 631 updated for Pd version 0.35; +#X text 28 568 There's also a "real" dbtorms~ object... but it's almost +certainly much more compute-intensive than tabread4~ \, since it has +to call a library "exp" function.; +#X connect 0 0 21 0; +#X connect 3 0 18 0; +#X connect 7 0 18 1; +#X connect 11 0 12 1; +#X connect 12 0 11 0; +#X connect 13 0 12 2; +#X connect 18 0 12 0; +#X connect 21 0 3 0; diff --git a/pd/doc/3.audio.examples/39.envelope.slew.pd b/pd/doc/3.audio.examples/39.envelope.slew.pd new file mode 100644 index 00000000..74599c6c --- /dev/null +++ b/pd/doc/3.audio.examples/39.envelope.slew.pd @@ -0,0 +1,102 @@ +#N canvas 95 40 682 438 12; +#X obj 32 80 r trigger; +#X obj 32 131 tabread4~ dbtorms; +#N canvas 0 0 450 300 graph1 0; +#X array dbtorms 123 float 1; +#A 0 0 0 1.25893e-05 1.41254e-05 1.58489e-05 1.77828e-05 1.99526e-05 +2.23872e-05 2.51189e-05 2.81838e-05 3.16228e-05 3.54813e-05 3.98107e-05 +4.46684e-05 5.01187e-05 5.62341e-05 6.30957e-05 7.07946e-05 7.94328e-05 +8.91251e-05 1e-04 0.000112202 0.000125893 0.000141254 0.000158489 0.000177828 +0.000199526 0.000223872 0.000251189 0.000281838 0.000316228 0.000354813 +0.000398107 0.000446684 0.000501187 0.000562341 0.000630957 0.000707946 +0.000794328 0.000891251 0.001 0.00112202 0.00125893 0.00141254 0.00158489 +0.00177828 0.00199526 0.00223872 0.00251189 0.00281838 0.00316228 0.00354813 +0.00398107 0.00446684 0.00501187 0.00562341 0.00630957 0.00707946 0.00794328 +0.00891251 0.01 0.0112202 0.0125893 0.0141254 0.0158489 0.0177828 0.0199526 +0.0223872 0.0251189 0.0281838 0.0316228 0.0354813 0.0398107 0.0446684 +0.0501187 0.0562341 0.0630957 0.0707946 0.0794328 0.0891251 0.1 0.112202 +0.125893 0.141254 0.158489 0.177828 0.199526 0.223872 0.251189 0.281838 +0.316228 0.354813 0.398107 0.446684 0.501187 0.562341 0.630957 0.707946 +0.794328 0.891251 1 1.12202 1.25893 1.41254 1.58489 1.77828 1.99526 +2.23872 2.51189 2.81838 3.16228 3.54813 3.98107 4.46684 5.01187 5.62341 +6.30957 7.07946 7.94328 8.91251 10 11.2202 12.5893; +#X coords 0 10 123 0 200 100 1; +#X restore 392 93 graph; +#X obj 55 157 osc~ 440; +#X text 594 186 0; +#X text 596 86 10; +#X text 411 196 ------ 123 samples ------; +#X floatatom 70 206 0 0 0; +#N canvas 159 26 530 278 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 395 183 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 389 110 moses 1; +#X obj 83 148 dbtorms; +#X obj 389 85 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 21 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X restore 32 232 pd output; +#X msg 106 205 MUTE; +#X text 147 204 <-- output amplitude; +#X text 112 276 <-- attack; +#X text 113 333 <-- release; +#X msg 32 319 \; pd dsp 1 \; trigger 0; +#X obj 32 182 *~; +#X msg 31 264 \; pd dsp 1 \; trigger 1; +#X text 82 7 ADSR with constant slew rate instead of constant attack +time; +#X text 34 28 Here we swap in "adsr2" so you cam compare. I think sometimes +you'll want the constant rise time \, and sometimes the constant rise +rate as in adsr2.; +#X text 40 390 Click on the adsr2 object to see how this is done.; +#X obj 32 106 adsr2 100 100 200 70 300; +#X text 420 414 updated for Pd version 0.35; +#X connect 0 0 19 0; +#X connect 1 0 14 0; +#X connect 3 0 14 1; +#X connect 7 0 8 1; +#X connect 8 0 7 0; +#X connect 9 0 8 2; +#X connect 14 0 8 0; +#X connect 19 0 1 0; diff --git a/pd/doc/3.audio.examples/40.envelope.pitch.pd b/pd/doc/3.audio.examples/40.envelope.pitch.pd new file mode 100644 index 00000000..42fc9ba8 --- /dev/null +++ b/pd/doc/3.audio.examples/40.envelope.pitch.pd @@ -0,0 +1,209 @@ +#N canvas 222 84 686 544 12; +#X obj 48 106 r trigger; +#X obj 48 154 tabread4~ dbtorms; +#X floatatom 86 232 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 48 258 pd output; +#X msg 124 232 MUTE; +#X text 166 231 <-- output amplitude; +#X text 141 298 <-- attack; +#X text 568 305 <-- release; +#X obj 48 208 *~; +#N canvas 151 343 812 522 make-table 0; +#X msg 82 49 bang; +#X obj 82 78 t b b; +#X obj 141 142 f; +#X obj 179 142 + 1; +#X msg 150 112 0; +#X obj 82 107 until; +#X obj 141 176 t f f; +#X floatatom 369 67 0 0 0; +#X floatatom 369 127 0 0 0; +#N canvas 0 0 450 300 graph1 0; +#X array dbtorms 123 float 1; +#A 0 0 0 1.25893e-05 1.41254e-05 1.58489e-05 1.77828e-05 1.99526e-05 +2.23872e-05 2.51189e-05 2.81838e-05 3.16228e-05 3.54813e-05 3.98107e-05 +4.46684e-05 5.01187e-05 5.62341e-05 6.30957e-05 7.07946e-05 7.94328e-05 +8.91251e-05 1e-04 0.000112202 0.000125893 0.000141254 0.000158489 0.000177828 +0.000199526 0.000223872 0.000251189 0.000281838 0.000316228 0.000354813 +0.000398107 0.000446684 0.000501187 0.000562341 0.000630957 0.000707946 +0.000794328 0.000891251 0.001 0.00112202 0.00125893 0.00141254 0.00158489 +0.00177828 0.00199526 0.00223872 0.00251189 0.00281838 0.00316228 0.00354813 +0.00398107 0.00446684 0.00501187 0.00562341 0.00630957 0.00707946 0.00794328 +0.00891251 0.01 0.0112202 0.0125893 0.0141254 0.0158489 0.0177828 0.0199526 +0.0223872 0.0251189 0.0281838 0.0316228 0.0354813 0.0398107 0.0446684 +0.0501187 0.0562341 0.0630957 0.0707946 0.0794328 0.0891251 0.1 0.112202 +0.125893 0.141254 0.158489 0.177828 0.199526 0.223872 0.251189 0.281838 +0.316228 0.354813 0.398107 0.446684 0.501187 0.562341 0.630957 0.707946 +0.794328 0.891251 1 1.12202 1.25893 1.41254 1.58489 1.77828 1.99526 +2.23872 2.51189 2.81838 3.16228 3.54813 3.98107 4.46684 5.01187 5.62341 +6.30957 7.07946 7.94328 8.91251 10 11.2202 12.5893; +#X coords 0 10 123 0 200 100 1; +#X restore 538 298 graph; +#X text 740 391 0; +#X text 742 291 10; +#X text 544 403 ------ 123 samples ------; +#N canvas 0 0 450 300 graph2 0; +#X array mtof 130 float 1; +#A 0 8.1758 8.66196 9.17702 9.72272 10.3009 10.9134 11.5623 12.2499 +12.9783 13.75 14.5676 15.4339 16.3516 17.3239 18.354 19.4454 20.6017 +21.8268 23.1247 24.4997 25.9565 27.5 29.1352 30.8677 32.7032 34.6478 +36.7081 38.8909 41.2034 43.6535 46.2493 48.9994 51.9131 55 58.2705 +61.7354 65.4064 69.2957 73.4162 77.7817 82.4069 87.3071 92.4986 97.9989 +103.826 110 116.541 123.471 130.813 138.591 146.832 155.563 164.814 +174.614 184.997 195.998 207.652 220 233.082 246.942 261.626 277.183 +293.665 311.127 329.628 349.228 369.994 391.995 415.305 440 466.164 +493.883 523.251 554.365 587.33 622.254 659.255 698.456 739.989 783.991 +830.609 880 932.328 987.767 1046.5 1108.73 1174.66 1244.51 1318.51 +1396.91 1479.98 1567.98 1661.22 1760 1864.66 1975.53 2093 2217.46 2349.32 +2489.02 2637.02 2793.83 2959.96 3135.96 3322.44 3520 3729.31 3951.07 +4186.01 4434.92 4698.64 4978.03 5274.04 5587.65 5919.91 6271.93 6644.88 +7040 7458.62 7902.13 8372.02 8869.84 9397.27 9956.06 10548.1 11175.3 +11839.8 12543.9 13289.8 14080; +#X coords 0 12000 130 0 200 100 1; +#X restore 537 130 graph; +#X obj 283 102 mtof; +#X floatatom 282 127 0 0 0; +#X text 541 237 ------ 130 samples ------; +#X text 746 223 0; +#X text 748 123 12000; +#X obj 81 203 mtof; +#X obj 72 167 sel 129; +#X obj 80 229 tabwrite mtof; +#X obj 369 99 tabread4 mtof; +#X obj 71 418 moses 2; +#X msg 55 267 bang; +#X obj 55 296 t b b; +#X obj 126 357 f; +#X obj 164 357 + 1; +#X msg 148 329 0; +#X obj 55 325 until; +#X obj 47 385 sel 122; +#X msg 71 449 0; +#X obj 115 450 dbtorms; +#X obj 126 385 t f f; +#X obj 71 482 tabwrite dbtorms; +#X text 312 40 ... and test accuracy; +#X text 23 15 patch to recalculate the mtof table; +#X text 107 267 bang to recalculate dbtorms table; +#X connect 0 0 1 0; +#X connect 1 0 5 0; +#X connect 1 1 4 0; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 2 0 20 0; +#X connect 3 0 2 1; +#X connect 4 0 2 1; +#X connect 5 0 2 0; +#X connect 6 0 19 0; +#X connect 6 1 21 1; +#X connect 7 0 14 0; +#X connect 7 0 22 0; +#X connect 14 0 15 0; +#X connect 19 0 21 0; +#X connect 20 0 5 1; +#X connect 22 0 8 0; +#X connect 23 0 31 0; +#X connect 23 1 32 0; +#X connect 24 0 25 0; +#X connect 25 0 29 0; +#X connect 25 1 28 0; +#X connect 26 0 27 0; +#X connect 26 0 30 0; +#X connect 26 0 33 0; +#X connect 27 0 26 1; +#X connect 28 0 26 1; +#X connect 29 0 26 0; +#X connect 30 0 29 1; +#X connect 31 0 34 0; +#X connect 32 0 34 0; +#X connect 33 0 23 0; +#X connect 33 1 34 1; +#X restore 451 222 pd make-table; +#X text 35 6 PITCH ENVELOPES; +#X text 125 24 For pitch envelopes \, unlike amplitude envelopes \, +discontinuities are allowed and sometimes you would rather the envelope +generator actually jump to zero when it's triggered. The "adsr2" object +does this for you if you send a negative trigger instead of a positive +one:; +#X obj 280 106 r trigger2; +#X obj 280 178 tabread4~ mtof; +#X obj 280 202 osc~; +#X msg 46 288 \; pd dsp 1 \; trigger 1 \; trigger2 1; +#X text 358 297 <-- attack; +#X msg 249 293 \; pd dsp 1 \; trigger 1 \; trigger2 -1; +#X msg 472 293 \; pd dsp 1 \; trigger 0 \; trigger2 0; +#X obj 280 154 +~ 69; +#X text 358 314 restarting; +#X text 363 331 pitch env; +#X text 37 377 We have added a new table \, mtof \, for converting +audio signals from pitch to frequency. Its range is 1-127 \, so you +want to add a base pitch in before you start reading from it.; +#X text 37 443 This is an extreme use of pitch enveloping. In a real +situation you might want an envelope controlling vibrato depth or the +like instead of straight pitch.; +#X obj 48 130 adsr2 100 50 200 90 1000; +#X obj 280 130 adsr2 20 200 100 100 1000; +#X text 413 497 updated for Pd version 0.35; +#X connect 0 0 24 0; +#X connect 1 0 8 0; +#X connect 2 0 3 1; +#X connect 3 0 2 0; +#X connect 4 0 3 2; +#X connect 8 0 3 0; +#X connect 12 0 25 0; +#X connect 13 0 14 0; +#X connect 14 0 8 1; +#X connect 19 0 13 0; +#X connect 24 0 1 0; +#X connect 25 0 19 0; diff --git a/pd/doc/3.audio.examples/41.envelope.portamento.pd b/pd/doc/3.audio.examples/41.envelope.portamento.pd new file mode 100644 index 00000000..6542e8b5 --- /dev/null +++ b/pd/doc/3.audio.examples/41.envelope.portamento.pd @@ -0,0 +1,148 @@ +#N canvas 222 84 642 346 12; +#X floatatom 75 227 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 46 255 pd output; +#X msg 123 227 MUTE; +#X text 166 225 <-- output amplitude; +#X obj 46 173 tabread4~ mtof; +#X obj 46 197 osc~; +#N canvas 247 30 505 439 tables 0; +#N canvas 0 0 450 300 graph1 0; +#X array dbtorms 123 float 1; +#A 0 0 0 1.25893e-05 1.41254e-05 1.58489e-05 1.77828e-05 1.99526e-05 +2.23872e-05 2.51189e-05 2.81838e-05 3.16228e-05 3.54813e-05 3.98107e-05 +4.46684e-05 5.01187e-05 5.62341e-05 6.30957e-05 7.07946e-05 7.94328e-05 +8.91251e-05 1e-04 0.000112202 0.000125893 0.000141254 0.000158489 0.000177828 +0.000199526 0.000223872 0.000251189 0.000281838 0.000316228 0.000354813 +0.000398107 0.000446684 0.000501187 0.000562341 0.000630957 0.000707946 +0.000794328 0.000891251 0.001 0.00112202 0.00125893 0.00141254 0.00158489 +0.00177828 0.00199526 0.00223872 0.00251189 0.00281838 0.00316228 0.00354813 +0.00398107 0.00446684 0.00501187 0.00562341 0.00630957 0.00707946 0.00794328 +0.00891251 0.01 0.0112202 0.0125893 0.0141254 0.0158489 0.0177828 0.0199526 +0.0223872 0.0251189 0.0281838 0.0316228 0.0354813 0.0398107 0.0446684 +0.0501187 0.0562341 0.0630957 0.0707946 0.0794328 0.0891251 0.1 0.112202 +0.125893 0.141254 0.158489 0.177828 0.199526 0.223872 0.251189 0.281838 +0.316228 0.354813 0.398107 0.446684 0.501187 0.562341 0.630957 0.707946 +0.794328 0.891251 1 1.12202 1.25893 1.41254 1.58489 1.77828 1.99526 +2.23872 2.51189 2.81838 3.16228 3.54813 3.98107 4.46684 5.01187 5.62341 +6.30957 7.07946 7.94328 8.91251 10 11.2202 12.5893; +#X coords 0 10 123 0 200 100 1; +#X restore 129 49 graph; +#X text 331 142 0; +#X text 333 42 10; +#X text 127 157 ------ 123 samples ------; +#N canvas 0 0 450 300 graph2 0; +#X array mtof 130 float 1; +#A 0 8.1758 8.66196 9.17702 9.72272 10.3009 10.9134 11.5623 12.2499 +12.9783 13.75 14.5676 15.4339 16.3516 17.3239 18.354 19.4454 20.6017 +21.8268 23.1247 24.4997 25.9565 27.5 29.1352 30.8677 32.7032 34.6478 +36.7081 38.8909 41.2034 43.6535 46.2493 48.9994 51.9131 55 58.2705 +61.7354 65.4064 69.2957 73.4162 77.7817 82.4069 87.3071 92.4986 97.9989 +103.826 110 116.541 123.471 130.813 138.591 146.832 155.563 164.814 +174.614 184.997 195.998 207.652 220 233.082 246.942 261.626 277.183 +293.665 311.127 329.628 349.228 369.994 391.995 415.305 440 466.164 +493.883 523.251 554.365 587.33 622.254 659.255 698.456 739.989 783.991 +830.609 880 932.328 987.767 1046.5 1108.73 1174.66 1244.51 1318.51 +1396.91 1479.98 1567.98 1661.22 1760 1864.66 1975.53 2093 2217.46 2349.32 +2489.02 2637.02 2793.83 2959.96 3135.96 3322.44 3520 3729.31 3951.07 +4186.01 4434.92 4698.64 4978.03 5274.04 5587.65 5919.91 6271.93 6644.88 +7040 7458.62 7902.13 8372.02 8869.84 9397.27 9956.06 10548.1 11175.3 +11839.8 12543.9 13289.8 14080; +#X coords 0 12000 130 0 200 100 1; +#X restore 136 226 graph; +#X text 128 336 ------ 130 samples ------; +#X text 340 318 0; +#X text 342 218 12000; +#X restore 490 225 pd tables; +#X text 35 6 PORTAMENTO; +#X obj 46 149 line~; +#X obj 46 101 r pitch; +#X msg 316 101 36; +#X msg 345 101 48; +#X msg 372 101 60; +#X msg 429 101 72; +#X msg 401 101 67; +#X msg 483 101 76; +#X msg 457 101 74; +#X obj 451 165 s pitch; +#X msg 514 101 84; +#X msg 544 101 96; +#X floatatom 143 125 0 0 0; +#X text 173 126 <-- change speed; +#X floatatom 451 139 0 0 0; +#X obj 46 125 pack 0 100; +#X obj 388 192 loadbang; +#X msg 387 214 \; pitch 72; +#X text 40 37 Portamento can be done using just line~ \, but you still +might want to sweep in pitch \, not frequency:; +#X text 363 293 updated for Pd version 0.35; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 4 0 5 0; +#X connect 5 0 1 0; +#X connect 8 0 4 0; +#X connect 9 0 23 0; +#X connect 10 0 22 0; +#X connect 11 0 22 0; +#X connect 12 0 22 0; +#X connect 13 0 22 0; +#X connect 14 0 22 0; +#X connect 15 0 22 0; +#X connect 16 0 22 0; +#X connect 18 0 22 0; +#X connect 19 0 22 0; +#X connect 20 0 23 1; +#X connect 22 0 17 0; +#X connect 23 0 8 0; +#X connect 24 0 25 0; diff --git a/pd/doc/3.audio.examples/42.PART6.analog.sequencer.pd b/pd/doc/3.audio.examples/42.PART6.analog.sequencer.pd new file mode 100644 index 00000000..b217112f --- /dev/null +++ b/pd/doc/3.audio.examples/42.PART6.analog.sequencer.pd @@ -0,0 +1,133 @@ +#N canvas 222 24 761 466 12; +#X floatatom 61 408 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 23 433 pd output; +#X msg 99 405 MUTE; +#X text 139 406 <-- output amplitude; +#X obj 336 272 loadbang; +#X text 35 6 ANALOG SYNTH SEQUENCER; +#X obj 215 152 metro 100; +#X obj 214 178 f; +#X obj 248 181 + 1; +#X obj 248 205 mod 11; +#X graph graph1 0 36 11 96 511 197 711 97; +#X array array1 11 float 0; +#X pop; +#X floatatom 215 127 0 0 0; +#X floatatom 304 152 0 0 0; +#X obj 214 230 tabread array1; +#X obj 214 256 mtof; +#X obj 214 283 osc~ 0; +#X msg 26 171 1; +#X obj 24 303 *~; +#X obj 24 350 cos~; +#X obj 24 375 hip~ 5; +#X obj 24 327 +~ 0.1; +#X msg 336 298 \; array1 0 50 51 52 50 52 56 50 56 58 52 58; +#X floatatom 43 219 0 0 0; +#X floatatom 163 221 0 0 0; +#X floatatom 93 219 0 0 0; +#X floatatom 128 220 0 0 0; +#X msg 93 311 0; +#X msg 93 329 0.1; +#X msg 93 348 0.25; +#X msg 215 101 1; +#X text 244 101 <--START; +#X text 126 331 <--symmetry; +#X text 72 185 ADSR controls; +#X text 43 199 lvl; +#X text 95 200 A; +#X text 137 201 D; +#X text 170 202 S; +#X floatatom 298 181 0 0 0; +#X text 332 183 <--increment; +#X text 339 155 <--msec; +#X text 20 35 Analog synths had sequencers which could be used in a +wide variety of ways. You can use an array to hold a sequence of control +values as shown here.; +#X obj 23 274 adsr 1 65 13 10 1000; +#X obj 42 243 / 100; +#X text 336 340 You can also do microtones \; 50.5 is a quarter tone +sharper than 50; +#X text 505 431 updated for Pd version 0.34; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 4 0 21 0; +#X connect 6 0 7 0; +#X connect 6 0 16 0; +#X connect 7 0 8 0; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 9 0 7 1; +#X connect 11 0 6 0; +#X connect 12 0 6 1; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 15 0 17 1; +#X connect 16 0 41 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 1 0; +#X connect 20 0 18 0; +#X connect 22 0 42 0; +#X connect 23 0 41 4; +#X connect 24 0 41 2; +#X connect 25 0 41 3; +#X connect 26 0 20 1; +#X connect 27 0 20 1; +#X connect 28 0 20 1; +#X connect 29 0 11 0; +#X connect 37 0 8 1; +#X connect 41 0 17 0; +#X connect 42 0 41 1; diff --git a/pd/doc/3.audio.examples/43.monophonic.synth.pd b/pd/doc/3.audio.examples/43.monophonic.synth.pd new file mode 100644 index 00000000..26603430 --- /dev/null +++ b/pd/doc/3.audio.examples/43.monophonic.synth.pd @@ -0,0 +1,135 @@ +#N canvas 63 28 664 702 12; +#X floatatom 71 494 4 0 0; +#X floatatom 104 625 0 0 100; +#N canvas 269 205 698 344 output 0; +#X obj 388 156 t b; +#X obj 388 105 f; +#X obj 388 54 inlet; +#X obj 388 181 f; +#X msg 482 174 0; +#X msg 388 79 bang; +#X obj 388 130 moses 1; +#X obj 482 149 t b f; +#X obj 444 111 moses 1; +#X obj 91 148 dbtorms; +#X obj 444 86 r master-lvl; +#X obj 91 48 r master-lvl; +#X obj 388 207 s master-lvl; +#X obj 28 169 inlet~; +#X obj 213 195 inlet; +#X obj 229 218 s master-lvl; +#X msg 101 72 set \$1; +#X obj 101 98 outlet; +#X msg 213 241 \; pd dsp 1; +#X obj 91 201 line~; +#X obj 31 219 *~; +#X obj 31 247 dac~; +#X obj 91 173 pack 0 50; +#X text 17 149 audio in; +#X obj 28 194 hip~ 1; +#X connect 0 0 3 0; +#X connect 1 0 6 0; +#X connect 2 0 5 0; +#X connect 3 0 12 0; +#X connect 4 0 12 0; +#X connect 5 0 1 0; +#X connect 6 0 0 0; +#X connect 6 1 7 0; +#X connect 7 0 4 0; +#X connect 8 1 3 1; +#X connect 9 0 22 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 16 0; +#X connect 13 0 24 0; +#X connect 14 0 15 0; +#X connect 14 0 18 0; +#X connect 16 0 17 0; +#X connect 19 0 20 1; +#X connect 20 0 21 0; +#X connect 20 0 21 1; +#X connect 22 0 19 0; +#X connect 24 0 20 0; +#X restore 72 648 pd output; +#X msg 137 625 MUTE; +#X obj 71 521 mtof; +#X obj 77 345 stripnote; +#X obj 201 500 select; +#X obj 246 369 float; +#X obj 255 318 t b f; +#X obj 255 462 float; +#X text 318 310 f - store pitch below; +#X text 301 368 velocity stored here; +#X text 349 395 test velocity for note on or off; +#X text 301 425 note on; +#X text 201 408 note; +#X text 205 423 off; +#X text 308 464 recall pitch; +#X text 272 508 test against latest note-on pitch; +#X text 96 367 pitch \, only; +#X text 96 386 for note-on; +#X text 86 456 pitch; +#X text 197 6 MONOPHONIC MIDI SYNTH; +#X obj 79 308 unpack; +#X obj 80 228 notein; +#X obj 79 260 pack; +#X obj 71 547 osc~; +#X obj 71 573 *~; +#X obj 71 600 cos~; +#X obj 166 557 line~; +#X msg 121 526 \$1 100; +#X msg 201 526 0 1000; +#X obj 121 500 / 100; +#X text 81 74 First \, at top \, incoming MIDI notes are parsed and +used to set pitch and trigger an ADSR envelope. Second \, the envelope +generator itself has been extended to offer controls over the time +and target values via number boxes.; +#X text 82 25 This patch shows how to make a monophonic synthesizer +that could be controlled from a MIDI or voltage-control keyboard--in +this example we assume MIDI.; +#X text 350 658 updated for Pd version 0.34; +#X msg 237 256 55 64; +#X msg 237 282 55 0; +#X msg 181 230 48 200; +#X msg 180 257 48 64; +#X msg 180 283 48 0; +#X text 79 140 The note-off testing is complicated by the fact that +we have to test both that the velocity is zero \, and further that +the note-off pitch matches the pitch that is now playing (the most +recent note-on pitch.); +#X text 317 327 b - bang to recall velocity; +#X obj 246 417 sel 0; +#X connect 0 0 4 0; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 4 0 25 0; +#X connect 5 0 0 0; +#X connect 5 0 6 1; +#X connect 6 0 30 0; +#X connect 7 0 42 0; +#X connect 8 0 7 0; +#X connect 8 1 9 1; +#X connect 9 0 6 0; +#X connect 22 0 5 0; +#X connect 22 0 8 0; +#X connect 22 1 5 1; +#X connect 22 1 7 1; +#X connect 23 0 24 0; +#X connect 23 1 24 1; +#X connect 24 0 22 0; +#X connect 25 0 26 0; +#X connect 26 0 27 0; +#X connect 27 0 2 0; +#X connect 28 0 26 1; +#X connect 29 0 28 0; +#X connect 30 0 28 0; +#X connect 31 0 29 0; +#X connect 35 0 22 0; +#X connect 36 0 22 0; +#X connect 37 0 22 0; +#X connect 38 0 22 0; +#X connect 39 0 22 0; +#X connect 42 0 9 0; +#X connect 42 1 31 0; diff --git a/pd/doc/3.audio.examples/44.sample.hold.pd b/pd/doc/3.audio.examples/44.sample.hold.pd new file mode 100644 index 00000000..ef504816 --- /dev/null +++ b/pd/doc/3.audio.examples/44.sample.hold.pd @@ -0,0 +1,160 @@ +#N canvas 186 95 944 489 12; +#X text 597 420 updated for Pd version 0.26; +#X floatatom 94 393 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 65 421 pd output; +#X msg 141 393 MUTE; +#X text 184 392 <-- output amplitude; +#N canvas 0 0 450 300 graph1 0; +#X array samphold 44100 float 0; +#X coords 0 1 44100 0 300 200 1; +#X restore 606 36 graph; +#N canvas 0 0 439 429 tables 1; +#N canvas 0 0 450 300 graph1 0; +#X array dbtorms 123 float 1; +#A 0 0 0 1.25893e-05 1.41254e-05 1.58489e-05 1.77828e-05 1.99526e-05 +2.23872e-05 2.51189e-05 2.81838e-05 3.16228e-05 3.54813e-05 3.98107e-05 +4.46684e-05 5.01187e-05 5.62341e-05 6.30957e-05 7.07946e-05 7.94328e-05 +8.91251e-05 1e-04 0.000112202 0.000125893 0.000141254 0.000158489 0.000177828 +0.000199526 0.000223872 0.000251189 0.000281838 0.000316228 0.000354813 +0.000398107 0.000446684 0.000501187 0.000562341 0.000630957 0.000707946 +0.000794328 0.000891251 0.001 0.00112202 0.00125893 0.00141254 0.00158489 +0.00177828 0.00199526 0.00223872 0.00251189 0.00281838 0.00316228 0.00354813 +0.00398107 0.00446684 0.00501187 0.00562341 0.00630957 0.00707946 0.00794328 +0.00891251 0.01 0.0112202 0.0125893 0.0141254 0.0158489 0.0177828 0.0199526 +0.0223872 0.0251189 0.0281838 0.0316228 0.0354813 0.0398107 0.0446684 +0.0501187 0.0562341 0.0630957 0.0707946 0.0794328 0.0891251 0.1 0.112202 +0.125893 0.141254 0.158489 0.177828 0.199526 0.223872 0.251189 0.281838 +0.316228 0.354813 0.398107 0.446684 0.501187 0.562341 0.630957 0.707946 +0.794328 0.891251 1 1.12202 1.25893 1.41254 1.58489 1.77828 1.99526 +2.23872 2.51189 2.81838 3.16228 3.54813 3.98107 4.46684 5.01187 5.62341 +6.30957 7.07946 7.94328 8.91251 10 11.2202 12.5893; +#X coords 0 10 123 0 200 100 1; +#X restore 78 55 graph; +#X text 280 148 0; +#X text 282 48 10; +#X text 97 158 ------ 123 samples ------; +#N canvas 0 0 450 300 graph2 0; +#X array mtof 130 float 1; +#A 0 8.1758 8.66196 9.17702 9.72272 10.3009 10.9134 11.5623 12.2499 +12.9783 13.75 14.5676 15.4339 16.3516 17.3239 18.354 19.4454 20.6017 +21.8268 23.1247 24.4997 25.9565 27.5 29.1352 30.8677 32.7032 34.6478 +36.7081 38.8909 41.2034 43.6535 46.2493 48.9994 51.9131 55 58.2705 +61.7354 65.4064 69.2957 73.4162 77.7817 82.4069 87.3071 92.4986 97.9989 +103.826 110 116.541 123.471 130.813 138.591 146.832 155.563 164.814 +174.614 184.997 195.998 207.652 220 233.082 246.942 261.626 277.183 +293.665 311.127 329.628 349.228 369.994 391.995 415.305 440 466.164 +493.883 523.251 554.365 587.33 622.254 659.255 698.456 739.989 783.991 +830.609 880 932.328 987.767 1046.5 1108.73 1174.66 1244.51 1318.51 +1396.91 1479.98 1567.98 1661.22 1760 1864.66 1975.53 2093 2217.46 2349.32 +2489.02 2637.02 2793.83 2959.96 3135.96 3322.44 3520 3729.31 3951.07 +4186.01 4434.92 4698.64 4978.03 5274.04 5587.65 5919.91 6271.93 6644.88 +7040 7458.62 7902.13 8372.02 8869.84 9397.27 9956.06 10548.1 11175.3 +11839.8 12543.9 13289.8 14080; +#X coords 0 12000 130 0 200 100 1; +#X restore 85 232 graph; +#X text 95 340 ------ 130 samples ------; +#X text 294 325 0; +#X text 296 225 12000; +#X restore 648 280 pd tables; +#X text 67 8 SAMPLE AND HOLD; +#X obj 141 292 phasor~ 5; +#X obj 44 267 phasor~ 7; +#X obj 44 292 samphold~; +#X floatatom 44 242 0 0 0; +#X floatatom 141 237 0 0 0; +#X obj 216 345 tabwrite~ samphold; +#X msg 216 320 bang; +#X obj 44 367 tabread4~ mtof; +#X obj 44 317 *~ 48; +#X obj 44 342 +~ 36; +#X obj 44 392 osc~; +#X msg 216 262 0; +#X text 259 319 <--graph output; +#X obj 44 217 unpack; +#X text 254 259 <-- reset phase; +#X msg 311 131 32 96.33; +#X msg 124 131 5 7; +#X msg 44 131 1 5; +#X msg 78 131 2 11; +#X msg 161 131 3.7 8.8; +#X msg 235 131 3.4 8.9; +#X text 16 31 Another analog favorite \, the sample and hold unit freezes +an audio signal on command. In the Pd version \, the second input of +samphold~ triggers it \, and the first input becomes the output's new +value whenever the trigger decreases from one sample to the next. This +is ideal for updating values when a phasor wraps around.; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 16 0; +#X connect 10 0 13 0; +#X connect 11 0 9 0; +#X connect 12 0 8 0; +#X connect 14 0 13 0; +#X connect 15 0 18 0; +#X connect 16 0 17 0; +#X connect 17 0 15 0; +#X connect 18 0 2 0; +#X connect 19 0 8 1; +#X connect 19 0 9 1; +#X connect 21 0 11 0; +#X connect 21 1 12 0; +#X connect 23 0 21 0; +#X connect 24 0 21 0; +#X connect 25 0 21 0; +#X connect 26 0 21 0; +#X connect 27 0 21 0; +#X connect 28 0 21 0; diff --git a/pd/doc/3.audio.examples/45.envelope.follower.pd b/pd/doc/3.audio.examples/45.envelope.follower.pd new file mode 100644 index 00000000..0c3de2b4 --- /dev/null +++ b/pd/doc/3.audio.examples/45.envelope.follower.pd @@ -0,0 +1,101 @@ +#N canvas 64 77 982 581 12; +#X text 759 566 updated for Pd version 0.26; +#X text 67 8 ENVELOPE FOLLOWERS; +#X text 17 28 The env~ object reports ths RMS signal level over the last 256 samples (by default) or any other power of 2 that's at least twice the block size. The analysis is done in an overlapped fashion so that results appear every N/2 points if N is the analysis window size. So the larger the window \, the stabler the result and the less frequently it appears. Computation time doesn't depend heavily on N.; +#X text 471 28 Envelope followers are frequently used to detect attacks and periods of silence. (There are fancier attack detectors out there \, though.) Here is a simple threshold-based attack and rest detector.; +#X obj 152 160 dbtorms; +#X floatatom 75 142; +#X obj 75 165 osc~ 440; +#X obj 75 188 *~ 0; +#X obj 75 211 env~; +#X floatatom 136 216; +#X floatatom 152 137; +#X msg 219 155 \; pd dsp 1; +#X obj 87 307 t b f; +#X floatatom 87 330; +#X obj 94 385 pack; +#X text 198 215 note 3.01 dB difference between peak and RMS amplitudes.; +#X obj 94 408 route 0 1; +#X obj 94 431 > 55; +#X obj 139 433 < 45; +#X obj 94 454 sel 1; +#X obj 139 456 sel 1; +#X msg 16 494 1; +#X msg 45 494 0; +#X obj 94 494 print attack; +#X obj 87 365 != 0; +#X obj 517 267 t b f; +#X floatatom 517 290; +#X obj 524 348 pack; +#X obj 524 371 route 0 1; +#X obj 524 404 sel 1; +#X msg 458 525 1; +#X msg 488 525 0; +#X obj 517 326 != 0; +#X obj 547 290 < 45; +#X obj 542 441 timer; +#X obj 600 371 sel 0; +#X obj 616 496 sel 0; +#X obj 542 487 sel 1; +#X obj 542 528 print rest; +#X obj 542 464 > 1000; +#X text 125 330 state -- 1 if waiting for low threshold \,; +#X text 151 345 0 if we've attained it and now want the; +#X text 180 359 high one.; +#X text 165 408 route the RMS value according to state; +#X text 191 435 if off \, 55 dB means attack. If on \, 45; +#X text 192 456 dB or less means state changes to off.; +#X text 106 279 ATTACK DETECTION; +#X text 515 244 REST DETECTION; +#X text 590 288 Here we always will test RMS against a low value; +#X text 615 305 but as before we route the result according to; +#X text 637 322 our state \, 1 if "resting" \, 0 if not.; +#X text 645 368 regardless of state \, when RMS isn't low; +#X text 667 383 reset the timer; +#X text 691 511 RMS isn't low enough.; +#X text 602 403 If we're not in rest \, and the RMS is low \,; +#X text 626 419 check elapsed time sinse RMS last wasn't low.; +#X text 613 461 If more than 1 second \, report a rest.; +#X text 664 495 If we're at rest \, pop out of it when; +#X text 471 94 Both detectors are state machines with two states \, on and off. If on \, a test is run to determine whether to turn off \, and vice versa. The tests are run at each output of the rms~ object.; +#X connect 4 0 7 1; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 12 0; +#X connect 8 0 25 0; +#X connect 10 0 4 0; +#X connect 10 0 11 0; +#X connect 12 0 13 0; +#X connect 12 1 14 1; +#X connect 13 0 24 0; +#X connect 14 0 16 0; +#X connect 16 0 17 0; +#X connect 16 1 18 0; +#X connect 17 0 19 0; +#X connect 18 0 20 0; +#X connect 19 0 21 0; +#X connect 19 0 23 0; +#X connect 20 0 22 0; +#X connect 21 0 13 0; +#X connect 22 0 13 0; +#X connect 24 0 14 0; +#X connect 25 0 26 0; +#X connect 25 1 33 0; +#X connect 26 0 32 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 28 1 36 0; +#X connect 29 0 34 1; +#X connect 30 0 26 0; +#X connect 31 0 26 0; +#X connect 32 0 27 0; +#X connect 33 0 27 1; +#X connect 33 0 35 0; +#X connect 34 0 39 0; +#X connect 35 0 34 0; +#X connect 36 0 31 0; +#X connect 37 0 30 0; +#X connect 37 0 38 0; +#X connect 39 0 37 0; diff --git a/pd/doc/3.audio.examples/46.PART7.filters.pd b/pd/doc/3.audio.examples/46.PART7.filters.pd new file mode 100644 index 00000000..4a64a0b5 --- /dev/null +++ b/pd/doc/3.audio.examples/46.PART7.filters.pd @@ -0,0 +1,72 @@ +#N canvas 124 28 964 549 12; +#X floatatom 20 391; +#X floatatom 297 394; +#X floatatom 210 394; +#X graph graph1 0 -1 400 1 544 335 944 35; +#X array orig 400 float; +#X array lop 400 float; +#X array hip 400 float; +#X array bp 400 float; +#X pop; +#X obj 334 457 r metro; +#X obj 180 322 hip~ 100; +#X obj 105 320 lop~ 100; +#X obj 273 322 bp~ 100 10; +#X floatatom 255 245; +#X floatatom 338 295; +#X floatatom 118 393; +#X text 9 11 Filters; +#X msg 87 130 \; pd dsp 1 \; metro bang; +#X msg 191 135 \; pd dsp 0; +#X text 15 417 Original; +#X text 122 417 Low pass; +#X text 210 417 High pass; +#X text 298 416 Band pass; +#X obj 14 517 tabwrite~ orig; +#X obj 309 520 tabwrite~ bp; +#X obj 213 520 tabwrite~ hip; +#X obj 116 519 tabwrite~ lop; +#X text 97 110 start; +#X text 193 111 stop; +#X floatatom 14 235; +#X obj 14 261 osc~ 440; +#X text 51 236 <-- change frequency; +#X text 294 247 <-- center/rolloff frequency; +#X text 374 297 <-- Q; +#X text 548 341 This graph holds 4 arrays for the input and three filter outputs.; +#X text 375 389 RMS amplitudes of the original signal and the three filter outputs; +#X text 746 536 updated for Pd version 0.26; +#X obj 334 482 metro 1000; +#X text 29 33 Pd provides low \, high \, and band pass filters \, as shown here. By changing the test frequency \, the filter frequency \, and the "Q" value \, you can see how these filters affect the amplitude and phase of incoming signals; +#X obj 20 366 env~ 4096; +#X obj 118 368 env~ 4096; +#X obj 210 369 env~ 4096; +#X obj 297 369 env~ 4096; +#X obj 91 213 print~; +#X text 456 434 Notice how the phase of the graphed sinusoids slips back and forth... this is because graphing always starts on the nearest 64-sample boundary to the time the metronome fires. If you run at 48K the slippage disappears \, because then the metronome fires every 48K samples \, which is a multiple of 64; +#X connect 4 0 32 0; +#X connect 5 0 20 0; +#X connect 5 0 36 0; +#X connect 6 0 21 0; +#X connect 6 0 35 0; +#X connect 7 0 19 0; +#X connect 7 0 37 0; +#X connect 8 0 6 1; +#X connect 8 0 5 1; +#X connect 8 0 7 1; +#X connect 9 0 7 2; +#X connect 24 0 25 0; +#X connect 25 0 18 0; +#X connect 25 0 6 0; +#X connect 25 0 5 0; +#X connect 25 0 7 0; +#X connect 25 0 34 0; +#X connect 25 0 38 0; +#X connect 32 0 18 0; +#X connect 32 0 21 0; +#X connect 32 0 20 0; +#X connect 32 0 19 0; +#X connect 34 0 0 0; +#X connect 35 0 10 0; +#X connect 36 0 2 0; +#X connect 37 0 1 0; diff --git a/pd/doc/3.audio.examples/47.bandpass.pd b/pd/doc/3.audio.examples/47.bandpass.pd new file mode 100644 index 00000000..0ce9cc47 --- /dev/null +++ b/pd/doc/3.audio.examples/47.bandpass.pd @@ -0,0 +1,146 @@ +#N canvas 58 17 943 765 12; +#X floatatom 91 731 0 0 0; +#X graph graph1 0 -1 155947 1 624 401 824 251; +#X array array1 155948 float 0; +#X pop; +#X floatatom 247 705 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 406 192 t b; +#X obj 406 132 f; +#X obj 406 72 inlet; +#X text 413 35 mute; +#X obj 406 222 f; +#X msg 510 214 0; +#X msg 406 102 bang; +#X obj 406 162 moses 1; +#X obj 510 184 t b f; +#X obj 476 140 moses 1; +#X obj 100 178 dbtorms; +#X obj 476 110 r master-lvl; +#X obj 100 50 r master-lvl; +#X obj 406 252 s master-lvl; +#X obj 26 217 inlet~; +#X obj 239 49 inlet; +#X text 239 22 level; +#X obj 239 120 s master-lvl; +#X msg 115 78 set \$1; +#X obj 115 107 outlet; +#X msg 257 77 \; pd dsp 1; +#X obj 100 233 line~; +#X obj 26 254 *~; +#X obj 26 289 dac~; +#X obj 100 205 pack 0 50; +#X text 24 190 audio; +#X text 112 132 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 210 740 pd output; +#X msg 280 707 MUTE; +#X text 320 706 <-- output amplitude; +#X obj 206 654 hip~ 5; +#X obj 31 545 tabread4~ array1; +#X obj 31 340 r totsamps; +#X obj 31 430 /; +#X obj 206 625 bp~; +#X obj 206 596 bp~; +#X obj 216 463 mtof; +#X floatatom 216 491 0 0 0; +#X floatatom 319 570 0 0 0; +#X obj 319 541 r q; +#X floatatom 216 434 0 0 0; +#X msg 227 550 \; p set \$1; +#X obj 216 406 r p; +#X obj 90 647 env~ 4096; +#X obj 31 487 *~ 0; +#X obj 31 458 phasor~ 0; +#X obj 31 516 +~ 1; +#X obj 227 521 ftom; +#X msg 826 49 \; pd dsp 0; +#X obj 90 674 + 0.5; +#X obj 91 702 int; +#X msg 31 400 44100; +#X obj 31 368 t b f; +#X text 648 14 START; +#X text 845 19 STOP; +#X text 88 11 BANDPASS FILTERS; +#X text 12 41 In this example we use two cascaded bandpass filters +to troll for partials in Jonathan Harvey's famous bell sample.; +#X obj 78 487 r totsamps; +#X text 14 82 Note that filters can give unexpected level changes. +The bp~ object is designed to have roughly unit gain at teh pass band +\, so the higher you set "Q" the more amplitude is lost. YOu can correct +for this by pushing the output amplitude \, but be sure to remember +to reset the output amplitude before you reduce Q again. I set the +Q to 100 and the output amplitude to 110 or 120 (with the room gain +way down.) Then holding the shift key \, slowly drag the center pitch +upward listening for modes.; +#X text 16 233 You can hear partials around 48 \, 51.3 \, 55 (faint!) +\, 57 (fainter!) \, 60 \, two beating partials around 65 \, 67 \, 69 +\, 70.9 \, 71.75 \, 72.6 \, 74 \, 74.65 \, 75.6 \, 77 \, 81.2 \, 84.6 +\, 86.5 \, and probably many more. There's also one down at 36 \, but +it's easier to see it on the meter than hear it.; +#X text 271 436 <-- center pitch; +#X text 281 450 (shift-drag to fine tune); +#X text 292 492 <-- center frequency; +#X text 359 570 <-- Q (filter selectivity); +#X obj 683 453 r readfile; +#X obj 683 530 soundfiler; +#X msg 683 503 read -resize \$1 array1; +#X obj 683 478 symbol; +#X msg 553 48 \; readfile ../sound/bell.aiff \; totsamps 143718 \; +p 69 \; q 0 \; pd dsp 1; +#X text 681 739 updated for Pd version 0.33; +#X connect 2 0 3 1; +#X connect 3 0 2 0; +#X connect 4 0 3 2; +#X connect 6 0 3 0; +#X connect 7 0 11 0; +#X connect 8 0 28 0; +#X connect 9 0 21 0; +#X connect 10 0 6 0; +#X connect 10 0 19 0; +#X connect 11 0 10 0; +#X connect 12 0 13 0; +#X connect 13 0 11 1; +#X connect 13 0 10 1; +#X connect 13 0 23 0; +#X connect 14 0 11 2; +#X connect 14 0 10 2; +#X connect 15 0 14 0; +#X connect 16 0 12 0; +#X connect 18 0 16 0; +#X connect 19 0 25 0; +#X connect 20 0 22 0; +#X connect 21 0 20 0; +#X connect 22 0 7 0; +#X connect 23 0 17 0; +#X connect 25 0 26 0; +#X connect 26 0 0 0; +#X connect 27 0 9 0; +#X connect 28 0 27 0; +#X connect 28 1 9 1; +#X connect 33 0 20 1; +#X connect 40 0 43 0; +#X connect 42 0 41 0; +#X connect 43 0 42 0; diff --git a/pd/doc/3.audio.examples/48.filter.sweep.pd b/pd/doc/3.audio.examples/48.filter.sweep.pd new file mode 100644 index 00000000..0d478275 --- /dev/null +++ b/pd/doc/3.audio.examples/48.filter.sweep.pd @@ -0,0 +1,173 @@ +#N canvas 194 58 693 586 12; +#X text 437 559 updated for Pd version 0.26; +#X floatatom 70 539 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 41 567 pd output; +#X msg 99 539 MUTE; +#X text 138 538 <-- output amplitude; +#X obj 41 212 line~; +#X floatatom 41 164 0 0 0; +#X obj 41 188 pack 0 100; +#X obj 528 110 loadbang; +#X text 35 6 SWEEPING FILTERS; +#N canvas 0 0 600 392 conversion-tables 0; +#N canvas 0 0 450 300 graph1 0; +#X array dbtorms 123 float 1; +#A 0 0 0 1.25893e-05 1.41254e-05 1.58489e-05 1.77828e-05 1.99526e-05 +2.23872e-05 2.51189e-05 2.81838e-05 3.16228e-05 3.54813e-05 3.98107e-05 +4.46684e-05 5.01187e-05 5.62341e-05 6.30957e-05 7.07946e-05 7.94328e-05 +8.91251e-05 1e-04 0.000112202 0.000125893 0.000141254 0.000158489 0.000177828 +0.000199526 0.000223872 0.000251189 0.000281838 0.000316228 0.000354813 +0.000398107 0.000446684 0.000501187 0.000562341 0.000630957 0.000707946 +0.000794328 0.000891251 0.001 0.00112202 0.00125893 0.00141254 0.00158489 +0.00177828 0.00199526 0.00223872 0.00251189 0.00281838 0.00316228 0.00354813 +0.00398107 0.00446684 0.00501187 0.00562341 0.00630957 0.00707946 0.00794328 +0.00891251 0.01 0.0112202 0.0125893 0.0141254 0.0158489 0.0177828 0.0199526 +0.0223872 0.0251189 0.0281838 0.0316228 0.0354813 0.0398107 0.0446684 +0.0501187 0.0562341 0.0630957 0.0707946 0.0794328 0.0891251 0.1 0.112202 +0.125893 0.141254 0.158489 0.177828 0.199526 0.223872 0.251189 0.281838 +0.316228 0.354813 0.398107 0.446684 0.501187 0.562341 0.630957 0.707946 +0.794328 0.891251 1 1.12202 1.25893 1.41254 1.58489 1.77828 1.99526 +2.23872 2.51189 2.81838 3.16228 3.54813 3.98107 4.46684 5.01187 5.62341 +6.30957 7.07946 7.94328 8.91251 10 11.2202 12.5893; +#X coords 0 10 123 0 200 100 1; +#X restore 302 48 graph; +#X text 504 141 0; +#X text 506 41 10; +#X text 321 151 ------ 123 samples ------; +#N canvas 0 0 450 300 graph2 0; +#X array mtof 130 float 1; +#A 0 8.1758 8.66196 9.17702 9.72272 10.3009 10.9134 11.5623 12.2499 +12.9783 13.75 14.5676 15.4339 16.3516 17.3239 18.354 19.4454 20.6017 +21.8268 23.1247 24.4997 25.9565 27.5 29.1352 30.8677 32.7032 34.6478 +36.7081 38.8909 41.2034 43.6535 46.2493 48.9994 51.9131 55 58.2705 +61.7354 65.4064 69.2957 73.4162 77.7817 82.4069 87.3071 92.4986 97.9989 +103.826 110 116.541 123.471 130.813 138.591 146.832 155.563 164.814 +174.614 184.997 195.998 207.652 220 233.082 246.942 261.626 277.183 +293.665 311.127 329.628 349.228 369.994 391.995 415.305 440 466.164 +493.883 523.251 554.365 587.33 622.254 659.255 698.456 739.989 783.991 +830.609 880 932.328 987.767 1046.5 1108.73 1174.66 1244.51 1318.51 +1396.91 1479.98 1567.98 1661.22 1760 1864.66 1975.53 2093 2217.46 2349.32 +2489.02 2637.02 2793.83 2959.96 3135.96 3322.44 3520 3729.31 3951.07 +4186.01 4434.92 4698.64 4978.03 5274.04 5587.65 5919.91 6271.93 6644.88 +7040 7458.62 7902.13 8372.02 8869.84 9397.27 9956.06 10548.1 11175.3 +11839.8 12543.9 13289.8 14080; +#X coords 0 12000 130 0 200 100 1; +#X restore 309 225 graph; +#X text 319 333 ------ 130 samples ------; +#X text 518 318 0; +#X text 520 218 12000; +#X restore 461 256 pd conversion-tables; +#X obj 41 260 phasor~; +#X obj 41 236 tabread4~ mtof; +#X obj 174 384 +~; +#X obj 190 361 line~; +#X obj 190 337 pack 0 100; +#X floatatom 190 313 0 0 0; +#X floatatom 174 164 0 0 0; +#X floatatom 197 238 0 0 0; +#X obj 41 140 r pitch; +#X obj 197 214 r depth; +#X obj 174 140 r speed; +#X obj 190 289 r offset; +#X obj 121 465 r q; +#X floatatom 121 489 0 0 0; +#X obj 41 484 vcf~; +#X obj 41 508 hip~ 5; +#X obj 174 263 *~ 0; +#X obj 174 188 phasor~ 0; +#X obj 174 408 tabread4~ mtof; +#X msg 528 134 \; pitch 48 \; speed -2 \; depth 27 \; offset 56 \; +q 2; +#X text 160 490 <-- Q (selectivity); +#X text 51 277 sawtooth; +#X text 50 291 oscillator; +#X text 228 167 <-- sweep speed; +#X text 265 189 LFO for sweep; +#X text 251 241 <-- sweep depth; +#X text 242 316 <-- base center frequency; +#X text 218 383 add base to sweep; +#X text 307 408 convert to Hz.; +#X text 13 28 If you want actively changing center frequencies \, use +"vcf~" instead of "bp~". The vcf~ module takes an audio signal to set +center frequency. (Q is still set by messages though.) Vcf is somewhat +more expensive than bp~.; +#X text 78 165 <-- pitch; +#X text 13 95 Note the effect of negative and positive sweep speed. +; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 5 0 12 0; +#X connect 6 0 7 0; +#X connect 7 0 5 0; +#X connect 8 0 30 0; +#X connect 11 0 25 0; +#X connect 12 0 11 0; +#X connect 13 0 29 0; +#X connect 14 0 13 1; +#X connect 15 0 14 0; +#X connect 16 0 15 0; +#X connect 17 0 28 0; +#X connect 18 0 27 1; +#X connect 19 0 6 0; +#X connect 20 0 18 0; +#X connect 21 0 17 0; +#X connect 22 0 16 0; +#X connect 23 0 24 0; +#X connect 24 0 25 2; +#X connect 25 0 26 0; +#X connect 26 0 2 0; +#X connect 27 0 13 0; +#X connect 28 0 27 0; +#X connect 29 0 25 1; diff --git a/pd/doc/3.audio.examples/49.filter.floyd.pd b/pd/doc/3.audio.examples/49.filter.floyd.pd new file mode 100644 index 00000000..02027117 --- /dev/null +++ b/pd/doc/3.audio.examples/49.filter.floyd.pd @@ -0,0 +1,193 @@ +#N canvas 133 190 795 593 12; +#X floatatom 44 540 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 15 568 pd output; +#X msg 90 540 MUTE; +#X text 151 539 <-- output amplitude; +#X obj 487 217 loadbang; +#N canvas 0 0 600 392 conversion-tables 0; +#N canvas 0 0 450 300 graph1 0; +#X array dbtorms 123 float 1; +#A 0 0 0 1.25893e-05 1.41254e-05 1.58489e-05 1.77828e-05 1.99526e-05 +2.23872e-05 2.51189e-05 2.81838e-05 3.16228e-05 3.54813e-05 3.98107e-05 +4.46684e-05 5.01187e-05 5.62341e-05 6.30957e-05 7.07946e-05 7.94328e-05 +8.91251e-05 1e-04 0.000112202 0.000125893 0.000141254 0.000158489 0.000177828 +0.000199526 0.000223872 0.000251189 0.000281838 0.000316228 0.000354813 +0.000398107 0.000446684 0.000501187 0.000562341 0.000630957 0.000707946 +0.000794328 0.000891251 0.001 0.00112202 0.00125893 0.00141254 0.00158489 +0.00177828 0.00199526 0.00223872 0.00251189 0.00281838 0.00316228 0.00354813 +0.00398107 0.00446684 0.00501187 0.00562341 0.00630957 0.00707946 0.00794328 +0.00891251 0.01 0.0112202 0.0125893 0.0141254 0.0158489 0.0177828 0.0199526 +0.0223872 0.0251189 0.0281838 0.0316228 0.0354813 0.0398107 0.0446684 +0.0501187 0.0562341 0.0630957 0.0707946 0.0794328 0.0891251 0.1 0.112202 +0.125893 0.141254 0.158489 0.177828 0.199526 0.223872 0.251189 0.281838 +0.316228 0.354813 0.398107 0.446684 0.501187 0.562341 0.630957 0.707946 +0.794328 0.891251 1 1.12202 1.25893 1.41254 1.58489 1.77828 1.99526 +2.23872 2.51189 2.81838 3.16228 3.54813 3.98107 4.46684 5.01187 5.62341 +6.30957 7.07946 7.94328 8.91251 10 11.2202 12.5893; +#X coords 0 10 123 0 200 100 1; +#X restore 302 48 graph; +#X text 504 141 0; +#X text 506 41 10; +#X text 321 151 ------ 123 samples ------; +#N canvas 0 0 450 300 graph2 0; +#X array mtof 130 float 1; +#A 0 8.1758 8.66196 9.17702 9.72272 10.3009 10.9134 11.5623 12.2499 +12.9783 13.75 14.5676 15.4339 16.3516 17.3239 18.354 19.4454 20.6017 +21.8268 23.1247 24.4997 25.9565 27.5 29.1352 30.8677 32.7032 34.6478 +36.7081 38.8909 41.2034 43.6535 46.2493 48.9994 51.9131 55 58.2705 +61.7354 65.4064 69.2957 73.4162 77.7817 82.4069 87.3071 92.4986 97.9989 +103.826 110 116.541 123.471 130.813 138.591 146.832 155.563 164.814 +174.614 184.997 195.998 207.652 220 233.082 246.942 261.626 277.183 +293.665 311.127 329.628 349.228 369.994 391.995 415.305 440 466.164 +493.883 523.251 554.365 587.33 622.254 659.255 698.456 739.989 783.991 +830.609 880 932.328 987.767 1046.5 1108.73 1174.66 1244.51 1318.51 +1396.91 1479.98 1567.98 1661.22 1760 1864.66 1975.53 2093 2217.46 2349.32 +2489.02 2637.02 2793.83 2959.96 3135.96 3322.44 3520 3729.31 3951.07 +4186.01 4434.92 4698.64 4978.03 5274.04 5587.65 5919.91 6271.93 6644.88 +7040 7458.62 7902.13 8372.02 8869.84 9397.27 9956.06 10548.1 11175.3 +11839.8 12543.9 13289.8 14080; +#X coords 0 12000 130 0 200 100 1; +#X restore 309 225 graph; +#X text 319 333 ------ 130 samples ------; +#X text 518 318 0; +#X text 520 218 12000; +#X restore 490 428 pd conversion-tables; +#X obj 250 308 line~; +#X obj 250 284 pack 0 100; +#X floatatom 251 213 0 0 0; +#X obj 171 413 r q; +#X floatatom 171 437 0 0 0; +#X obj 15 492 vcf~; +#X obj 15 516 hip~ 5; +#X obj 250 333 tabread4~ mtof; +#X text 214 436 <-- Q (selectivity); +#X text 277 354 convert to Hz.; +#X text 35 6 ANOTHER SWEEPING FILTER EXAMPLE; +#X obj 15 286 clip~ 0 0.5; +#X obj 15 310 *~ 2; +#X obj 15 334 -~; +#X text 121 270 trick to; +#X text 121 291 make symmetric; +#X text 121 312 triangle wave; +#X obj 31 161 f; +#X obj 64 159 + 1; +#X obj 31 211 tabread array1; +#X obj 31 235 mtof; +#X obj 31 113 r metro; +#X obj 64 183 mod 8; +#X obj 31 259 phasor~ 0; +#N canvas 0 0 450 300 graph1 0; +#X array array1 8 float 0; +#X coords 0 96 8 36 200 100 1; +#X restore 464 75 graph; +#X obj 251 189 r cf; +#X text 293 210 <-- center frequency; +#X obj 31 137 metro 85; +#X obj 15 376 hip~ 5000; +#X obj 15 399 *~ 100; +#X obj 252 237 moses 61; +#X msg 251 260 61; +#X msg 487 241 \; cf 61 \; q 30 \; metro 1 \; array1 0 45 48 50 48 +55 53 55 57; +#X text 13 28 Here's an approximate reconstruction of an old riff by +Pink Floyd (I haven't checked the tempo or transposition against the +original yet.) Because we're filtering a waveform with odd partials +\, it's easier to pick out the partials in the filtered sound.; +#X text 104 352 Here we fudge; +#X text 100 371 to better imitate; +#X text 100 390 the EMS3 bandpass; +#X text 85 403 sound; +#X text 340 231 protect against; +#X text 341 252 hitting the; +#X text 341 271 fundamental; +#X text 137 139 sequencer for; +#X text 137 158 8 note loop; +#X obj 171 459 moses 1; +#X msg 144 459 1; +#X text 241 460 speaker protection; +#X text 437 558 updated for Pd version 0.35; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 4 0 38 0; +#X connect 6 0 13 0; +#X connect 7 0 6 0; +#X connect 8 0 36 0; +#X connect 9 0 10 0; +#X connect 10 0 49 0; +#X connect 11 0 12 0; +#X connect 12 0 1 0; +#X connect 13 0 11 1; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 19 0 34 0; +#X connect 23 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 28 0; +#X connect 25 0 26 0; +#X connect 26 0 29 0; +#X connect 27 0 33 0; +#X connect 28 0 23 1; +#X connect 29 0 17 0; +#X connect 29 0 19 1; +#X connect 31 0 8 0; +#X connect 33 0 23 0; +#X connect 34 0 35 0; +#X connect 35 0 11 0; +#X connect 36 0 37 0; +#X connect 36 1 7 0; +#X connect 37 0 7 0; +#X connect 49 0 50 0; +#X connect 49 1 11 2; +#X connect 50 0 11 2; diff --git a/pd/doc/3.audio.examples/50.filter.noise.pd b/pd/doc/3.audio.examples/50.filter.noise.pd new file mode 100644 index 00000000..7421c180 --- /dev/null +++ b/pd/doc/3.audio.examples/50.filter.noise.pd @@ -0,0 +1,196 @@ +#N canvas 137 175 735 587 12; +#X text 437 559 updated for Pd version 0.26; +#X floatatom 67 397 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 38 425 pd output; +#X msg 96 397 MUTE; +#X text 135 396 <-- output amplitude; +#X obj 515 150 loadbang; +#N canvas 0 0 600 392 conversion-tables 0; +#N canvas 0 0 450 300 graph1 0; +#X array dbtorms 123 float 1; +#A 0 0 0 1.25893e-05 1.41254e-05 1.58489e-05 1.77828e-05 1.99526e-05 +2.23872e-05 2.51189e-05 2.81838e-05 3.16228e-05 3.54813e-05 3.98107e-05 +4.46684e-05 5.01187e-05 5.62341e-05 6.30957e-05 7.07946e-05 7.94328e-05 +8.91251e-05 1e-04 0.000112202 0.000125893 0.000141254 0.000158489 0.000177828 +0.000199526 0.000223872 0.000251189 0.000281838 0.000316228 0.000354813 +0.000398107 0.000446684 0.000501187 0.000562341 0.000630957 0.000707946 +0.000794328 0.000891251 0.001 0.00112202 0.00125893 0.00141254 0.00158489 +0.00177828 0.00199526 0.00223872 0.00251189 0.00281838 0.00316228 0.00354813 +0.00398107 0.00446684 0.00501187 0.00562341 0.00630957 0.00707946 0.00794328 +0.00891251 0.01 0.0112202 0.0125893 0.0141254 0.0158489 0.0177828 0.0199526 +0.0223872 0.0251189 0.0281838 0.0316228 0.0354813 0.0398107 0.0446684 +0.0501187 0.0562341 0.0630957 0.0707946 0.0794328 0.0891251 0.1 0.112202 +0.125893 0.141254 0.158489 0.177828 0.199526 0.223872 0.251189 0.281838 +0.316228 0.354813 0.398107 0.446684 0.501187 0.562341 0.630957 0.707946 +0.794328 0.891251 1 1.12202 1.25893 1.41254 1.58489 1.77828 1.99526 +2.23872 2.51189 2.81838 3.16228 3.54813 3.98107 4.46684 5.01187 5.62341 +6.30957 7.07946 7.94328 8.91251 10 11.2202 12.5893; +#X coords 0 10 123 0 200 100 1; +#X restore 70 45 graph; +#X text 272 138 0; +#X text 274 38 10; +#X text 89 148 ------ 123 samples ------; +#N canvas 0 0 450 300 graph2 0; +#X array mtof 130 float 1; +#A 0 8.1758 8.66196 9.17702 9.72272 10.3009 10.9134 11.5623 12.2499 +12.9783 13.75 14.5676 15.4339 16.3516 17.3239 18.354 19.4454 20.6017 +21.8268 23.1247 24.4997 25.9565 27.5 29.1352 30.8677 32.7032 34.6478 +36.7081 38.8909 41.2034 43.6535 46.2493 48.9994 51.9131 55 58.2705 +61.7354 65.4064 69.2957 73.4162 77.7817 82.4069 87.3071 92.4986 97.9989 +103.826 110 116.541 123.471 130.813 138.591 146.832 155.563 164.814 +174.614 184.997 195.998 207.652 220 233.082 246.942 261.626 277.183 +293.665 311.127 329.628 349.228 369.994 391.995 415.305 440 466.164 +493.883 523.251 554.365 587.33 622.254 659.255 698.456 739.989 783.991 +830.609 880 932.328 987.767 1046.5 1108.73 1174.66 1244.51 1318.51 +1396.91 1479.98 1567.98 1661.22 1760 1864.66 1975.53 2093 2217.46 2349.32 +2489.02 2637.02 2793.83 2959.96 3135.96 3322.44 3520 3729.31 3951.07 +4186.01 4434.92 4698.64 4978.03 5274.04 5587.65 5919.91 6271.93 6644.88 +7040 7458.62 7902.13 8372.02 8869.84 9397.27 9956.06 10548.1 11175.3 +11839.8 12543.9 13289.8 14080; +#X coords 0 12000 130 0 200 100 1; +#X restore 77 222 graph; +#X text 87 330 ------ 130 samples ------; +#X text 286 315 0; +#X text 288 215 12000; +#N canvas 244 212 672 338 regenerate-tables 0; +#X msg 415 84 bang; +#X obj 415 113 t b b; +#X obj 474 177 f; +#X obj 512 177 + 1; +#X msg 483 147 0; +#X obj 415 142 until; +#X obj 474 211 t f f; +#X obj 414 238 mtof; +#X obj 405 202 sel 129; +#X obj 413 264 tabwrite mtof; +#X obj 35 227 moses 2; +#X msg 19 76 bang; +#X obj 19 105 t b b; +#X obj 90 166 f; +#X obj 128 166 + 1; +#X msg 112 138 0; +#X obj 19 134 until; +#X obj 11 194 sel 122; +#X msg 35 258 0; +#X obj 79 259 dbtorms; +#X obj 90 194 t f f; +#X obj 35 291 tabwrite dbtorms; +#X text 18 49 bang to recalculate dbtorms table; +#X text 356 50 bang to recalculate the mtof table; +#X connect 0 0 1 0; +#X connect 1 0 5 0; +#X connect 1 1 4 0; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 2 0 8 0; +#X connect 3 0 2 1; +#X connect 4 0 2 1; +#X connect 5 0 2 0; +#X connect 6 0 7 0; +#X connect 6 1 9 1; +#X connect 7 0 9 0; +#X connect 8 0 5 1; +#X connect 10 0 18 0; +#X connect 10 1 19 0; +#X connect 11 0 12 0; +#X connect 12 0 16 0; +#X connect 12 1 15 0; +#X connect 13 0 14 0; +#X connect 13 0 17 0; +#X connect 13 0 20 0; +#X connect 14 0 13 1; +#X connect 15 0 13 1; +#X connect 16 0 13 0; +#X connect 17 0 16 1; +#X connect 18 0 21 0; +#X connect 19 0 21 0; +#X connect 20 0 10 0; +#X connect 20 1 21 1; +#X restore 375 76 pd regenerate-tables; +#X restore 449 418 pd conversion-tables; +#X obj 49 201 line~; +#X obj 49 177 pack 0 100; +#X floatatom 49 151 0 0 0; +#X obj 88 254 r q; +#X floatatom 88 278 0 0 0; +#X obj 38 342 vcf~; +#X obj 38 366 hip~ 5; +#X obj 49 226 tabread4~ mtof; +#X text 124 277 <-- Q (selectivity); +#X obj 49 127 r cf; +#X text 84 145 <-- center frequency; +#X text 35 6 FILTERING NOISE; +#X obj 39 102 noise~; +#X msg 515 174 \; cf 60 \; q 3 \;; +#X text 13 28 THe noise~ module puts out unit-amplitude white noise. +Be careful again here about surging amplitudes if Q hits zero.; +#X obj 88 305 moses 1; +#X msg 60 305 1; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 5 0 20 0; +#X connect 7 0 14 0; +#X connect 8 0 7 0; +#X connect 9 0 8 0; +#X connect 10 0 11 0; +#X connect 11 0 22 0; +#X connect 12 0 13 0; +#X connect 13 0 2 0; +#X connect 14 0 12 1; +#X connect 16 0 9 0; +#X connect 19 0 12 0; +#X connect 22 0 23 0; +#X connect 22 1 12 2; +#X connect 23 0 12 2; diff --git a/pd/doc/3.audio.examples/51.ring.modulation.pd b/pd/doc/3.audio.examples/51.ring.modulation.pd new file mode 100644 index 00000000..0380a07d --- /dev/null +++ b/pd/doc/3.audio.examples/51.ring.modulation.pd @@ -0,0 +1,153 @@ +#N canvas 1 23 809 567 12; +#X graph graph1 0 -1.02 882 1.02 542 471 742 341; +#X array pulse-output 882 float 0; +#X pop; +#X floatatom 101 331 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 63 359 pd output; +#X msg 139 332 MUTE; +#X text 179 331 <-- output amplitude; +#X floatatom 63 48 0 0 0; +#X obj 63 303 hip~ 5; +#X graph graph1 0 0 128 1000 490 259 746 129; +#X array spectrum 128 float 0; +#X pop; +#X obj 129 278 tabwrite~ pulse-output; +#X msg 129 243 bang; +#X text 170 244 <-- click to graph; +#N canvas 204 17 358 234 fft 0; +#X obj 46 48 inlet~; +#X obj 159 181 tabwrite~ spectrum; +#X obj 159 145 inlet; +#X obj 46 78 rfft~; +#X obj 46 111 *~; +#X obj 77 111 *~; +#X obj 46 141 sqrt~; +#X obj 191 45 block~ 2048 1; +#X connect 0 0 3 0; +#X connect 2 0 1 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 1 5 0; +#X connect 3 1 5 1; +#X connect 4 0 6 0; +#X connect 5 0 6 0; +#X connect 6 0 1 0; +#X restore 74 281 pd fft; +#X text 488 265 0; +#X obj 79 194 osc~ 0; +#N canvas 0 0 600 384 pulse-train 0; +#X obj 185 162 line~; +#X obj 39 251 cos~; +#X obj 185 138 pack 0 50; +#X obj 40 178 -~ 0.5; +#X obj 40 204 *~; +#X obj 185 63 / 10; +#X obj 185 87 moses 0; +#X msg 185 111 0; +#X obj 39 227 clip~ -0.5 0.5; +#X obj 185 187 +~ 1; +#X obj 38 274 +~ 1; +#X obj 184 38 inlet; +#X obj 38 299 outlet~; +#X obj 40 154 phasor~ 344.532; +#X text 51 13 This is the pulse train generator from example 17; +#X connect 0 0 9 0; +#X connect 1 0 10 0; +#X connect 2 0 0 0; +#X connect 3 0 4 0; +#X connect 4 0 8 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 6 1 2 0; +#X connect 7 0 2 0; +#X connect 8 0 1 0; +#X connect 9 0 4 1; +#X connect 10 0 12 0; +#X connect 11 0 5 0; +#X connect 13 0 3 0; +#X restore 63 75 pd pulse-train; +#X floatatom 79 168 0 0 0; +#X text 124 167 <-- modulation frequency; +#X text 102 48 <-- bandwidth; +#X obj 63 218 *~; +#X text 736 262 2656 Hz.; +#X text 196 77 fundamental is 344.5 Hz; +#X text 157 210 an oscillator...; +#X text 66 22 RING MODULATION; +#X text 542 473 ---- 0.02 seconds ----; +#X text 528 533 updated for Pd version 0.34; +#X text 156 195 Just multiply by; +#X text 12 422 Ring modulation is just multiplication by an oscillator. +This patch shows the effect of ring modulation on a pulse train. When +bandwidth is high and modulation frequency is moderately low \, you +see the spectrum reflect off the "y axis".; +#X obj 79 140 * 344.5; +#X floatatom 79 114 0 0 0; +#X text 120 114 <-- modulation frequency as; +#X text 159 128 multiple of fundamental; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 5 0 14 0; +#X connect 6 0 2 0; +#X connect 9 0 8 0; +#X connect 9 0 11 1; +#X connect 13 0 18 1; +#X connect 14 0 18 0; +#X connect 15 0 13 0; +#X connect 18 0 11 0; +#X connect 18 0 6 0; +#X connect 18 0 8 0; +#X connect 27 0 15 0; +#X connect 28 0 27 0; diff --git a/pd/doc/3.audio.examples/52.ssb.modulation.pd b/pd/doc/3.audio.examples/52.ssb.modulation.pd new file mode 100644 index 00000000..968b3b45 --- /dev/null +++ b/pd/doc/3.audio.examples/52.ssb.modulation.pd @@ -0,0 +1,150 @@ +#N canvas 7 6 923 594 12; +#X obj 170 349 phasor~ 0; +#X obj 170 393 cos~; +#X obj 206 371 +~ -0.25; +#X obj 206 394 cos~; +#X obj 23 438 *~; +#X obj 88 438 *~; +#X obj 22 462 -~; +#X floatatom 170 322 0 0 0; +#X obj 23 238 tabread4~ array1; +#X obj 23 67 r totsamps; +#X obj 23 142 /; +#X obj 23 190 *~ 0; +#X obj 23 166 phasor~ 0; +#X obj 23 214 +~ 1; +#X msg 23 117 44100; +#X obj 23 91 t b f; +#X obj 62 190 r totsamps; +#X msg 636 38 \; pd dsp 0; +#X text 429 14 START; +#X text 653 20 STOP; +#X floatatom 51 499 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 22 527 pd output; +#X msg 87 500 MUTE; +#X text 121 499 <-- output amplitude; +#N canvas 0 0 600 388 hilbert 0; +#X obj 166 190 biquad~ 0.83774 -0.06338 0.06338 -0.83774 1; +#X obj 166 164 biquad~ 1.94632 -0.94657 0.94657 -1.94632 1; +#X obj 99 111 biquad~ -0.02569 0.260502 -0.260502 0.02569 1; +#X obj 99 137 biquad~ 1.8685 -0.870686 0.870686 -1.8685 1; +#X obj 98 76 inlet~; +#X obj 166 213 outlet~; +#X obj 99 213 outlet~; +#X text 95 261 This is a pair of all-pass filters whose outputs somehow +manage to be about 90 degrees out of phase from each other. I don't +know what phase relation they have with the original signal. I adapted +this from a 4X patch by Emmanuel Favreau \, circa 1982; +#X connect 0 0 5 0; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 3 0 6 0; +#X connect 4 0 1 0; +#X connect 4 0 2 0; +#X restore 23 400 pd hilbert; +#X graph graph1 0 -1 155947 1 441 284 641 134; +#X array array1 155948 float 0; +#X pop; +#X text 36 257 sample loop for; +#X text 36 271 test signal; +#X text 35 314 pair of allpass; +#X text 34 333 filters to make; +#X text 34 353 90 degree phase; +#X text 32 373 shifted versions; +#X text 201 323 <-- shift frequency; +#X text 122 438 <-- complex multiply; +#X text 123 452 (calculate real part); +#X text 161 412 cosine and sine waves; +#X text 55 7 SINGLE SIDEBAND MODULATION; +#X text 55 26 (AKA FREQUENCY SHIFTING); +#X text 394 296 The signal sideband modulator gives you only one sideband +for each frequency in teh input signal (whereas ring modulation gave +both a positie and negative sideband.) You can set the shift frequency +positive to shift all frequencies upward \, or negative to shift them +downwards.; +#X obj 484 417 r readfile; +#X msg 334 34 \; readfile ../sound/bell.aiff \; pd dsp 1; +#X obj 484 444 symbol; +#X msg 483 470 read -resize \$1 array1; +#X obj 483 496 soundfiler; +#X obj 483 521 s totsamps; +#X text 671 568 updated for Pd version 0.33; +#X connect 0 0 2 0; +#X connect 0 0 1 0; +#X connect 1 0 4 1; +#X connect 2 0 3 0; +#X connect 3 0 5 1; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 21 0; +#X connect 7 0 0 0; +#X connect 8 0 24 0; +#X connect 9 0 15 0; +#X connect 10 0 12 0; +#X connect 11 0 13 0; +#X connect 12 0 11 0; +#X connect 13 0 8 0; +#X connect 14 0 10 0; +#X connect 15 0 14 0; +#X connect 15 1 10 1; +#X connect 16 0 11 1; +#X connect 20 0 21 1; +#X connect 21 0 20 0; +#X connect 22 0 21 2; +#X connect 24 0 4 0; +#X connect 24 1 5 0; +#X connect 39 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; diff --git a/pd/doc/3.audio.examples/53.delays.pd b/pd/doc/3.audio.examples/53.delays.pd new file mode 100644 index 00000000..5c4f20de --- /dev/null +++ b/pd/doc/3.audio.examples/53.delays.pd @@ -0,0 +1,225 @@ +#N canvas 22 1 729 584 12; +#X floatatom 62 506 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 33 534 pd output; +#X msg 91 506 MUTE; +#X text 130 505 <-- output amplitude; +#X obj 33 482 hip~ 5; +#X text 92 12 DELAYS; +#X obj 33 341 -~; +#X obj 30 241 tabread4~ mtof; +#X obj 33 317 *~ 3; +#X obj 69 318 *~ 2; +#X obj 49 266 phasor~; +#X floatatom 81 215 0 0 0; +#X obj 33 293 clip~ 0 0.667; +#X obj 30 190 line~; +#X obj 30 165 pack 0 1000; +#X obj 28 64 metro 1000; +#X obj 28 88 random 200; +#X obj 29 114 - 100; +#X obj 30 141 * 0.001; +#X obj 33 453 +~; +#X obj 44 374 delwrite~ delay1 2000; +#X floatatom 49 401 0 0 0; +#X obj 49 426 delread~ delay1 1000; +#X obj 27 41 loadbang; +#X text 210 37 You can delay a signal using the delwrite~ and delread~ +objects. In this example \, the pitch of the oscillator is varying +slightly so that the delayed signal is different from the straight +signal.; +#X text 212 99 delread always delays the signal an integer number of +samples and does no interpolation.; +#X text 211 137 The delwrite~ object creates the delay line \; you +give it a name and a size in milliseconds. Each delwrite~ should have +a different name.; +#X text 209 184 Delread~'s arguments are the name of a delwrite (of +which there should be exactly one) and a delay time in milliseconds +between 0 and the length of the delay line. Each delwrite~ may have +as many delread~s as you wish \, which function as multiple delay taps. +; +#X obj 30 215 +~ 60; +#X text 112 215 <-- pitch; +#X text 83 401 <-- delay time; +#X text 60 341 asymmetric triangle wave; +#X text 236 372 write to delay line; +#X text 232 425 read from delay line; +#X text 59 454 add the original and the delayed signal; +#N canvas 0 0 600 392 conversion-tables 0; +#N canvas 0 0 450 300 graph1 0; +#X array dbtorms 123 float 1; +#A 0 0 0 1.25893e-05 1.41254e-05 1.58489e-05 1.77828e-05 1.99526e-05 +2.23872e-05 2.51189e-05 2.81838e-05 3.16228e-05 3.54813e-05 3.98107e-05 +4.46684e-05 5.01187e-05 5.62341e-05 6.30957e-05 7.07946e-05 7.94328e-05 +8.91251e-05 1e-04 0.000112202 0.000125893 0.000141254 0.000158489 0.000177828 +0.000199526 0.000223872 0.000251189 0.000281838 0.000316228 0.000354813 +0.000398107 0.000446684 0.000501187 0.000562341 0.000630957 0.000707946 +0.000794328 0.000891251 0.001 0.00112202 0.00125893 0.00141254 0.00158489 +0.00177828 0.00199526 0.00223872 0.00251189 0.00281838 0.00316228 0.00354813 +0.00398107 0.00446684 0.00501187 0.00562341 0.00630957 0.00707946 0.00794328 +0.00891251 0.01 0.0112202 0.0125893 0.0141254 0.0158489 0.0177828 0.0199526 +0.0223872 0.0251189 0.0281838 0.0316228 0.0354813 0.0398107 0.0446684 +0.0501187 0.0562341 0.0630957 0.0707946 0.0794328 0.0891251 0.1 0.112202 +0.125893 0.141254 0.158489 0.177828 0.199526 0.223872 0.251189 0.281838 +0.316228 0.354813 0.398107 0.446684 0.501187 0.562341 0.630957 0.707946 +0.794328 0.891251 1 1.12202 1.25893 1.41254 1.58489 1.77828 1.99526 +2.23872 2.51189 2.81838 3.16228 3.54813 3.98107 4.46684 5.01187 5.62341 +6.30957 7.07946 7.94328 8.91251 10 11.2202 12.5893; +#X coords 0 10 123 0 200 100 1; +#X restore 70 45 graph; +#X text 272 138 0; +#X text 274 38 10; +#X text 89 148 ------ 123 samples ------; +#N canvas 0 0 450 300 graph2 0; +#X array mtof 130 float 1; +#A 0 8.1758 8.66196 9.17702 9.72272 10.3009 10.9134 11.5623 12.2499 +12.9783 13.75 14.5676 15.4339 16.3516 17.3239 18.354 19.4454 20.6017 +21.8268 23.1247 24.4997 25.9565 27.5 29.1352 30.8677 32.7032 34.6478 +36.7081 38.8909 41.2034 43.6535 46.2493 48.9994 51.9131 55 58.2705 +61.7354 65.4064 69.2957 73.4162 77.7817 82.4069 87.3071 92.4986 97.9989 +103.826 110 116.541 123.471 130.813 138.591 146.832 155.563 164.814 +174.614 184.997 195.998 207.652 220 233.082 246.942 261.626 277.183 +293.665 311.127 329.628 349.228 369.994 391.995 415.305 440 466.164 +493.883 523.251 554.365 587.33 622.254 659.255 698.456 739.989 783.991 +830.609 880 932.328 987.767 1046.5 1108.73 1174.66 1244.51 1318.51 +1396.91 1479.98 1567.98 1661.22 1760 1864.66 1975.53 2093 2217.46 2349.32 +2489.02 2637.02 2793.83 2959.96 3135.96 3322.44 3520 3729.31 3951.07 +4186.01 4434.92 4698.64 4978.03 5274.04 5587.65 5919.91 6271.93 6644.88 +7040 7458.62 7902.13 8372.02 8869.84 9397.27 9956.06 10548.1 11175.3 +11839.8 12543.9 13289.8 14080; +#X coords 0 12000 130 0 200 100 1; +#X restore 77 222 graph; +#X text 87 330 ------ 130 samples ------; +#X text 286 315 0; +#X text 288 215 12000; +#N canvas 244 212 672 338 regenerate-tables 0; +#X msg 415 84 bang; +#X obj 415 113 t b b; +#X obj 474 177 f; +#X obj 512 177 + 1; +#X msg 483 147 0; +#X obj 415 142 until; +#X obj 474 211 t f f; +#X obj 414 238 mtof; +#X obj 405 202 sel 129; +#X obj 413 264 tabwrite mtof; +#X obj 35 227 moses 2; +#X msg 19 76 bang; +#X obj 19 105 t b b; +#X obj 90 166 f; +#X obj 128 166 + 1; +#X msg 112 138 0; +#X obj 19 134 until; +#X obj 11 194 sel 122; +#X msg 35 258 0; +#X obj 79 259 dbtorms; +#X obj 90 194 t f f; +#X obj 35 291 tabwrite dbtorms; +#X text 18 49 bang to recalculate dbtorms table; +#X text 356 50 bang to recalculate the mtof table; +#X connect 0 0 1 0; +#X connect 1 0 5 0; +#X connect 1 1 4 0; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 2 0 8 0; +#X connect 3 0 2 1; +#X connect 4 0 2 1; +#X connect 5 0 2 0; +#X connect 6 0 7 0; +#X connect 6 1 9 1; +#X connect 7 0 9 0; +#X connect 8 0 5 1; +#X connect 10 0 18 0; +#X connect 10 1 19 0; +#X connect 11 0 12 0; +#X connect 12 0 16 0; +#X connect 12 1 15 0; +#X connect 13 0 14 0; +#X connect 13 0 17 0; +#X connect 13 0 20 0; +#X connect 14 0 13 1; +#X connect 15 0 13 1; +#X connect 16 0 13 0; +#X connect 17 0 16 1; +#X connect 18 0 21 0; +#X connect 19 0 21 0; +#X connect 20 0 10 0; +#X connect 20 1 21 1; +#X restore 375 76 pd regenerate-tables; +#X restore 449 418 pd conversion-tables; +#X text 427 536 updated for Pd version 0.35; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 4 0 1 0; +#X connect 6 0 19 0; +#X connect 6 0 20 0; +#X connect 7 0 10 0; +#X connect 8 0 6 0; +#X connect 9 0 6 1; +#X connect 10 0 9 0; +#X connect 10 0 12 0; +#X connect 11 0 28 1; +#X connect 12 0 8 0; +#X connect 13 0 28 0; +#X connect 14 0 13 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 18 0 14 0; +#X connect 19 0 4 0; +#X connect 21 0 22 0; +#X connect 22 0 19 1; +#X connect 23 0 15 0; +#X connect 28 0 7 0; diff --git a/pd/doc/3.audio.examples/54.delay.loop.pd b/pd/doc/3.audio.examples/54.delay.loop.pd new file mode 100644 index 00000000..71b35253 --- /dev/null +++ b/pd/doc/3.audio.examples/54.delay.loop.pd @@ -0,0 +1,213 @@ +#N canvas 22 1 630 601 12; +#X text 309 531 updated for Pd version 0.26; +#X floatatom 58 505 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 29 533 pd output; +#X msg 87 505 MUTE; +#X text 126 504 <-- output amplitude; +#X obj 29 476 hip~ 5; +#X obj 29 297 -~; +#X obj 29 273 *~ 3; +#X obj 66 279 *~ 2; +#X floatatom 29 177 0 0 0; +#X obj 29 249 clip~ 0 0.667; +#X obj 39 450 delwrite~ delay1 2000; +#X floatatom 45 353 0 0 0; +#X text 79 176 <-- pitch; +#X text 75 352 <-- delay time; +#X text 238 450 write to delay line; +#X text 226 378 read from delay line; +#X text 64 426 add the original and the delayed signal; +#X obj 29 201 mtof; +#X msg 135 238 1; +#X obj 29 321 *~; +#X obj 29 225 phasor~ 0; +#X obj 135 286 tabread4~ dbtorms; +#X obj 135 262 adsr 100 100 2000 0 2000; +#X obj 29 427 +~; +#X obj 45 377 delread~ delay1 160; +#X obj 45 401 *~ 0.7; +#X text 103 401 feedback gain; +#X text 57 9 DELAYS WITH FEEDBACK; +#X text 33 39 You can feed the result of a delread~ module back into +its own delwrite~ \, as long as you're careful about stability. For +delays below 30 msec \, you can frequently hear teh resonant pitch. +For longer delay times you get the famous old delay loop effect.; +#X text 32 118 We've added an amplitude control here so that teh test +oscillator only speaks while you're dragging the pitch up and down. +Be sure to try the shift key.; +#N canvas 0 0 600 392 conversion-tables 0; +#N canvas 0 0 450 300 graph1 0; +#X array dbtorms 123 float 1; +#A 0 0 0 1.25893e-05 1.41254e-05 1.58489e-05 1.77828e-05 1.99526e-05 +2.23872e-05 2.51189e-05 2.81838e-05 3.16228e-05 3.54813e-05 3.98107e-05 +4.46684e-05 5.01187e-05 5.62341e-05 6.30957e-05 7.07946e-05 7.94328e-05 +8.91251e-05 1e-04 0.000112202 0.000125893 0.000141254 0.000158489 0.000177828 +0.000199526 0.000223872 0.000251189 0.000281838 0.000316228 0.000354813 +0.000398107 0.000446684 0.000501187 0.000562341 0.000630957 0.000707946 +0.000794328 0.000891251 0.001 0.00112202 0.00125893 0.00141254 0.00158489 +0.00177828 0.00199526 0.00223872 0.00251189 0.00281838 0.00316228 0.00354813 +0.00398107 0.00446684 0.00501187 0.00562341 0.00630957 0.00707946 0.00794328 +0.00891251 0.01 0.0112202 0.0125893 0.0141254 0.0158489 0.0177828 0.0199526 +0.0223872 0.0251189 0.0281838 0.0316228 0.0354813 0.0398107 0.0446684 +0.0501187 0.0562341 0.0630957 0.0707946 0.0794328 0.0891251 0.1 0.112202 +0.125893 0.141254 0.158489 0.177828 0.199526 0.223872 0.251189 0.281838 +0.316228 0.354813 0.398107 0.446684 0.501187 0.562341 0.630957 0.707946 +0.794328 0.891251 1 1.12202 1.25893 1.41254 1.58489 1.77828 1.99526 +2.23872 2.51189 2.81838 3.16228 3.54813 3.98107 4.46684 5.01187 5.62341 +6.30957 7.07946 7.94328 8.91251 10 11.2202 12.5893; +#X coords 0 10 123 0 200 100 1; +#X restore 70 45 graph; +#X text 272 138 0; +#X text 274 38 10; +#X text 89 148 ------ 123 samples ------; +#N canvas 0 0 450 300 graph2 0; +#X array mtof 130 float 1; +#A 0 8.1758 8.66196 9.17702 9.72272 10.3009 10.9134 11.5623 12.2499 +12.9783 13.75 14.5676 15.4339 16.3516 17.3239 18.354 19.4454 20.6017 +21.8268 23.1247 24.4997 25.9565 27.5 29.1352 30.8677 32.7032 34.6478 +36.7081 38.8909 41.2034 43.6535 46.2493 48.9994 51.9131 55 58.2705 +61.7354 65.4064 69.2957 73.4162 77.7817 82.4069 87.3071 92.4986 97.9989 +103.826 110 116.541 123.471 130.813 138.591 146.832 155.563 164.814 +174.614 184.997 195.998 207.652 220 233.082 246.942 261.626 277.183 +293.665 311.127 329.628 349.228 369.994 391.995 415.305 440 466.164 +493.883 523.251 554.365 587.33 622.254 659.255 698.456 739.989 783.991 +830.609 880 932.328 987.767 1046.5 1108.73 1174.66 1244.51 1318.51 +1396.91 1479.98 1567.98 1661.22 1760 1864.66 1975.53 2093 2217.46 2349.32 +2489.02 2637.02 2793.83 2959.96 3135.96 3322.44 3520 3729.31 3951.07 +4186.01 4434.92 4698.64 4978.03 5274.04 5587.65 5919.91 6271.93 6644.88 +7040 7458.62 7902.13 8372.02 8869.84 9397.27 9956.06 10548.1 11175.3 +11839.8 12543.9 13289.8 14080; +#X coords 0 12000 130 0 200 100 1; +#X restore 77 222 graph; +#X text 87 330 ------ 130 samples ------; +#X text 286 315 0; +#X text 288 215 12000; +#N canvas 244 212 672 338 regenerate-tables 0; +#X msg 415 84 bang; +#X obj 415 113 t b b; +#X obj 474 177 f; +#X obj 512 177 + 1; +#X msg 483 147 0; +#X obj 415 142 until; +#X obj 474 211 t f f; +#X obj 414 238 mtof; +#X obj 405 202 sel 129; +#X obj 413 264 tabwrite mtof; +#X obj 35 227 moses 2; +#X msg 19 76 bang; +#X obj 19 105 t b b; +#X obj 90 166 f; +#X obj 128 166 + 1; +#X msg 112 138 0; +#X obj 19 134 until; +#X obj 11 194 sel 122; +#X msg 35 258 0; +#X obj 79 259 dbtorms; +#X obj 90 194 t f f; +#X obj 35 291 tabwrite dbtorms; +#X text 18 49 bang to recalculate dbtorms table; +#X text 356 50 bang to recalculate the mtof table; +#X connect 0 0 1 0; +#X connect 1 0 5 0; +#X connect 1 1 4 0; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 2 0 8 0; +#X connect 3 0 2 1; +#X connect 4 0 2 1; +#X connect 5 0 2 0; +#X connect 6 0 7 0; +#X connect 6 1 9 1; +#X connect 7 0 9 0; +#X connect 8 0 5 1; +#X connect 10 0 18 0; +#X connect 10 1 19 0; +#X connect 11 0 12 0; +#X connect 12 0 16 0; +#X connect 12 1 15 0; +#X connect 13 0 14 0; +#X connect 13 0 17 0; +#X connect 13 0 20 0; +#X connect 14 0 13 1; +#X connect 15 0 13 1; +#X connect 16 0 13 0; +#X connect 17 0 16 1; +#X connect 18 0 21 0; +#X connect 19 0 21 0; +#X connect 20 0 10 0; +#X connect 20 1 21 1; +#X restore 375 76 pd regenerate-tables; +#X restore 334 483 pd conversion-tables; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 5 0 2 0; +#X connect 6 0 20 0; +#X connect 7 0 6 0; +#X connect 8 0 6 1; +#X connect 9 0 18 0; +#X connect 9 0 19 0; +#X connect 10 0 7 0; +#X connect 12 0 25 0; +#X connect 18 0 21 0; +#X connect 19 0 23 0; +#X connect 20 0 24 0; +#X connect 21 0 8 0; +#X connect 21 0 10 0; +#X connect 22 0 20 1; +#X connect 23 0 22 0; +#X connect 24 0 11 0; +#X connect 24 0 5 0; +#X connect 25 0 26 0; +#X connect 26 0 24 1; diff --git a/pd/doc/3.audio.examples/55.delay.variable.pd b/pd/doc/3.audio.examples/55.delay.variable.pd new file mode 100644 index 00000000..bb16de95 --- /dev/null +++ b/pd/doc/3.audio.examples/55.delay.variable.pd @@ -0,0 +1,129 @@ +#N canvas 100 17 671 522 12; +#X obj 63 306 hip~ 10; +#X floatatom 331 222; +#X obj 331 270 line~; +#X obj 331 246 pack 0 100; +#X floatatom 256 192; +#X floatatom 442 297; +#X obj 442 369 line~; +#X obj 442 345 pack 0 100; +#X obj 442 321 * 0.01; +#X floatatom 143 167; +#X obj 143 238 line~; +#X obj 143 214 pack 0 100; +#X obj 63 258 *~; +#X obj 63 282 cos~; +#X floatatom 63 135; +#X obj 63 159 mtof; +#X obj 63 183 * 0.5; +#X obj 63 330 clip~ -0.2 0.2; +#X obj 143 190 * 0.01; +#X obj 426 444 delwrite~ delay1 1000; +#X obj 63 354 +~; +#X obj 426 396 *~; +#X obj 256 336 vd~ delay1; +#X obj 256 288 *~; +#X obj 256 216 / 100; +#X floatatom 93 419; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 64 447 pd output; +#X msg 122 419 MUTE; +#X text 161 418 <-- output amplitude; +#X obj 63 378 hip~ 5; +#X text 401 505 updated for Pd version 0.26; +#X obj 256 264 +~ 1; +#X obj 256 240 osc~ 0; +#X obj 256 312 +~ 1.46; +#X obj 426 420 clip~ -5 5; +#X text 43 35 This is a fuzzed FM generator going into a delay loop \, this time using a variable delay object (vd~). You can get several interesting effects this way. We have taken the precaution if clipping inside the loop to avoid instabilities. You can push the loop gain past 1 if you want \, it will just uscillate.; +#X text 184 165 <-- timbre; +#X text 96 136 <-- pitch; +#X text 300 192 <-- cycle frequency (hundredths); +#X text 361 222 <-- cycle depth (msec); +#X text 491 298 <-- feedback (hundredths); +#X text 86 9 VARIABLE DELAYS; +#X obj 63 207 osc~ 0; +#X connect 0 0 17 0; +#X connect 1 0 3 0; +#X connect 2 0 23 1; +#X connect 3 0 2 0; +#X connect 4 0 24 0; +#X connect 5 0 8 0; +#X connect 6 0 21 1; +#X connect 7 0 6 0; +#X connect 8 0 7 0; +#X connect 9 0 18 0; +#X connect 10 0 12 1; +#X connect 11 0 10 0; +#X connect 12 0 13 0; +#X connect 13 0 0 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 16 0 42 0; +#X connect 17 0 20 0; +#X connect 18 0 11 0; +#X connect 20 0 29 0; +#X connect 21 0 34 0; +#X connect 22 0 20 1; +#X connect 23 0 33 0; +#X connect 24 0 32 0; +#X connect 25 0 26 1; +#X connect 26 0 25 0; +#X connect 27 0 26 2; +#X connect 29 0 26 0; +#X connect 29 0 21 0; +#X connect 31 0 23 0; +#X connect 32 0 31 0; +#X connect 33 0 22 0; +#X connect 34 0 19 0; +#X connect 42 0 12 0; diff --git a/pd/doc/3.audio.examples/56.delay.pitchshift.pd b/pd/doc/3.audio.examples/56.delay.pitchshift.pd new file mode 100644 index 00000000..feb56e2f --- /dev/null +++ b/pd/doc/3.audio.examples/56.delay.pitchshift.pd @@ -0,0 +1,226 @@ +#N canvas 93 36 1005 580 12; +#X obj 19 493 hip~ 5; +#X floatatom 19 87 0 0 0; +#X obj 84 359 *~; +#X obj 192 290 line~; +#X floatatom 265 114 0 0 0; +#X text 68 9 PITCH SHIFTER; +#X obj 192 264 pack 0 200; +#X obj 266 141 moses 1; +#X msg 227 141 1; +#X obj 266 88 r window; +#X obj 19 61 r transpose; +#X obj 19 143 exp; +#X floatatom 19 169 0 0 0; +#X obj 19 259 /; +#X obj 146 189 * 0.001; +#X obj 314 366 line~; +#X obj 315 338 pack 0 200; +#X floatatom 315 258 0 0 0; +#X text 314 202 delay (msec); +#X obj 315 232 r delay; +#X obj 84 385 +~; +#X msg 315 311 1; +#X obj 315 285 moses 1.5; +#X obj 84 411 vd~ delay1; +#X obj 19 410 cos~; +#X obj 19 437 *~; +#X obj 19 466 +~; +#X obj 106 317 wrap~; +#X obj 251 360 *~; +#X obj 251 393 +~; +#X obj 251 422 vd~ delay1; +#X obj 188 420 cos~; +#X obj 188 447 *~; +#X msg 492 56 \; transpose 0 \; window 100 \; delay 0; +#X obj 492 30 loadbang; +#X obj 264 42 delwrite~ delay1 5000; +#X obj 146 216 t b f; +#X floatatom 19 285 0 0 0; +#X obj 19 312 phasor~ 0; +#X floatatom 51 526 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 372 176 t b; +#X obj 372 121 f; +#X obj 372 66 inlet; +#X text 378 32 mute; +#X obj 372 204 f; +#X msg 468 196 0; +#X msg 372 94 bang; +#X obj 372 149 moses 1; +#X obj 468 168 t b f; +#X obj 437 129 moses 1; +#X obj 91 163 dbtorms; +#X obj 437 101 r master-lvl; +#X obj 91 46 r master-lvl; +#X obj 372 231 s master-lvl; +#X obj 24 199 inlet~; +#X obj 219 45 inlet; +#X text 219 20 level; +#X obj 219 110 s master-lvl; +#X msg 106 72 set \$1; +#X obj 106 98 outlet; +#X msg 235 70 \; pd dsp 1; +#X obj 91 213 line~; +#X obj 24 233 *~; +#X obj 24 265 dac~; +#X obj 91 188 pack 0 50; +#X text 22 174 audio; +#X text 102 121 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 19 557 pd output; +#X msg 83 526 MUTE; +#X text 125 525 <-- output amplitude; +#X obj 106 290 +~ 0.5; +#X obj 19 358 -~ 0.5; +#X obj 19 384 *~ 0.5; +#X obj 188 359 -~ 0.5; +#X obj 188 392 *~ 0.5; +#X floatatom 227 167 0 0 0; +#X obj 19 196 - 1; +#X obj 19 117 * 0.05776; +#X obj 19 222 * -1; +#X text 53 86 <-- transposition; +#X text 96 99 (halftones); +#X text 86 177 speed; +#X text 85 191 change; +#X text 310 113 <--window (msec); +#X text 54 252 tape head; +#X text 55 265 rotation speed; +#N canvas 0 0 612 637 test-input 0; +#X graph graph1 0 -1 155947 1 150 291 350 141; +#X array array1 155948 float 0; +#X pop; +#X obj 139 518 tabread4~ array1; +#X obj 139 333 r totsamps; +#X obj 139 413 /; +#X obj 139 465 *~ 0; +#X obj 139 439 phasor~ 0; +#X obj 139 492 +~ 1; +#X msg 139 386 44100; +#X obj 139 360 t b f; +#X obj 182 469 r totsamps; +#X text 153 538 sample loop for; +#X text 153 555 test signal; +#X obj 162 30 loadbang; +#X obj 139 590 outlet~; +#X obj 393 169 r readfile; +#X obj 393 199 symbol; +#X msg 392 228 read -resize \$1 array1; +#X obj 392 256 soundfiler; +#X obj 392 284 s totsamps; +#X msg 161 64 \; readfile ../sound/bell.aiff; +#X connect 1 0 13 0; +#X connect 2 0 8 0; +#X connect 3 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 4 0; +#X connect 6 0 1 0; +#X connect 7 0 3 0; +#X connect 8 0 7 0; +#X connect 8 1 3 1; +#X connect 9 0 4 1; +#X connect 12 0 19 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X restore 264 11 pd test-input; +#X text 439 161 This is a classic rotating-tape-head style pitch shifter +using the vd~ variable delay object. Ther are two moving tape heads +\, each of which is loudest at the middle of its trajectory \, and +enveloped out at the moment it has to jump back (or forward) to start +another scratch. Most of the brain work is in computing how fast the +tape heads have to move to get the desired transposition.; +#X text 439 280 The "window size" is the total trajectory of the read +points in the delay line \, in milliseconds. The delay times are controlled +by a phasor~ object. The second delay time \, 180 degrees out of phase +from the first one \, is computed using the "wrap" object.; +#X text 437 370 The "window size" is the total trajectory of the read +points in the delay line \, in milliseconds. The delay times are controlled +by a phasor~ object. The second delay time \, 180 degrees out of phase +from the first one \, is computed using the "wrap" object.; +#X text 436 462 The cos~ objects compute the fadein and fadeout of +the two delay line outputs. They each traverse the positive half of +the cosine waveform (phase -0.25 to +0.25) over the time the phase +goes from one end to the other.; +#X text 757 557 updated for Pd version 0.33; +#X connect 0 0 40 0; +#X connect 1 0 50 0; +#X connect 2 0 20 0; +#X connect 3 0 2 1; +#X connect 3 0 28 1; +#X connect 4 0 7 0; +#X connect 6 0 3 0; +#X connect 7 0 8 0; +#X connect 7 1 48 0; +#X connect 8 0 48 0; +#X connect 9 0 4 0; +#X connect 10 0 1 0; +#X connect 11 0 12 0; +#X connect 12 0 49 0; +#X connect 13 0 37 0; +#X connect 14 0 36 0; +#X connect 15 0 20 1; +#X connect 15 0 29 1; +#X connect 16 0 15 0; +#X connect 17 0 22 0; +#X connect 19 0 17 0; +#X connect 20 0 23 0; +#X connect 21 0 16 0; +#X connect 22 0 21 0; +#X connect 22 1 16 0; +#X connect 23 0 25 1; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 26 0 0 0; +#X connect 27 0 28 0; +#X connect 27 0 46 0; +#X connect 28 0 29 0; +#X connect 29 0 30 0; +#X connect 30 0 32 1; +#X connect 31 0 32 0; +#X connect 32 0 26 1; +#X connect 34 0 33 0; +#X connect 36 0 13 0; +#X connect 36 1 13 1; +#X connect 37 0 38 0; +#X connect 38 0 2 0; +#X connect 38 0 44 0; +#X connect 38 0 43 0; +#X connect 39 0 40 1; +#X connect 40 0 39 0; +#X connect 41 0 40 2; +#X connect 43 0 27 0; +#X connect 44 0 45 0; +#X connect 45 0 24 0; +#X connect 46 0 47 0; +#X connect 47 0 31 0; +#X connect 48 0 6 0; +#X connect 48 0 14 0; +#X connect 49 0 51 0; +#X connect 50 0 11 0; +#X connect 51 0 13 0; +#X connect 59 0 35 0; diff --git a/pd/doc/3.audio.examples/57.delay.reverb.pd b/pd/doc/3.audio.examples/57.delay.reverb.pd new file mode 100644 index 00000000..aad17023 --- /dev/null +++ b/pd/doc/3.audio.examples/57.delay.reverb.pd @@ -0,0 +1,316 @@ +#N canvas 127 171 643 406 12; +#N canvas 0 0 499 321 test-input 0; +#X obj 75 253 outlet~; +#X obj 74 201 -~; +#X obj 74 177 *~ 3; +#X obj 111 183 *~ 2; +#X floatatom 74 81 0 0 0; +#X obj 74 153 clip~ 0 0.667; +#X text 124 80 <-- pitch; +#X obj 74 105 mtof; +#X msg 195 142 1; +#X obj 74 225 *~; +#X obj 74 129 phasor~ 0; +#X obj 195 190 tabread4~ dbtorms; +#X obj 195 166 adsr 100 100 2000 0 2000; +#X obj 73 54 inlet; +#N canvas 0 0 600 392 conversion-tables 0; +#N canvas 0 0 450 300 graph1 0; +#X array dbtorms 123 float 1; +#A 0 0 0 1.25893e-05 1.41254e-05 1.58489e-05 1.77828e-05 1.99526e-05 +2.23872e-05 2.51189e-05 2.81838e-05 3.16228e-05 3.54813e-05 3.98107e-05 +4.46684e-05 5.01187e-05 5.62341e-05 6.30957e-05 7.07946e-05 7.94328e-05 +8.91251e-05 1e-04 0.000112202 0.000125893 0.000141254 0.000158489 0.000177828 +0.000199526 0.000223872 0.000251189 0.000281838 0.000316228 0.000354813 +0.000398107 0.000446684 0.000501187 0.000562341 0.000630957 0.000707946 +0.000794328 0.000891251 0.001 0.00112202 0.00125893 0.00141254 0.00158489 +0.00177828 0.00199526 0.00223872 0.00251189 0.00281838 0.00316228 0.00354813 +0.00398107 0.00446684 0.00501187 0.00562341 0.00630957 0.00707946 0.00794328 +0.00891251 0.01 0.0112202 0.0125893 0.0141254 0.0158489 0.0177828 0.0199526 +0.0223872 0.0251189 0.0281838 0.0316228 0.0354813 0.0398107 0.0446684 +0.0501187 0.0562341 0.0630957 0.0707946 0.0794328 0.0891251 0.1 0.112202 +0.125893 0.141254 0.158489 0.177828 0.199526 0.223872 0.251189 0.281838 +0.316228 0.354813 0.398107 0.446684 0.501187 0.562341 0.630957 0.707946 +0.794328 0.891251 1 1.12202 1.25893 1.41254 1.58489 1.77828 1.99526 +2.23872 2.51189 2.81838 3.16228 3.54813 3.98107 4.46684 5.01187 5.62341 +6.30957 7.07946 7.94328 8.91251 10 11.2202 12.5893; +#X coords 0 10 123 0 200 100 1; +#X restore 70 45 graph; +#X text 272 138 0; +#X text 274 38 10; +#X text 89 148 ------ 123 samples ------; +#N canvas 0 0 450 300 graph2 0; +#X array mtof 130 float 1; +#A 0 8.1758 8.66196 9.17702 9.72272 10.3009 10.9134 11.5623 12.2499 +12.9783 13.75 14.5676 15.4339 16.3516 17.3239 18.354 19.4454 20.6017 +21.8268 23.1247 24.4997 25.9565 27.5 29.1352 30.8677 32.7032 34.6478 +36.7081 38.8909 41.2034 43.6535 46.2493 48.9994 51.9131 55 58.2705 +61.7354 65.4064 69.2957 73.4162 77.7817 82.4069 87.3071 92.4986 97.9989 +103.826 110 116.541 123.471 130.813 138.591 146.832 155.563 164.814 +174.614 184.997 195.998 207.652 220 233.082 246.942 261.626 277.183 +293.665 311.127 329.628 349.228 369.994 391.995 415.305 440 466.164 +493.883 523.251 554.365 587.33 622.254 659.255 698.456 739.989 783.991 +830.609 880 932.328 987.767 1046.5 1108.73 1174.66 1244.51 1318.51 +1396.91 1479.98 1567.98 1661.22 1760 1864.66 1975.53 2093 2217.46 2349.32 +2489.02 2637.02 2793.83 2959.96 3135.96 3322.44 3520 3729.31 3951.07 +4186.01 4434.92 4698.64 4978.03 5274.04 5587.65 5919.91 6271.93 6644.88 +7040 7458.62 7902.13 8372.02 8869.84 9397.27 9956.06 10548.1 11175.3 +11839.8 12543.9 13289.8 14080; +#X coords 0 12000 130 0 200 100 1; +#X restore 77 222 graph; +#X text 87 330 ------ 130 samples ------; +#X text 286 315 0; +#X text 288 215 12000; +#N canvas 244 212 672 338 regenerate-tables 0; +#X msg 415 84 bang; +#X obj 415 113 t b b; +#X obj 474 177 f; +#X obj 512 177 + 1; +#X msg 483 147 0; +#X obj 415 142 until; +#X obj 474 211 t f f; +#X obj 414 238 mtof; +#X obj 405 202 sel 129; +#X obj 413 264 tabwrite mtof; +#X obj 35 227 moses 2; +#X msg 19 76 bang; +#X obj 19 105 t b b; +#X obj 90 166 f; +#X obj 128 166 + 1; +#X msg 112 138 0; +#X obj 19 134 until; +#X obj 11 194 sel 122; +#X msg 35 258 0; +#X obj 79 259 dbtorms; +#X obj 90 194 t f f; +#X obj 35 291 tabwrite dbtorms; +#X text 18 49 bang to recalculate dbtorms table; +#X text 356 50 bang to recalculate the mtof table; +#X connect 0 0 1 0; +#X connect 1 0 5 0; +#X connect 1 1 4 0; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 2 0 8 0; +#X connect 3 0 2 1; +#X connect 4 0 2 1; +#X connect 5 0 2 0; +#X connect 6 0 7 0; +#X connect 6 1 9 1; +#X connect 7 0 9 0; +#X connect 8 0 5 1; +#X connect 10 0 18 0; +#X connect 10 1 19 0; +#X connect 11 0 12 0; +#X connect 12 0 16 0; +#X connect 12 1 15 0; +#X connect 13 0 14 0; +#X connect 13 0 17 0; +#X connect 13 0 20 0; +#X connect 14 0 13 1; +#X connect 15 0 13 1; +#X connect 16 0 13 0; +#X connect 17 0 16 1; +#X connect 18 0 21 0; +#X connect 19 0 21 0; +#X connect 20 0 10 0; +#X connect 20 1 21 1; +#X restore 375 76 pd regenerate-tables; +#X restore 260 101 pd conversion-tables; +#X connect 1 0 9 0; +#X connect 2 0 1 0; +#X connect 3 0 1 1; +#X connect 4 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 2 0; +#X connect 7 0 10 0; +#X connect 8 0 12 0; +#X connect 9 0 0 0; +#X connect 10 0 3 0; +#X connect 10 0 5 0; +#X connect 11 0 9 1; +#X connect 12 0 11 0; +#X connect 13 0 4 0; +#X restore 75 129 pd test-input; +#X text 328 322 updated for Pd version 0.26; +#X text 62 8 REVERBERATOR; +#X floatatom 75 100 0 0 0; +#X text 126 105 <-- pitch; +#X floatatom 137 219 0 0 0; +#N canvas 159 26 618 379 output 0; +#X obj 393 156 t b; +#X obj 393 106 f; +#X obj 393 56 inlet; +#X text 399 25 mute; +#X obj 393 181 f; +#X msg 480 174 0; +#X msg 393 81 bang; +#X obj 393 131 moses 1; +#X obj 480 149 t b f; +#X obj 452 113 moses 1; +#X obj 138 144 dbtorms; +#X obj 452 88 r master-lvl; +#X obj 138 38 r master-lvl; +#X obj 393 206 s master-lvl; +#X obj 22 140 inlet~; +#X obj 254 37 inlet; +#X text 254 14 level; +#X obj 254 96 s master-lvl; +#X msg 151 61 set \$1; +#X obj 151 85 outlet; +#X msg 269 60 \; pd dsp 1; +#X obj 138 190 line~; +#X obj 22 231 *~; +#X obj 138 167 pack 0 50; +#X text 34 118 audio; +#X text 148 106 show level; +#X obj 73 140 inlet~; +#X obj 73 232 *~; +#X obj 22 260 dac~ 1; +#X obj 73 260 dac~ 2; +#X obj 22 182 hip~ 5; +#X obj 73 181 hip~ 5; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 23 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 30 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 21 0 27 1; +#X connect 22 0 28 0; +#X connect 23 0 21 0; +#X connect 26 0 31 0; +#X connect 27 0 29 0; +#X connect 30 0 22 0; +#X connect 31 0 27 0; +#X restore 75 247 pd output; +#X msg 166 219 MUTE; +#X text 184 217 <-- output amplitude; +#N canvas 137 269 1056 577 reverb 0; +#X obj 77 37 inlet~; +#X obj 77 85 echo echo-del2 8.45346; +#X obj 77 61 echo echo-del1 5.43216; +#X obj 77 109 echo echo-del3 13.4367; +#X obj 77 133 echo echo-del4 21.5463; +#X obj 77 157 echo echo-del5 34.3876; +#X obj 77 181 echo echo-del6 55.5437; +#X obj 253 545 delwrite~ loop-del1 70; +#X obj 295 157 delread~ loop-del1 70; +#X obj 466 157 delread~ loop-del2 81.9345; +#X obj 416 545 delwrite~ loop-del2 81.9345; +#X obj 665 154 delread~ loop-del3 94.7545; +#X obj 855 154 delread~ loop-del4 115.945; +#X obj 622 545 delwrite~ loop-del3 94.7545; +#X obj 820 545 delwrite~ loop-del4 115.945; +#X obj 282 215 +~; +#X obj 443 215 +~; +#X obj 187 251 outlet~; +#X obj 364 244 outlet~; +#X obj 251 337 +~; +#X obj 619 328 +~; +#X obj 408 334 -~; +#X obj 791 327 -~; +#X obj 251 391 +~; +#X obj 411 397 +~; +#X obj 615 407 -~; +#X obj 785 388 -~; +#X obj 620 474 *~ 0; +#X obj 620 511 lop~ 5000; +#X obj 415 472 *~ 0; +#X obj 415 510 lop~ 5000; +#X obj 246 475 *~ 0; +#X obj 246 513 lop~ 5000; +#X obj 821 472 *~ 0; +#X obj 821 506 lop~ 5000; +#X obj 924 254 inlet; +#X obj 924 278 moses 100; +#X obj 926 325 moses -100; +#X msg 979 303 100; +#X msg 930 349 -100; +#X obj 934 386 / 200; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X connect 1 1 3 1; +#X connect 2 0 1 0; +#X connect 2 1 1 1; +#X connect 3 0 4 0; +#X connect 3 1 4 1; +#X connect 4 0 5 0; +#X connect 4 1 5 1; +#X connect 5 0 6 0; +#X connect 5 1 6 1; +#X connect 6 0 15 0; +#X connect 6 1 16 0; +#X connect 8 0 15 1; +#X connect 9 0 16 1; +#X connect 11 0 19 1; +#X connect 11 0 21 1; +#X connect 12 0 20 1; +#X connect 12 0 22 1; +#X connect 15 0 17 0; +#X connect 15 0 19 0; +#X connect 15 0 21 0; +#X connect 16 0 18 0; +#X connect 16 0 20 0; +#X connect 16 0 22 0; +#X connect 19 0 23 0; +#X connect 19 0 25 0; +#X connect 20 0 25 1; +#X connect 20 0 23 1; +#X connect 21 0 24 0; +#X connect 21 0 26 0; +#X connect 22 0 24 1; +#X connect 22 0 26 1; +#X connect 23 0 27 0; +#X connect 24 0 29 0; +#X connect 25 0 31 0; +#X connect 26 0 33 0; +#X connect 27 0 28 0; +#X connect 28 0 13 0; +#X connect 29 0 30 0; +#X connect 30 0 10 0; +#X connect 31 0 32 0; +#X connect 32 0 7 0; +#X connect 33 0 34 0; +#X connect 34 0 14 0; +#X connect 35 0 36 0; +#X connect 36 0 37 0; +#X connect 36 1 38 0; +#X connect 37 0 39 0; +#X connect 37 1 40 0; +#X connect 38 0 37 0; +#X connect 39 0 40 0; +#X connect 40 0 33 1; +#X connect 40 0 31 1; +#X connect 40 0 29 1; +#X connect 40 0 27 1; +#X restore 50 193 pd reverb; +#X floatatom 108 163 0 0 0; +#X text 143 163 <-- feedback (100 maximum); +#X text 32 41 Here is a simple recirculating reverberator. "Feedback" +should be between -100 and 100; +#X text 37 285 You can spend a lifetime tweaking reverberators... we'll +just leave it at that for now.; +#X connect 0 0 9 0; +#X connect 0 0 6 0; +#X connect 3 0 0 0; +#X connect 5 0 6 2; +#X connect 6 0 5 0; +#X connect 7 0 6 3; +#X connect 9 0 6 0; +#X connect 9 1 6 1; +#X connect 10 0 9 1; diff --git a/pd/doc/3.audio.examples/58.PART8.moreFM.pd b/pd/doc/3.audio.examples/58.PART8.moreFM.pd new file mode 100644 index 00000000..1b0e112b --- /dev/null +++ b/pd/doc/3.audio.examples/58.PART8.moreFM.pd @@ -0,0 +1,132 @@ +#N canvas 25 100 785 694 12; +#X floatatom 197 602 0 0 0; +#N canvas 159 26 541 274 output 0; +#X obj 351 166 t b; +#X obj 351 114 f; +#X obj 351 62 inlet; +#X text 358 30 mute; +#X obj 351 192 f; +#X msg 442 186 0; +#X msg 351 88 bang; +#X obj 351 140 moses 1; +#X obj 413 114 moses 1; +#X obj 86 153 dbtorms; +#X obj 413 88 r master-lvl; +#X obj 86 44 r master-lvl; +#X obj 351 218 s master-lvl; +#X obj 12 166 inlet~; +#X obj 207 43 inlet; +#X text 207 19 level; +#X obj 207 104 s master-lvl; +#X msg 100 67 set \$1; +#X obj 100 93 outlet; +#X msg 222 67 \; pd dsp 1; +#X obj 86 205 line~; +#X obj 12 218 *~; +#X obj 12 244 dac~; +#X obj 86 179 pack 0 50; +#X text 12 142 audio; +#X text 100 118 show level; +#X obj 12 192 hip~ 1; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 26 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 21 0; +#X restore 158 630 pd output; +#X msg 234 602 MUTE; +#X text 528 618 updated for Pd version 0.34; +#X text 277 601 <-- output; +#X text 79 4 FM \, PWM \, PAF as formant generators; +#X text 39 22 The next several patches illustrate "Synthesizing Sounds +with Specified \, Time-Varying Spectra" presented at ICMC 2001 and +reprinted on http://www.crca.ucsd.edu/~msp/publications.html.; +#X obj 146 468 line~; +#X obj 146 444 pack 0 50; +#X floatatom 146 389 0 0 0; +#X obj 124 493 *~; +#X text 145 367 index; +#X floatatom 248 398 0 0 0; +#X text 250 370 carrier freq; +#X obj 158 547 cos~; +#X graph graph1 0 0 128 500 499 556 755 426; +#X array spectrum 128 float 0; +#X pop; +#X msg 233 546 bang; +#X text 271 543 <-- click to graph; +#N canvas 204 17 358 238 fft 0; +#X obj 46 48 inlet~; +#X obj 159 181 tabwrite~ spectrum; +#X obj 159 145 inlet; +#X obj 46 78 rfft~; +#X obj 46 111 *~; +#X obj 77 111 *~; +#X obj 46 141 sqrt~; +#X obj 191 45 block~ 1024 1; +#X connect 0 0 3 0; +#X connect 2 0 1 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 1 5 0; +#X connect 3 1 5 1; +#X connect 4 0 6 0; +#X connect 5 0 6 0; +#X connect 6 0 1 0; +#X restore 187 574 pd fft; +#X text 490 562 0; +#X text 738 559 5512; +#X obj 153 520 +~; +#X obj 248 448 phasor~; +#X obj 23 458 osc~ 172.266; +#X obj 146 417 / 100; +#X obj 248 422 * 172.266; +#X text 34 93 First compare this phase modulation example with the +ring modulation example from the section on processing (patch 51). +Here we choose a convenient \, fixed modulation frequency and consider +the effect of changing carrier frequency and modulation index. It's +exactly as if the carrier frequency were a ring modulation frequency. +; +#X text 33 331 Next we'll look at two techniques for sliding a formant +frequency without losing harmonicity.; +#X text 33 191 Using either method we can synthesize the hat-shaped +spectra called "formants." However \, if you try to move the formant +up or down in frequency \, you'll lose harmonicity \; the partials +are only integer multiples of the fundamental \, 172.266 \, when the +carrier is an integer multiple. To hear this \, set index to 20 and +carrier frequency to zero \, and scroll carrier through integers. Then +shift-drag on the carrier frequency to change it in hundredths. Presto +\, inharmonic sounds...; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 7 0 10 1; +#X connect 8 0 7 0; +#X connect 9 0 24 0; +#X connect 10 0 21 0; +#X connect 12 0 25 0; +#X connect 14 0 1 0; +#X connect 14 0 18 0; +#X connect 16 0 18 1; +#X connect 21 0 14 0; +#X connect 22 0 21 1; +#X connect 23 0 10 0; +#X connect 24 0 8 0; +#X connect 25 0 22 0; diff --git a/pd/doc/3.audio.examples/59.packets.pd b/pd/doc/3.audio.examples/59.packets.pd new file mode 100644 index 00000000..072ae27d --- /dev/null +++ b/pd/doc/3.audio.examples/59.packets.pd @@ -0,0 +1,161 @@ +#N canvas 83 221 878 705 12; +#X obj 315 424 line~; +#X obj 47 517 cos~; +#X graph graph1 0 -2 882 2 644 469 844 339; +#X array pulse-output 882 float 0; +#X pop; +#X floatatom 84 633 0 0 0; +#N canvas 176 241 532 273 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 398 111 moses 1; +#X obj 83 148 dbtorms; +#X obj 398 86 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 17 148 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 15 125 audio; +#X text 93 110 show level; +#X obj 17 177 hip~ 1; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 26 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 21 0; +#X restore 48 660 pd output; +#X msg 124 633 MUTE; +#X obj 315 400 pack 0 50; +#X floatatom 315 328 0 0 0; +#X obj 47 429 -~ 0.5; +#X obj 47 468 *~; +#X obj 315 352 / 10; +#X obj 47 493 clip~ -0.5 0.5; +#X text 315 306 bandwidth; +#X msg 165 602 bang; +#X obj 315 448 +~ 1; +#X obj 48 540 +~ 1; +#X obj 197 513 cos~; +#X obj 48 569 *~; +#X floatatom 219 342 4 0 0; +#X obj 219 366 / 10; +#X text 644 472 --- 0.02 seconds ---; +#X obj 197 487 *~; +#N canvas 204 427 939 588 graph 0; +#X obj 91 345 inlet~; +#X obj 729 341 inlet; +#X obj 74 395 tabwrite~ pulse-output; +#X obj 319 350 inlet~; +#X obj 493 343 inlet~; +#X obj 302 400 tabwrite~ window; +#X obj 484 401 tabwrite~ carrier; +#X msg 390 53 \; array2 rename window; +#X connect 0 0 2 0; +#X connect 1 0 2 0; +#X connect 1 0 5 0; +#X connect 1 0 6 0; +#X connect 3 0 5 0; +#X connect 4 0 6 0; +#X restore 76 602 pd graph; +#X obj 315 376 max 0; +#X obj 219 438 line~; +#X obj 219 414 pack 0 50; +#X obj 219 390 max 0; +#X graph graph3 0 -2 881 2 644 328 844 188; +#X array carrier 882 float 0; +#X pop; +#X graph graph4 0 -2 881 2 645 175 845 35; +#X array window 882 float 0; +#X pop; +#X text 211 601 <-- graph; +#X floatatom 47 381 4 0 0; +#X obj 47 405 phasor~ 100; +#X text 31 2 WINDOWED PACKETS; +#X text 169 632 <-- output; +#X text 43 356 freq.; +#X text 43 337 fundamental; +#X text 28 51 The simpler technique is to synthesize enveloped sinusoidal +wave packets. The packets should repeat at the fundamental frequency +\, but the frequency of the packet itself controls the center frequency +of the formant. The length of the packet varies inversely with bandwidth. +; +#X text 27 132 In the patch below \, the "clip~" followed by "cos~" +and "+~ 1" is the enveloping ("windowing" function \, which appears +in the top graph. This is just the original PWM patch from part 2 The +carrier \, on the other hand \, is a broken sinusoid made by amplifying +the phasor~ (the "*~" controlled by "center freq.") and taking the +cos~ of the result. The "breaks" in the sinusoid only occur when the +enveloping signal is zero.; +#X text 197 256 center; +#X text 195 275 freq. (in; +#X text 194 294 tenths of; +#X text 193 314 fundamental); +#X text 92 535 window; +#X text 233 487 magnified phase; +#X text 278 531 desired center frequency; +#X text 250 514 <--this cosine goes at the; +#X text 279 550 but its phase is reset each; +#X text 277 569 fundamental period.; +#X text 612 666 updated for Pd version 0.34; +#X connect 0 0 14 0; +#X connect 1 0 15 0; +#X connect 3 0 4 1; +#X connect 4 0 3 0; +#X connect 5 0 4 2; +#X connect 6 0 0 0; +#X connect 7 0 10 0; +#X connect 8 0 9 0; +#X connect 8 0 21 0; +#X connect 9 0 11 0; +#X connect 10 0 23 0; +#X connect 11 0 1 0; +#X connect 13 0 22 3; +#X connect 14 0 9 1; +#X connect 15 0 17 0; +#X connect 15 0 22 1; +#X connect 16 0 17 1; +#X connect 16 0 22 2; +#X connect 17 0 22 0; +#X connect 17 0 4 0; +#X connect 18 0 19 0; +#X connect 19 0 26 0; +#X connect 21 0 16 0; +#X connect 23 0 6 0; +#X connect 24 0 21 1; +#X connect 25 0 24 0; +#X connect 26 0 25 0; +#X connect 30 0 31 0; +#X connect 31 0 8 0; diff --git a/pd/doc/3.audio.examples/60.packet.spectrum.pd b/pd/doc/3.audio.examples/60.packet.spectrum.pd new file mode 100644 index 00000000..bef1483b --- /dev/null +++ b/pd/doc/3.audio.examples/60.packet.spectrum.pd @@ -0,0 +1,147 @@ +#N canvas 83 221 774 628 12; +#X obj 302 351 line~; +#X obj 34 444 cos~; +#X floatatom 71 560 0 0 0; +#N canvas 176 241 532 273 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 398 111 moses 1; +#X obj 83 148 dbtorms; +#X obj 398 86 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 17 148 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 15 125 audio; +#X text 93 110 show level; +#X obj 17 177 hip~ 1; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 26 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 21 0; +#X restore 35 587 pd output; +#X msg 111 560 MUTE; +#X obj 302 327 pack 0 50; +#X floatatom 302 255 0 0 0; +#X obj 34 356 -~ 0.5; +#X obj 34 395 *~; +#X obj 302 279 / 10; +#X obj 34 420 clip~ -0.5 0.5; +#X text 302 233 bandwidth; +#X obj 302 375 +~ 1; +#X obj 35 467 +~ 1; +#X obj 184 440 cos~; +#X obj 35 496 *~; +#X floatatom 206 269 4 0 0; +#X obj 206 293 / 10; +#X obj 184 414 *~; +#X text 204 224 center; +#X text 204 243 freq.; +#X obj 302 303 max 0; +#X obj 206 365 line~; +#X obj 206 341 pack 0 50; +#X obj 206 317 max 0; +#X floatatom 34 308 4 0 0; +#X obj 34 332 phasor~ 100; +#X text 156 559 <-- output; +#X text 30 283 freq.; +#X text 30 264 fundamental; +#X graph graph1 0 0 128 500 440 492 696 362; +#X array spectrum 128 float 0; +#X pop; +#X msg 108 498 bang; +#N canvas 204 17 358 238 fft 0; +#X obj 46 48 inlet~; +#X obj 159 181 tabwrite~ spectrum; +#X obj 159 145 inlet; +#X obj 46 78 rfft~; +#X obj 46 111 *~; +#X obj 77 111 *~; +#X obj 46 141 sqrt~; +#X obj 191 45 block~ 1024 1; +#X connect 0 0 3 0; +#X connect 2 0 1 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 1 5 0; +#X connect 3 1 5 1; +#X connect 4 0 6 0; +#X connect 5 0 6 0; +#X connect 6 0 1 0; +#X restore 59 524 pd fft; +#X text 439 502 0; +#X text 687 499 5512; +#X text 149 498 <-- graph; +#X text 31 2 WINDOWED PACKET SPECTRUM; +#X text 19 34 Here's the spectrum you get. Note that even if you put +the center frequency right on a partial \, there is significant energy +in neighboring partials (try fundamental 440 \, "center freq" 30 \, +bandwidth 0.); +#X text 18 104 The center frequency is in units of ten per partial +\, or in other words a value of "30" means "centered on the third partial". +; +#X text 505 596 updated for Pd version 0.34; +#X text 22 155 This technique only works if you're doing Hanning-window +shaped PWM--you can't combine this naturally with FM or with the waveshaping +technique we'll see later.; +#X connect 0 0 12 0; +#X connect 1 0 13 0; +#X connect 2 0 3 1; +#X connect 3 0 2 0; +#X connect 4 0 3 2; +#X connect 5 0 0 0; +#X connect 6 0 9 0; +#X connect 7 0 8 0; +#X connect 7 0 18 0; +#X connect 8 0 10 0; +#X connect 9 0 21 0; +#X connect 10 0 1 0; +#X connect 12 0 8 1; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 3 0; +#X connect 15 0 32 0; +#X connect 16 0 17 0; +#X connect 17 0 24 0; +#X connect 18 0 14 0; +#X connect 21 0 5 0; +#X connect 22 0 18 1; +#X connect 23 0 22 0; +#X connect 24 0 23 0; +#X connect 25 0 26 0; +#X connect 26 0 7 0; +#X connect 31 0 32 1; diff --git a/pd/doc/3.audio.examples/61.two.cosines.pd b/pd/doc/3.audio.examples/61.two.cosines.pd new file mode 100644 index 00000000..0f813164 --- /dev/null +++ b/pd/doc/3.audio.examples/61.two.cosines.pd @@ -0,0 +1,124 @@ +#N canvas 10 49 705 610 12; +#X floatatom 262 549 0 0 0; +#N canvas 176 241 532 273 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 398 111 moses 1; +#X obj 83 148 dbtorms; +#X obj 398 86 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 17 148 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 15 125 audio; +#X text 93 110 show level; +#X obj 17 177 hip~ 1; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 26 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 21 0; +#X restore 226 576 pd output; +#X msg 302 549 MUTE; +#X msg 59 550 bang; +#X obj 185 427 cos~; +#X floatatom 232 217 4 0 0; +#X obj 232 241 / 10; +#X text 464 288 --- 0.02 seconds ---; +#X obj 185 397 *~; +#X text 236 133 center; +#X obj 232 313 line~; +#X obj 232 265 max 0; +#X graph graph3 0 -2 881 2 450 276 650 136; +#X array carrier 882 float 0; +#X pop; +#X floatatom 33 284 4 0 0; +#X text 29 240 fundamental; +#X text 31 2 ADDING TWO COSINES; +#X text 234 152 freq. (in; +#X text 233 171 tenths of; +#X text 232 191 fundamental); +#X text 29 259 frequency; +#X obj 227 427 cos~; +#X obj 268 340 wrap~; +#X obj 232 367 -~; +#X obj 227 397 +~; +#X obj 232 464 -~; +#X obj 247 494 *~; +#X obj 225 519 +~; +#X obj 59 578 tabwrite~ carrier; +#X obj 33 308 phasor~ 40; +#X obj 232 289 pack 0 50; +#X text 27 36 The other \, spiffier way is to make a sum of cosines +to interpolate between adjacent harmonics. Suppose for example we want +a center frequency of 5.3 (in units of the fundamental.) We just take +partial 5 with amplitude 0.7 and partial 6 with amplitude 0.7:; +#X text 451 581 updated for Pd version 0.34; +#X text 281 366 subtract to get the integer part "n"; +#X text 277 399 multiply phase by n and n+1; +#X text 282 427 synthesize the two partials; +#X text 54 526 graph; +#X text 347 548 <--output; +#X text 323 339 the fractional part "b"; +#X text 280 463 p2 - p1; +#X text 295 492 b * (p2 - p1); +#X text 264 519 b * p2 + (1-b) * p1; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 3 0 27 0; +#X connect 4 0 24 1; +#X connect 4 0 26 0; +#X connect 5 0 6 0; +#X connect 6 0 11 0; +#X connect 8 0 4 0; +#X connect 8 0 23 0; +#X connect 10 0 22 0; +#X connect 10 0 21 0; +#X connect 11 0 29 0; +#X connect 13 0 28 0; +#X connect 20 0 24 0; +#X connect 21 0 22 1; +#X connect 21 0 25 1; +#X connect 22 0 8 1; +#X connect 23 0 20 0; +#X connect 24 0 25 0; +#X connect 25 0 26 1; +#X connect 26 0 1 0; +#X connect 26 0 27 0; +#X connect 28 0 8 0; +#X connect 28 0 23 1; +#X connect 29 0 10 0; diff --git a/pd/doc/3.audio.examples/62.declickit.pd b/pd/doc/3.audio.examples/62.declickit.pd new file mode 100644 index 00000000..eb296e63 --- /dev/null +++ b/pd/doc/3.audio.examples/62.declickit.pd @@ -0,0 +1,132 @@ +#N canvas 10 49 715 680 12; +#X floatatom 242 612 0 0 0; +#N canvas 176 241 532 273 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 398 111 moses 1; +#X obj 83 148 dbtorms; +#X obj 398 86 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 17 148 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 15 125 audio; +#X text 93 110 show level; +#X obj 17 177 hip~ 1; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 26 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 21 0; +#X restore 206 639 pd output; +#X msg 282 612 MUTE; +#X obj 165 490 cos~; +#X obj 165 460 *~; +#X obj 207 490 cos~; +#X obj 249 406 wrap~; +#X obj 212 415 -~; +#X obj 207 460 +~; +#X obj 207 525 -~; +#X obj 227 557 *~; +#X obj 205 582 +~; +#X text 454 648 updated for Pd version 0.34; +#X text 327 611 <--output; +#X obj 191 184 loadbang; +#X obj 191 210 metro 400; +#X obj 203 234 del 200; +#X obj 204 335 samphold~; +#X obj 259 364 toggle 20 0 empty empty empty 20 8 0 10 -262144 -1 -1 +0 1; +#X obj 166 290 sig~; +#X msg 203 263 3.5; +#X msg 166 263 2; +#X obj 23 280 phasor~ 169; +#N canvas 0 0 600 400 switch 0; +#X obj 85 52 inlet~; +#X obj 177 58 inlet~; +#X obj 298 66 inlet; +#X obj 112 107 -~; +#X obj 112 131 *~ 0; +#X obj 90 157 +~; +#X obj 160 249 outlet~; +#X connect 0 0 3 1; +#X connect 0 0 5 0; +#X connect 1 0 3 0; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 1; +#X connect 5 0 6 0; +#X restore 166 364 pd switch; +#X text 31 2 CHANGING THE CENTER FREQUENCY QUICKLY; +#X text 313 381 off to hear the straight sig~; +#X text 286 363 <--on to hear the "samphold~" \,; +#X text 25 27 Since in the previous patch the amplitudes of the two +cosines depend on "center frequency" we can't change that discontinuously +without clicking \, as you hear in this patch. The fix is to use a +samphold~ object to keep the center frequency frozen except at phase +crossings. At the phase crossings the two weighted cosines add to one +\, so we can discontinuously change the frequencies and weights there. +; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 3 0 9 1; +#X connect 3 0 11 0; +#X connect 4 0 3 0; +#X connect 4 0 8 0; +#X connect 5 0 9 0; +#X connect 6 0 7 1; +#X connect 6 0 10 1; +#X connect 7 0 4 1; +#X connect 8 0 5 0; +#X connect 9 0 10 0; +#X connect 10 0 11 1; +#X connect 11 0 1 0; +#X connect 14 0 15 0; +#X connect 15 0 21 0; +#X connect 15 0 16 0; +#X connect 16 0 20 0; +#X connect 17 0 23 1; +#X connect 18 0 23 2; +#X connect 19 0 17 0; +#X connect 19 0 23 0; +#X connect 20 0 19 0; +#X connect 21 0 19 0; +#X connect 22 0 4 0; +#X connect 22 0 8 1; +#X connect 22 0 17 1; +#X connect 23 0 7 0; +#X connect 23 0 6 0; diff --git a/pd/doc/3.audio.examples/63.sweepable.FM.pd b/pd/doc/3.audio.examples/63.sweepable.FM.pd new file mode 100644 index 00000000..ff3827ee --- /dev/null +++ b/pd/doc/3.audio.examples/63.sweepable.FM.pd @@ -0,0 +1,161 @@ +#N canvas 89 117 803 661 12; +#X floatatom 242 605 0 0 0; +#N canvas 176 241 532 273 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 398 111 moses 1; +#X obj 83 148 dbtorms; +#X obj 398 86 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 17 148 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 15 125 audio; +#X text 93 110 show level; +#X obj 17 177 hip~ 1; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 26 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 21 0; +#X restore 204 634 pd output; +#X msg 280 606 MUTE; +#X obj 165 506 cos~; +#X obj 165 460 *~; +#X obj 208 508 cos~; +#X obj 249 409 wrap~; +#X obj 212 408 -~; +#X obj 208 485 +~; +#X obj 206 543 -~; +#X obj 226 575 *~; +#X obj 204 600 +~; +#X text 520 628 updated for Pd version 0.34; +#X text 325 605 <--output; +#X obj 212 378 samphold~; +#X text 31 2 APPLYING TWO-COSINE CARRIER TO FM; +#X floatatom 229 238 4 0 0; +#X obj 229 261 / 10; +#X text 229 157 center; +#X obj 229 330 line~; +#X obj 229 284 max 0; +#X text 229 177 freq. (in; +#X text 229 197 tenths of; +#X text 229 217 fundamental); +#X obj 229 307 pack 0 50; +#X obj 118 313 phasor~; +#X floatatom 118 290 4 0 0; +#X text 103 237 fundamental; +#X text 103 257 (= mod freq); +#X text 432 284 index; +#X text 432 304 (percent); +#X floatatom 432 325 4 0 0; +#X obj 382 391 cos~; +#X obj 432 394 line~; +#X obj 382 414 *~; +#X obj 432 348 / 100; +#X obj 432 371 pack 0 50; +#X obj 165 483 +~; +#X graph graph1 0 0 128 500 515 256 771 126; +#X array spectrum 128 float 0; +#X pop; +#X text 511 261 0; +#X text 759 258 5512; +#X msg 117 599 bang; +#N canvas 204 17 358 238 fft 0; +#X obj 46 48 inlet~; +#X obj 159 181 tabwrite~ spectrum; +#X obj 159 145 inlet; +#X obj 46 78 rfft~; +#X obj 46 111 *~; +#X obj 77 111 *~; +#X obj 46 141 sqrt~; +#X obj 191 45 block~ 1024 1; +#X connect 0 0 3 0; +#X connect 2 0 1 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 1 5 0; +#X connect 3 1 5 1; +#X connect 4 0 6 0; +#X connect 5 0 6 0; +#X connect 6 0 1 0; +#X restore 68 630 pd fft; +#X text 25 33 And now we just treat the cosines like carrier signals +in an FM instrument. This doesn't work as well as you'd wish \, because +the phases of the partials of the two FM instruments don't line up +\, so that \, for indices of modulation above about 20% \, you get +beating effects as the center frequency goes up and down.; +#X text 385 440 modulating; +#X text 385 460 oscillator; +#X text 37 482 both phases-->; +#X text 6 465 add modulator to; +#X text 117 577 graph; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 3 0 9 1; +#X connect 3 0 11 0; +#X connect 4 0 37 0; +#X connect 5 0 9 0; +#X connect 6 0 7 1; +#X connect 6 0 10 1; +#X connect 7 0 4 1; +#X connect 8 0 5 0; +#X connect 9 0 10 0; +#X connect 10 0 11 1; +#X connect 11 0 1 0; +#X connect 11 0 42 0; +#X connect 14 0 7 0; +#X connect 14 0 6 0; +#X connect 16 0 17 0; +#X connect 17 0 20 0; +#X connect 19 0 14 0; +#X connect 20 0 24 0; +#X connect 24 0 19 0; +#X connect 25 0 14 1; +#X connect 25 0 32 0; +#X connect 25 0 4 0; +#X connect 25 0 8 1; +#X connect 26 0 25 0; +#X connect 31 0 35 0; +#X connect 32 0 34 0; +#X connect 33 0 34 1; +#X connect 34 0 37 1; +#X connect 35 0 36 0; +#X connect 36 0 33 0; +#X connect 37 0 8 0; +#X connect 37 0 3 0; +#X connect 41 0 42 1; diff --git a/pd/doc/3.audio.examples/64.paf.pd b/pd/doc/3.audio.examples/64.paf.pd new file mode 100644 index 00000000..56c024c0 --- /dev/null +++ b/pd/doc/3.audio.examples/64.paf.pd @@ -0,0 +1,234 @@ +#N canvas 53 0 782 687 12; +#X floatatom 253 735 0 0 0; +#N canvas 176 241 532 273 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 398 111 moses 1; +#X obj 83 148 dbtorms; +#X obj 398 86 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 17 148 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 15 125 audio; +#X text 93 110 show level; +#X obj 17 177 hip~ 1; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 26 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 21 0; +#X restore 215 764 pd output; +#X msg 291 735 MUTE; +#X obj 158 616 cos~; +#X obj 158 593 *~; +#X obj 201 616 cos~; +#X obj 257 542 wrap~; +#X obj 221 542 -~; +#X obj 201 593 +~; +#X obj 194 646 -~; +#X obj 214 678 *~; +#X obj 176 678 +~; +#X text 515 768 updated for Pd version 0.34; +#X text 336 734 <--output; +#X obj 221 510 samphold~; +#X floatatom 221 369 4 0 0; +#X obj 221 392 / 10; +#X text 221 288 center; +#X obj 221 461 line~; +#X obj 221 415 max 0; +#X text 221 308 freq. (in; +#X text 221 328 tenths of; +#X text 221 348 fundamental); +#X obj 221 438 pack 0 50; +#X obj 104 445 phasor~; +#X floatatom 104 399 4 0 0; +#X text 84 372 fundamental; +#X text 435 441 index; +#X text 435 461 (percent); +#X floatatom 435 482 4 0 0; +#X obj 435 528 line~; +#X obj 343 550 *~; +#X obj 435 505 pack 0 50; +#X graph graph1 0 0 128 500 510 395 766 265; +#X array spectrum 128 float 0; +#X pop; +#X text 501 397 0; +#X text 745 398 5512; +#X msg 80 713 bang; +#N canvas 204 17 358 238 fft 0; +#X obj 46 48 inlet~; +#X obj 159 181 tabwrite~ spectrum; +#X obj 159 145 inlet; +#X obj 46 78 rfft~; +#X obj 46 111 *~; +#X obj 77 111 *~; +#X obj 46 141 sqrt~; +#X obj 191 45 block~ 1024 1; +#X connect 0 0 3 0; +#X connect 2 0 1 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 1 5 0; +#X connect 3 1 5 1; +#X connect 4 0 6 0; +#X connect 5 0 6 0; +#X connect 6 0 1 0; +#X restore 31 745 pd fft; +#X text 82 687 graph; +#X text 31 2 THE PAF: TWO-COSINE RING MODULATOR FOR WAVESHAPER; +#X graph graph4 0 0 199 1 563 718 763 578; +#X array bell-curve 200 float 1; +#A 0 1.12535e-07 1.54727e-07 2.12059e-07 2.89706e-07 3.94519e-07 5.35535e-07 +7.24633e-07 9.77371e-07 1.31404e-06 1.76105e-06 2.35258e-06 3.13275e-06 +4.15832e-06 5.50199e-06 7.25659e-06 9.54016e-06 1.25023e-05 1.63317e-05 +2.1266e-05 2.76026e-05 3.57128e-05 4.60584e-05 5.92113e-05 7.58768e-05 +9.69224e-05 0.00012341 0.000156634 0.000198167 0.000249912 0.000314163 +0.000393669 0.000491721 0.000612231 0.000759842 0.000940028 0.00115923 +0.00142498 0.00174605 0.00213263 0.00259648 0.00315111 0.00381201 0.00459678 +0.0055254 0.0066204 0.00790705 0.0094136 0.0111714 0.013215 0.0155826 +0.0183156 0.0214592 0.0250621 0.0291763 0.0338573 0.0391639 0.0451575 +0.0519019 0.0594631 0.0679081 0.0773047 0.0877205 0.0992216 0.111872 +0.125732 0.140858 0.1573 0.1751 0.194291 0.214896 0.236928 0.260383 +0.285247 0.311486 0.339053 0.367879 0.397882 0.428956 0.46098 0.493812 +0.527292 0.561244 0.595473 0.62977 0.663916 0.697676 0.730811 0.763074 +0.794216 0.823987 0.852144 0.878447 0.902668 0.924595 0.944027 0.960789 +0.974725 0.985703 0.99362 0.998401 1 0.998401 0.99362 0.985703 0.974725 +0.960789 0.944027 0.924595 0.902668 0.878447 0.852144 0.823987 0.794216 +0.763074 0.730811 0.697676 0.663916 0.62977 0.595473 0.561244 0.527292 +0.493812 0.46098 0.428956 0.397882 0.367879 0.339053 0.311486 0.285247 +0.260383 0.236928 0.214896 0.194291 0.1751 0.1573 0.140858 0.125732 +0.111872 0.0992216 0.0877205 0.0773047 0.0679081 0.0594631 0.0519019 +0.0451575 0.0391639 0.0338573 0.0291763 0.0250621 0.0214592 0.0183156 +0.0155826 0.013215 0.0111714 0.0094136 0.00790705 0.0066204 0.0055254 +0.00459678 0.00381201 0.00315111 0.00259648 0.00213263 0.00174605 0.00142498 +0.00115923 0.000940028 0.000759842 0.000612231 0.000491721 0.000393669 +0.000314163 0.000249912 0.000198167 0.000156634 0.00012341 9.69224e-05 +7.58768e-05 5.92113e-05 4.60584e-05 3.57128e-05 2.76026e-05 2.1266e-05 +1.63317e-05 1.25023e-05 9.54016e-06 7.25659e-06 5.50199e-06 4.15832e-06 +3.13275e-06 2.35258e-06 1.76105e-06 1.31404e-06 9.77371e-07 7.24633e-07 +5.35535e-07 3.94519e-07 2.89706e-07 2.12059e-07 1.54727e-07; +#X pop; +#N canvas 94 264 600 388 make-table 0; +#X msg 81 44 bang; +#X obj 81 73 t b b; +#X obj 159 142 f; +#X obj 197 142 + 1; +#X msg 175 112 0; +#X obj 81 102 until; +#X obj 161 177 t f f; +#X obj 76 306 tabwrite bell-curve; +#X obj 52 270 expr exp(-$f1*$f1); +#X obj 63 168 sel 199; +#X obj 51 241 expr ($f1-100)/25; +#X connect 0 0 1 0; +#X connect 1 0 5 0; +#X connect 1 1 4 0; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 2 0 9 0; +#X connect 3 0 2 1; +#X connect 4 0 2 1; +#X connect 5 0 2 0; +#X connect 6 0 10 0; +#X connect 6 1 7 1; +#X connect 8 0 7 0; +#X connect 9 0 5 1; +#X connect 10 0 8 0; +#X restore 627 538 pd make-table; +#X obj 104 422 * 0.5; +#X obj 343 527 cos~; +#X obj 343 504 -~ 0.25; +#X obj 343 573 +~ 100; +#X obj 343 596 tabread4~ bell-curve; +#X obj 104 474 *~ 2; +#X obj 215 707 *~; +#X text 25 33 Instead of using the two cosines as FM carrier oscillators +\, we can use them as ring modulators for a synthetic tone. Here (as +described in the paper) we use a sinusoid looking up a Gaussian bell +curve. This has the nice properties that the partials are always positive +cosines in phase \, and the spectrum spreads out smoothly as the index +changes.; +#X text 26 137 We needed the sine wave to have half the fundamental +frequency \, so we run the phasor~ at half speed but double its output +to the cosine pair and the samphold~ \, thus giving us the original +frequency. As to the half-speed signal \, we take its sine (-~ 0.25 +and cos~) \, then center it for lookup in a 200-point table containing +a bell curve.; +#X text 251 705 <--ring mod step; +#X text 375 621 waveshaper; +#X text 27 239 Then with ~* we do the ring modulation and we're done. +; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 3 0 9 1; +#X connect 3 0 11 0; +#X connect 4 0 8 0; +#X connect 4 0 3 0; +#X connect 5 0 9 0; +#X connect 6 0 7 1; +#X connect 6 0 10 1; +#X connect 7 0 4 1; +#X connect 8 0 5 0; +#X connect 9 0 10 0; +#X connect 10 0 11 1; +#X connect 11 0 48 0; +#X connect 14 0 7 0; +#X connect 14 0 6 0; +#X connect 15 0 16 0; +#X connect 16 0 19 0; +#X connect 18 0 14 0; +#X connect 19 0 23 0; +#X connect 23 0 18 0; +#X connect 24 0 44 0; +#X connect 24 0 47 0; +#X connect 25 0 42 0; +#X connect 29 0 32 0; +#X connect 30 0 31 1; +#X connect 31 0 45 0; +#X connect 32 0 30 0; +#X connect 36 0 37 1; +#X connect 42 0 24 0; +#X connect 43 0 31 0; +#X connect 44 0 43 0; +#X connect 45 0 46 0; +#X connect 46 0 48 1; +#X connect 47 0 14 1; +#X connect 47 0 4 0; +#X connect 47 0 8 0; +#X connect 48 0 1 0; +#X connect 48 0 37 0; diff --git a/pd/doc/3.audio.examples/65.paf.control.pd b/pd/doc/3.audio.examples/65.paf.control.pd new file mode 100644 index 00000000..7d329357 --- /dev/null +++ b/pd/doc/3.audio.examples/65.paf.control.pd @@ -0,0 +1,219 @@ +#N canvas 89 36 743 752 12; +#X floatatom 217 684 0 0 0; +#N canvas 176 241 532 273 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 398 111 moses 1; +#X obj 83 148 dbtorms; +#X obj 398 86 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 17 148 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 15 125 audio; +#X text 93 110 show level; +#X obj 17 177 hip~ 1; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 26 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 21 0; +#X restore 179 713 pd output; +#X msg 255 684 MUTE; +#X obj 122 565 cos~; +#X obj 122 542 *~; +#X obj 165 565 cos~; +#X obj 220 510 wrap~; +#X obj 184 510 -~; +#X obj 165 542 +~; +#X obj 158 595 -~; +#X obj 178 627 *~; +#X obj 140 627 +~; +#X text 478 719 updated for Pd version 0.34; +#X text 299 702 <--output; +#X obj 184 478 samphold~; +#X floatatom 183 266 4 0 0; +#X text 181 218 center; +#X obj 184 345 line~; +#X obj 184 322 pack 0 50; +#X obj 67 413 phasor~; +#X floatatom 69 305 4 0 0; +#X text 52 256 fundamental; +#X floatatom 408 361 4 0 0; +#X obj 408 438 line~; +#X obj 306 518 *~; +#X obj 408 415 pack 0 50; +#N canvas 94 264 600 388 make-table 0; +#X msg 81 44 bang; +#X obj 81 73 t b b; +#X obj 159 142 f; +#X obj 197 142 + 1; +#X msg 175 112 0; +#X obj 81 102 until; +#X obj 161 177 t f f; +#X obj 76 306 tabwrite bell-curve; +#X obj 52 270 expr exp(-$f1*$f1); +#X obj 63 168 sel 199; +#X obj 51 241 expr ($f1-100)/25; +#X graph graph4 0 0 199 1 342 225 542 85; +#X array bell-curve 200 float 1; +#A 0 1.12535e-07 1.54727e-07 2.12059e-07 2.89706e-07 3.94519e-07 5.35535e-07 +7.24633e-07 9.77371e-07 1.31404e-06 1.76105e-06 2.35258e-06 3.13275e-06 +4.15832e-06 5.50199e-06 7.25659e-06 9.54016e-06 1.25023e-05 1.63317e-05 +2.1266e-05 2.76026e-05 3.57128e-05 4.60584e-05 5.92113e-05 7.58768e-05 +9.69224e-05 0.00012341 0.000156634 0.000198167 0.000249912 0.000314163 +0.000393669 0.000491721 0.000612231 0.000759842 0.000940028 0.00115923 +0.00142498 0.00174605 0.00213263 0.00259648 0.00315111 0.00381201 0.00459678 +0.0055254 0.0066204 0.00790705 0.0094136 0.0111714 0.013215 0.0155826 +0.0183156 0.0214592 0.0250621 0.0291763 0.0338573 0.0391639 0.0451575 +0.0519019 0.0594631 0.0679081 0.0773047 0.0877205 0.0992216 0.111872 +0.125732 0.140858 0.1573 0.1751 0.194291 0.214896 0.236928 0.260383 +0.285247 0.311486 0.339053 0.367879 0.397882 0.428956 0.46098 0.493812 +0.527292 0.561244 0.595473 0.62977 0.663916 0.697676 0.730811 0.763074 +0.794216 0.823987 0.852144 0.878447 0.902668 0.924595 0.944027 0.960789 +0.974725 0.985703 0.99362 0.998401 1 0.998401 0.99362 0.985703 0.974725 +0.960789 0.944027 0.924595 0.902668 0.878447 0.852144 0.823987 0.794216 +0.763074 0.730811 0.697676 0.663916 0.62977 0.595473 0.561244 0.527292 +0.493812 0.46098 0.428956 0.397882 0.367879 0.339053 0.311486 0.285247 +0.260383 0.236928 0.214896 0.194291 0.1751 0.1573 0.140858 0.125732 +0.111872 0.0992216 0.0877205 0.0773047 0.0679081 0.0594631 0.0519019 +0.0451575 0.0391639 0.0338573 0.0291763 0.0250621 0.0214592 0.0183156 +0.0155826 0.013215 0.0111714 0.0094136 0.00790705 0.0066204 0.0055254 +0.00459678 0.00381201 0.00315111 0.00259648 0.00213263 0.00174605 0.00142498 +0.00115923 0.000940028 0.000759842 0.000612231 0.000491721 0.000393669 +0.000314163 0.000249912 0.000198167 0.000156634 0.00012341 9.69224e-05 +7.58768e-05 5.92113e-05 4.60584e-05 3.57128e-05 2.76026e-05 2.1266e-05 +1.63317e-05 1.25023e-05 9.54016e-06 7.25659e-06 5.50199e-06 4.15832e-06 +3.13275e-06 2.35258e-06 1.76105e-06 1.31404e-06 9.77371e-07 7.24633e-07 +5.35535e-07 3.94519e-07 2.89706e-07 2.12059e-07 1.54727e-07; +#X pop; +#X connect 0 0 1 0; +#X connect 1 0 5 0; +#X connect 1 1 4 0; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 2 0 9 0; +#X connect 3 0 2 1; +#X connect 4 0 2 1; +#X connect 5 0 2 0; +#X connect 6 0 10 0; +#X connect 6 1 7 1; +#X connect 8 0 7 0; +#X connect 9 0 5 1; +#X connect 10 0 8 0; +#X restore 573 591 pd make-table; +#X obj 67 390 * 0.5; +#X obj 306 495 cos~; +#X obj 306 472 -~ 0.25; +#X obj 306 549 +~ 100; +#X obj 306 572 tabread4~ bell-curve; +#X obj 67 442 *~ 2; +#X obj 179 656 *~; +#X text 338 597 waveshaper; +#X text 31 2 CHANGING PAF CONTROLS TO NATURAL UNITS; +#X obj 67 362 mtof; +#X obj 68 335 max 0; +#X obj 206 370 expr 1/$f1; +#X obj 183 296 mtof; +#X text 181 238 freq.; +#X obj 184 394 *~; +#X text 406 340 bandwidth; +#X obj 408 389 mtof; +#X obj 408 474 *~; +#X obj 408 498 *~ 25; +#X text 25 33 The more "natural" units for describing a formant might +be center frequency and bandwidth \, so that you can change the fundamental +without having the formant shift up and down in parallel. Here all +three frequencies are expressed in MIDI units. The bandwidth and center +frequency have to be divided by the fundamental (the expr 1/$f1 takes +its reciprocal and two *~ objects finish the division.); +#X text 448 473 divide by fundamental; +#X text 466 497 range for table; +#X text 372 548 offset to middle of table; +#X text 191 416 C.F. relative; +#X text 192 432 to fundamental; +#X text 48 275 (MIDI units); +#X text 215 654 ring mod; +#X text 25 150 And now you essentially have the PAF. Note \, however +\, that there's a nice paf~ "external" object in the "extras" library +that does this all more efficiently and takes care of a couple of subtle +details we don't see here...; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 3 0 9 1; +#X connect 3 0 11 0; +#X connect 4 0 8 0; +#X connect 4 0 3 0; +#X connect 5 0 9 0; +#X connect 6 0 7 1; +#X connect 6 0 10 1; +#X connect 7 0 4 1; +#X connect 8 0 5 0; +#X connect 9 0 10 0; +#X connect 10 0 11 1; +#X connect 11 0 33 0; +#X connect 14 0 7 0; +#X connect 14 0 6 0; +#X connect 15 0 39 0; +#X connect 17 0 41 0; +#X connect 18 0 17 0; +#X connect 19 0 29 0; +#X connect 19 0 32 0; +#X connect 20 0 37 0; +#X connect 22 0 43 0; +#X connect 23 0 44 0; +#X connect 24 0 30 0; +#X connect 25 0 23 0; +#X connect 27 0 19 0; +#X connect 28 0 24 0; +#X connect 29 0 28 0; +#X connect 30 0 31 0; +#X connect 31 0 33 1; +#X connect 32 0 14 1; +#X connect 32 0 4 0; +#X connect 32 0 8 0; +#X connect 33 0 1 0; +#X connect 36 0 27 0; +#X connect 36 0 38 0; +#X connect 37 0 36 0; +#X connect 38 0 41 1; +#X connect 38 0 44 1; +#X connect 39 0 18 0; +#X connect 41 0 14 0; +#X connect 43 0 25 0; +#X connect 44 0 45 0; +#X connect 45 0 24 1; diff --git a/pd/doc/3.audio.examples/66.PART9.quartic.pd b/pd/doc/3.audio.examples/66.PART9.quartic.pd new file mode 100644 index 00000000..d71da05a --- /dev/null +++ b/pd/doc/3.audio.examples/66.PART9.quartic.pd @@ -0,0 +1,140 @@ +#N canvas 57 35 614 650 12; +#X graph graph1 0 0 40 1 151 551 551 301; +#X array array-ampdb 41 float 1; +#A 0 0.01 0.0112202 0.0125893 0.0141254 0.0158489 0.0177828 0.0199526 +0.0223872 0.0251189 0.0281838 0.0316228 0.0354813 0.0398107 0.0446684 +0.0501187 0.0562341 0.0630957 0.0707946 0.0794328 0.0891251 0.1 0.112202 +0.125893 0.141254 0.158489 0.177828 0.199526 0.223872 0.251189 0.281838 +0.316228 0.354813 0.398107 0.446684 0.501187 0.562341 0.630957 0.707946 +0.794328 0.891251 1; +#X array array-dbdb 41 float 1; +#A 0 0 0.025 0.05 0.075 0.1 0.125 0.15 0.175 0.2 0.225 0.25 0.275 0.3 +0.325 0.35 0.375 0.4 0.425 0.45 0.475 0.5 0.525 0.55 0.575 0.6 0.625 +0.65 0.675 0.7 0.725 0.75 0.775 0.8 0.825 0.85 0.875 0.9 0.925 0.95 +0.975 1; +#X array array-4thpow 41 float 1; +#A 0 0 3.90624e-07 6.25001e-06 3.16406e-05 1e-04 0.000244141 0.00050625 +0.000937891 0.0016 0.00256289 0.00390625 0.00571914 0.0081 0.0111566 +0.0150063 0.0197754 0.0256 0.0326254 0.0410062 0.0509067 0.0625 0.0759691 +0.0915063 0.109313 0.1296 0.152588 0.178506 0.207594 0.2401 0.276282 +0.316406 0.36075 0.4096 0.46325 0.522006 0.586182 0.6561 0.732094 0.814506 +0.903688 1; +#X pop; +#N canvas 293 37 890 657 otherstuff 0; +#X obj 42 438 loadbang; +#X msg 259 94 bang; +#X obj 259 123 t b b; +#X obj 337 192 f; +#X obj 375 192 + 1; +#X msg 353 162 0; +#X obj 259 152 until; +#X obj 263 329 dbtorms; +#X obj 339 227 t f f; +#X msg 51 101 bang; +#X obj 51 130 t b b; +#X obj 129 199 f; +#X obj 167 199 + 1; +#X msg 145 169 0; +#X obj 51 159 until; +#X obj 131 234 t f f; +#X obj 59 339 tabwrite array-dbdb; +#X obj 263 355 tabwrite array-ampdb; +#X msg 505 98 bang; +#X obj 505 127 t b b; +#X obj 583 196 f; +#X obj 621 196 + 1; +#X msg 599 166 0; +#X obj 505 156 until; +#X obj 585 231 t f f; +#X obj 559 432 expr $f1 * $f1 * $f1 * $f1; +#X obj 559 341 expr 1 + $f2 * ($f1 - 1); +#X obj 705 253 loadbang; +#X floatatom 703 309 0 0 0; +#X msg 705 281 1; +#X obj 559 385 max 0; +#X obj 561 464 tabwrite array-4thpow; +#X obj 263 274 + 100; +#X obj 51 232 sel 40; +#X obj 258 221 sel 40; +#X obj 503 226 sel 40; +#X obj 559 300 / 40; +#X obj 263 302 - 40; +#X obj 93 303 / 40; +#X msg 43 465 \; graph1 xlabel -0.03 0 10 20 30 40 \; graph1 ylabel +-2 0.25 0.5 0.75 1; +#X text 53 27 (here's how I computed the three transfer functions...) +; +#X connect 0 0 39 0; +#X connect 1 0 2 0; +#X connect 2 0 6 0; +#X connect 2 1 5 0; +#X connect 3 0 4 0; +#X connect 3 0 8 0; +#X connect 3 0 34 0; +#X connect 4 0 3 1; +#X connect 5 0 3 1; +#X connect 6 0 3 0; +#X connect 7 0 17 0; +#X connect 8 0 32 0; +#X connect 8 1 17 1; +#X connect 9 0 10 0; +#X connect 10 0 14 0; +#X connect 10 1 13 0; +#X connect 11 0 12 0; +#X connect 11 0 15 0; +#X connect 11 0 33 0; +#X connect 12 0 11 1; +#X connect 13 0 11 1; +#X connect 14 0 11 0; +#X connect 15 0 38 0; +#X connect 15 1 16 1; +#X connect 18 0 19 0; +#X connect 19 0 23 0; +#X connect 19 1 22 0; +#X connect 20 0 21 0; +#X connect 20 0 24 0; +#X connect 20 0 35 0; +#X connect 21 0 20 1; +#X connect 22 0 20 1; +#X connect 23 0 20 0; +#X connect 24 0 36 0; +#X connect 24 1 31 1; +#X connect 25 0 31 0; +#X connect 26 0 30 0; +#X connect 27 0 29 0; +#X connect 28 0 26 1; +#X connect 29 0 28 0; +#X connect 30 0 25 0; +#X connect 32 0 37 0; +#X connect 33 0 14 1; +#X connect 34 0 6 1; +#X connect 35 0 23 1; +#X connect 36 0 26 0; +#X connect 37 0 7 0; +#X connect 38 0 16 0; +#X restore 53 608 pd otherstuff; +#X text 292 403 linear; +#X text 279 509 decibels; +#X text 387 518 quartic; +#X text 45 5 QUARTIC CURVES AS THE IDEAL AMPLITUDE AND FREQUENCY SCALERS +; +#X text 346 611 updated for Pd version 0.34; +#X text 246 578 units-->; +#X text 45 447 amplitude; +#X text 79 429 |; +#X text 79 420 |; +#X text 79 410 |; +#X text 79 402 |; +#X text 78 398 ^; +#X text 38 149 The graph below shows that a simple quartic curve \, +x-to-the-fourth-power \, twists like decibels but--unlike decibels--actually +hits zero at left. You get the best of both worlds. Moreover \, raising +something to the fourth power is very cheap: just two multiplications--whereas +\, if you're computing envelopes in dB \, eventually you'll have to +exponentiate \, sample by sample \, to get to linear units.; +#X text 36 34 It's an old saw that we perceive amplitude and frequency +logarithmically. But using decibels as a unit for controlling amplitude +and frequency gets ugly for two reasons. First \, it's expensive to +do the conversion. Second and more profoundly \, decibels grow by shifting +\, and things should grow by scaling \, so that \, for example \, zero +really means "nothing."; diff --git a/pd/doc/3.audio.examples/67.more.quartic.pd b/pd/doc/3.audio.examples/67.more.quartic.pd new file mode 100644 index 00000000..fdb01dab --- /dev/null +++ b/pd/doc/3.audio.examples/67.more.quartic.pd @@ -0,0 +1,147 @@ +#N canvas 130 66 880 587 12; +#X floatatom 89 506 0 0 100; +#N canvas 159 26 516 274 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 396 182 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 391 110 moses 1; +#X obj 83 148 dbtorms; +#X obj 391 85 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 20 182 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 104 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 90 outlet; +#X msg 214 65 \; pd dsp 1; +#X obj 83 198 line~; +#X obj 20 207 *~; +#X obj 20 232 dac~; +#X obj 83 173 pack 0 50; +#X text 20 159 audio; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 21 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X restore 51 534 pd output; +#X msg 127 507 MUTE; +#X obj 32 441 *~; +#X obj 12 469 -~; +#X obj 73 446 *~; +#X floatatom 170 421 1 0 100; +#X obj 365 337 osc~; +#X obj 365 362 *~; +#X obj 425 342 line~; +#X obj 365 312 line~; +#X obj 550 468 osc~; +#X obj 599 496 *~; +#X obj 621 379 line~; +#X obj 550 379 line~; +#X obj 550 326 sqrt; +#X obj 550 352 sqrt; +#X obj 621 326 sqrt; +#X obj 621 352 sqrt; +#X obj 550 411 *~; +#X obj 550 441 *~; +#X obj 621 411 *~; +#X obj 621 440 *~; +#X obj 550 301 unpack; +#X obj 621 301 unpack; +#X obj 365 287 r freq; +#X obj 425 318 r amp; +#X obj 550 276 r freq; +#X obj 621 276 r amp; +#X obj 365 388 s~ linear; +#X obj 599 523 s~ quartic; +#X obj 12 377 r~ linear; +#X obj 56 406 r~ quartic; +#X msg 27 185 \; amp 0 5000 \;; +#X msg 29 139 \; amp 1 5000 \;; +#X msg 139 185 \; amp 0 1000 \;; +#X msg 141 139 \; amp 1 1000 \;; +#X msg 26 238 \; freq 1760 5000 \;; +#X msg 29 286 \; freq 55 5000 \;; +#X msg 180 238 \; freq 1760 1000 \;; +#X msg 183 286 \; freq 55 1000 \;; +#X text 90 15 QUARTIC AND LINEAR ENVELOPES COMPARED; +#X obj 202 488 loadbang; +#X msg 202 516 \; amp 1 \; freq 1760; +#X text 194 414 1 for quartic \; 0 for linear; +#X text 19 39 This patch has two sine wave oscillators \, one with +linear envelopes \, the other with quartic ones which sound more uniform. +The "toggle switch" at bottom selects between the two \, and the message +boxes sweep the amplitude and frequency up and down.; +#X text 366 257 LINEAR; +#X text 555 249 QUARTIC; +#X text 335 120 The two oscillators are below. In the quartic one \, +for both the amplitude and the frequency \, we have to take the fourth +root of the target value (which we get by taking square root twice.) +Then we raise the line~ output to the fourth power by squaring twice +(the *~ objects \, whose left and right inlets are the same.) The cost +is mostly that of the four additional *~ objects.; +#X text 579 560 updated for Pd version 0.34; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 3 0 4 1; +#X connect 4 0 1 0; +#X connect 5 0 1 0; +#X connect 6 0 5 1; +#X connect 6 0 3 1; +#X connect 7 0 8 0; +#X connect 8 0 29 0; +#X connect 9 0 8 1; +#X connect 10 0 7 0; +#X connect 11 0 12 0; +#X connect 12 0 30 0; +#X connect 13 0 21 0; +#X connect 13 0 21 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 16 0; +#X connect 16 0 14 0; +#X connect 17 0 18 0; +#X connect 18 0 13 0; +#X connect 19 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 11 0; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 12 1; +#X connect 23 0 15 0; +#X connect 23 1 14 1; +#X connect 24 0 17 0; +#X connect 24 1 13 1; +#X connect 25 0 10 0; +#X connect 26 0 9 0; +#X connect 27 0 23 0; +#X connect 28 0 24 0; +#X connect 31 0 3 0; +#X connect 31 0 4 0; +#X connect 32 0 5 0; +#X connect 42 0 43 0; diff --git a/pd/doc/3.audio.examples/68.qlist.pd b/pd/doc/3.audio.examples/68.qlist.pd new file mode 100644 index 00000000..58495ca1 --- /dev/null +++ b/pd/doc/3.audio.examples/68.qlist.pd @@ -0,0 +1,102 @@ +#N canvas 233 179 684 516 12; +#X floatatom 57 459 0 0 0; +#N canvas 159 26 497 272 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 182 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 159 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 19 488 pd output; +#X msg 95 459 MUTE; +#X obj 19 211 osc-voice amp1 pit1; +#X obj 19 240 osc-voice amp2 pit2; +#X obj 19 269 osc-voice amp3 pit3; +#X obj 19 298 osc-voice amp4 pit4; +#X obj 19 327 osc-voice amp5 pit5; +#X obj 19 356 osc-voice amp6 pit6; +#X obj 19 385 osc-voice amp7 pit7; +#X obj 19 414 osc-voice amp8 pit8; +#X obj 467 382 qlist; +#X msg 389 226 stop; +#X msg 527 339 read qlist.txt; +#X obj 527 294 loadbang; +#X text 261 203 start; +#X text 391 202 stop; +#X text 537 318 reread file; +#X msg 470 238 rewind; +#X msg 538 238 next; +#X msg 258 254 tempo 100 \, bang; +#X msg 253 227 tempo 1 \, bang; +#X text 82 11 USING QLIST TO SEQUENCE AN OSCILLATOR BANK; +#X text 474 215 single step; +#X obj 556 454 r #; +#X text 35 61 Here is an eight voice additive synthesis patch controlled +by a qlist. Open a text editor on the file \, "qlist.txt" \, to see +how the oscillators' amplitudes and frequencies are specified. The +abstraction \, "osc-voice" \, shows an effective way to make patches +react to qlists but also to mousing.; +#X text 258 453 this is where qlist comments go:; +#X text 418 485 updatged for Pd version 0.34; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 10 0 1 0; +#X connect 12 0 11 0; +#X connect 13 0 11 0; +#X connect 14 0 13 0; +#X connect 18 0 11 0; +#X connect 19 0 11 0; +#X connect 20 0 11 0; +#X connect 21 0 11 0; diff --git a/pd/doc/3.audio.examples/69.more.adsr.pd b/pd/doc/3.audio.examples/69.more.adsr.pd new file mode 100644 index 00000000..5b38917a --- /dev/null +++ b/pd/doc/3.audio.examples/69.more.adsr.pd @@ -0,0 +1,117 @@ +#N canvas 105 38 705 609 12; +#X obj 39 140 r trigger; +#X floatatom 70 376 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 351 166 t b; +#X obj 351 114 f; +#X obj 351 62 inlet; +#X text 358 30 mute; +#X obj 351 192 f; +#X msg 442 185 0; +#X msg 351 88 bang; +#X obj 351 140 moses 1; +#X obj 442 159 t b f; +#X obj 413 122 moses 1; +#X obj 86 154 dbtorms; +#X obj 413 96 r master-lvl; +#X obj 86 44 r master-lvl; +#X obj 351 218 s master-lvl; +#X obj 23 188 inlet~; +#X obj 207 42 inlet; +#X text 207 19 level; +#X obj 207 104 s master-lvl; +#X msg 100 67 set \$1; +#X obj 100 93 outlet; +#X msg 222 66 \; pd dsp 1; +#X obj 86 202 line~; +#X obj 23 221 *~; +#X obj 23 250 dac~; +#X obj 86 178 pack 0 50; +#X text 21 165 audio; +#X text 97 114 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 39 406 pd output; +#X msg 107 376 MUTE; +#X text 150 375 <-- output amplitude; +#X text 518 189 <-- attack; +#X text 485 281 <-- release; +#X obj 39 338 *~; +#X obj 39 282 *~; +#X obj 39 310 *~; +#X obj 80 340 osc~ 440; +#X text 88 9 ADSR envelope; +#X text 35 29 You can use the quartic trick to simplify patches using +ADSR envelopes. For amplitude control it's especially simple. It's +usually good enough in practice to control amplitudes by ranging an +ADSR from 0 to 1 (divide by 100 so your input range can be a comfortable +0-100) \, then take fourth power:; +#X obj 77 227 / 100; +#X floatatom 77 197 3 0 100; +#X msg 383 269 \; trigger 0; +#X obj 39 166 unpack; +#X floatatom 39 197 1 0 100; +#X msg 383 175 \; trigger 1 100; +#X text 503 229 <-- softer attack; +#X msg 382 222 \; trigger 1 60; +#X text 441 583 updated for Pd version 0.34; +#X text 14 437 Note that the units aren't dB \; for most of the range +0-100 it's about 0.4 dB per unit. If you want something closer to dB +\, you can set the scale as 0-40 instead of 0-100 (just change "/ 100" +to "/ 40") and then you'll get the response shown in the first patch +in this section.; +#X obj 596 519 *~; +#X obj 596 547 *~; +#X floatatom 605 390 3 0 100; +#X obj 605 416 mtof; +#X obj 605 441 sqrt; +#X obj 605 466 sqrt; +#X text 174 526 To use ADSR to control pitch \, you should; +#X text 173 545 usually just use real pitch units like this-->; +#X obj 596 490 adsr 0; +#X obj 39 253 adsr 0 100 200 70 300; +#X connect 0 0 16 0; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 7 0 2 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 7 0; +#X connect 10 0 7 1; +#X connect 13 0 32 1; +#X connect 14 0 13 0; +#X connect 16 0 17 0; +#X connect 16 1 14 0; +#X connect 17 0 32 0; +#X connect 23 0 24 0; +#X connect 23 0 24 1; +#X connect 25 0 26 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 31 1; +#X connect 31 0 23 0; +#X connect 31 0 23 1; +#X connect 32 0 8 0; +#X connect 32 0 8 1; diff --git a/pd/doc/3.audio.examples/70.vibrato.pd b/pd/doc/3.audio.examples/70.vibrato.pd new file mode 100644 index 00000000..78c38efd --- /dev/null +++ b/pd/doc/3.audio.examples/70.vibrato.pd @@ -0,0 +1,158 @@ +#N canvas 80 10 736 726 12; +#X obj 27 220 r trigger; +#X floatatom 65 581 0 0 0; +#N canvas 159 26 531 288 output 0; +#X obj 351 166 t b; +#X obj 351 114 f; +#X obj 351 62 inlet; +#X text 358 30 mute; +#X obj 351 192 f; +#X msg 442 185 0; +#X msg 351 88 bang; +#X obj 351 140 moses 1; +#X obj 413 122 moses 1; +#X obj 86 154 dbtorms; +#X obj 413 96 r master-lvl; +#X obj 86 44 r master-lvl; +#X obj 351 218 s master-lvl; +#X obj 24 163 inlet~; +#X obj 207 42 inlet; +#X text 207 19 level; +#X obj 207 104 s master-lvl; +#X msg 100 67 set \$1; +#X obj 100 93 outlet; +#X msg 222 66 \; pd dsp 1; +#X obj 86 202 line~; +#X obj 23 221 *~; +#X obj 23 250 dac~; +#X obj 86 178 pack 0 50; +#X text 22 140 audio; +#X obj 442 159 t b; +#X obj 21 191 hip~ 1; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 25 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 26 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 25 0 5 0; +#X connect 26 0 21 0; +#X restore 26 610 pd output; +#X msg 102 581 MUTE; +#X obj 27 446 *~; +#X obj 27 474 *~; +#X floatatom 62 277 3 0 100; +#X msg 484 482 \; trigger 0; +#X obj 27 246 unpack; +#X floatatom 27 277 1 0 100; +#X text 463 668 updated for Pd version 0.34; +#X obj 26 525 +~ 0.3; +#X obj 26 551 cos~; +#X obj 26 499 osc~; +#X text 88 9 PORTAMENTO AND VIBRATO; +#X obj 62 300 mtof; +#X obj 62 325 sqrt; +#X obj 62 350 sqrt; +#X text 619 402 <-- midC; +#X text 607 444 <-- octave up; +#X msg 484 388 \; trigger 1 60; +#X msg 483 435 \; trigger 1 72; +#X text 584 488 <-- release; +#X text 590 506 is optional; +#X obj 27 416 *~; +#X obj 236 396 +~ 1; +#X graph graph1 0 -1 130 1 433 643 633 543; +#X array array62 131 float 1; +#A 0 0.970031 1 0.970031 0.881921 0.740952 0.555571 0.336891 0.0980184 +-0.146729 -0.382682 -0.595698 -0.773009 -0.88 -0.9 -0.92 -0.92 -0.85773 +-0.707109 -0.514106 -0.290288 -0.0490716 0.195086 0.427551 0.63439 +0.803205 0.86 0.88 0.88 0.88 0.84 0.82 0.471402 0.242986 6.63397e-06 +-0.242974 -0.471391 -0.671554 -0.831465 -0.941541 -0.995184 -0.989178 +-0.923883 -0.803213 -0.68 -0.42 -0.24 0.1 0.4 0.6 0.7071 0.857723 0.956937 +0.998795 0.980787 0.903994 0.773018 0.595708 0.382694 0.146742 -0.0980052 +-0.336878 -0.55556 -0.7 -0.8 -0.88 -0.88 -0.88 -0.84 -0.82 -0.555582 +-0.336903 -0.0980316 0.146716 0.38267 0.595687 0.773001 0.903983 0.980782 +0.998796 0.956945 0.857737 0.707119 0.514117 0.290301 0.0490849 -0.195073 +-0.427539 -0.63438 -0.803197 -0.923873 -0.989174 -0.995187 -0.94155 +-0.83148 -0.671573 -0.471414 -0.242999 -1.99019e-05 0.242961 0.471379 +0.671544 0.831458 0.88 0.9 0.9 0.88 0.803221 0.63441 0.08 -0.14 -0.28 +-0.48 -0.64 -0.72 -0.857717 -0.956933 -0.998794 -0.98079 -0.904 -0.773026 +-0.595719 -0.382706 -0.146755 0.097992 0.336866 0.555549 0.740934 0.881909 +0.970025 1 0.970038; +#X pop; +#X obj 236 342 tabosc4~ array62; +#X floatatom 236 286 3 0 0; +#X obj 236 313 / 6; +#X obj 236 370 *~; +#X floatatom 390 323 3 0 0; +#X text 235 421 since we'll multiply \,; +#X text 234 436 vibrato output should; +#X text 234 453 be centered at 1 \, not 0; +#X text 275 372 multiply by vib depth; +#X obj 390 350 / 6923; +#X text 28 35 Portamento can be treated as a special case of an ADSR +envelope \, with 100 percent sustain. Vibrato is properly computed +in units of pitch \, but it's also easy to add vibrato to the envelope--before +raising it to the fourth power \, so that it acts pseudo-logarithmically. +Rather than add to the ADSR output \, we multiply a signal which controls +relative frequency. The relative frequency change is one plus an oscillator. +; +#X text 61 417 apply vibrato; +#X text 65 445 fourth; +#X text 68 461 power; +#X text 96 529 waveform; +#X text 95 509 simple; +#X text 465 344 4/(exp(log(2)/1200)-1); +#X text 469 325 conversion factor is; +#X text 383 279 vibrato depth; +#X text 382 296 in cents; +#X text 233 245 vibrato speed; +#X text 232 262 in Hertz; +#X text 152 168 I made a table with 6 cycles of vibrato and made small +changes with the mouse to get a not-exactly-repeating vibrato \, and +thus have to divide vibrato frequency by 6 You can just use a sine +or triangle wave if you prefer.; +#X obj 27 375 adsr 0 100 200 100 300; +#X connect 0 0 8 0; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 4 0 5 0; +#X connect 4 0 5 1; +#X connect 5 0 13 0; +#X connect 6 0 15 0; +#X connect 8 0 9 0; +#X connect 8 1 6 0; +#X connect 9 0 50 0; +#X connect 11 0 12 0; +#X connect 12 0 2 0; +#X connect 13 0 11 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 17 0 50 1; +#X connect 24 0 4 0; +#X connect 24 0 4 1; +#X connect 25 0 24 1; +#X connect 27 0 30 0; +#X connect 28 0 29 0; +#X connect 29 0 27 0; +#X connect 30 0 25 0; +#X connect 31 0 36 0; +#X connect 36 0 30 1; +#X connect 50 0 24 0; diff --git a/pd/doc/3.audio.examples/71.adsr.sequenced.pd b/pd/doc/3.audio.examples/71.adsr.sequenced.pd new file mode 100644 index 00000000..26300054 --- /dev/null +++ b/pd/doc/3.audio.examples/71.adsr.sequenced.pd @@ -0,0 +1,217 @@ +#N canvas 32 15 950 613 12; +#X obj 33 220 r trigger; +#X floatatom 70 520 0 0 0; +#N canvas 159 26 584 307 output 0; +#X obj 390 189 t b; +#X obj 390 129 f; +#X obj 390 69 inlet; +#X text 397 32 mute; +#X obj 390 219 f; +#X msg 451 217 0; +#X msg 390 99 bang; +#X obj 390 159 moses 1; +#X obj 460 137 moses 1; +#X obj 100 178 dbtorms; +#X obj 460 107 r master-lvl; +#X obj 100 50 r master-lvl; +#X obj 390 249 s master-lvl; +#X obj 26 217 inlet~; +#X obj 239 49 inlet; +#X text 239 22 level; +#X obj 239 120 s master-lvl; +#X msg 115 78 set \$1; +#X obj 115 107 outlet; +#X msg 257 77 \; pd dsp 1; +#X obj 100 233 line~; +#X obj 26 254 *~; +#X obj 26 289 dac~; +#X obj 100 205 pack 0 50; +#X text 24 190 audio; +#X text 112 132 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 21 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X restore 32 546 pd output; +#X msg 108 521 MUTE; +#X obj 33 438 *~; +#X obj 33 331 *~ 0.01; +#X obj 33 366 *~; +#X obj 33 396 *~; +#X obj 80 360 r pitch; +#X obj 80 410 mtof; +#X floatatom 80 385 4 0 0; +#X floatatom 57 272 4 0 0; +#X obj 57 247 r level; +#X floatatom 131 272 4 0 0; +#X obj 131 247 r attack; +#X floatatom 216 272 4 0 0; +#X obj 216 247 r decay; +#X floatatom 291 272 4 0 0; +#X floatatom 385 272 4 0 0; +#X obj 291 247 r sustain; +#X obj 385 247 r release; +#X obj 509 106 r note; +#X msg 510 195 \; trigger 1; +#X obj 634 185 del; +#X msg 634 210 \; trigger 0; +#X obj 9 167 qlist; +#X obj 8 6 r qlist; +#X msg 30 35 bang; +#X msg 30 60 rewind; +#X obj 37 89 r tempo; +#X floatatom 37 114 4 0 0; +#X msg 37 139 tempo \$1; +#X obj 509 156 t b f; +#X obj 564 157 s pitch; +#X obj 656 120 r duration; +#X floatatom 656 145 4 0 0; +#X floatatom 509 131 4 0 0; +#X obj 289 320 r trigger; +#X floatatom 315 376 4 0 0; +#X floatatom 387 406 4 0 0; +#X floatatom 477 406 4 0 0; +#X floatatom 563 406 4 0 0; +#X floatatom 659 406 4 0 0; +#X obj 315 351 r level2; +#X obj 387 381 r attack2; +#X obj 477 381 r decay2; +#X obj 563 381 r sustain2; +#X obj 659 381 r release2; +#X obj 80 435 tabosc4~ array1; +#X floatatom 239 366 4 0 0; +#X obj 33 482 vcf~; +#X floatatom 140 488 4 0 0; +#X obj 140 463 r q; +#X obj 33 306 adsr 0 0 0 0 0; +#X obj 289 444 adsr 0 0 0 0 0; +#X obj 315 401 / 69.23; +#X obj 239 391 mtof; +#X obj 239 416 sqrt; +#X obj 239 441 sqrt; +#X obj 197 336 r filter; +#X obj 240 494 *~; +#X obj 240 519 *~; +#X obj 289 469 +~ 1; +#X obj 239 466 *~; +#X text 139 215 ADSR for amplitude:; +#X text 402 300 ADSR for filter. Here \, I thought it better to make +the envelope modify a constant "filter pitch"--so the "filter" receive +gets the "mtof" treatment and the ADSR is an offset in halftones (thus +the "/ 69.23" as compared to the previous patch.); +#X text 141 5 USING QLIST TO MAKE SEQUENCES OF "NOTES"; +#N canvas -10 258 703 380 otherstuff 0; +#X obj 289 86 loadbang; +#X obj 418 85 loadbang; +#X graph graph2 0 -1 66 1 62 221 262 81; +#X array array1 67 float 1; +#A 0 0 0 0 0 0.714286 0.742857 0.757143 0.771429 0.778571 0.785714 +0.785714 0.785714 0.785714 0.790476 0.795238 0.614286 0.585714 0.442857 +0.271429 -0.128571 -0.142857 -0.157143 -0.171429 -0.642857 -0.528571 +-0.614286 -0.685714 -0.828571 -0.828571 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0.557143 0.571429 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; +#X pop; +#X msg 418 115 \; qlist read qlist2.txt; +#X msg 289 111 \; level 100 \; attack 20 \; decay 300 \; sustain 70 +\; release 300 \; duration 300 \; pitch 72 \; filter 38 \; level2 49 +\; attack2 19 \; decay2 300 \; sustain2 17 \; release2 700 \; q 3 \; +tempo 1; +#X connect 0 0 4 0; +#X connect 1 0 3 0; +#X restore 32 571 pd otherstuff; +#X text 82 34 <--start loop; +#X text 99 62 <--stop loop; +#X text 85 114 <--set tempo; +#X text 248 34 The qlist reads the file \, "qlist2.txt" \, which contains +four "note" messages and a message at the end that restarts the qlist +at the beginning. The "note" messages are translated into a pitch change +and triggers for the ADSRs:; +#X text 694 573 updated for Pd version 0.34; +#X text 155 573 <--loadbangs and table; +#X msg 468 518 \; qlist read qlist2.txt; +#X text 462 494 click to reload qlist2.txt; +#X text 149 521 <--output; +#X connect 0 0 53 0; +#X connect 1 0 2 1; +#X connect 2 0 1 0; +#X connect 3 0 2 2; +#X connect 4 0 50 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 4 0; +#X connect 8 0 10 0; +#X connect 9 0 48 0; +#X connect 10 0 9 0; +#X connect 11 0 53 1; +#X connect 12 0 11 0; +#X connect 13 0 53 2; +#X connect 14 0 13 0; +#X connect 15 0 53 3; +#X connect 16 0 15 0; +#X connect 17 0 53 4; +#X connect 18 0 53 5; +#X connect 19 0 17 0; +#X connect 20 0 18 0; +#X connect 21 0 36 0; +#X connect 23 0 24 0; +#X connect 26 0 25 0; +#X connect 27 0 25 0; +#X connect 28 0 25 0; +#X connect 29 0 30 0; +#X connect 30 0 31 0; +#X connect 31 0 25 0; +#X connect 32 0 23 0; +#X connect 32 0 22 0; +#X connect 32 1 33 0; +#X connect 34 0 35 0; +#X connect 35 0 23 1; +#X connect 36 0 32 0; +#X connect 37 0 54 0; +#X connect 38 0 55 0; +#X connect 39 0 54 2; +#X connect 40 0 54 3; +#X connect 41 0 54 4; +#X connect 42 0 54 5; +#X connect 43 0 38 0; +#X connect 44 0 39 0; +#X connect 45 0 40 0; +#X connect 46 0 41 0; +#X connect 47 0 42 0; +#X connect 48 0 4 1; +#X connect 49 0 56 0; +#X connect 50 0 2 0; +#X connect 51 0 50 2; +#X connect 52 0 51 0; +#X connect 53 0 5 0; +#X connect 54 0 62 0; +#X connect 55 0 54 1; +#X connect 56 0 57 0; +#X connect 57 0 58 0; +#X connect 58 0 63 0; +#X connect 59 0 49 0; +#X connect 60 0 61 0; +#X connect 60 0 61 1; +#X connect 61 0 50 1; +#X connect 62 0 63 1; +#X connect 63 0 60 0; +#X connect 63 0 60 1; diff --git a/pd/doc/3.audio.examples/72.execution.order.pd b/pd/doc/3.audio.examples/72.execution.order.pd new file mode 100644 index 00000000..2bea8e92 --- /dev/null +++ b/pd/doc/3.audio.examples/72.execution.order.pd @@ -0,0 +1,127 @@ +#N canvas 100 17 724 631 12; +#X floatatom 448 290 0 0 0; +#X obj 70 432 +~; +#X obj 91 401 vd~ delay1; +#X floatatom 108 559 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 397 110 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 85 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 18 152 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 197 104 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 16 129 audio; +#X text 93 110 show level; +#X obj 18 179 hip~ 5; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 26 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 21 0; +#X restore 70 585 pd output; +#X msg 145 559 MUTE; +#X text 184 558 <-- output amplitude; +#X text 86 9 ORDER OF EXECUTION OF DELWRITE~ AND DELREAD~/VD~; +#X text 43 35 If you're writing to and reading from a delay line \, +you have to get the write sorted before the read or else you'll never +get less than a block's delay. This patch compares a "wrong" flanger +with a "right" one:; +#X obj 69 299 noise~; +#X obj 91 375 line~; +#X obj 448 344 pack 0 100; +#X text 518 292 <-- delay in samples; +#X obj 92 505 *~; +#X obj 92 481 -~; +#X floatatom 175 505 1 0 0; +#X obj 293 297 noise~; +#X obj 423 398 line~; +#N canvas 0 0 600 400 delay-writer 0; +#X obj 96 107 inlet~; +#X obj 96 180 outlet~; +#X obj 116 144 delwrite~ delay2 1000; +#X connect 0 0 1 0; +#X connect 0 0 2 0; +#X restore 293 325 pd delay-writer; +#N canvas 0 0 280 330 delay-reader 0; +#X obj 96 107 inlet~; +#X obj 89 267 outlet~; +#X obj 112 163 inlet~; +#X obj 112 198 vd~ delay2; +#X obj 89 237 +~; +#X connect 0 0 4 0; +#X connect 2 0 3 0; +#X connect 3 0 4 1; +#X connect 4 0 1 0; +#X restore 293 427 pd delay-reader; +#X obj 70 533 +~; +#X text 194 505 <-- 0 to hear left-hand side \, 1 to hear right hand +side.; +#X text 46 105 All it took was to put the delread~ and vd~ objects +in subpatches. The audio connections between the subpatches force the +"reader" to be sorted after the "writer". DSP sorting in Pd follows +the hierarchy of windows.; +#X obj 447 318 / 44.1; +#X obj 82 329 delwrite~ delay1 1000; +#X text 450 596 updated for Pd version 0.34; +#X text 43 173 To hear the difference scroll the delay time between +0 and 100 samples. The patch at left doesn't let you get below 64 samples. +; +#X text 43 228 You can use the same strategy to avoid picking up 64-sample +delays in send~/receive~ and throw~/catch~ pairs.; +#X connect 0 0 23 0; +#X connect 1 0 14 1; +#X connect 1 0 20 0; +#X connect 2 0 1 1; +#X connect 3 0 4 1; +#X connect 4 0 3 0; +#X connect 5 0 4 2; +#X connect 9 0 1 0; +#X connect 9 0 24 0; +#X connect 10 0 2 0; +#X connect 11 0 10 0; +#X connect 11 0 17 0; +#X connect 13 0 20 1; +#X connect 14 0 13 0; +#X connect 15 0 13 1; +#X connect 16 0 18 0; +#X connect 17 0 19 1; +#X connect 18 0 19 0; +#X connect 19 0 14 0; +#X connect 20 0 4 0; +#X connect 23 0 11 0; diff --git a/pd/doc/3.audio.examples/73.control.blocksize.pd b/pd/doc/3.audio.examples/73.control.blocksize.pd new file mode 100644 index 00000000..05bad0d2 --- /dev/null +++ b/pd/doc/3.audio.examples/73.control.blocksize.pd @@ -0,0 +1,111 @@ +#N canvas 100 17 662 466 12; +#X floatatom 130 389 0 0 0; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 397 110 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 85 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 18 152 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 197 104 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 16 129 audio; +#X text 93 110 show level; +#X obj 18 179 hip~ 5; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 12 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 5 0; +#X connect 8 1 4 1; +#X connect 9 0 23 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 17 0; +#X connect 13 0 26 0; +#X connect 14 0 16 0; +#X connect 14 0 19 0; +#X connect 17 0 18 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 23 0 20 0; +#X connect 26 0 21 0; +#X restore 92 415 pd output; +#X msg 167 389 MUTE; +#X text 206 388 <-- output amplitude; +#X obj 51 203 noise~; +#N canvas 0 0 760 350 delay-writer 0; +#X obj 75 100 inlet~; +#X obj 79 250 outlet~; +#X obj 90 194 delwrite~ delay3 1000; +#X obj 379 97 block~ 1; +#X obj 145 131 delread~ delay3; +#X obj 144 159 *~ 0.99; +#X obj 79 164 +~; +#X obj 146 100 inlet; +#X text 84 22 Because of the feedback \, the delwrite~ has to go after +the delread~. So we set the blocksize to 1 to minimize the resulting +delay.; +#X connect 0 0 6 0; +#X connect 4 0 5 0; +#X connect 5 0 6 1; +#X connect 6 0 2 0; +#X connect 6 0 1 0; +#X connect 7 0 4 0; +#X restore 91 328 pd delay-writer; +#X text 401 435 updated for Pd version 0.34; +#X obj 77 285 *~; +#X obj 273 275 expr 1000/$f1; +#X obj 273 249 mtof; +#X msg 176 220 1; +#X msg 176 282 0; +#X obj 177 164 metro 500; +#X obj 273 195 random 60; +#X obj 177 135 loadbang; +#X obj 216 217 del 2; +#X obj 273 221 + 30; +#X obj 51 228 lop~ 1000; +#X text 86 9 CONTROLLING DELAY WITH BLOCK~; +#X text 75 52 In situations where a delay read feeds pack to a delay +write \, you can shorten the minimum delay by changing the block size. +Do this in a subpatch...; +#X text 238 328 <-- here is the delay loop; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 4 0 17 0; +#X connect 5 0 1 0; +#X connect 7 0 5 0; +#X connect 8 0 5 1; +#X connect 9 0 8 0; +#X connect 10 0 7 1; +#X connect 11 0 7 1; +#X connect 12 0 10 0; +#X connect 12 0 13 0; +#X connect 12 0 15 0; +#X connect 13 0 16 0; +#X connect 14 0 12 0; +#X connect 15 0 11 0; +#X connect 16 0 9 0; +#X connect 17 0 7 0; diff --git a/pd/doc/3.audio.examples/74.up.downsampling.pd b/pd/doc/3.audio.examples/74.up.downsampling.pd new file mode 100644 index 00000000..cf50f9b9 --- /dev/null +++ b/pd/doc/3.audio.examples/74.up.downsampling.pd @@ -0,0 +1,191 @@ +#N canvas 32 25 1089 690 10; +#X obj 57 567 osc~ 412; +#X floatatom 58 543 5 0 0; +#X obj 122 595 tabwrite~ scope; +#X msg 122 571 bang; +#X msg 205 43 bang; +#X obj 42 191 tabwrite~ scope; +#X msg 54 165 bang; +#N canvas 316 181 600 400 simple 0; +#X obj 185 46 inlet; +#X obj 185 102 tabwrite~ scope; +#X obj 78 38 inlet~; +#X obj 78 258 outlet~; +#X obj 317 103 block~ 64 1 0.25; +#X connect 0 0 1 0; +#X connect 2 0 1 0; +#X connect 2 0 3 0; +#X restore 42 64 pd simple downsampling 4; +#X msg 451 42 bang; +#X obj 275 190 tabwrite~ scope; +#X msg 287 164 bang; +#X graph graph2 0 -1 511 1 297 629 897 489; +#X array scope 512 float 0; +#X pop; +#X msg 683 45 bang; +#X obj 520 193 tabwrite~ scope; +#X msg 532 167 bang; +#X msg 929 44 bang; +#X obj 753 192 tabwrite~ scope; +#X msg 765 166 bang; +#N canvas 165 168 600 400 simple 0; +#X obj 185 74 inlet; +#X obj 185 102 tabwrite~ scope; +#X obj 78 38 inlet~; +#X obj 78 258 outlet~; +#X text 130 38 zero-padding upsampling; +#X obj 317 103 block~ 64 1 4; +#X connect 0 0 1 0; +#X connect 2 0 1 0; +#X connect 2 0 3 0; +#X restore 520 66 pd simple upsampling 4; +#X obj 42 38 r~ sine; +#X obj 275 39 r~ sine; +#X obj 57 595 s~ sine; +#X obj 520 41 r~ sine; +#X obj 753 41 r~ sine; +#X obj 41 415 tabwrite~ scope; +#X msg 47 369 bang; +#X msg 804 265 bang; +#X obj 711 415 tabwrite~ scope; +#X msg 723 389 bang; +#X obj 41 262 r~ sine; +#X obj 711 264 r~ sine; +#X obj 152 416 tabwrite~ scope; +#X msg 158 370 bang; +#X text 43 431 zero-padded; +#N canvas 290 149 600 400 downsampling 0; +#X obj 78 38 inlet~; +#X obj 78 258 outlet~; +#X obj 152 258 outlet~ hold; +#X obj 317 103 block~ 64 1 0.25; +#X connect 0 0 1 0; +#X connect 0 0 2 0; +#X restore 41 288 pd downsampling 4 (mixed); +#N canvas 261 147 600 400 bad 0; +#X obj 185 81 inlet; +#X obj 185 102 tabwrite~ scope; +#X text 172 257 "lin" is for linear upsampling; +#X text 160 39 "lin" has no meaning when downsampling; +#X obj 317 103 block~ 64 2; +#X obj 78 258 outlet~; +#X obj 78 38 inlet~; +#X connect 0 0 1 0; +#X connect 6 0 1 0; +#X connect 6 0 5 0; +#X restore 711 288 pd bad overlap; +#X msg 1018 263 bang; +#X obj 841 415 tabwrite~ scope; +#X msg 853 389 bang; +#X obj 841 264 r~ sine; +#N canvas 121 72 600 400 bad 0; +#X obj 185 81 inlet; +#X obj 185 102 tabwrite~ scope; +#X obj 78 258 outlet~ lin; +#X obj 78 38 inlet~ lin; +#X text 167 38 "lin" is for linear upsampling; +#X text 166 259 "lin" has no meaning when downsampling; +#X obj 317 103 block~ 64 2 2; +#X connect 0 0 1 0; +#X connect 3 0 1 0; +#X connect 3 0 2 0; +#X restore 841 288 pd bad overlap (upsampled); +#X msg 458 267 bang; +#X obj 323 417 tabwrite~ scope; +#X msg 335 391 bang; +#X obj 323 266 r~ sine; +#X text 155 433 sample&hold; +#X msg 653 265 bang; +#X obj 511 416 tabwrite~ scope; +#X msg 523 390 bang; +#X obj 511 265 r~ sine; +#N canvas 249 128 600 400 downsampled 0; +#X obj 185 81 inlet; +#X obj 185 102 tabwrite~ scope; +#X obj 78 258 outlet~ lin; +#X obj 78 230 *~ 0.5; +#X obj 78 38 inlet~; +#X obj 317 103 block~ 128 2 0.25; +#X connect 0 0 1 0; +#X connect 3 0 2 0; +#X connect 4 0 1 0; +#X connect 4 0 3 0; +#X restore 511 289 pd downsampled overlap; +#N canvas 175 94 600 400 upsampled 0; +#X obj 185 81 inlet; +#X obj 185 102 tabwrite~ scope; +#X obj 78 258 outlet~ lin; +#X obj 78 38 inlet~ lin; +#X obj 78 230 *~ 0.5; +#X obj 317 103 block~ 256 2 2; +#X connect 0 0 1 0; +#X connect 3 0 1 0; +#X connect 3 0 4 0; +#X connect 4 0 2 0; +#X restore 323 290 pd upsampled overlap; +#N canvas 350 164 600 400 upsampling 0; +#X obj 185 81 inlet; +#X obj 185 102 tabwrite~ scope; +#X obj 78 38 inlet~ hold; +#X obj 78 258 outlet~; +#X text 160 39 "hold" is for sample&hold upsampling; +#X obj 317 103 block~ 64 1 16; +#X connect 0 0 1 0; +#X connect 2 0 1 0; +#X connect 2 0 3 0; +#X restore 753 65 pd upsampling 16 (sample&hold); +#N canvas 236 170 600 400 downsampling 0; +#X obj 185 81 inlet; +#X obj 185 102 tabwrite~ scope; +#X obj 78 258 outlet~ lin; +#X obj 78 38 inlet~ lin; +#X text 172 257 "lin" is for linear upsampling; +#X obj 320 102 block~ 64 1 0.125; +#X text 330 137 0.125 = 1/8 = 8*downsampling; +#X text 160 39 "lin" has (still !) no meaning when downsampling; +#X connect 0 0 1 0; +#X connect 3 0 1 0; +#X connect 3 0 2 0; +#X restore 275 63 pd downsampling 8 (linear); +#X text 718 314 a pd-bug !; +#X connect 0 0 2 0; +#X connect 0 0 21 0; +#X connect 1 0 0 0; +#X connect 3 0 2 0; +#X connect 4 0 7 1; +#X connect 6 0 5 0; +#X connect 7 0 5 0; +#X connect 8 0 53 1; +#X connect 10 0 9 0; +#X connect 12 0 18 1; +#X connect 14 0 13 0; +#X connect 15 0 52 1; +#X connect 17 0 16 0; +#X connect 18 0 13 0; +#X connect 19 0 7 0; +#X connect 20 0 53 0; +#X connect 22 0 18 0; +#X connect 23 0 52 0; +#X connect 25 0 24 0; +#X connect 26 0 35 1; +#X connect 28 0 27 0; +#X connect 29 0 34 0; +#X connect 30 0 35 0; +#X connect 32 0 31 0; +#X connect 34 0 24 0; +#X connect 34 1 31 0; +#X connect 35 0 27 0; +#X connect 36 0 40 1; +#X connect 38 0 37 0; +#X connect 39 0 40 0; +#X connect 40 0 37 0; +#X connect 41 0 51 1; +#X connect 43 0 42 0; +#X connect 44 0 51 0; +#X connect 46 0 50 1; +#X connect 48 0 47 0; +#X connect 49 0 50 0; +#X connect 50 0 47 0; +#X connect 51 0 42 0; +#X connect 52 0 16 0; +#X connect 53 0 9 0; diff --git a/pd/doc/3.audio.examples/adsr.pd b/pd/doc/3.audio.examples/adsr.pd new file mode 100644 index 00000000..b6b2d7d2 --- /dev/null +++ b/pd/doc/3.audio.examples/adsr.pd @@ -0,0 +1,78 @@ +#N canvas 112 36 785 655 12; +#X obj 205 119 inlet; +#X obj 412 147 inlet; +#X text 201 94 trigger; +#X obj 205 147 sel 0; +#X obj 258 157 t b; +#X obj 134 335 f \$1; +#X obj 134 360 pack 0 \$2; +#X obj 476 148 inlet; +#X obj 403 281 del \$2; +#X obj 458 429 line~; +#X obj 432 304 f \$4; +#X obj 466 379 pack 0 \$3; +#X obj 537 149 inlet; +#X obj 605 149 inlet; +#X obj 678 148 inlet; +#X msg 205 178 stop; +#X obj 576 301 pack 0 \$5; +#X text 410 124 level; +#X obj 466 355 * \$1; +#X text 31 306 ATTACK; +#X obj 458 454 outlet~; +#X text 6 329 recall level; +#X text 6 349 and pack with; +#X text 7 369 attack time; +#X text 131 134 if zero; +#X text 132 151 release; +#X text 112 168 and cancel; +#X text 143 185 decay; +#X text 262 139 bang if attack; +#X text 245 272 on attack \, set a; +#X text 200 286 delay to go to sustain; +#X text 242 303 recall sustain value; +#X text 237 354 multiply by overall level; +#X text 281 375 pack with decay time; +#X text 569 327 on release ramp; +#X text 570 344 back to zero; +#X text 17 487 When you send this patch a nonzero trigger it schedules +a line~ to do an attack and decay \, and if zero \, it starts the release +ramp.; +#X obj 432 329 * 0.01; +#X text 16 539 Objects such as "f" and "pack" can be given dollar sign +arguments to initialize their contents from adsr's creation arguments. +Inlets are supplied to change them on the fly.; +#X text 505 613 Updated for Pd version 0.34; +#X text 86 4 ADSR ENVELOPE; +#X text 245 327 convert from percent; +#X text 76 24 Arguments: level \, attack time \, decay time \, sustain +level \, release time. A \, D \, and R are in msec and S is in percent. +This patch is used as an abstraction in 25.envelope.pd and others. +; +#X text 472 127 attack; +#X text 538 126 decay; +#X text 598 127 sustain; +#X text 675 127 release; +#X connect 0 0 3 0; +#X connect 1 0 5 1; +#X connect 1 0 18 1; +#X connect 3 0 15 0; +#X connect 3 0 16 0; +#X connect 3 1 4 0; +#X connect 4 0 5 0; +#X connect 4 0 8 0; +#X connect 5 0 6 0; +#X connect 6 0 9 0; +#X connect 7 0 6 1; +#X connect 7 0 8 1; +#X connect 8 0 10 0; +#X connect 9 0 20 0; +#X connect 10 0 37 0; +#X connect 11 0 9 0; +#X connect 12 0 11 1; +#X connect 13 0 10 1; +#X connect 14 0 16 1; +#X connect 15 0 8 0; +#X connect 16 0 9 0; +#X connect 18 0 11 0; +#X connect 37 0 18 0; diff --git a/pd/doc/3.audio.examples/adsr2.pd b/pd/doc/3.audio.examples/adsr2.pd new file mode 100644 index 00000000..157a9c51 --- /dev/null +++ b/pd/doc/3.audio.examples/adsr2.pd @@ -0,0 +1,110 @@ +#N canvas 207 5 728 714 12; +#X obj 101 90 inlet; +#X obj 328 115 inlet; +#X text 101 69 trigger; +#X obj 101 126 sel 0; +#X obj 309 321 f \$1; +#X obj 394 117 inlet; +#X obj 474 385 line~; +#X obj 456 242 f \$4; +#X obj 474 334 pack 0 \$3; +#X obj 461 117 inlet; +#X obj 537 118 inlet; +#X obj 616 117 inlet; +#X msg 76 150 stop; +#X obj 594 311 pack 0 \$5; +#X text 328 94 level; +#X obj 456 281 * \$1; +#X text 309 377 ATTACK; +#X obj 474 408 outlet~; +#X text 44 125 release; +#X text 54 47 This patch is used as an abstraction in 27.envelope.slew.pd +; +#X obj 295 421 snapshot~; +#X obj 259 135 t b b; +#X text 587 333 RELEASE; +#X obj 181 261 * -1; +#X text 480 353 DECAY; +#X text 180 71 attack; +#X text 2 238 correct the attack; +#X text 12 254 multiplying by; +#X text 5 275 (target-current)/; +#X text 83 289 target; +#X text 8 321 which is the; +#X text 8 341 relative amount; +#X text 8 361 of slew in the attack.; +#X text 20 468 This version of the adsr envelope generator maintains +a constant rate of climb in the attact portion rather than a constant +attack time as the previous one did.; +#X obj 174 290 / \$1; +#X obj 174 313 * \$2; +#X obj 309 355 pack; +#X obj 181 238 - \$1; +#X obj 174 336 abs; +#X text 8 401 current value is greater than; +#X text 6 421 the target.; +#X text 8 381 The "abs" is in case the; +#X text 19 519 The "attack time" input here controls the time needed +to rist from 0 to the output level. When we get an attack \, we take +a snapshot~ of ouy current output level and adjust the attack time +accordingly.; +#X obj 183 89 moses; +#X text 267 106 from; +#X text 269 118 here; +#X obj 174 136 t b b; +#X text 182 107 from; +#X text 184 119 zero; +#X msg 223 136 0; +#X text 19 584 Another feature: if you give a negative number for the +trigger \, the output jumps to zero and slews from there \, instead +of slewing from the current level. This is often appropriate for pitch +envelopes.; +#X obj 456 305 * 0.01; +#X text 457 679 updated for Pd version 0.34; +#X obj 455 217 del; +#X text 391 95 attack; +#X text 458 93 decay; +#X text 55 4 adsr2 - arguments: level \, attack time \, decay time +\, sustain percentage \, release time; +#X text 533 91 sustain; +#X text 609 93 release; +#X connect 0 0 3 0; +#X connect 1 0 4 1; +#X connect 1 0 15 1; +#X connect 1 0 34 1; +#X connect 1 0 37 1; +#X connect 3 0 12 0; +#X connect 3 0 13 0; +#X connect 3 1 43 0; +#X connect 4 0 36 0; +#X connect 5 0 35 1; +#X connect 6 0 17 0; +#X connect 6 0 20 0; +#X connect 7 0 15 0; +#X connect 8 0 6 0; +#X connect 9 0 8 1; +#X connect 10 0 7 1; +#X connect 11 0 13 1; +#X connect 12 0 53 0; +#X connect 13 0 6 0; +#X connect 15 0 51 0; +#X connect 20 0 37 0; +#X connect 21 0 4 0; +#X connect 21 0 53 0; +#X connect 21 1 20 0; +#X connect 23 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 38 0; +#X connect 36 0 6 0; +#X connect 37 0 23 0; +#X connect 38 0 36 1; +#X connect 38 0 53 1; +#X connect 43 0 46 0; +#X connect 43 1 21 0; +#X connect 46 0 4 0; +#X connect 46 0 53 0; +#X connect 46 1 49 0; +#X connect 49 0 6 0; +#X connect 49 0 37 0; +#X connect 51 0 8 0; +#X connect 53 0 7 0; diff --git a/pd/doc/3.audio.examples/echo.pd b/pd/doc/3.audio.examples/echo.pd new file mode 100644 index 00000000..7666d5a7 --- /dev/null +++ b/pd/doc/3.audio.examples/echo.pd @@ -0,0 +1,17 @@ +#N canvas 0 0 600 492 12; +#X obj 66 95 inlet~; +#X obj 130 96 inlet~; +#X obj 69 216 outlet~; +#X obj 134 217 outlet~; +#X obj 67 143 +~; +#X obj 133 143 -~; +#X obj 134 167 delwrite~ \$1 \$2; +#X obj 133 193 delread~ \$1 \$2; +#X text 67 24 This appears as an abstraction in patch 44; +#X connect 0 0 4 0; +#X connect 0 0 5 0; +#X connect 1 0 4 1; +#X connect 1 0 5 1; +#X connect 4 0 2 0; +#X connect 5 0 6 0; +#X connect 7 0 3 0; diff --git a/pd/doc/3.audio.examples/osc-voice.pd b/pd/doc/3.audio.examples/osc-voice.pd new file mode 100644 index 00000000..48bb81ea --- /dev/null +++ b/pd/doc/3.audio.examples/osc-voice.pd @@ -0,0 +1,89 @@ +#N canvas 153 209 946 576 12; +#X obj 163 390 line~; +#X obj 401 438 line~; +#X obj 163 511 *~; +#X obj 383 229 r \$1; +#X obj 363 316 dbtorms; +#X obj 383 281 unpack; +#X obj 383 255 t l b; +#X obj 401 412 pack; +#X obj 447 283 30; +#X obj 163 286 unpack; +#X obj 163 260 r \$2; +#X obj 163 470 osc~; +#X obj 163 312 mtof; +#X obj 363 342 sqrt; +#X obj 363 368 sqrt; +#X obj 163 338 sqrt; +#X obj 163 364 sqrt; +#X obj 163 418 *~; +#X obj 163 444 *~; +#X obj 401 464 *~; +#X obj 400 492 *~; +#X obj 96 486 inlet~; +#X obj 96 538 outlet~; +#X obj 96 512 +~; +#X floatatom 293 342 0 0 0; +#X msg 294 316 set \$1; +#X obj 294 368 s \$1; +#X floatatom 96 336 0 0 0; +#X msg 96 310 set \$1; +#X obj 96 362 s \$2; +#X text 370 201 amplitude; +#X text 157 233 pitch; +#X text 27 36 The amplitude and pitch are controlled by quartic envelopes +as in the previous example. Here we introduce two new features. First +\, there are number boxes to show the most recent targets for amplitude +and frequency \, which you can also use to change the values. Also +\, if amplitude gets a message without an explicit time value \, we +supply a default of "30".; +#X text 27 149 Other small differences from the previous patch: pitch +and amplitude are now in MIDI and dB \, and there's a summing bus arrangement +(the inlet~ \, +~ \, and outlet~).; +#X text 15 295 see or; +#X text 16 315 change; +#X text 16 336 pitch-->; +#X text 233 325 and; +#X text 233 342 amp-->; +#X text 488 283 "30" is short for "float 30." This is; +#X text 495 302 more CPU efficient than a message.; +#X text 451 403 The "pack" always gets a 30 \, but if you send a pair +of numbers to amplitude \, the second one overrides the 30; +#X text 439 254 first bang the "30" \, then pass the list on; +#X text 62 7 This abstraction is used in patch 68.qlist.pd.; +#X connect 0 0 17 0; +#X connect 0 0 17 1; +#X connect 1 0 19 0; +#X connect 1 0 19 1; +#X connect 2 0 23 1; +#X connect 3 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 4 0; +#X connect 5 0 25 0; +#X connect 5 1 7 1; +#X connect 6 0 5 0; +#X connect 6 1 8 0; +#X connect 7 0 1 0; +#X connect 8 0 7 1; +#X connect 9 0 12 0; +#X connect 9 0 28 0; +#X connect 9 1 0 1; +#X connect 10 0 9 0; +#X connect 11 0 2 0; +#X connect 12 0 15 0; +#X connect 13 0 14 0; +#X connect 14 0 7 0; +#X connect 15 0 16 0; +#X connect 16 0 0 0; +#X connect 17 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 11 0; +#X connect 19 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 2 1; +#X connect 21 0 23 0; +#X connect 23 0 22 0; +#X connect 24 0 26 0; +#X connect 25 0 24 0; +#X connect 27 0 29 0; +#X connect 28 0 27 0; diff --git a/pd/doc/3.audio.examples/partial.pd b/pd/doc/3.audio.examples/partial.pd new file mode 100644 index 00000000..dae4a151 --- /dev/null +++ b/pd/doc/3.audio.examples/partial.pd @@ -0,0 +1,51 @@ +#N canvas 439 152 649 445 12; +#X obj 495 257 sqrt; +#X text 78 85 trigger; +#X msg 82 143 bang; +#X obj 81 211 * \$2; +#X text 126 210 relative frequency; +#X obj 83 340 *~; +#X obj 262 307 line~; +#X obj 262 335 *~; +#X obj 260 364 *~; +#X obj 264 229 float; +#X msg 264 280 0 \$1; +#X obj 494 280 sqrt; +#X obj 82 110 r trigger; +#X obj 495 232 float \$1; +#X obj 294 206 r duration; +#X obj 81 179 float; +#X obj 126 180 r frequency; +#X text 497 199 amplitude; +#X obj 83 311 osc~ 0; +#X obj 278 168 t b b; +#X obj 81 238 + \$3; +#X text 119 240 detune; +#X obj 264 255 * \$4; +#X text 306 256 relative duration; +#X text 106 6 partial - arguments: amplitude \, frequency \, detune \, duration; +#X obj 83 367 throw~ sum; +#X text 74 35 This patch is used as an abstraction in 15.additive.pd; +#X connect 0 0 11 0; +#X connect 2 0 15 0; +#X connect 2 0 19 0; +#X connect 3 0 20 0; +#X connect 5 0 25 0; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 5 1; +#X connect 9 0 22 0; +#X connect 10 0 6 0; +#X connect 11 0 6 0; +#X connect 12 0 2 0; +#X connect 13 0 0 0; +#X connect 14 0 9 1; +#X connect 15 0 3 0; +#X connect 16 0 15 1; +#X connect 18 0 5 0; +#X connect 19 0 9 0; +#X connect 19 1 13 0; +#X connect 20 0 18 0; +#X connect 22 0 10 0; diff --git a/pd/doc/3.audio.examples/qlist.txt b/pd/doc/3.audio.examples/qlist.txt new file mode 100644 index 00000000..fe105141 --- /dev/null +++ b/pd/doc/3.audio.examples/qlist.txt @@ -0,0 +1,56 @@ +# This is a qlist for patch number 60, which demonstrates an oscillator
+bank.
+;
+# comments start with a "#" which must be followed by a space. The comment
+is terminated by a semicolon like this: ;
+
+# first an arpeggio. You can group them in lines as you please. The 100s at
+the beginnings of lines are delay times. ;
+
+pit1 89; amp1 80;
+100 pit2 72; amp2 80;
+100 pit3 57; amp3 90;
+100 pit4 84; amp4 78;
+100 pit5 74; amp5 74;
+100 pit6 73; amp6 74;
+100 pit7 100; amp7 78;
+100 pit8 37; amp8 95;
+
+# after a 600-msec rest, gliss four of the oscillators to new frequencies. ;
+600 pit1 70 1000;
+300 pit8 40 1000;
+300 pit4 89 1000;
+300 pit7 95 1000;
+
+# a second later, turn them off with decay time 1500 ;
+1000
+amp1 0 1500;
+amp2 0 1500;
+amp3 0 1500;
+amp4 0 1500;
+amp5 0 1500;
+amp6 0 1500;
+amp7 0 1500;
+amp8 0 1500;
+
+# and re-attack them.. ;
+1000
+amp1 85 5;
+amp2 85 5;
+amp3 85 5;
+amp4 90 5;
+amp5 85 5;
+amp6 85 5;
+amp7 90 5;
+amp8 85 5;
+
+# this time, try varying decay times. ;
+10
+amp1 0 2000;
+amp2 0 2000;
+amp3 0 2000;
+amp4 0 500;
+amp5 0 1000;
+amp6 0 1000;
+amp7 0 500;
+amp8 0 4000;
diff --git a/pd/doc/3.audio.examples/qlist2.txt b/pd/doc/3.audio.examples/qlist2.txt new file mode 100644 index 00000000..5c272646 --- /dev/null +++ b/pd/doc/3.audio.examples/qlist2.txt @@ -0,0 +1,5 @@ +note 36;
+1000 note 34;
+1000 note 33;
+1000 note 31;
+1000 qlist bang;
diff --git a/pd/doc/3.audio.examples/sampvoice.pd b/pd/doc/3.audio.examples/sampvoice.pd new file mode 100644 index 00000000..dafa3c67 --- /dev/null +++ b/pd/doc/3.audio.examples/sampvoice.pd @@ -0,0 +1,105 @@ +#N canvas 231 67 574 676 12; +#X obj 95 396 line~; +#X obj 301 396 line~; +#X obj 285 476 *~; +#X obj 317 607 outlet~; +#X obj 144 396 makefilename sample%d; +#X msg 144 419 set \$1; +#X obj 144 442 tabread4~ sample1; +#X obj 349 419 dbtorms; +#X obj 349 396 unpack; +#X obj 349 442 sqrt; +#X obj 349 465 sqrt; +#X obj 349 488 line~; +#X obj 333 559 *~; +#X obj 349 511 *~; +#X obj 349 534 *~; +#X msg 201 49 bang; +#X obj 201 72 delay 5; +#X obj 289 95 unpack 0 0 0 0 0 0 0; +#X obj 421 184 f; +#X obj 367 161 f; +#X obj 309 161 f; +#X obj 278 161 f; +#X obj 252 161 f; +#X obj 173 161 f; +#X obj 173 184 mtof; +#X obj 173 207 / 261.62; +#X obj 173 230 * 4.41e+08; +#X obj 173 253 +; +#X obj 394 161 delay; +#X obj 252 303 pack 0 0 0 0 0; +#X obj 201 95 t b b b; +#X obj 309 207 + 1; +#X obj 309 184 * 44.1; +#X msg 85 337 0 5; +#X msg 286 337 1 5; +#X msg 319 337 0 \, \$1 \$2; +#X msg 158 337 \$3 \, \$4 1e+07; +#X msg 253 337 \$5; +#X msg 393 337 0 \$1; +#X obj 289 72 inlet; +#X obj 61 565 inlet~; +#X obj 317 583 +~; +#X text 82 21 This is an abstraction used by a polyphonic sampler (example 24.); +#X connect 0 0 6 0; +#X connect 1 0 2 1; +#X connect 2 0 12 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 2 0; +#X connect 7 0 9 0; +#X connect 8 0 7 0; +#X connect 8 1 11 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 13 0; +#X connect 11 0 13 1; +#X connect 12 0 41 1; +#X connect 13 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 12 1; +#X connect 15 0 16 0; +#X connect 15 0 33 0; +#X connect 16 0 30 0; +#X connect 17 0 23 1; +#X connect 17 0 15 0; +#X connect 17 1 22 1; +#X connect 17 2 28 1; +#X connect 17 3 21 1; +#X connect 17 4 20 1; +#X connect 17 5 19 1; +#X connect 17 6 18 1; +#X connect 18 0 38 0; +#X connect 19 0 29 1; +#X connect 20 0 32 0; +#X connect 21 0 29 4; +#X connect 22 0 29 0; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 26 0 27 0; +#X connect 27 0 29 3; +#X connect 28 0 18 0; +#X connect 29 0 34 0; +#X connect 29 0 35 0; +#X connect 29 0 36 0; +#X connect 29 0 37 0; +#X connect 30 0 22 0; +#X connect 30 1 23 0; +#X connect 30 2 19 0; +#X connect 30 2 20 0; +#X connect 30 2 21 0; +#X connect 30 2 28 0; +#X connect 31 0 29 2; +#X connect 31 0 27 1; +#X connect 32 0 31 0; +#X connect 33 0 1 0; +#X connect 34 0 1 0; +#X connect 35 0 8 0; +#X connect 36 0 0 0; +#X connect 37 0 4 0; +#X connect 38 0 8 0; +#X connect 39 0 17 0; +#X connect 40 0 41 0; +#X connect 41 0 3 0; diff --git a/pd/doc/3.audio.examples/spectrum-partial.pd b/pd/doc/3.audio.examples/spectrum-partial.pd new file mode 100644 index 00000000..584d3489 --- /dev/null +++ b/pd/doc/3.audio.examples/spectrum-partial.pd @@ -0,0 +1,57 @@ +#N canvas 211 116 826 530 12; +#X obj 28 412 osc~; +#X obj 94 197 r poll-table; +#X obj 78 311 moses 0; +#X obj 129 337 + 50; +#X obj 129 363 dbtorms; +#X msg 78 339 0; +#X obj 78 392 pack 0 30; +#X obj 78 422 line~; +#X obj 28 471 throw~ sum-bus; +#X obj 28 442 *~; +#X obj 28 87 r pitch; +#X obj 28 114 mtof; +#X obj 78 230 f; +#X obj 28 142 * \$1; +#X obj 37 168 ftom; +#X obj 79 256 -; +#X obj 121 255 r whammybar; +#X text 28 9 This abstraction is used by the spectrum drawing example +\, number 16...; +#X text 61 46 \$1 is the partial number.; +#X text 79 114 pitch to frequency; +#X text 78 141 then get the frequency of this specific partial; +#X text 81 167 ... and then convert back to pitch.; +#X text 115 230 ... at which time we get the pitch back...; +#X text 233 249 ... and transpose \, effectively shifting the spectral +envelope left and right.; +#X text 203 341 The vertical scale is dB from 1 to 50 \, but we want +true zero when the table value is 0 or less.; +#X text 172 398 Amplitude control via pack \, line~ \, and *~.; +#X text 171 444 Finally \, add to a summing bus via throw~. All the +throw~s in the instantiations of this abstraction will add into the +one "catch~ sum-bus" at the output.; +#X text 216 195 the calling patch bangs "poll-table" every 30 msec. +; +#X obj 78 284 tabread4 spectrum-tab; +#X text 285 288 Finally get the strength from the table. Note that +we use the control object \, tabread4 \, not tabread4~.; +#X connect 0 0 9 0; +#X connect 1 0 12 0; +#X connect 2 0 5 0; +#X connect 2 1 3 0; +#X connect 3 0 4 0; +#X connect 4 0 6 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 9 1; +#X connect 9 0 8 0; +#X connect 10 0 11 0; +#X connect 11 0 13 0; +#X connect 12 0 15 0; +#X connect 13 0 14 0; +#X connect 13 0 0 0; +#X connect 14 0 12 1; +#X connect 15 0 28 0; +#X connect 16 0 15 1; +#X connect 28 0 2 0; diff --git a/pd/doc/4.fft.examples/00.INTRO.txt b/pd/doc/4.fft.examples/00.INTRO.txt new file mode 100644 index 00000000..b5218793 --- /dev/null +++ b/pd/doc/4.fft.examples/00.INTRO.txt @@ -0,0 +1,65 @@ +These patches demonstrate how to use Pd's short-time Fourier transform objects, +rfft~ and rifft~, to do a variety of things. The patches can be quite +expensive; the phase vocoder, for instance, requires a 300MHz Pentium 2 to run +at 44100 Hz. By default Pd runs at 44100 Hz, but you can specify a different +sample rate on the command line, for instance: + +pd -r 16000 09.pvoc.pd + +On SGI, Pd will check whether your audio system is running at the correct +sample rate and will print out a warning if not. In NT or W95, Pd's behavior +will depend on your audio driver. In Linux Pd usually tries to set the rate +of the conversion hardware. + +Included in this directory are: + +01.fftanalysis.pd -- does a windowed FFT analysis and resynthesis of a sine +tone, showing how to specify block size and overlap. + +02.noisefft.pd -- Fourier analysis of white noise. This patch also shows how +you can average power spectra over time. + +03.denoise.pd -- using the technique from the previous patch, finds the noise +floor in a recorded sample and attempts to scrub it away. + +04.shifts.pd -- tests the leftshift and rightshift "externs" used in the next +patch. + +05.sheepgoat.pd -- tries to discriminate between "pitched" and "unpitched" +components of a sound. + +06.sheepgoat2.pd -- another attempt at the same thing. + +07.tinbell.pd -- a spectral flattener, which can make the sound of a large bell +turn into the sound of a tamtam. + +08.convobros.pd -- spectral cross synthesis between two sounds + +09.pvoc.pd -- phase vocoder + +---------- after this point, the patches haven't been cleaned up ----------- + +10.phaselockedvoc.pd -- phase locked vocoder; see Laroche&Dolson in ICMC97 for +a discussion of something that works better than this. + +11.pianorev.pd -- an attempt at a phase-coherent reverberation algorithm to +imitate the "piano reverb" obtained by putting a speaker under the sound board +of a piano and picking up the sympathetic vibrations. + +12.sinedecomposer.pd -- estimate the frequencies and amplitudes of the +components of a sound + +13.tracemaker.pd -- show how to use Pd to combine snapshots of a spectrum into +continuous spectral traces. + +14.partialtracer.pd -- sinusoidal analysis/resynthesis of a time-verying sound. + +15.waveformgrab.pd -- bash a sample into phase-coherent windows and make a +pitched resynthesis. + + + + + + + diff --git a/pd/doc/4.fft.examples/01.fftanalysis.pd b/pd/doc/4.fft.examples/01.fftanalysis.pd new file mode 100644 index 00000000..9b5e1e4c --- /dev/null +++ b/pd/doc/4.fft.examples/01.fftanalysis.pd @@ -0,0 +1,143 @@ +#N canvas 11 0 944 595 12; +#X text 60 368 frequency; +#X obj 20 238 tabwrite~ array2; +#X msg 141 117 0; +#N canvas 245 0 864 679 fft-analysis 0; +#X obj 57 75 *~; +#X obj 98 191 *~; +#X graph graph1 0 -1 256 1 397 304 797 4; +#X array array1 256 float 0; +#X pop; +#X graph graph2 0 -1 256 1 397 631 797 331; +#X array array2 256 float 0; +#X pop; +#X obj 57 4 inlet~; +#X obj 57 192 *~; +#X obj 57 310 tabsend~ array1; +#X msg 442 673 \; array1 resize 256 \; array2 resize 256; +#X obj 76 48 tabreceive~ array2; +#X obj 57 136 rfft~; +#X obj 57 222 rifft~; +#X obj 80 283 outlet~; +#X obj 229 216 print~; +#X msg 229 188 bang; +#X obj 94 632 block~ 256 2; +#X text 82 30 Hanning window; +#X text 61 106 forward real FFT; +#X text 74 243 inverse real FFT; +#X text 121 126 renormalize by 1/256; +#X obj 120 144 sig~ 0.0039; +#X connect 0 0 9 0; +#X connect 1 0 10 1; +#X connect 4 0 0 0; +#X connect 5 0 10 0; +#X connect 8 0 0 1; +#X connect 9 0 5 0; +#X connect 9 0 12 0; +#X connect 9 1 1 0; +#X connect 10 0 11 0; +#X connect 10 0 6 0; +#X connect 13 0 12 0; +#X connect 19 0 5 1; +#X connect 19 0 1 1; +#X restore 133 430 pd fft-analysis; +#X floatatom 133 379 0 0 0; +#X obj 134 525 dac~; +#X graph graph1 0 -1 256 1 352 461 608 261; +#X array array3 256 float 0; +#X pop; +#X obj 141 462 tabwrite~ array3; +#X msg 77 442 bang; +#X obj 133 324 * 44100; +#X obj 133 352 / 256; +#X floatatom 133 298 0 0 0; +#X text 71 165 sample rate / 256; +#X text 17 23 CLICK HERE TO; +#X text 15 41 CALCULATE HANNING; +#X text 14 58 WINDOW TABLE; +#X msg 20 79 bang \; pd dsp 1; +#X text 40 289 frequency; +#X text 50 305 in bins; +#X text 62 385 in Hz.; +#X text 14 440 scope; +#X text 236 23 A patch to test the rfft~ and rifft~ modules. An incoming +sine wave is Hanning windowed and transformed. The inverse transform +is then output.; +#X text 235 70 The block size (256) and overlap (2) are set by the +block~ object in the sub-patch. The output is automatically overlap-added +by the outlet~ object.; +#X floatatom 778 111 0 0 0; +#N canvas 194 37 397 591 output 0; +#X obj 72 249 t b; +#X obj 72 173 f; +#X obj 73 89 inlet; +#X text 86 54 mute; +#X obj 72 280 f; +#X msg 149 292 0; +#X msg 72 125 bang; +#X obj 73 197 moses 1; +#X obj 149 263 t b f; +#X obj 109 543 outlet; +#X msg 108 503 set \$1; +#X obj 92 337 s master-amp; +#X obj 206 153 r master-amp; +#X obj 107 424 r master-amp; +#X obj 206 186 moses 1; +#X obj 249 494 dbtorms; +#X obj 251 520 pack 0 100; +#X obj 252 548 s master-out; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 11 0; +#X connect 5 0 11 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 12 0 1 1; +#X connect 12 0 14 0; +#X connect 13 0 10 0; +#X connect 13 0 15 0; +#X connect 14 1 4 1; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X restore 778 83 pd output; +#X msg 778 55 mute; +#X text 821 115 AMPLITUDE; +#X obj 778 142 s master-amp; +#X obj 191 522 line~; +#X obj 134 495 *~; +#X text 236 124 You can close the sub-patch if table updates are interfering +with your audio output.; +#X obj 191 495 r master-out; +#X obj 36 166 osc~; +#X obj 35 118 samplerate~; +#X obj 36 142 / 256; +#X obj 36 189 *~ -0.5; +#X obj 36 209 +~ 0.5; +#X obj 133 405 osc~; +#X connect 2 0 32 1; +#X connect 3 0 7 0; +#X connect 3 0 29 0; +#X connect 4 0 37 0; +#X connect 8 0 7 0; +#X connect 9 0 10 0; +#X connect 10 0 4 0; +#X connect 11 0 9 0; +#X connect 16 0 1 0; +#X connect 16 0 2 0; +#X connect 16 0 33 0; +#X connect 23 0 27 0; +#X connect 24 0 23 0; +#X connect 25 0 24 0; +#X connect 28 0 29 1; +#X connect 29 0 5 0; +#X connect 31 0 28 0; +#X connect 32 0 35 0; +#X connect 33 0 34 0; +#X connect 34 0 32 0; +#X connect 35 0 36 0; +#X connect 36 0 1 0; +#X connect 37 0 3 0; diff --git a/pd/doc/4.fft.examples/02.noisefft.pd b/pd/doc/4.fft.examples/02.noisefft.pd new file mode 100644 index 00000000..65b4d92f --- /dev/null +++ b/pd/doc/4.fft.examples/02.noisefft.pd @@ -0,0 +1,267 @@ +#N canvas 24 0 884 580 12; +#X obj 279 320 sig~; +#X obj 187 375 *~; +#X floatatom 279 274 0 0 0; +#X floatatom 183 273 0 0 0; +#X obj 183 319 sig~; +#X text 10 246 frequency; +#N canvas 45 63 925 609 fft-analysis 0; +#X obj 241 228 + 1; +#X msg 313 322 0; +#X obj 127 190 *~; +#X obj 38 69 *~; +#X obj 37 38 *~; +#X obj 72 436 *~; +#X graph graph1 0 0 1024 1 476 244 876 44; +#X array fftout 1024 float 0; +#X pop; +#X obj 37 4 inlet~; +#X obj 37 436 *~; +#X obj 94 271 tabsend~ fftout; +#X obj 76 38 tabreceive~ hanning; +#X obj 38 116 rfft~; +#X obj 37 461 rifft~; +#X obj 37 517 outlet~; +#X text 88 21 Hanning window; +#X text 31 94 forward real FFT; +#X text 52 479 inverse real FFT; +#X obj 36 555 block~ 1024 2; +#X obj 72 69 sig~ 0.03125; +#X graph graph1 0 0 1024 1 476 554 876 354; +#X array mask 1024 float 0; +#X pop; +#X obj 94 190 *~; +#X obj 94 214 +~; +#X floatatom 241 253 0 0 0; +#X msg 247 105 0; +#X obj 175 184 float; +#X obj 226 184 + 1; +#X obj 175 123 bang~; +#X obj 175 148 spigot; +#X floatatom 303 86 0 0 0; +#X obj 101 314 tabreceive~ mask; +#X obj 241 277 t b b f; +#X obj 266 322 /; +#X msg 266 298 1; +#X obj 78 344 -~; +#X obj 266 358 sig~; +#X obj 313 298 sel 0; +#X obj 247 388 *~; +#X obj 212 419 +~; +#X obj 227 446 tabsend~ mask; +#X floatatom 313 358 0 0 0; +#X obj 175 209 t f f; +#X text 100 231 power is square; +#X text 100 245 modulus of FFT; +#X obj 303 36 loadbang; +#X obj 298 181 <; +#X msg 253 36 bang; +#X text 237 11 click to make an average; +#X obj 91 408 sig~ 0.03125; +#X text 574 249 power spectrum of this window; +#X text 338 70 Set the number; +#X text 340 85 of frames to; +#X text 342 101 average; +#X text 593 573 average power spectrum; +#X text 272 253 current frame; +#X text 284 378 weight of new; +#X text 275 391 frame in moving; +#X text 304 404 average; +#X msg 303 61 100; +#X connect 0 0 22 0; +#X connect 1 0 34 0; +#X connect 1 0 39 0; +#X connect 2 0 21 1; +#X connect 3 0 11 0; +#X connect 4 0 3 0; +#X connect 5 0 12 1; +#X connect 7 0 4 0; +#X connect 8 0 12 0; +#X connect 10 0 4 1; +#X connect 11 0 8 0; +#X connect 11 0 20 0; +#X connect 11 0 20 1; +#X connect 11 1 5 0; +#X connect 11 1 2 0; +#X connect 11 1 2 1; +#X connect 12 0 13 0; +#X connect 18 0 3 1; +#X connect 20 0 21 0; +#X connect 21 0 9 0; +#X connect 21 0 33 0; +#X connect 22 0 30 0; +#X connect 23 0 24 1; +#X connect 23 0 44 0; +#X connect 24 0 40 0; +#X connect 24 0 25 0; +#X connect 25 0 24 1; +#X connect 26 0 27 0; +#X connect 27 0 24 0; +#X connect 28 0 44 1; +#X connect 29 0 33 1; +#X connect 29 0 37 1; +#X connect 30 1 32 0; +#X connect 30 2 31 1; +#X connect 31 0 34 0; +#X connect 31 0 39 0; +#X connect 32 0 31 0; +#X connect 33 0 36 0; +#X connect 34 0 36 1; +#X connect 35 0 1 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 40 0 44 0; +#X connect 40 1 0 0; +#X connect 43 0 57 0; +#X connect 44 0 27 1; +#X connect 44 0 35 0; +#X connect 45 0 23 0; +#X connect 47 0 8 1; +#X connect 47 0 5 1; +#X connect 57 0 28 0; +#X restore 99 412 pd fft-analysis; +#X obj 99 275 sig~; +#X obj 99 297 phasor~; +#X obj 99 319 cos~; +#X floatatom 99 253 0 0 0; +#X graph graph1 0 -1 1024 1 431 525 687 325; +#X array scope 1024 float 0; +#X pop; +#X obj 105 439 tabwrite~ scope; +#X msg 49 418 bang; +#X obj 99 230 / 256; +#X floatatom 98 165 0 0 0; +#X text 10 155 frequency; +#X text 21 175 in bins; +#X text 16 259 in Hz.; +#X text 42 398 scope; +#N canvas 84 23 767 580 hanning-window 0; +#X obj 92 198 phasor~; +#X obj 92 234 cos~; +#X obj 23 328 tabwrite~ hanning; +#X obj 30 252 -~; +#X obj 28 218 sig~ 1; +#X msg 37 171 0; +#X text 48 59 CALCULATE HANNING; +#X text 45 71 WINDOW TABLE; +#X graph graph1 0 -1 1024 1 290 509 690 209; +#X array hanning 1024 float 0; +#X pop; +#X msg 290 521 \; hanning resize 1024; +#X obj 114 145 / 1024; +#X obj 114 168 sig~; +#X text 175 148 sample rate / window size; +#X msg 23 94 bang; +#X obj 66 269 sig~ 0.5; +#X obj 49 300 *~; +#X obj 22 38 loadbang; +#X obj 113 117 samplerate~; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 3 0 15 0; +#X connect 4 0 3 0; +#X connect 5 0 0 1; +#X connect 10 0 11 0; +#X connect 11 0 0 0; +#X connect 13 0 2 0; +#X connect 13 0 5 0; +#X connect 13 0 17 0; +#X connect 14 0 15 1; +#X connect 15 0 2 0; +#X connect 16 0 13 0; +#X connect 17 0 10 0; +#X restore 328 203 pd hanning-window; +#X obj 99 346 *~; +#X text 177 250 oscillator; +#X obj 166 349 noise~; +#X text 278 249 noise; +#X obj 99 374 +~; +#X text 214 232 amplitudes; +#X msg 26 84 \; pd dsp 1; +#X obj 98 207 *; +#X obj 135 181 loadbang; +#X obj 135 205 samplerate~; +#X text 22 51 CLICK HERE; +#X floatatom 673 67 0 0 0; +#N canvas 194 37 397 591 output 0; +#X obj 61 212 t b; +#X obj 61 147 f; +#X obj 62 76 inlet; +#X text 73 46 mute; +#X obj 61 238 f; +#X msg 127 248 0; +#X msg 61 106 bang; +#X obj 62 167 moses 1; +#X obj 127 224 t b f; +#X obj 93 462 outlet; +#X msg 92 428 set \$1; +#X obj 78 286 s master-amp; +#X obj 175 130 r master-amp; +#X obj 91 360 r master-amp; +#X obj 175 158 moses 1; +#X obj 212 420 dbtorms; +#X obj 213 442 pack 0 100; +#X obj 214 466 s master-out; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 11 0; +#X connect 5 0 11 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 12 0 1 1; +#X connect 12 0 14 0; +#X connect 13 0 10 0; +#X connect 13 0 15 0; +#X connect 14 1 4 1; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X restore 673 43 pd output; +#X msg 673 19 mute; +#X text 710 70 AMPLITUDE; +#X obj 673 93 s master-amp; +#X text 241 9 NOISE FLOOR MEASUREMENT; +#X text 149 31 This patch shows how you can average the RMS spectra +of many windows of an incoming "noise floor" signal to estimate its +spectrum. We'll use this in the "denoiser" patch \, next.; +#X text 30 65 TO START; +#X obj 99 515 dac~; +#X obj 132 467 r master-out; +#X text 148 100 The controls below let you send a mixture of a sine +wave and white noise. The analysis is done in a subwindow.; +#X obj 132 490 line~; +#X obj 99 490 *~; +#X obj 183 295 dbtorms; +#X obj 279 297 dbtorms; +#X connect 0 0 1 1; +#X connect 1 0 25 1; +#X connect 2 0 46 0; +#X connect 3 0 45 0; +#X connect 4 0 21 1; +#X connect 6 0 12 0; +#X connect 6 0 44 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 21 0; +#X connect 10 0 7 0; +#X connect 13 0 12 0; +#X connect 14 0 10 0; +#X connect 15 0 28 0; +#X connect 21 0 25 0; +#X connect 23 0 1 0; +#X connect 25 0 6 0; +#X connect 28 0 14 0; +#X connect 29 0 30 0; +#X connect 30 0 28 1; +#X connect 32 0 36 0; +#X connect 33 0 32 0; +#X connect 34 0 33 0; +#X connect 41 0 43 0; +#X connect 43 0 44 1; +#X connect 44 0 40 0; +#X connect 44 0 40 1; +#X connect 45 0 4 0; +#X connect 46 0 0 0; diff --git a/pd/doc/4.fft.examples/03.denoise.pd b/pd/doc/4.fft.examples/03.denoise.pd new file mode 100644 index 00000000..09e1244e --- /dev/null +++ b/pd/doc/4.fft.examples/03.denoise.pd @@ -0,0 +1,364 @@ +#N canvas 54 36 882 556 12; +#X floatatom 306 344; +#X floatatom 68 337; +#N canvas 72 0 896 679 fft-analysis 0; +#X obj 140 447 *~; +#X obj 54 705 *~; +#X obj 139 612 *~; +#X floatatom 206 267; +#X obj 185 349 *~; +#X obj 356 188 + 1; +#X msg 447 257 0; +#X obj 173 181 *~; +#X obj 57 89 *~; +#X obj 95 641 *~; +#X obj 57 49 inlet~; +#X obj 54 642 *~; +#X obj 126 68 tabreceive~ hanning; +#X obj 57 136 rfft~; +#X obj 54 672 rifft~; +#X obj 55 743 outlet~; +#X text 132 50 Hanning window; +#X text 63 115 forward real FFT; +#X text 72 721 inverse real FFT; +#X graph graph1 0 0 1024 20 491 631 891 331; +#X array mask 1024 float; +#X pop; +#X obj 134 180 *~; +#X obj 134 209 +~; +#X msg 447 132 0; +#X obj 317 129 float; +#X obj 377 149 + 1; +#X obj 318 72 bang~; +#X obj 318 101 spigot; +#X obj 449 186 < 10; +#X floatatom 497 185; +#X obj 256 306 tabreceive~ mask; +#X obj 357 267 /; +#X msg 357 237 1; +#X obj 230 350 -~; +#X obj 370 331 sig~; +#X obj 447 232 sel 0; +#X obj 348 356 *~; +#X obj 331 387 +~; +#X obj 330 412 tabsend~ mask; +#X floatatom 448 287; +#X obj 316 156 t f f; +#X obj 446 56 r make-mask; +#X obj 206 296 sig~; +#X obj 206 241 r mask-level; +#X obj 140 414 /~; +#X obj 356 212 t b f; +#X obj 177 612 sig~ 0.001; +#X obj 29 781 block~ 1024 4; +#X obj 663 76 r window-size; +#X obj 447 84 t b f; +#X obj 676 137 t b f; +#X obj 663 171 /; +#X obj 661 194 * 250; +#X text 728 202 hop size in msec; +#X obj 497 107 /; +#X text 497 206 number of; +#X text 505 221 frames; +#X text 439 12 calculate a mask using N msec of; +#X text 438 30 background noise; +#X obj 176 415 sig~ 1e-20; +#X text 152 467 multiply the signal by the; +#X text 153 485 quantity s/(s+m) where "s"; +#X text 152 505 is signal power and "m" is mask.; +#X text 153 527 The multiplier is close to 1 if; +#X text 155 549 s>>m \, but close to 0 if s<<m.; +#X text 157 572 We gratuitously square it.; +#X floatatom 657 237; +#X obj 699 109 r srate; +#X connect 0 0 2 0; +#X connect 1 0 15 0; +#X connect 2 0 11 1; +#X connect 2 0 9 1; +#X connect 3 0 41 0; +#X connect 4 0 43 1; +#X connect 5 0 44 0; +#X connect 6 0 38 0; +#X connect 7 0 21 1; +#X connect 8 0 13 0; +#X connect 9 0 14 1; +#X connect 10 0 8 0; +#X connect 11 0 14 0; +#X connect 12 0 8 1; +#X connect 12 0 1 1; +#X connect 13 0 11 0; +#X connect 13 0 20 0; +#X connect 13 0 20 1; +#X connect 13 1 9 0; +#X connect 13 1 7 0; +#X connect 13 1 7 1; +#X connect 14 0 1 0; +#X connect 20 0 21 0; +#X connect 21 0 32 0; +#X connect 21 0 43 0; +#X connect 21 0 43 1; +#X connect 22 0 23 1; +#X connect 22 0 27 0; +#X connect 23 0 39 0; +#X connect 23 0 24 0; +#X connect 24 0 23 1; +#X connect 25 0 26 0; +#X connect 26 0 23 0; +#X connect 27 0 26 1; +#X connect 27 0 34 0; +#X connect 28 0 27 1; +#X connect 29 0 32 1; +#X connect 29 0 4 0; +#X connect 29 0 36 0; +#X connect 30 0 38 0; +#X connect 31 0 30 0; +#X connect 32 0 35 0; +#X connect 33 0 35 1; +#X connect 34 0 6 0; +#X connect 35 0 36 1; +#X connect 36 0 37 0; +#X connect 38 0 33 0; +#X connect 39 0 27 0; +#X connect 39 1 5 0; +#X connect 40 0 48 0; +#X connect 41 0 4 1; +#X connect 42 0 3 0; +#X connect 43 0 0 0; +#X connect 43 0 0 1; +#X connect 44 0 31 0; +#X connect 44 1 30 1; +#X connect 45 0 2 1; +#X connect 47 0 50 0; +#X connect 48 0 22 0; +#X connect 48 1 53 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 51 0; +#X connect 51 0 53 1; +#X connect 51 0 65 0; +#X connect 53 0 28 0; +#X connect 58 0 43 1; +#X connect 66 0 49 0; +#X restore 67 412 pd fft-analysis; +#X obj 67 470 dac~; +#N canvas 99 31 767 592 hanning-window 0; +#X obj 108 242 phasor~; +#X obj 108 275 cos~; +#X obj 27 386 tabwrite~ hanning; +#X obj 35 297 -~; +#X obj 33 257 sig~ 1; +#X msg 44 212 0; +#X text 166 16 CALCULATE HANNING; +#X text 166 32 WINDOW TABLE; +#X graph graph1 0 -1 1024 1 308 538 708 238; +#X array hanning 1024 float; +#X pop; +#X msg 308 550 \; hanning resize 1024; +#X obj 109 154 / 1024; +#X obj 109 201 sig~; +#X text 206 174 sample rate / window size; +#X msg 27 169 bang; +#X obj 78 316 sig~ 0.5; +#X obj 58 353 *~; +#X obj 79 113 samplerate~; +#X obj 29 27 r window-size; +#X obj 29 62 t b f; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 3 0 15 0; +#X connect 4 0 3 0; +#X connect 5 0 0 1; +#X connect 10 0 11 0; +#X connect 11 0 0 0; +#X connect 13 0 2 0; +#X connect 13 0 5 0; +#X connect 14 0 15 1; +#X connect 15 0 2 0; +#X connect 16 0 10 0; +#X connect 17 0 18 0; +#X connect 18 0 16 0; +#X connect 18 0 13 0; +#X connect 18 1 10 1; +#X restore 459 435 pd hanning-window; +#X text 157 311 noise; +#X text 91 289 amplitudes; +#X obj 476 467 loadbang; +#N canvas 132 255 634 335 insample 0; +#X graph graph1 0 -1 155947 1 200 170 600 20; +#X array sample 155948 float; +#X pop; +#X obj 21 78 r read-sample; +#X obj 21 106 unpack s f; +#X obj 59 134 s insamprate; +#X obj 21 190 soundfiler; +#X msg 21 163 read -resize \$1 sample; +#X obj 21 223 s insamplength; +#X msg 397 219 \; sample resize 220500 \; insamplength 220500; +#X connect 1 0 2 0; +#X connect 2 0 5 0; +#X connect 2 1 3 0; +#X connect 4 0 6 0; +#X connect 5 0 4 0; +#X restore 459 407 pd insample; +#X obj 306 369 s mask-level; +#X obj 119 474 line~; +#X obj 67 442 *~; +#X obj 476 495 samplerate~; +#X obj 476 523 s srate; +#X floatatom 164 338; +#X obj 676 312 hip~ 5; +#X obj 676 284 adc~ 1; +#X msg 749 248 bang; +#X obj 782 284 r srate; +#X obj 749 284 f; +#X obj 749 312 s insamprate; +#X msg 24 209 \; window-size 1024 \; pd dsp 1; +#X obj 676 340 tabwrite~ sample; +#X msg 451 343 \; play-sample 0 5000; +#X floatatom 451 277; +#X floatatom 691 80; +#N canvas 194 37 397 591 output 0; +#X obj 95 230 t b; +#X obj 95 174 f; +#X obj 95 118 inlet; +#X text 101 94 mute; +#X obj 95 258 f; +#X msg 154 284 0; +#X msg 95 146 bang; +#X obj 95 202 moses 1; +#X obj 154 256 t b f; +#X obj 107 490 outlet; +#X msg 107 462 set \$1; +#X obj 228 182 moses 1; +#X obj 249 493 dbtorms; +#X obj 249 521 pack 0 100; +#X obj 228 154 r master-lvl; +#X obj 107 424 r master-lvl; +#X obj 95 315 s master-lvl; +#X obj 249 549 s master-out; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X restore 691 52 pd output; +#X msg 691 24 mute; +#X obj 119 446 r master-out; +#X text 734 71 MASTER; +#X text 733 85 LEVEL; +#X obj 691 108 s master-lvl; +#X msg 305 314 6; +#X text 306 291 on; +#X text 351 292 off; +#X text 23 189 click here first; +#X text 301 189 read a sample; +#X text 670 221 record your own sample; +#X text 305 270 masking; +#X text 481 322 play sample back; +#X text 290 5 DENOISER; +#X text 74 22 This patch attempts to scrub the noise floor from a sample in two steps. First using the "make-mask" message (which is caught in the "fft-analysis" window) \, you estimate the background spectrum. Do this while only the background noise is playing.; +#X msg 350 315 0; +#X obj 451 301 metro 2000; +#X msg 201 213 \; read-sample ../sound/bell.aiff 44100; +#N canvas 190 43 534 552 test-signal 0; +#X obj 149 326 tabread4~ sample; +#X obj 149 298 line~; +#X obj 106 162 f; +#X obj 204 137 r insamprate; +#X obj 356 422 *~; +#X obj 151 389 *~; +#X obj 359 290 noise~; +#X obj 151 441 +~; +#X obj 182 390 dbtorms; +#X obj 384 422 dbtorms; +#X obj 182 365 inlet; +#X obj 384 398 inlet; +#X obj 359 375 *~; +#X obj 359 315 bp~ 2000 7; +#X obj 151 499 outlet~; +#X obj 122 109 r insamplength; +#X msg 149 274 0 \, \$1 \$2; +#X obj 149 246 pack 0 0; +#X obj 200 221 /; +#X obj 204 163 * 0.001; +#X obj 200 190 t b f; +#X text 347 260 nasty non-flat noise; +#X obj 151 469 hip~ 5; +#X obj 100 8 loadbang; +#X text 269 15 sample playback; +#X msg 100 30 1; +#X obj 99 74 metro 1000; +#X floatatom 99 51; +#X obj 385 349 phasor~ 3000; +#X connect 0 0 5 0; +#X connect 1 0 0 0; +#X connect 2 0 17 0; +#X connect 2 0 18 0; +#X connect 3 0 19 0; +#X connect 4 0 7 1; +#X connect 5 0 7 0; +#X connect 6 0 13 0; +#X connect 7 0 22 0; +#X connect 8 0 5 1; +#X connect 9 0 4 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 12 0 4 0; +#X connect 13 0 12 0; +#X connect 15 0 2 1; +#X connect 16 0 1 0; +#X connect 17 0 16 0; +#X connect 18 0 17 1; +#X connect 18 0 26 1; +#X connect 19 0 20 0; +#X connect 20 0 18 0; +#X connect 20 1 18 1; +#X connect 22 0 14 0; +#X connect 23 0 25 0; +#X connect 25 0 27 0; +#X connect 26 0 2 0; +#X connect 27 0 26 0; +#X connect 28 0 12 1; +#X restore 70 375 pd test-signal; +#X text 56 310 sampler; +#X msg 507 213 \; make-mask 1000; +#X msg 564 492 \; window-size 1024; +#X text 488 186 calculate noise mask; +#X text 74 98 Then turn both the sample and the noise on together \, set the "mask-level" to 6 or so and enjoy the result. Alternatively \, you could try to mask the bell out of the noise...; +#X connect 0 0 9 0; +#X connect 1 0 45 0; +#X connect 2 0 11 0; +#X connect 7 0 12 0; +#X connect 7 0 48 0; +#X connect 10 0 11 1; +#X connect 11 0 3 0; +#X connect 11 0 3 1; +#X connect 12 0 13 0; +#X connect 14 0 45 1; +#X connect 15 0 22 0; +#X connect 16 0 15 0; +#X connect 17 0 19 0; +#X connect 17 0 22 0; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 24 0 43 0; +#X connect 25 0 31 0; +#X connect 26 0 25 0; +#X connect 27 0 26 0; +#X connect 28 0 10 0; +#X connect 32 0 0 0; +#X connect 42 0 0 0; +#X connect 43 0 23 0; +#X connect 45 0 2 0; diff --git a/pd/doc/4.fft.examples/04.shifts.pd b/pd/doc/4.fft.examples/04.shifts.pd new file mode 100644 index 00000000..9a03efbf --- /dev/null +++ b/pd/doc/4.fft.examples/04.shifts.pd @@ -0,0 +1,27 @@ +#N canvas 213 9 614 383 12; +#X msg 225 315 bang; +#X obj 201 341 print~; +#X graph graph1 0 -1 63 1 367 335 567 185; +#X array array1 64 float; +#X pop; +#X msg 155 317 bang; +#X obj 45 206 tabreceive~ array1; +#X obj 131 343 print~; +#X text 48 110 click here first; +#X msg 74 314 bang; +#X obj 50 340 print~; +#X text 93 23 This is a test of the "lrshift~" object \, which can be used for calculations that compare neighboring bins of an FFT. The "tabreceive~" picks up the contents of "array1' (consisting of 0 \, 1 \, 0 \, 0 \, ...) and the three print~ objects show the input and the two outputs.; +#X text 155 224 shift left; +#X text 182 260 shift right; +#X obj 128 240 ../../extra/lrshift~ 1; +#X obj 149 276 ../../extra/lrshift~ -1; +#X msg 49 131 \; pd dsp 1 \; array1 1 1; +#X text 223 5 SAMPLE SHIFTS; +#X connect 0 0 1 0; +#X connect 3 0 5 0; +#X connect 4 0 8 0; +#X connect 4 0 12 0; +#X connect 4 0 13 0; +#X connect 7 0 8 0; +#X connect 12 0 5 0; +#X connect 13 0 1 0; diff --git a/pd/doc/4.fft.examples/05.sheepgoat.pd b/pd/doc/4.fft.examples/05.sheepgoat.pd new file mode 100644 index 00000000..255b2a14 --- /dev/null +++ b/pd/doc/4.fft.examples/05.sheepgoat.pd @@ -0,0 +1,395 @@ +#N canvas 69 23 831 481 12; +#X floatatom 189 254; +#N canvas 31 3 710 622 fft-analysis 0; +#X obj 58 523 *~; +#X obj 306 397 +~; +#X obj 264 397 +~; +#X obj 232 427 *~; +#X obj 197 427 *~; +#X obj 197 452 +~; +#X obj 197 477 sqrt~; +#X obj 528 342 *~; +#X obj 493 342 *~; +#X obj 493 367 +~; +#X obj 399 256 *~; +#X obj 269 147 *~; +#X obj 234 147 *~; +#X obj 199 147 *~; +#X obj 163 147 *~; +#X obj 163 172 +~; +#X obj 21 573 *~; +#X obj 368 141 *~; +#X obj 80 80 *~; +#X obj 71 289 *~; +#X obj 99 56 inlet~; +#X obj 6 289 *~; +#X obj 28 32 tabreceive~ hanning; +#X obj 80 105 rfft~; +#X obj 21 548 rifft~; +#X obj 21 597 outlet~; +#X text 34 16 Hanning window; +#X text 106 88 forward real FFT; +#X obj 333 141 *~; +#X obj 333 167 +~; +#X obj 43 263 sig~ 0.001; +#X obj 601 576 block~ 2048 4; +#X obj 271 51 tabreceive~ last-real; +#X text 368 23 previous analysis; +#X obj 449 51 tabreceive~ last-imag; +#X obj 333 192 rsqrt~; +#X text 388 192 inverse modulus; +#X obj 234 172 -~; +#X obj 347 256 *~; +#X text 435 254 encoded as a single complex number; +#X text 435 229 amplitude and phase change; +#X obj 165 240 *~; +#X obj 128 289 tabsend~ last-real; +#X obj 165 266 tabsend~ last-imag; +#X text 191 240 sic; +#X text 543 393 modulus; +#X obj 493 448 +~; +#X text 522 447 sum of moduli; +#X obj 493 393 sqrt~; +#X text 244 472 modulus of sum; +#X obj 197 503 /~; +#X obj 197 529 -~; +#X obj 197 554 *~; +#X obj 197 579 clip~ 0 1; +#X obj 83 321 r threshold; +#X obj 83 371 t b f; +#X obj 83 422 -; +#X msg 83 397 1; +#X obj 83 472 sig~; +#X obj 10 523 *~; +#X obj 251 509 sig~ 1.5e-20; +#X obj 350 512 r flip; +#X obj 350 538 sel 0; +#X msg 350 563 1e+20; +#X msg 395 563 -1e+20; +#X floatatom 83 447; +#X obj 83 346 / 100; +#X obj 136 373 lrshift~ 1; +#X obj 210 373 lrshift~ -1; +#X obj 331 373 lrshift~ 1; +#X obj 405 373 lrshift~ -1; +#X obj 510 419 lrshift~ 1; +#X obj 593 422 lrshift~ -1; +#X connect 0 0 24 1; +#X connect 1 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 0; +#X connect 2 0 4 1; +#X connect 3 0 5 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 50 0; +#X connect 7 0 9 1; +#X connect 8 0 9 0; +#X connect 9 0 48 0; +#X connect 10 0 7 1; +#X connect 10 0 1 0; +#X connect 10 0 7 0; +#X connect 10 0 69 0; +#X connect 10 0 70 0; +#X connect 11 0 37 1; +#X connect 12 0 37 0; +#X connect 13 0 15 1; +#X connect 14 0 15 0; +#X connect 15 0 38 0; +#X connect 16 0 25 0; +#X connect 17 0 29 1; +#X connect 18 0 23 0; +#X connect 19 0 0 0; +#X connect 20 0 18 1; +#X connect 21 0 59 0; +#X connect 22 0 16 1; +#X connect 22 0 18 0; +#X connect 23 0 12 0; +#X connect 23 0 14 0; +#X connect 23 0 42 0; +#X connect 23 0 21 0; +#X connect 23 1 13 0; +#X connect 23 1 11 0; +#X connect 23 1 43 0; +#X connect 23 1 19 0; +#X connect 24 0 16 0; +#X connect 28 0 29 0; +#X connect 29 0 35 0; +#X connect 30 0 21 1; +#X connect 30 0 19 1; +#X connect 32 0 14 1; +#X connect 32 0 11 1; +#X connect 32 0 28 0; +#X connect 32 0 28 1; +#X connect 34 0 13 1; +#X connect 34 0 12 1; +#X connect 34 0 17 0; +#X connect 34 0 17 1; +#X connect 35 0 10 1; +#X connect 35 0 38 1; +#X connect 35 0 41 0; +#X connect 37 0 10 0; +#X connect 38 0 8 0; +#X connect 38 0 8 1; +#X connect 38 0 2 1; +#X connect 38 0 67 0; +#X connect 38 0 68 0; +#X connect 41 0 43 0; +#X connect 41 0 42 0; +#X connect 46 0 50 1; +#X connect 48 0 46 0; +#X connect 48 0 71 0; +#X connect 48 0 72 0; +#X connect 50 0 51 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 53 0 0 1; +#X connect 53 0 59 1; +#X connect 54 0 66 0; +#X connect 55 0 57 0; +#X connect 55 1 56 1; +#X connect 56 0 65 0; +#X connect 57 0 56 0; +#X connect 58 0 51 1; +#X connect 59 0 24 0; +#X connect 60 0 50 1; +#X connect 61 0 62 0; +#X connect 62 0 63 0; +#X connect 62 1 64 0; +#X connect 63 0 52 1; +#X connect 64 0 52 1; +#X connect 65 0 58 0; +#X connect 66 0 55 0; +#X connect 67 0 2 0; +#X connect 68 0 2 0; +#X connect 69 0 1 1; +#X connect 70 0 1 1; +#X connect 71 0 46 1; +#X connect 72 0 46 1; +#X restore 106 400 pd fft-analysis; +#X obj 106 468 dac~; +#X obj 106 443 *~; +#N canvas 211 72 625 525 previous-analysis 0; +#X graph graph1 0 -1 2048 1 310 246 510 96; +#X array last-real 2048 float; +#X pop; +#X graph graph2 0 -1 2048 1 309 433 509 283; +#X array last-imag 2048 float; +#X pop; +#X msg 67 202 \; last-real resize 2048 \; last-imag resize 2048; +#X restore 649 457 pd previous-analysis; +#X obj 189 279 s threshold; +#X obj 149 468 line~; +#X floatatom 622 72; +#N canvas 194 37 397 591 output 0; +#X obj 66 202 t b; +#X obj 66 152 f; +#X obj 66 102 inlet; +#X text 71 80 mute; +#X obj 66 228 f; +#X msg 134 244 0; +#X msg 66 127 bang; +#X obj 66 177 moses 1; +#X obj 134 219 t b f; +#X obj 96 441 outlet; +#X msg 96 416 set \$1; +#X obj 185 163 moses 1; +#X obj 224 444 dbtorms; +#X obj 224 469 pack 0 100; +#X obj 185 138 r master-lvl; +#X obj 96 382 r master-lvl; +#X obj 83 285 s master-lvl; +#X obj 224 494 s master-amp; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X restore 622 47 pd output; +#X msg 622 22 mute; +#X text 661 64 MASTER; +#X text 660 78 LEVEL; +#X obj 622 98 s master-lvl; +#X obj 149 443 r master-amp; +#X obj 571 310 loadbang; +#X obj 571 336 samplerate~; +#X text 27 215 click here first; +#X obj 470 364 hip~ 5; +#X obj 470 338 adc~ 1; +#X msg 535 306 bang; +#X obj 535 338 f; +#X obj 535 364 s insamprate; +#X obj 470 389 tabwrite~ sample; +#X text 476 279 record your own sample; +#N canvas 132 61 699 413 hanning-window 0; +#X obj 97 218 phasor~; +#X obj 97 247 cos~; +#X obj 24 347 tabwrite~ hanning; +#X obj 31 267 -~; +#X obj 30 231 sig~ 1; +#X msg 40 191 0; +#X text 149 14 CALCULATE HANNING; +#X text 149 29 WINDOW TABLE; +#X graph graph1 0 -1 2047 1 454 213 654 63; +#X array hanning 2048 float; +#X pop; +#X obj 98 139 / 1024; +#X obj 98 181 sig~; +#X text 185 156 sample rate / window size; +#X msg 24 152 bang; +#X obj 70 284 sig~ 0.5; +#X obj 52 318 *~; +#X obj 71 102 samplerate~; +#X obj 26 24 r window-size; +#X obj 26 56 t b f; +#X msg 468 265 \; hanning resize 2048; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 3 0 14 0; +#X connect 4 0 3 0; +#X connect 5 0 0 1; +#X connect 9 0 10 0; +#X connect 10 0 0 0; +#X connect 12 0 2 0; +#X connect 12 0 5 0; +#X connect 13 0 14 1; +#X connect 14 0 2 0; +#X connect 15 0 9 0; +#X connect 16 0 17 0; +#X connect 17 0 15 0; +#X connect 17 0 12 0; +#X connect 17 1 9 1; +#X restore 649 432 pd hanning-window; +#X text 190 0 PITCHED/UNPITCHED SEPARATION; +#X text 99 18 This is the first of two attempts to separate "pitched" sound from noisy sound. We perform the usual windowed FFT \, and estimate the frequency of the signal in each bin \, If a bin's frequency agrees with those of its two neighbors \, we conclude that that bin belongs to a "pitched" sound.; +#X floatatom 320 258; +#X obj 320 283 s flip; +#X msg 320 230 0; +#X text 324 192 select:; +#X text 293 211 pitched; +#X text 365 211 noisy; +#X msg 365 231 1; +#X text 182 204 threshold; +#X text 186 217 (range; +#X text 190 229 0-100); +#X text 97 90 A low threshold means to let only very coherent signals through. A high one permits more of the signal to be considered "pitched". You can select either to hear the pitched or the noisy part.; +#X text 97 147 You might agree with me that the subsequent patch works better than this one...; +#X msg 22 238 \; window-size 2048 \; flip 0 \; pd dsp 1; +#X floatatom 104 339; +#X text 184 316 noise; +#X text 125 296 amplitudes; +#X floatatom 191 340; +#N canvas 190 43 534 552 test-signal 0; +#X obj 134 293 tabread4~ sample; +#X obj 134 268 line~; +#X obj 95 146 f; +#X obj 184 123 r insamprate; +#X obj 320 380 *~; +#X obj 136 350 *~; +#X obj 323 261 noise~; +#X obj 136 397 +~; +#X obj 164 351 dbtorms; +#X obj 346 380 dbtorms; +#X obj 164 328 inlet; +#X obj 346 358 inlet; +#X obj 323 337 *~; +#X obj 323 283 bp~ 2000 7; +#X obj 136 449 outlet~; +#X obj 110 98 r insamplength; +#X msg 134 247 0 \, \$1 \$2; +#X obj 134 221 pack 0 0; +#X obj 180 199 /; +#X obj 184 147 * 0.001; +#X obj 180 171 t b f; +#X text 312 234 nasty non-flat noise; +#X obj 136 422 hip~ 5; +#X obj 90 7 loadbang; +#X text 242 13 sample playback; +#X msg 90 27 1; +#X obj 89 67 metro 1000; +#X floatatom 89 46; +#X obj 346 314 phasor~ 3000; +#X connect 0 0 5 0; +#X connect 1 0 0 0; +#X connect 2 0 17 0; +#X connect 2 0 18 0; +#X connect 3 0 19 0; +#X connect 4 0 7 1; +#X connect 5 0 7 0; +#X connect 6 0 13 0; +#X connect 7 0 22 0; +#X connect 8 0 5 1; +#X connect 9 0 4 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 12 0 4 0; +#X connect 13 0 12 0; +#X connect 15 0 2 1; +#X connect 16 0 1 0; +#X connect 17 0 16 0; +#X connect 18 0 17 1; +#X connect 18 0 26 1; +#X connect 19 0 20 0; +#X connect 20 0 18 0; +#X connect 20 1 18 1; +#X connect 22 0 14 0; +#X connect 23 0 25 0; +#X connect 25 0 27 0; +#X connect 26 0 2 0; +#X connect 27 0 26 0; +#X connect 28 0 12 1; +#X restore 106 373 pd test-signal; +#X text 94 315 sampler; +#N canvas 132 255 634 331 insample 0; +#X graph graph1 0 -1 155947 1 180 168 580 18; +#X array sample 155948 float; +#X pop; +#X obj 19 70 r read-sample; +#X obj 19 95 unpack s f; +#X obj 53 121 s insamprate; +#X obj 19 171 soundfiler; +#X msg 19 147 read -resize \$1 sample; +#X obj 19 201 s insamplength; +#X msg 357 197 \; sample resize 220500 \; insamplength 220500; +#X connect 1 0 2 0; +#X connect 2 0 5 0; +#X connect 2 1 3 0; +#X connect 4 0 6 0; +#X connect 5 0 4 0; +#X restore 647 409 pd insample; +#X text 536 219 read a sample; +#X msg 446 240 \; read-sample ../sound/bell.aiff 44100; +#X connect 0 0 5 0; +#X connect 1 0 3 0; +#X connect 3 0 2 0; +#X connect 3 0 2 1; +#X connect 6 0 3 1; +#X connect 7 0 12 0; +#X connect 8 0 7 0; +#X connect 9 0 8 0; +#X connect 13 0 6 0; +#X connect 14 0 15 0; +#X connect 15 0 20 1; +#X connect 17 0 22 0; +#X connect 18 0 17 0; +#X connect 19 0 20 0; +#X connect 19 0 22 0; +#X connect 20 0 21 0; +#X connect 27 0 28 0; +#X connect 29 0 27 0; +#X connect 33 0 27 0; +#X connect 40 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 1 0; diff --git a/pd/doc/4.fft.examples/06.sheepgoat2.pd b/pd/doc/4.fft.examples/06.sheepgoat2.pd new file mode 100644 index 00000000..b62cc7a5 --- /dev/null +++ b/pd/doc/4.fft.examples/06.sheepgoat2.pd @@ -0,0 +1,365 @@ +#N canvas 5 22 761 478 12; +#N canvas 6 0 911 637 fft-analysis 0; +#X obj 581 379 *~; +#X obj 542 379 *~; +#X obj 542 407 -~; +#X obj 62 529 *~; +#X obj 318 304 *~; +#X obj 243 145 *~; +#X obj 279 144 *~; +#X obj 205 144 *~; +#X obj 166 144 *~; +#X obj 166 172 +~; +#X obj 25 597 *~; +#X floatatom 643 486; +#X obj 357 221 *~; +#X obj 94 77 *~; +#X obj 114 50 inlet~; +#X obj 37 21 tabreceive~ hanning; +#X obj 94 101 rfft~; +#X obj 25 573 rifft~; +#X obj 25 623 outlet~; +#X text 43 3 Hanning window; +#X text 123 84 forward real FFT; +#X obj 318 220 *~; +#X obj 318 249 +~; +#X obj 783 612 block~ 2048 4; +#X obj 283 45 tabreceive~ last-real; +#X text 390 13 previous analysis; +#X obj 478 45 tabreceive~ last-imag; +#X obj 318 276 rsqrt~; +#X text 390 224 inverse modulus; +#X obj 244 173 -~; +#X obj 260 304 *~; +#X obj 146 453 *~; +#X obj 100 505 tabsend~ last-real; +#X obj 138 481 tabsend~ last-imag; +#X text 174 449 sic; +#X obj 626 559 -~; +#X obj 627 586 *~; +#X obj 628 612 clip~ 0 1; +#X obj 644 435 r threshold; +#X obj 14 548 *~; +#X text 328 145 quotient (current/last); +#X obj 643 510 t f f; +#X obj 643 535 *; +#X obj 277 510 tabsend~ precess-real; +#X obj 535 327 tabreceive~ precess-real; +#X obj 724 327 tabreceive~ precess-imag; +#X obj 317 480 tabsend~ precess-imag; +#X text 621 364 imaginary part of quotient; +#X obj 539 440 *~; +#X obj 643 462 / 100; +#X text 374 270 normalized quotient \, which encodes the phase precession in the bin between two successive analyses.; +#X text 623 381 of successive phase precession; +#X text 621 397 values gives pitch stability; +#X obj 731 492 r flip; +#X obj 731 517 sel 0; +#X msg 798 547 1e+20; +#X msg 731 548 -1e+20; +#X obj 9 370 *~ 0.001; +#X obj 73 371 *~ 0.001; +#X connect 0 0 2 1; +#X connect 1 0 2 0; +#X connect 2 0 31 0; +#X connect 2 0 48 0; +#X connect 2 0 48 1; +#X connect 3 0 17 1; +#X connect 4 0 46 0; +#X connect 4 0 1 0; +#X connect 5 0 29 0; +#X connect 6 0 29 1; +#X connect 7 0 9 1; +#X connect 8 0 9 0; +#X connect 9 0 30 0; +#X connect 9 0 21 0; +#X connect 9 0 21 1; +#X connect 10 0 18 0; +#X connect 11 0 41 0; +#X connect 12 0 22 1; +#X connect 13 0 16 0; +#X connect 14 0 13 1; +#X connect 15 0 10 1; +#X connect 15 0 13 0; +#X connect 16 0 6 0; +#X connect 16 0 8 0; +#X connect 16 0 32 0; +#X connect 16 0 57 0; +#X connect 16 1 7 0; +#X connect 16 1 5 0; +#X connect 16 1 33 0; +#X connect 16 1 58 0; +#X connect 17 0 10 0; +#X connect 21 0 22 0; +#X connect 22 0 27 0; +#X connect 24 0 8 1; +#X connect 24 0 5 1; +#X connect 26 0 7 1; +#X connect 26 0 6 1; +#X connect 27 0 4 1; +#X connect 27 0 30 1; +#X connect 29 0 4 0; +#X connect 29 0 12 0; +#X connect 29 0 12 1; +#X connect 30 0 43 0; +#X connect 30 0 0 0; +#X connect 31 0 33 0; +#X connect 31 0 32 0; +#X connect 31 0 43 0; +#X connect 31 0 46 0; +#X connect 35 0 36 0; +#X connect 36 0 37 0; +#X connect 37 0 3 1; +#X connect 37 0 39 1; +#X connect 38 0 49 0; +#X connect 39 0 17 0; +#X connect 41 0 42 0; +#X connect 41 1 42 1; +#X connect 42 0 35 1; +#X connect 44 0 1 1; +#X connect 45 0 0 1; +#X connect 48 0 35 0; +#X connect 49 0 11 0; +#X connect 53 0 54 0; +#X connect 54 0 56 0; +#X connect 54 1 55 0; +#X connect 55 0 36 1; +#X connect 56 0 36 1; +#X connect 57 0 39 0; +#X connect 58 0 3 0; +#X restore 58 368 pd fft-analysis; +#X floatatom 207 217; +#X obj 58 416 dac~; +#X obj 58 388 *~; +#N canvas 662 12 796 785 previous-analysis 0; +#X graph graph1 0 -1 2048 1 344 407 744 107; +#X array last-real 2048 float; +#X pop; +#X graph graph2 0 -1 2048 1 349 719 749 419; +#X array last-imag 2048 float; +#X pop; +#X msg 43 217 \; last-real resize 2048 \; last-imag resize 2048; +#X restore 262 368 pd previous-analysis; +#X obj 207 245 s threshold; +#X obj 106 421 line~; +#X floatatom 553 78; +#N canvas 194 37 397 591 output 0; +#X obj 73 225 t b; +#X obj 73 169 f; +#X obj 73 113 inlet; +#X text 79 89 mute; +#X obj 73 253 f; +#X msg 149 271 0; +#X msg 73 141 bang; +#X obj 73 197 moses 1; +#X obj 149 243 t b f; +#X obj 107 490 outlet; +#X msg 107 462 set \$1; +#X obj 206 181 moses 1; +#X obj 249 493 dbtorms; +#X obj 249 521 pack 0 100; +#X obj 206 153 r master-lvl; +#X obj 107 424 r master-lvl; +#X obj 92 317 s master-lvl; +#X obj 249 549 s master-amp; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X restore 553 50 pd output; +#X msg 553 22 mute; +#X text 596 69 MASTER; +#X text 596 84 LEVEL; +#X obj 553 106 s master-lvl; +#X obj 106 393 r master-amp; +#X obj 582 277 loadbang; +#X obj 582 305 samplerate~; +#X text 30 161 click here first; +#X obj 472 334 hip~ 5; +#X obj 472 306 adc~ 1; +#X msg 545 265 bang; +#X obj 545 306 f; +#X obj 545 334 s insamprate; +#X obj 472 362 tabwrite~ sample; +#X text 465 235 record your own sample; +#N canvas 190 37 605 462 hanning-window 0; +#X obj 108 242 phasor~; +#X obj 108 275 cos~; +#X obj 27 386 tabwrite~ hanning; +#X obj 35 297 -~; +#X obj 33 257 sig~ 1; +#X msg 44 212 0; +#X text 166 16 CALCULATE HANNING; +#X text 166 32 WINDOW TABLE; +#X graph graph1 0 -1 2047 1 369 373 569 223; +#X array hanning 2048 float; +#X pop; +#X obj 109 154 / 1024; +#X obj 109 201 sig~; +#X text 171 152 sample rate / window size; +#X msg 27 169 bang; +#X obj 78 316 sig~ 0.5; +#X obj 58 353 *~; +#X obj 79 113 samplerate~; +#X obj 29 27 r window-size; +#X obj 29 62 t b f; +#X msg 385 402 \; hanning resize 2048; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 3 0 14 0; +#X connect 4 0 3 0; +#X connect 5 0 0 1; +#X connect 9 0 10 0; +#X connect 10 0 0 0; +#X connect 12 0 2 0; +#X connect 12 0 5 0; +#X connect 13 0 14 1; +#X connect 14 0 2 0; +#X connect 15 0 9 0; +#X connect 16 0 17 0; +#X connect 17 0 15 0; +#X connect 17 0 12 0; +#X connect 17 1 9 1; +#X restore 262 340 pd hanning-window; +#X text 121 15 PITCHED/UNPITCHED SEPARATION; +#X floatatom 356 205; +#X obj 356 233 s flip; +#X msg 356 177 0; +#X text 363 129 select:; +#X text 326 157 pitched; +#X text 391 156 noisy; +#X msg 391 176 1; +#X text 198 155 threshold; +#X text 204 171 (range; +#X text 207 189 0-100); +#X text 21 73 A low threshold means to let only very coherent signals through. A high one permits more of the signal to be considered "pitched". You can select either to hear the pitched or the noisy part.; +#N canvas 0 0 843 816 phase-precession 0; +#X graph graph1 0 -1 2048 1 349 423 749 123; +#X array precess-real 2048 float; +#X pop; +#X graph graph2 0 -1 2048 1 348 749 748 449; +#X array precess-imag 2048 float; +#X pop; +#X msg 45 91 \; precess-real resize 2048 \; precess-imag resize 2048; +#X restore 262 396 pd phase-precession; +#X msg 23 182 \; window-size 2048 \; flip 0 \; pd dsp 1; +#X text 20 35 Another patch to separate pitched from unpitched signals. This one does a frequency estimate for each bin and checks whether the frequency seems to be changing quickly or not.; +#X floatatom 58 323; +#X text 143 302 noise; +#X text 84 282 amplitudes; +#X floatatom 143 319; +#N canvas 190 43 534 552 test-signal 0; +#X obj 134 293 tabread4~ sample; +#X obj 134 268 line~; +#X obj 95 146 f; +#X obj 184 123 r insamprate; +#X obj 320 380 *~; +#X obj 136 350 *~; +#X obj 323 261 noise~; +#X obj 136 397 +~; +#X obj 164 351 dbtorms; +#X obj 346 380 dbtorms; +#X obj 164 328 inlet; +#X obj 346 358 inlet; +#X obj 323 337 *~; +#X obj 323 283 bp~ 2000 7; +#X obj 136 449 outlet~; +#X obj 110 98 r insamplength; +#X msg 134 247 0 \, \$1 \$2; +#X obj 134 221 pack 0 0; +#X obj 180 199 /; +#X obj 184 147 * 0.001; +#X obj 180 171 t b f; +#X text 312 234 nasty non-flat noise; +#X obj 136 422 hip~ 5; +#X obj 90 7 loadbang; +#X text 242 13 sample playback; +#X msg 90 27 1; +#X obj 89 67 metro 1000; +#X floatatom 89 46; +#X obj 346 314 phasor~ 3000; +#X connect 0 0 5 0; +#X connect 1 0 0 0; +#X connect 2 0 17 0; +#X connect 2 0 18 0; +#X connect 3 0 19 0; +#X connect 4 0 7 1; +#X connect 5 0 7 0; +#X connect 6 0 13 0; +#X connect 7 0 22 0; +#X connect 8 0 5 1; +#X connect 9 0 4 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 12 0 4 0; +#X connect 13 0 12 0; +#X connect 15 0 2 1; +#X connect 16 0 1 0; +#X connect 17 0 16 0; +#X connect 18 0 17 1; +#X connect 18 0 26 1; +#X connect 19 0 20 0; +#X connect 20 0 18 0; +#X connect 20 1 18 1; +#X connect 22 0 14 0; +#X connect 23 0 25 0; +#X connect 25 0 27 0; +#X connect 26 0 2 0; +#X connect 27 0 26 0; +#X connect 28 0 12 1; +#X restore 58 345 pd test-signal; +#X text 53 301 sampler; +#X text 549 158 read a sample; +#X msg 459 179 \; read-sample ../sound/bell.aiff 44100; +#N canvas 132 255 634 335 insample 0; +#X graph graph1 0 -1 155947 1 180 168 580 18; +#X array sample 155948 float; +#X pop; +#X obj 19 70 r read-sample; +#X obj 19 95 unpack s f; +#X obj 53 121 s insamprate; +#X obj 19 171 soundfiler; +#X msg 19 147 read -resize \$1 sample; +#X obj 19 201 s insamplength; +#X msg 357 197 \; sample resize 220500 \; insamplength 220500; +#X connect 1 0 2 0; +#X connect 2 0 5 0; +#X connect 2 1 3 0; +#X connect 4 0 6 0; +#X connect 5 0 4 0; +#X restore 261 310 pd insample; +#X connect 0 0 3 0; +#X connect 1 0 5 0; +#X connect 3 0 2 0; +#X connect 3 0 2 1; +#X connect 6 0 3 1; +#X connect 7 0 12 0; +#X connect 8 0 7 0; +#X connect 9 0 8 0; +#X connect 13 0 6 0; +#X connect 14 0 15 0; +#X connect 15 0 20 1; +#X connect 17 0 22 0; +#X connect 18 0 17 0; +#X connect 19 0 20 0; +#X connect 19 0 22 0; +#X connect 20 0 21 0; +#X connect 26 0 27 0; +#X connect 28 0 26 0; +#X connect 32 0 26 0; +#X connect 40 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 0 0; diff --git a/pd/doc/4.fft.examples/07.tinbell.pd b/pd/doc/4.fft.examples/07.tinbell.pd new file mode 100644 index 00000000..59ca1970 --- /dev/null +++ b/pd/doc/4.fft.examples/07.tinbell.pd @@ -0,0 +1,248 @@ +#N canvas 175 36 759 457 12; +#N canvas 147 -3 718 530 fft-analysis 0; +#X obj 138 257 *~; +#X obj 122 286 *~; +#X obj 87 286 *~; +#X obj 86 71 *~; +#X obj 117 71 inlet~; +#X obj 86 94 rfft~; +#X obj 60 351 *~; +#X obj 190 136 *~; +#X obj 63 40 tabreceive~ hanning; +#X obj 87 309 rifft~; +#X obj 60 374 outlet~; +#X obj 156 136 *~; +#X obj 156 159 +~; +#X obj 166 257 sig~ 0.001; +#X obj 185 349 block~ 1024 4; +#X obj 156 184 rsqrt~; +#X obj 217 187 sig~ 1e-20; +#X obj 156 211 clip~; +#X text 37 2 What does this do?; +#X floatatom 462 156; +#X obj 462 67 r squelch; +#X obj 462 177 moses; +#X msg 461 207 0; +#X obj 461 90 t f f; +#X obj 462 113 *; +#X obj 462 134 * 0.01; +#X connect 0 0 1 1; +#X connect 0 0 2 1; +#X connect 1 0 9 1; +#X connect 2 0 9 0; +#X connect 3 0 5 0; +#X connect 4 0 3 1; +#X connect 5 0 11 0; +#X connect 5 0 11 1; +#X connect 5 0 2 0; +#X connect 5 1 7 0; +#X connect 5 1 7 1; +#X connect 5 1 1 0; +#X connect 6 0 10 0; +#X connect 7 0 12 1; +#X connect 8 0 3 0; +#X connect 8 0 6 0; +#X connect 9 0 6 1; +#X connect 11 0 12 0; +#X connect 12 0 15 0; +#X connect 13 0 0 1; +#X connect 15 0 17 0; +#X connect 16 0 15 0; +#X connect 17 0 0 0; +#X connect 19 0 21 0; +#X connect 20 0 23 0; +#X connect 21 0 22 0; +#X connect 21 1 17 2; +#X connect 22 0 17 2; +#X connect 23 0 24 0; +#X connect 23 0 24 1; +#X connect 24 0 25 0; +#X connect 25 0 19 0; +#X restore 74 366 pd fft-analysis; +#X floatatom 192 206; +#X obj 74 414 dac~; +#X obj 74 390 *~; +#X obj 119 414 line~; +#X floatatom 587 68; +#N canvas 194 37 397 591 output 0; +#X obj 62 191 t b; +#X obj 62 144 f; +#X obj 62 96 inlet; +#X text 67 76 mute; +#X obj 62 215 f; +#X msg 127 230 0; +#X msg 62 120 bang; +#X obj 62 167 moses 1; +#X obj 127 207 t b f; +#X obj 91 417 outlet; +#X msg 91 393 set \$1; +#X obj 175 154 moses 1; +#X obj 212 419 dbtorms; +#X obj 212 443 pack 0 100; +#X obj 175 130 r master-lvl; +#X obj 91 360 r master-lvl; +#X obj 78 269 s master-lvl; +#X obj 212 467 s master-amp; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X restore 587 44 pd output; +#X msg 587 20 mute; +#X text 624 60 MASTER; +#X text 623 74 LEVEL; +#X obj 587 92 s master-lvl; +#X obj 119 390 r master-amp; +#X obj 664 177 loadbang; +#X obj 664 201 samplerate~; +#X text 30 187 click here first; +#X text 361 166 read a sample; +#X obj 562 225 hip~ 5; +#X obj 562 201 adc~ 1; +#X msg 624 170 bang; +#X obj 624 201 f; +#X obj 624 225 s insamprate; +#X obj 562 248 tabwrite~ sample; +#N canvas 107 33 607 436 hanning-window 0; +#X obj 92 206 phasor~; +#X obj 92 234 cos~; +#X obj 23 328 tabwrite~ hanning; +#X obj 30 252 -~; +#X obj 28 218 sig~ 1; +#X msg 37 180 0; +#X text 141 13 CALCULATE HANNING; +#X text 141 27 WINDOW TABLE; +#X graph graph1 0 -1 1024 1 295 345 495 195; +#X array hanning 1024 float; +#X pop; +#X msg 304 374 \; hanning resize 1024; +#X obj 93 131 / 1024; +#X obj 93 171 sig~; +#X text 175 148 sample rate / window size; +#X msg 23 144 bang; +#X obj 66 269 sig~ 0.5; +#X obj 49 300 *~; +#X obj 67 96 samplerate~; +#X obj 25 23 r window-size; +#X obj 25 53 t b f; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 3 0 15 0; +#X connect 4 0 3 0; +#X connect 5 0 0 1; +#X connect 10 0 11 0; +#X connect 11 0 0 0; +#X connect 13 0 2 0; +#X connect 13 0 5 0; +#X connect 14 0 15 1; +#X connect 15 0 2 0; +#X connect 16 0 10 0; +#X connect 17 0 18 0; +#X connect 18 0 16 0; +#X connect 18 0 13 0; +#X connect 18 1 10 1; +#X restore 521 332 pd hanning-window; +#X msg 24 205 \; window-size 1024 \; pd dsp 1; +#X obj 192 230 s squelch; +#X text 116 3 BOOSTING SMALL AMPLITUDES; +#X text 614 146 record; +#X floatatom 75 316; +#N canvas 190 43 405 461 test-signal 0; +#X obj 134 293 tabread4~ sample; +#X obj 134 268 line~; +#X obj 95 146 f; +#X obj 254 46 r insamprate; +#X obj 136 350 *~; +#X obj 164 351 dbtorms; +#X obj 164 328 inlet; +#X obj 135 415 outlet~; +#X obj 146 33 r insamplength; +#X msg 134 247 0 \, \$1 \$2; +#X obj 134 221 pack 0 0; +#X obj 209 190 /; +#X obj 299 99 * 0.001; +#X obj 135 388 hip~ 5; +#X obj 33 5 loadbang; +#X text 242 13 sample playback; +#X msg 33 25 1; +#X obj 33 69 metro 1000; +#X floatatom 33 48; +#X obj 255 75 t b b f; +#X obj 161 84 t b f; +#X connect 0 0 4 0; +#X connect 1 0 0 0; +#X connect 2 0 10 0; +#X connect 3 0 19 0; +#X connect 4 0 13 0; +#X connect 5 0 4 1; +#X connect 6 0 5 0; +#X connect 8 0 20 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 11 0 10 1; +#X connect 11 0 17 1; +#X connect 12 0 11 1; +#X connect 13 0 7 0; +#X connect 14 0 16 0; +#X connect 16 0 18 0; +#X connect 17 0 2 0; +#X connect 18 0 17 0; +#X connect 19 0 16 0; +#X connect 19 1 11 0; +#X connect 19 2 12 0; +#X connect 20 0 16 0; +#X connect 20 1 11 0; +#X connect 20 1 2 1; +#X restore 75 339 pd test-signal; +#X text 76 294 amplitude; +#N canvas 132 255 634 331 insample 0; +#X graph graph1 0 -1 155947 1 199 168 599 18; +#X array sample 155948 float; +#X pop; +#X obj 19 70 r read-sample; +#X obj 19 95 unpack s f; +#X obj 53 121 s insamprate; +#X obj 19 171 soundfiler; +#X msg 19 147 read -resize \$1 sample; +#X obj 19 201 s insamplength; +#X msg 357 197 \; sample resize 220500 \; insamplength 220500; +#X connect 1 0 2 0; +#X connect 2 0 5 0; +#X connect 2 1 3 0; +#X connect 4 0 6 0; +#X connect 5 0 4 0; +#X restore 521 357 pd insample; +#X msg 282 189 \; read-sample ../sound/bell.aiff 44100; +#X text 38 27 the "fft analysis" window here simply divides each complex bin of the FFT by its own magnitude to "flatten" the spectrum. The "squelch" control limits the amplitude boost the algorithm will apply. If infinite \, you'll get a white spectrum \; if less \, the louder parts of the spectrum will be flattened but the quieter ones will only be boosetd by the squelch value.; +#X msg 281 229 \; read-sample ../sound/voice.wav 32000; +#X connect 0 0 3 0; +#X connect 1 0 24 0; +#X connect 3 0 2 0; +#X connect 3 0 2 1; +#X connect 4 0 3 1; +#X connect 5 0 10 0; +#X connect 6 0 5 0; +#X connect 7 0 6 0; +#X connect 11 0 4 0; +#X connect 12 0 13 0; +#X connect 13 0 19 1; +#X connect 16 0 21 0; +#X connect 17 0 16 0; +#X connect 18 0 19 0; +#X connect 18 0 21 0; +#X connect 19 0 20 0; +#X connect 27 0 28 0; +#X connect 28 0 0 0; diff --git a/pd/doc/4.fft.examples/08.convobros.pd b/pd/doc/4.fft.examples/08.convobros.pd new file mode 100644 index 00000000..8e49ef3d --- /dev/null +++ b/pd/doc/4.fft.examples/08.convobros.pd @@ -0,0 +1,344 @@ +#N canvas 16 29 916 517 12; +#N canvas 147 -3 669 492 fft-analysis 0; +#X obj 265 254 *~; +#X obj 249 284 *~; +#X obj 214 284 *~; +#X obj 114 120 *~; +#X obj 80 114 *~; +#X obj 80 137 +~; +#X obj 213 68 *~; +#X obj 245 68 inlet~; +#X obj 213 91 rfft~; +#X obj 59 304 *~; +#X floatatom 462 156 0 0 0; +#X obj 317 133 *~; +#X obj 80 68 *~; +#X obj 113 68 inlet~; +#X obj 61 34 tabreceive~ hanning; +#X obj 80 91 rfft~; +#X obj 214 307 rifft~; +#X obj 59 327 outlet~; +#X text 37 2 Hanning window; +#X obj 284 133 *~; +#X obj 284 156 +~; +#X obj 293 254 sig~ 0.001; +#X text 129 165 modulus; +#X obj 80 160 sqrt~; +#X obj 265 231 *~; +#X obj 462 67 r squelch; +#X obj 313 346 block~ 1024 4; +#X obj 284 182 rsqrt~; +#X obj 344 184 sig~ 1e-20; +#X obj 284 208 clip~; +#X obj 462 177 moses; +#X msg 457 221 0; +#X obj 461 90 t f f; +#X obj 462 113 *; +#X obj 462 134 * 0.01; +#X connect 0 0 1 1; +#X connect 0 0 2 1; +#X connect 1 0 16 1; +#X connect 2 0 16 0; +#X connect 3 0 5 1; +#X connect 4 0 5 0; +#X connect 5 0 23 0; +#X connect 6 0 8 0; +#X connect 7 0 6 1; +#X connect 8 0 19 0; +#X connect 8 0 19 1; +#X connect 8 0 2 0; +#X connect 8 1 11 0; +#X connect 8 1 11 1; +#X connect 8 1 1 0; +#X connect 9 0 17 0; +#X connect 10 0 30 0; +#X connect 11 0 20 1; +#X connect 12 0 15 0; +#X connect 13 0 12 1; +#X connect 14 0 12 0; +#X connect 14 0 6 0; +#X connect 14 0 9 0; +#X connect 15 0 4 0; +#X connect 15 0 4 1; +#X connect 15 1 3 0; +#X connect 15 1 3 1; +#X connect 16 0 9 1; +#X connect 19 0 20 0; +#X connect 20 0 27 0; +#X connect 21 0 0 1; +#X connect 23 0 24 0; +#X connect 24 0 0 0; +#X connect 25 0 32 0; +#X connect 27 0 29 0; +#X connect 28 0 27 0; +#X connect 29 0 24 1; +#X connect 30 0 31 0; +#X connect 30 1 29 2; +#X connect 31 0 29 2; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 34 0; +#X connect 34 0 10 0; +#X restore 119 405 pd fft-analysis; +#X floatatom 190 159 0 0 0; +#X obj 119 453 dac~; +#X obj 119 429 *~; +#X obj 164 453 line~; +#X floatatom 587 68 0 0 0; +#N canvas 194 37 397 591 output 0; +#X obj 62 191 t b; +#X obj 62 144 f; +#X obj 62 96 inlet; +#X text 67 76 mute; +#X obj 62 215 f; +#X msg 127 230 0; +#X msg 62 120 bang; +#X obj 62 167 moses 1; +#X obj 127 207 t b f; +#X obj 91 417 outlet; +#X msg 91 393 set \$1; +#X obj 175 154 moses 1; +#X obj 212 419 dbtorms; +#X obj 212 443 pack 0 100; +#X obj 175 130 r master-lvl; +#X obj 91 360 r master-lvl; +#X obj 78 269 s master-lvl; +#X obj 212 467 s master-amp; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X restore 587 44 pd output; +#X msg 587 20 mute; +#X text 624 61 MASTER; +#X text 624 75 LEVEL; +#X obj 587 92 s master-lvl; +#X obj 164 429 r master-amp; +#X obj 424 420 loadbang; +#X obj 424 443 samplerate~; +#X obj 424 467 s srate; +#X text 31 137 click here first; +#X obj 724 237 hip~ 5; +#X obj 724 213 adc~ 1; +#X msg 786 182 bang; +#X obj 814 213 r srate; +#X obj 786 213 f; +#X obj 786 237 s insamprate; +#X obj 724 260 tabwrite~ sample; +#N canvas 275 71 767 761 hanning-window 0; +#X obj 92 206 phasor~; +#X obj 92 234 cos~; +#X obj 23 328 tabwrite~ hanning; +#X obj 30 252 -~; +#X obj 28 218 sig~ 1; +#X msg 37 180 0; +#X text 141 13 CALCULATE HANNING; +#X text 141 27 WINDOW TABLE; +#X graph graph1 0 -1 1024 1 275 581 675 281; +#X array hanning 1024 float 0; +#X pop; +#X msg 275 547 \; hanning resize 1024; +#X obj 93 131 / 1024; +#X obj 93 171 sig~; +#X text 175 148 sample rate / window size; +#X msg 23 144 bang; +#X obj 66 269 sig~ 0.5; +#X obj 49 300 *~; +#X obj 67 96 samplerate~; +#X obj 25 23 r window-size; +#X obj 25 53 t b f; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 3 0 15 0; +#X connect 4 0 3 0; +#X connect 5 0 0 1; +#X connect 10 0 11 0; +#X connect 11 0 0 0; +#X connect 13 0 2 0; +#X connect 13 0 5 0; +#X connect 14 0 15 1; +#X connect 15 0 2 0; +#X connect 16 0 10 0; +#X connect 17 0 18 0; +#X connect 18 0 16 0; +#X connect 18 0 13 0; +#X connect 18 1 10 1; +#X restore 419 387 pd hanning-window; +#X msg 25 155 \; window-size 1024 \; pd dsp 1; +#X obj 190 183 s squelch; +#X obj 725 388 hip~ 5; +#X obj 725 364 adc~ 1; +#X msg 787 333 bang; +#X obj 815 364 r srate; +#X obj 787 364 f; +#X obj 787 388 s insamprate; +#X obj 725 412 tabwrite~ sample2; +#X text 177 6 CORT&ZACK's SECRET; +#X text 190 137 range 1-100; +#N canvas 190 43 743 445 test-signal 0; +#X obj 78 265 tabread4~ sample; +#X obj 78 244 line~; +#X obj 78 158 f; +#X obj 238 62 r insamprate; +#X obj 79 369 outlet~; +#X obj 130 54 r insamplength; +#X msg 78 223 0 \, \$1 \$2; +#X obj 78 202 pack 0 0; +#X obj 175 196 /; +#X obj 283 111 * 0.001; +#X obj 79 346 hip~ 5; +#X obj 25 29 loadbang; +#X text 150 24 sample playback; +#X msg 25 55 1; +#X obj 25 93 metro 1000; +#X floatatom 25 75 0 0 0; +#X obj 239 87 t b b f; +#X obj 134 105 t b f; +#X obj 445 256 line~; +#X obj 445 170 f; +#X obj 446 381 outlet~; +#X msg 445 235 0 \, \$1 \$2; +#X obj 445 214 pack 0 0; +#X obj 542 208 /; +#X obj 650 123 * 0.001; +#X obj 446 358 hip~ 5; +#X obj 392 41 loadbang; +#X msg 392 67 1; +#X obj 392 105 metro 1000; +#X floatatom 392 87 0 0 0; +#X obj 606 99 t b b f; +#X obj 501 117 t b f; +#X obj 445 277 tabread4~ sample2; +#X obj 497 66 r insamplength2; +#X obj 605 74 r insamprate2; +#X connect 0 0 10 0; +#X connect 1 0 0 0; +#X connect 2 0 7 0; +#X connect 3 0 16 0; +#X connect 5 0 17 0; +#X connect 6 0 1 0; +#X connect 7 0 6 0; +#X connect 8 0 7 1; +#X connect 8 0 14 1; +#X connect 9 0 8 1; +#X connect 10 0 4 0; +#X connect 11 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 2 0; +#X connect 15 0 14 0; +#X connect 16 0 13 0; +#X connect 16 1 8 0; +#X connect 16 2 9 0; +#X connect 17 0 13 0; +#X connect 17 1 8 0; +#X connect 17 1 2 1; +#X connect 18 0 32 0; +#X connect 19 0 22 0; +#X connect 21 0 18 0; +#X connect 22 0 21 0; +#X connect 23 0 22 1; +#X connect 23 0 28 1; +#X connect 24 0 23 1; +#X connect 25 0 20 0; +#X connect 26 0 27 0; +#X connect 27 0 29 0; +#X connect 28 0 19 0; +#X connect 29 0 28 0; +#X connect 30 0 27 0; +#X connect 30 1 23 0; +#X connect 30 2 24 0; +#X connect 31 0 27 0; +#X connect 31 1 23 0; +#X connect 31 1 19 1; +#X connect 32 0 25 0; +#X connect 33 0 31 0; +#X connect 34 0 30 0; +#X restore 117 371 pd test-signal; +#N canvas 132 255 634 327 insample 0; +#X graph graph1 0 -1 155947 1 199 168 599 18; +#X array sample 155948 float 0; +#X pop; +#X obj 19 70 r read-sample; +#X obj 19 95 unpack s f; +#X obj 53 121 s insamprate; +#X obj 19 171 soundfiler; +#X msg 19 147 read -resize \$1 sample; +#X obj 19 201 s insamplength; +#X msg 357 197 \; sample resize 220500 \; insamplength 220500; +#X connect 1 0 2 0; +#X connect 2 0 5 0; +#X connect 2 1 3 0; +#X connect 4 0 6 0; +#X connect 5 0 4 0; +#X restore 417 332 pd insample; +#N canvas 0 0 647 284 insample2 0; +#X obj 19 95 unpack s f; +#X obj 19 171 soundfiler; +#X msg 357 197 \; sample resize 220500 \; insamplength 220500; +#X graph graph2 0 -1 63023 1 207 159 607 19; +#X array sample2 63024 float 0; +#X pop; +#X obj 53 121 s insamprate2; +#X msg 19 147 read -resize \$1 sample2; +#X obj 19 201 s insamplength2; +#X obj 19 70 r read-sample2; +#X connect 0 0 5 0; +#X connect 0 1 4 0; +#X connect 1 0 6 0; +#X connect 5 0 1 0; +#X connect 7 0 0 0; +#X restore 418 358 pd insample2; +#X msg 19 230 \; read-sample ../sound/bell.aiff 44100; +#X msg 357 230 \; read-sample2 ../sound/bell.aiff 44100; +#X text 247 364 filter; +#X text 249 379 input; +#X text 51 401 source; +#X text 53 362 filter; +#X text 52 382 control; +#X text 719 158 record sample; +#X text 720 309 record sample2; +#X text 37 60 To get sound \, you have to "click here first" \, set +squelch to 10 or so \, read or record two samples \, and ease up the +master volume.; +#X msg 20 274 \; read-sample ../sound/voice.wav 32000; +#X msg 358 274 \; read-sample2 ../sound/voice.wav 32000; +#X text 37 27 This is an FFT based vocoder such as the one the Convo +bros showed at the Ann Arbor ICMC.; +#X connect 0 0 3 0; +#X connect 1 0 25 0; +#X connect 3 0 2 0; +#X connect 3 0 2 1; +#X connect 4 0 3 1; +#X connect 5 0 10 0; +#X connect 6 0 5 0; +#X connect 7 0 6 0; +#X connect 11 0 4 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 16 0 22 0; +#X connect 17 0 16 0; +#X connect 18 0 20 0; +#X connect 18 0 22 0; +#X connect 19 0 20 1; +#X connect 20 0 21 0; +#X connect 26 0 32 0; +#X connect 27 0 26 0; +#X connect 28 0 30 0; +#X connect 28 0 32 0; +#X connect 29 0 30 1; +#X connect 30 0 31 0; +#X connect 35 0 0 0; +#X connect 35 1 0 1; diff --git a/pd/doc/4.fft.examples/09.pvoc.pd b/pd/doc/4.fft.examples/09.pvoc.pd new file mode 100644 index 00000000..495fd535 --- /dev/null +++ b/pd/doc/4.fft.examples/09.pvoc.pd @@ -0,0 +1,397 @@ +#N canvas 100 38 719 544 12; +#X floatatom 283 336; +#X msg 569 149 bang; +#X floatatom 197 329; +#X floatatom 90 330; +#N canvas 0 2 986 683 fft-analysis 0; +#X obj 261 297 *~; +#X obj 230 297 *~; +#X obj 230 319 -~; +#X obj 326 298 *~; +#X obj 295 298 *~; +#X obj 295 320 +~; +#X obj 340 128 *~; +#X obj 309 128 *~; +#X obj 281 128 *~; +#X obj 250 128 *~; +#X obj 250 150 +~; +#X obj 220 179 *~; +#X obj 86 556 *~; +#X obj 366 251 rfft~; +#X obj 387 53 rfft~; +#X obj 477 637 *~; +#X obj 685 288 r window-size; +#X obj 751 201 r sample-rate; +#X obj 609 234 f; +#X obj 603 52 r sample-rate; +#X obj 578 29 r window-size; +#X obj 601 98 t b f; +#X obj 578 121 /; +#X obj 507 637 *~; +#X obj 87 536 *~; +#X obj 103 513 rifft~; +#X obj 87 582 outlet~; +#X obj 625 446 print~; +#X msg 624 418 bang; +#X text 152 513 inverse real FFT; +#X obj 589 210 bang~; +#X obj 516 424 line~; +#X obj 578 143 * 1000; +#X text 630 136 window size (msec); +#X obj 603 76 * 4; +#X obj 632 159 r speed; +#X obj 709 160 r location; +#X obj 640 235 +; +#X obj 633 200 *; +#X msg 710 188 0; +#X obj 609 341 +; +#X obj 600 298 t f f; +#X msg 516 396 \$1 \, \$2 \$3; +#X obj 516 369 pack 0 0 0; +#X obj 752 229 / 1000; +#X obj 609 269 *; +#X text 639 270 reading location (samples); +#X obj 637 381 / 4; +#X text 669 386 hop size (samples); +#X obj 564 464 sig~; +#X obj 534 463 +~; +#X text 638 82 (overlap times parent SR); +#X text 638 69 local sample rate; +#X obj 23 51 tabreceive~ phase-real; +#X obj 190 179 *~; +#X obj 190 201 +~; +#X obj 190 225 rsqrt~; +#X obj 309 150 -~; +#X obj 231 255 *~; +#X obj 291 255 *~; +#X obj 198 51 tabreceive~ phase-imag; +#X obj 105 381 sig~; +#X obj 88 311 t b f; +#X msg 88 332 1; +#X obj 102 355 /; +#X obj 227 436 tabsend~ phase-real; +#X obj 256 408 tabsend~ phase-imag; +#X obj 104 133 sig~ 1.5e-20; +#X obj 632 180 * 0.01; +#X obj 691 212 s speed; +#X obj 468 251 s see-location; +#X obj 598 618 block~ 2048 4; +#X floatatom 672 360; +#X obj 670 339 *; +#X obj 829 234 r transpo; +#X obj 829 256 * 0.01; +#X obj 831 277 + 69; +#X obj 832 298 mtof; +#X obj 832 320 / 440; +#X obj 689 316 t b f; +#X obj 88 290 r window-size; +#X floatatom 835 353; +#X obj 551 543 tabreceive~ hanning; +#X obj 536 488 tabread4~ sample; +#X obj 502 513 tabread4~ sample; +#X connect 0 0 2 1; +#X connect 1 0 2 0; +#X connect 2 0 65 0; +#X connect 2 0 25 0; +#X connect 3 0 5 1; +#X connect 4 0 5 0; +#X connect 5 0 66 0; +#X connect 5 0 25 1; +#X connect 6 0 57 1; +#X connect 7 0 57 0; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 58 1; +#X connect 10 0 54 0; +#X connect 10 0 54 1; +#X connect 11 0 55 1; +#X connect 12 0 26 0; +#X connect 13 0 1 1; +#X connect 13 0 3 1; +#X connect 13 1 0 1; +#X connect 13 1 4 1; +#X connect 14 0 9 1; +#X connect 14 0 7 1; +#X connect 14 1 6 1; +#X connect 14 1 8 1; +#X connect 15 0 14 0; +#X connect 16 0 73 0; +#X connect 17 0 44 0; +#X connect 18 0 37 0; +#X connect 18 0 45 0; +#X connect 18 0 70 0; +#X connect 19 0 34 0; +#X connect 20 0 22 0; +#X connect 21 0 22 0; +#X connect 21 1 22 1; +#X connect 22 0 32 0; +#X connect 23 0 13 0; +#X connect 24 0 12 0; +#X connect 25 0 24 1; +#X connect 28 0 27 0; +#X connect 30 0 18 0; +#X connect 31 0 27 0; +#X connect 31 0 50 0; +#X connect 31 0 84 0; +#X connect 32 0 43 2; +#X connect 32 0 38 1; +#X connect 34 0 21 0; +#X connect 35 0 68 0; +#X connect 36 0 39 0; +#X connect 36 0 18 1; +#X connect 37 0 18 1; +#X connect 38 0 37 1; +#X connect 39 0 69 0; +#X connect 40 0 43 1; +#X connect 41 0 43 0; +#X connect 41 1 40 0; +#X connect 42 0 31 0; +#X connect 43 0 42 0; +#X connect 44 0 45 1; +#X connect 45 0 41 0; +#X connect 47 0 49 0; +#X connect 49 0 50 1; +#X connect 50 0 83 0; +#X connect 53 0 9 0; +#X connect 53 0 6 0; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 56 0 58 0; +#X connect 56 0 59 0; +#X connect 57 0 59 1; +#X connect 57 0 11 0; +#X connect 57 0 11 1; +#X connect 58 0 1 0; +#X connect 58 0 4 0; +#X connect 59 0 0 0; +#X connect 59 0 3 0; +#X connect 60 0 7 0; +#X connect 60 0 8 0; +#X connect 61 0 24 0; +#X connect 62 0 63 0; +#X connect 62 1 64 1; +#X connect 63 0 64 0; +#X connect 64 0 61 0; +#X connect 67 0 10 0; +#X connect 68 0 38 0; +#X connect 72 0 47 0; +#X connect 72 0 40 1; +#X connect 73 0 72 0; +#X connect 74 0 75 0; +#X connect 75 0 76 0; +#X connect 76 0 77 0; +#X connect 77 0 78 0; +#X connect 78 0 79 0; +#X connect 78 0 81 0; +#X connect 79 0 73 0; +#X connect 79 1 73 1; +#X connect 80 0 62 0; +#X connect 82 0 23 1; +#X connect 82 0 15 1; +#X connect 82 0 12 1; +#X connect 83 0 23 0; +#X connect 84 0 15 0; +#X restore 43 402 pd fft-analysis; +#X obj 43 488 dac~; +#N canvas 260 23 647 768 phase-tables 0; +#X graph graph2 0 -1 4096 1 172 590 572 290; +#X array phase-imag 4096 float; +#X pop; +#X graph graph3 0 -1 4096 1 170 317 570 17; +#X array phase-real 4096 float; +#X pop; +#X msg 167 564 \; phase-real resize 4096 \; phase-imag resize 4096; +#X restore 425 441 pd phase-tables; +#X obj 43 428 hip~ 5; +#X obj 43 458 *~; +#N canvas 249 280 600 398 loc&precess 0; +#X floatatom 160 229; +#X msg 270 175 set \$1; +#X obj 269 207 outlet; +#X obj 83 267 outlet; +#X obj 171 71 r location; +#X msg 82 235 set \$1; +#X obj 269 149 r speed; +#X obj 55 70 r see-location; +#X obj 67 102 t b f; +#X obj 82 214 f; +#X obj 54 127 int; +#X obj 54 151 sel 0; +#X msg 153 102 1; +#X msg 201 101 0; +#X obj 110 179 del 300; +#X connect 1 0 2 0; +#X connect 4 0 8 0; +#X connect 5 0 3 0; +#X connect 6 0 1 0; +#X connect 7 0 8 0; +#X connect 8 0 10 0; +#X connect 8 1 9 1; +#X connect 9 0 5 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 11 0 14 0; +#X connect 12 0 10 1; +#X connect 13 0 10 1; +#X connect 14 0 13 0; +#X connect 14 0 9 0; +#X restore 90 302 pd loc&precess; +#N canvas 0 0 600 400 setlocprecess 0; +#X obj 173 82 inlet; +#X obj 73 80 inlet; +#X obj 169 105 s speed; +#X obj 74 105 s location; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X restore 90 353 pd setlocprecess; +#X msg 47 313 0; +#X obj 612 162 adc~; +#X obj 283 361 s transpo; +#X obj 283 285 r transpo; +#X msg 283 311 set \$1; +#X msg 423 268 \; location 0 \; speed 200; +#N canvas 138 111 767 761 hanning-window 0; +#X obj 92 206 phasor~; +#X obj 92 234 cos~; +#X obj 23 328 tabwrite~ hanning; +#X obj 30 252 -~; +#X obj 28 218 sig~ 1; +#X msg 37 180 0; +#X text 141 13 CALCULATE HANNING; +#X text 141 27 WINDOW TABLE; +#X graph graph1 0 -1 4096 1 275 581 675 281; +#X array hanning 4096 float; +#X pop; +#X obj 93 171 sig~; +#X text 175 148 sample rate / window size; +#X msg 23 144 bang; +#X obj 66 269 sig~ 0.5; +#X obj 49 300 *~; +#X obj 94 80 samplerate~; +#X obj 25 23 r window-size; +#X obj 25 53 t b f; +#X msg 275 547 \; hanning resize 4096; +#X obj 93 132 /; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 3 0 13 0; +#X connect 4 0 3 0; +#X connect 5 0 0 1; +#X connect 9 0 0 0; +#X connect 11 0 2 0; +#X connect 11 0 5 0; +#X connect 12 0 13 1; +#X connect 13 0 2 0; +#X connect 14 0 18 0; +#X connect 15 0 16 0; +#X connect 16 0 14 0; +#X connect 16 0 11 0; +#X connect 16 1 18 1; +#X connect 18 0 9 0; +#X restore 423 464 pd hanning-window; +#X msg 31 172 \; window-size 2048 \; transpo 0 \; pd dsp 1; +#X floatatom 587 68; +#N canvas 194 37 397 591 output 0; +#X obj 62 191 t b; +#X obj 62 144 f; +#X obj 62 96 inlet; +#X text 67 76 mute; +#X obj 62 215 f; +#X msg 127 230 0; +#X msg 62 120 bang; +#X obj 62 167 moses 1; +#X obj 127 207 t b f; +#X obj 91 417 outlet; +#X msg 91 393 set \$1; +#X obj 175 154 moses 1; +#X obj 212 419 dbtorms; +#X obj 212 443 pack 0 100; +#X obj 175 130 r master-lvl; +#X obj 91 360 r master-lvl; +#X obj 78 269 s master-lvl; +#X obj 212 467 s master-amp; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X restore 587 44 pd output; +#X msg 587 20 mute; +#X text 624 60 MASTER; +#X text 623 74 LEVEL; +#X obj 587 92 s master-lvl; +#X text 41 153 click here first; +#X text 261 3 PHASE VOCODER; +#X obj 87 486 line~; +#X obj 87 462 r master-amp; +#X text 108 30 This is a Fourier-based analysis/resynthesis tool.; +#X text 55 251 set location; +#X text 54 265 and stop; +#X text 54 279 precession; +#X text 172 250 precession; +#X text 171 266 speed in; +#X text 171 280 hundredths; +#X text 281 244 transposition; +#X text 282 262 in cents; +#X text 491 223 examples; +#X text 428 248 contraction; +#X text 542 247 expansion; +#X msg 531 270 \; location 0 \; speed 10; +#X obj 425 340 loadbang; +#X obj 429 363 samplerate~; +#X obj 425 385 s sample-rate; +#N canvas 132 255 634 327 insample 0; +#X graph graph1 0 -1 155947 1 199 168 599 18; +#X array sample 155948 float; +#X pop; +#X obj 19 70 r read-sample; +#X obj 19 95 unpack s f; +#X obj 53 121 s insamprate; +#X obj 19 171 soundfiler; +#X msg 19 147 read -resize \$1 sample; +#X obj 19 201 s insamplength; +#X msg 357 197 \; sample resize 220500 \; insamplength 220500; +#X connect 1 0 2 0; +#X connect 2 0 5 0; +#X connect 2 1 3 0; +#X connect 4 0 6 0; +#X connect 5 0 4 0; +#X restore 425 415 pd insample; +#X msg 196 146 \; read-sample ../sound/bell.aiff \; transpo 0; +#X msg 196 197 \; read-sample ../sound/voice.wav \; transpo -530; +#X text 107 99 The second soundfile read button sets the transposition to correct for the 32000 sample rate of the file.; +#X text 108 50 You can move forward or backward in the sample \, or "freeze" at any point using the "precession" and "location" controls. Transposition is in hundredths of a half-tone.; +#X obj 569 184 tabwrite~ sample; +#X connect 0 0 13 0; +#X connect 1 0 50 0; +#X connect 2 0 10 1; +#X connect 3 0 10 0; +#X connect 4 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 5 0; +#X connect 8 0 5 1; +#X connect 9 0 3 0; +#X connect 9 1 2 0; +#X connect 11 0 3 0; +#X connect 12 0 50 0; +#X connect 14 0 15 0; +#X connect 15 0 0 0; +#X connect 19 0 24 0; +#X connect 20 0 19 0; +#X connect 21 0 20 0; +#X connect 27 0 8 1; +#X connect 28 0 27 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; diff --git a/pd/doc/4.fft.examples/10.phaselockedvoc.pd b/pd/doc/4.fft.examples/10.phaselockedvoc.pd new file mode 100644 index 00000000..7eea2f57 --- /dev/null +++ b/pd/doc/4.fft.examples/10.phaselockedvoc.pd @@ -0,0 +1,444 @@ +#N canvas 117 53 719 544 12; +#X floatatom 279 354 0 0 0; +#X msg 563 169 bang; +#X floatatom 186 351 0 0 0; +#X floatatom 84 350 0 0 0; +#N canvas 5 5 986 679 fft-analysis 0; +#X obj 177 242 *~; +#X obj 146 242 *~; +#X obj 146 264 -~; +#X obj 242 243 *~; +#X obj 211 243 *~; +#X obj 211 265 +~; +#X obj 256 73 *~; +#X obj 225 73 *~; +#X obj 197 73 *~; +#X obj 166 73 *~; +#X obj 166 95 +~; +#X obj 136 124 *~; +#X obj 49 560 *~; +#X obj 365 179 rfft~; +#X obj 291 34 rfft~; +#X obj 490 598 *~; +#X obj 685 288 r window-size; +#X obj 751 201 r sample-rate; +#X obj 609 234 f; +#X obj 603 52 r sample-rate; +#X obj 578 29 r window-size; +#X obj 601 98 t b f; +#X obj 578 121 /; +#X obj 520 598 *~; +#X obj 50 540 *~; +#X obj 66 517 rifft~; +#X obj 50 586 outlet~; +#X obj 625 446 print~; +#X msg 624 418 bang; +#X text 115 517 inverse real FFT; +#X obj 589 210 bang~; +#X obj 516 424 line~; +#X obj 578 143 * 1000; +#X text 630 136 window size (msec); +#X obj 603 76 * 4; +#X obj 632 159 r speed; +#X obj 709 160 r location; +#X obj 640 235 +; +#X obj 633 200 *; +#X msg 710 188 0; +#X obj 609 341 +; +#X obj 600 298 t f f; +#X msg 516 396 \$1 \, \$2 \$3; +#X obj 516 369 pack 0 0 0; +#X obj 752 229 / 1000; +#X obj 609 269 *; +#X text 639 270 reading location (samples); +#X obj 637 381 / 4; +#X text 669 386 hop size (samples); +#X obj 564 464 sig~; +#X obj 534 463 +~; +#X text 638 82 (overlap times parent SR); +#X text 638 69 local sample rate; +#X obj 103 10 tabreceive~ phase-real; +#X obj 106 124 *~; +#X obj 106 146 +~; +#X obj 106 170 rsqrt~; +#X obj 225 95 -~; +#X obj 147 200 *~; +#X obj 207 200 *~; +#X obj 266 9 tabreceive~ phase-imag; +#X obj 31 481 sig~; +#X obj 14 411 t b f; +#X msg 14 432 1; +#X obj 28 455 /; +#X obj 187 496 tabsend~ phase-real; +#X obj 288 474 tabsend~ phase-imag; +#X obj 50 71 sig~ 1.5e-20; +#X obj 632 180 * 0.01; +#X obj 691 212 s speed; +#X obj 474 263 s see-location; +#X obj 598 618 block~ 2048 4; +#X floatatom 672 360 0 0 0; +#X obj 670 339 *; +#X obj 829 234 r transpo; +#X obj 829 256 * 0.01; +#X obj 831 277 + 69; +#X obj 832 298 mtof; +#X obj 832 320 / 440; +#X obj 689 316 t b f; +#X obj 14 390 r window-size; +#X floatatom 835 353 0 0 0; +#X obj 551 543 tabreceive~ hanning; +#X obj 534 489 tabread4~ sample; +#X obj 516 515 tabread4~ sample; +#X obj 145 422 -~; +#X obj 249 385 r lock; +#X obj 162 291 ../../extra/lrshift~ 1; +#X obj 154 315 ../../extra/lrshift~ -1; +#X obj 227 339 ../../extra/lrshift~ 1; +#X obj 219 363 ../../extra/lrshift~ -1; +#X obj 210 432 -~; +#X obj 161 397 *~ 0; +#X obj 226 408 *~ 0; +#X connect 0 0 2 1; +#X connect 1 0 2 0; +#X connect 2 0 87 0; +#X connect 2 0 88 0; +#X connect 2 0 85 0; +#X connect 3 0 5 1; +#X connect 4 0 5 0; +#X connect 5 0 89 0; +#X connect 5 0 90 0; +#X connect 5 0 91 0; +#X connect 6 0 57 1; +#X connect 7 0 57 0; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 58 1; +#X connect 10 0 54 0; +#X connect 10 0 54 1; +#X connect 11 0 55 1; +#X connect 12 0 26 0; +#X connect 13 0 1 1; +#X connect 13 0 3 1; +#X connect 13 1 0 1; +#X connect 13 1 4 1; +#X connect 14 0 9 1; +#X connect 14 0 7 1; +#X connect 14 1 6 1; +#X connect 14 1 8 1; +#X connect 15 0 14 0; +#X connect 16 0 73 0; +#X connect 17 0 44 0; +#X connect 18 0 37 0; +#X connect 18 0 45 0; +#X connect 18 0 70 0; +#X connect 19 0 34 0; +#X connect 20 0 22 0; +#X connect 21 0 22 0; +#X connect 21 1 22 1; +#X connect 22 0 32 0; +#X connect 23 0 13 0; +#X connect 24 0 12 0; +#X connect 25 0 24 1; +#X connect 28 0 27 0; +#X connect 30 0 18 0; +#X connect 31 0 27 0; +#X connect 31 0 50 0; +#X connect 31 0 84 0; +#X connect 32 0 43 2; +#X connect 32 0 38 1; +#X connect 34 0 21 0; +#X connect 35 0 68 0; +#X connect 36 0 39 0; +#X connect 36 0 18 1; +#X connect 37 0 18 1; +#X connect 38 0 37 1; +#X connect 39 0 69 0; +#X connect 40 0 43 1; +#X connect 41 0 43 0; +#X connect 41 1 40 0; +#X connect 42 0 31 0; +#X connect 43 0 42 0; +#X connect 44 0 45 1; +#X connect 45 0 41 0; +#X connect 47 0 49 0; +#X connect 49 0 50 1; +#X connect 50 0 83 0; +#X connect 53 0 9 0; +#X connect 53 0 6 0; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 56 0 58 0; +#X connect 56 0 59 0; +#X connect 57 0 59 1; +#X connect 57 0 11 0; +#X connect 57 0 11 1; +#X connect 58 0 1 0; +#X connect 58 0 4 0; +#X connect 59 0 0 0; +#X connect 59 0 3 0; +#X connect 60 0 7 0; +#X connect 60 0 8 0; +#X connect 61 0 24 0; +#X connect 62 0 63 0; +#X connect 62 1 64 1; +#X connect 63 0 64 0; +#X connect 64 0 61 0; +#X connect 67 0 10 0; +#X connect 68 0 38 0; +#X connect 72 0 47 0; +#X connect 72 0 40 1; +#X connect 73 0 72 0; +#X connect 74 0 75 0; +#X connect 75 0 76 0; +#X connect 76 0 77 0; +#X connect 77 0 78 0; +#X connect 78 0 79 0; +#X connect 78 0 81 0; +#X connect 79 0 73 0; +#X connect 79 1 73 1; +#X connect 80 0 62 0; +#X connect 82 0 23 1; +#X connect 82 0 15 1; +#X connect 82 0 12 1; +#X connect 83 0 23 0; +#X connect 84 0 15 0; +#X connect 85 0 65 0; +#X connect 85 0 25 0; +#X connect 86 0 93 1; +#X connect 86 0 92 1; +#X connect 87 0 92 0; +#X connect 88 0 92 0; +#X connect 89 0 93 0; +#X connect 90 0 93 0; +#X connect 91 0 66 0; +#X connect 91 0 25 1; +#X connect 92 0 85 1; +#X connect 93 0 91 1; +#X restore 37 422 pd fft-analysis; +#X obj 37 508 dac~; +#N canvas 260 23 647 768 phase-tables 0; +#N canvas 0 0 450 300 graph2 0; +#X array phase-imag 4096 float 0; +#X coords 0 1 4096 -1 400 300 1; +#X restore 172 290 graph; +#N canvas 0 0 450 300 graph3 0; +#X array phase-real 4096 float 0; +#X coords 0 1 4096 -1 400 300 1; +#X restore 170 17 graph; +#X msg 167 564 \; phase-real resize 4096 \; phase-imag resize 4096 +; +#X restore 419 489 pd phase-tables; +#X obj 37 448 hip~ 5; +#X obj 37 478 *~; +#N canvas 249 280 600 398 loc&precess 0; +#X floatatom 160 229 0 0 0; +#X msg 270 175 set \$1; +#X obj 269 207 outlet; +#X obj 83 267 outlet; +#X obj 171 71 r location; +#X msg 82 235 set \$1; +#X obj 269 149 r speed; +#X obj 55 70 r see-location; +#X obj 67 102 t b f; +#X obj 82 214 f; +#X obj 54 127 int; +#X obj 54 151 sel 0; +#X msg 153 102 1; +#X msg 201 101 0; +#X obj 110 179 del 300; +#X connect 1 0 2 0; +#X connect 4 0 8 0; +#X connect 5 0 3 0; +#X connect 6 0 1 0; +#X connect 7 0 8 0; +#X connect 8 0 10 0; +#X connect 8 1 9 1; +#X connect 9 0 5 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 11 0 14 0; +#X connect 12 0 10 1; +#X connect 13 0 10 1; +#X connect 14 0 13 0; +#X connect 14 0 9 0; +#X restore 84 322 pd loc&precess; +#N canvas 0 0 600 400 setlocprecess 0; +#X obj 173 82 inlet; +#X obj 73 80 inlet; +#X obj 169 105 s speed; +#X obj 74 105 s location; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X restore 84 373 pd setlocprecess; +#X msg 41 333 0; +#X obj 606 182 adc~; +#X obj 279 379 s transpo; +#X obj 277 305 r transpo; +#X msg 277 331 set \$1; +#X msg 404 287 \; location 0 \; speed 200; +#N canvas 138 111 767 761 hanning-window 0; +#X obj 92 206 phasor~; +#X obj 92 234 cos~; +#X obj 23 328 tabwrite~ hanning; +#X obj 30 252 -~; +#X obj 28 218 sig~ 1; +#X msg 37 180 0; +#X text 141 13 CALCULATE HANNING; +#X text 141 27 WINDOW TABLE; +#N canvas 0 0 450 300 graph1 0; +#X array hanning 4096 float 0; +#X coords 0 1 4096 -1 400 300 1; +#X restore 275 281 graph; +#X obj 93 171 sig~; +#X text 175 148 sample rate / window size; +#X msg 23 144 bang; +#X obj 66 269 sig~ 0.5; +#X obj 49 300 *~; +#X obj 94 80 samplerate~; +#X obj 25 23 r window-size; +#X obj 25 53 t b f; +#X msg 275 547 \; hanning resize 4096; +#X obj 93 132 /; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 3 0 13 0; +#X connect 4 0 3 0; +#X connect 5 0 0 1; +#X connect 9 0 0 0; +#X connect 11 0 2 0; +#X connect 11 0 5 0; +#X connect 12 0 13 1; +#X connect 13 0 2 0; +#X connect 14 0 18 0; +#X connect 15 0 16 0; +#X connect 16 0 14 0; +#X connect 16 0 11 0; +#X connect 16 1 18 1; +#X connect 18 0 9 0; +#X restore 417 512 pd hanning-window; +#X msg 25 192 \; window-size 2048 \; transpo 0 \; pd dsp 1; +#X floatatom 587 68 0 0 0; +#N canvas 194 37 397 591 output 0; +#X obj 62 191 t b; +#X obj 62 144 f; +#X obj 62 96 inlet; +#X text 67 76 mute; +#X obj 62 215 f; +#X msg 127 230 0; +#X msg 62 120 bang; +#X obj 62 167 moses 1; +#X obj 127 207 t b f; +#X obj 91 417 outlet; +#X msg 91 393 set \$1; +#X obj 175 154 moses 1; +#X obj 212 419 dbtorms; +#X obj 212 443 pack 0 100; +#X obj 175 130 r master-lvl; +#X obj 91 360 r master-lvl; +#X obj 78 269 s master-lvl; +#X obj 212 467 s master-amp; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X restore 587 44 pd output; +#X msg 587 20 mute; +#X text 624 60 MASTER; +#X text 623 74 LEVEL; +#X obj 587 92 s master-lvl; +#X text 35 173 click here first; +#X obj 81 506 line~; +#X obj 81 482 r master-amp; +#X text 49 271 set location; +#X text 48 285 and stop; +#X text 48 299 precession; +#X text 166 270 precession; +#X text 165 286 speed in; +#X text 165 300 hundredths; +#X text 275 264 transposition; +#X text 276 282 in cents; +#X text 512 242 examples; +#X text 407 266 contraction; +#X text 623 265 expansion; +#X msg 612 288 \; location 0 \; speed 10; +#X obj 419 360 loadbang; +#X obj 423 383 samplerate~; +#X obj 419 405 s sample-rate; +#N canvas 132 255 846 368 insample 0; +#N canvas 0 0 450 300 graph1 0; +#X array sample 92615 float 0; +#X coords 0 1 92614 -1 400 150 1; +#X restore 406 155 graph; +#X obj 12 19 r read-sample; +#X obj 12 132 unpack s f; +#X obj 46 158 s insamprate; +#X obj 12 208 soundfiler; +#X msg 12 184 read -resize \$1 sample; +#X obj 12 238 s insamplength; +#X msg 20 289 \; sample resize 220500 \; insamplength 220500; +#X obj 22 46 inlet; +#X obj 22 73 openpanel; +#X obj 22 101 pack s 50; +#X connect 1 0 2 0; +#X connect 2 0 5 0; +#X connect 2 1 3 0; +#X connect 4 0 6 0; +#X connect 5 0 4 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 10 0 2 0; +#X restore 419 463 pd insample; +#X msg 190 163 \; read-sample ../sound/bell.aiff \; transpo 0; +#X msg 190 217 \; read-sample ../sound/voice.wav \; transpo -530; +#X obj 563 204 tabwrite~ sample; +#X obj 583 411 s lock; +#X floatatom 583 386 0 0 0; +#X msg 584 359 0; +#X msg 618 358 1; +#X text 135 18 PHASE LOCKING VOCODER; +#X text 32 46 This is a spin on the phase vocoder which prevents beating +between adjacent channels of the FFT. This is described in "Phase Locked +Vocoder" (reprinted on MSP's web page) and further improved by Laroche +and Dolson \, reported in ICMC97.; +#X obj 419 440 bng 15 250 50 0 empty empty read-sample 20 8 0 12 -262144 +-1 -1; +#X text 528 265 normal; +#X msg 507 288 \; location 0 \; speed 100; +#X connect 0 0 13 0; +#X connect 1 0 46 0; +#X connect 2 0 10 1; +#X connect 3 0 10 0; +#X connect 4 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 5 0; +#X connect 8 0 5 1; +#X connect 9 0 3 0; +#X connect 9 1 2 0; +#X connect 11 0 3 0; +#X connect 12 0 46 0; +#X connect 14 0 15 0; +#X connect 15 0 0 0; +#X connect 19 0 24 0; +#X connect 20 0 19 0; +#X connect 21 0 20 0; +#X connect 26 0 8 1; +#X connect 27 0 26 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 48 0 47 0; +#X connect 49 0 48 0; +#X connect 50 0 48 0; +#X connect 53 0 43 0; diff --git a/pd/doc/4.fft.examples/11.pianorev.pd b/pd/doc/4.fft.examples/11.pianorev.pd new file mode 100644 index 00000000..ad7f8e7f --- /dev/null +++ b/pd/doc/4.fft.examples/11.pianorev.pd @@ -0,0 +1,378 @@ +#N canvas 48 26 570 543 12; +#N canvas 52 71 774 520 previous-analysis 0; +#X graph graph1 0 -1 2048 1 103 165 303 15; +#X array last-real 2048 float; +#X pop; +#X graph graph2 0 -1 2048 1 497 156 697 6; +#X array last-imag 2048 float; +#X pop; +#X graph graph1 0 -1 2048 1 105 335 305 185; +#X array phase-real 2048 float; +#X pop; +#X graph graph2 0 -1 2048 1 501 328 701 178; +#X array phase-imag 2048 float; +#X pop; +#X msg 106 541 \; last-real resize 2048 \; last-imag resize 2048 \; phase-real resize 2048 \; phase-imag resize 2048 \; inc-real resize 2048 \; inc-imag resize 2048; +#X graph graph1 0 -1 2048 1 105 507 305 357; +#X array inc-real 2048 float; +#X pop; +#X graph graph2 0 -1 2048 1 503 492 703 342; +#X array inc-imag 2048 float; +#X pop; +#X restore 411 384 pd previous-analysis; +#N canvas 29 2 866 679 fft 0; +#X obj 14 640 *~; +#X obj 422 576 *~; +#X obj 396 576 *~; +#X obj 480 576 *~; +#X obj 455 576 *~; +#X obj 455 598 +~; +#X obj 395 601 -~; +#X obj 138 480 *~; +#X obj 531 332 -~; +#X obj 505 528 +~; +#X obj 531 528 *~; +#X obj 458 330 -~; +#X obj 431 526 +~; +#X obj 458 526 *~; +#X obj 159 336 -~; +#X obj 133 373 +~; +#X obj 159 373 *~; +#X obj 201 138 *~; +#X obj 172 138 *~; +#X obj 172 159 +~; +#X obj 351 288 *~; +#X obj 325 288 *~; +#X obj 404 115 *~; +#X obj 379 115 *~; +#X obj 336 116 *~; +#X obj 311 116 *~; +#X obj 181 408 *~; +#X obj 154 409 *~; +#X obj 198 37 *~; +#X obj 14 662 outlet~; +#X obj 14 615 *~; +#X obj 18 16 tabreceive~ hanning-window; +#X obj 537 561 block~ 2048 4; +#X obj 214 12 inlet~; +#X obj 198 58 rfft~; +#X obj 30 591 rifft~; +#X obj 30 99 tabsend~ last-real; +#X obj 30 130 tabsend~ last-imag; +#X obj 154 431 rsqrt~; +#X obj 311 138 +~; +#X obj 379 137 -~; +#X obj 35 255 tabreceive~ inc-real; +#X obj 69 278 tabreceive~ inc-imag; +#X obj 430 202 tabreceive~ phase-real; +#X obj 502 225 tabreceive~ phase-imag; +#X obj 325 309 +~; +#X obj 75 335 -~; +#X obj 354 40 tabreceive~ last-real; +#X obj 414 62 tabreceive~ last-imag; +#X obj 48 372 +~; +#X obj 75 372 *~; +#X obj 51 479 *~; +#X obj 191 454 r gain; +#X obj 46 560 tabsend~ inc-real; +#X obj 64 519 tabsend~ inc-imag; +#X obj 391 649 tabsend~ phase-real; +#X obj 453 620 tabsend~ phase-imag; +#X obj 52 618 sig~ 0.0002; +#X obj 60 217 *~ 0; +#X obj 154 453 *~ 0; +#N canvas 167 161 699 396 decision 0; +#X obj 63 32 inlet~; +#X obj 64 272 outlet~; +#X obj 64 114 -~; +#X obj 64 157 clip~ 0 1; +#X obj 64 135 *~ 1e+20; +#X obj 135 31 inlet~; +#X text 139 136 1 if new sig; +#X text 138 147 stronger than; +#X text 140 159 old one; +#X obj 245 130 -~; +#X obj 259 105 ../../extra/lrshift~ 1; +#X obj 245 178 clip~ 0 1; +#X obj 245 156 *~ 1e+20; +#X obj 421 130 -~; +#X obj 421 178 clip~ 0 1; +#X obj 421 156 *~ 1e+20; +#X obj 435 105 ../../extra/lrshift~ -1; +#X obj 64 214 *~; +#X obj 64 243 *~; +#X connect 0 0 2 0; +#X connect 0 0 10 0; +#X connect 0 0 9 0; +#X connect 0 0 13 0; +#X connect 0 0 16 0; +#X connect 2 0 4 0; +#X connect 3 0 17 0; +#X connect 4 0 3 0; +#X connect 5 0 2 1; +#X connect 9 0 12 0; +#X connect 10 0 9 1; +#X connect 11 0 17 1; +#X connect 12 0 11 0; +#X connect 13 0 15 0; +#X connect 14 0 18 1; +#X connect 15 0 14 0; +#X connect 16 0 13 1; +#X connect 17 0 18 0; +#X connect 18 0 1 0; +#X restore 253 334 pd decision; +#X obj 391 626 +~ 1e-15; +#X obj 46 540 +~ 1e-15; +#X connect 0 0 29 0; +#X connect 1 0 6 1; +#X connect 2 0 6 0; +#X connect 3 0 5 1; +#X connect 4 0 5 0; +#X connect 5 0 56 0; +#X connect 6 0 61 0; +#X connect 7 0 54 0; +#X connect 7 0 1 0; +#X connect 7 0 3 0; +#X connect 8 0 10 0; +#X connect 9 0 35 1; +#X connect 9 0 1 1; +#X connect 9 0 4 1; +#X connect 10 0 9 1; +#X connect 11 0 13 0; +#X connect 12 0 35 0; +#X connect 12 0 2 1; +#X connect 12 0 3 1; +#X connect 13 0 12 1; +#X connect 14 0 16 0; +#X connect 15 0 26 0; +#X connect 15 0 26 1; +#X connect 15 0 7 0; +#X connect 16 0 15 1; +#X connect 17 0 19 1; +#X connect 18 0 19 0; +#X connect 19 0 60 0; +#X connect 20 0 45 1; +#X connect 21 0 45 0; +#X connect 22 0 40 1; +#X connect 23 0 40 0; +#X connect 24 0 39 1; +#X connect 25 0 39 0; +#X connect 26 0 38 0; +#X connect 27 0 38 0; +#X connect 28 0 34 0; +#X connect 30 0 0 0; +#X connect 31 0 28 0; +#X connect 31 0 30 0; +#X connect 33 0 28 1; +#X connect 34 0 25 0; +#X connect 34 0 22 0; +#X connect 34 0 18 0; +#X connect 34 0 18 1; +#X connect 34 0 11 0; +#X connect 34 0 36 0; +#X connect 34 1 24 0; +#X connect 34 1 23 0; +#X connect 34 1 17 0; +#X connect 34 1 17 1; +#X connect 34 1 8 0; +#X connect 34 1 37 0; +#X connect 35 0 30 1; +#X connect 38 0 59 0; +#X connect 39 0 46 0; +#X connect 39 0 58 0; +#X connect 40 0 14 0; +#X connect 41 0 49 0; +#X connect 41 0 46 1; +#X connect 42 0 15 0; +#X connect 42 0 14 1; +#X connect 43 0 21 0; +#X connect 43 0 21 1; +#X connect 43 0 12 0; +#X connect 43 0 11 1; +#X connect 44 0 20 0; +#X connect 44 0 20 1; +#X connect 44 0 9 0; +#X connect 44 0 8 1; +#X connect 45 0 60 1; +#X connect 46 0 50 0; +#X connect 47 0 25 1; +#X connect 47 0 23 1; +#X connect 48 0 24 1; +#X connect 48 0 22 1; +#X connect 49 0 27 0; +#X connect 49 0 27 1; +#X connect 49 0 51 0; +#X connect 50 0 49 1; +#X connect 51 0 2 0; +#X connect 51 0 4 0; +#X connect 51 0 62 0; +#X connect 52 0 59 1; +#X connect 57 0 0 1; +#X connect 58 0 37 0; +#X connect 58 0 36 0; +#X connect 59 0 51 1; +#X connect 59 0 7 1; +#X connect 60 0 50 1; +#X connect 60 0 16 1; +#X connect 60 0 13 1; +#X connect 60 0 10 1; +#X connect 61 0 55 0; +#X connect 62 0 53 0; +#X restore 203 438 pd fft; +#X floatatom 47 260; +#X obj 202 518 dac~; +#N canvas 58 75 719 400 hanning-window 0; +#X obj 99 231 phasor~; +#X obj 99 267 cos~; +#X obj 45 284 -~; +#X obj 43 250 sig~ 1; +#X msg 53 212 0; +#X graph graph1 0 -1 2047 1 393 274 593 124; +#X array hanning-window 2048 float; +#X pop; +#X obj 101 117 r sample-rate; +#X obj 216 119 r window-size; +#X obj 124 145 t b f; +#X obj 101 167 /; +#X obj 99 204 sig~; +#X obj 39 71 r make-window; +#X msg 38 145 bang; +#X obj 31 349 tabwrite~ hanning-window; +#X floatatom 184 204; +#X obj 47 311 *~ 0.5; +#X msg 371 303 \; hanning-window resize 2048; +#X connect 0 0 1 0; +#X connect 1 0 2 1; +#X connect 2 0 15 0; +#X connect 3 0 2 0; +#X connect 4 0 0 1; +#X connect 6 0 9 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 1 9 1; +#X connect 9 0 10 0; +#X connect 10 0 0 0; +#X connect 11 0 12 0; +#X connect 12 0 4 0; +#X connect 12 0 13 0; +#X connect 15 0 13 0; +#X restore 411 355 pd hanning-window; +#X obj 410 419 loadbang; +#X obj 202 487 *~; +#X obj 262 464 line~; +#X obj 47 464 s gain; +#X msg 47 336 0; +#X msg 410 445 \; sample-rate 44100 \; window-size 2048 \; make-window bang \; gain 0 \;; +#X obj 92 341 t b b f; +#X obj 119 394 /; +#X msg 89 394 1; +#X obj 89 417 -; +#X floatatom 47 442; +#X obj 47 288 * 0.1; +#X floatatom 480 78; +#N canvas 194 37 397 591 output 0; +#X obj 62 191 t b; +#X obj 62 144 f; +#X obj 62 96 inlet; +#X text 67 76 mute; +#X obj 62 215 f; +#X msg 127 230 0; +#X msg 62 120 bang; +#X obj 62 167 moses 1; +#X obj 127 207 t b f; +#X obj 91 417 outlet; +#X msg 91 393 set \$1; +#X obj 175 154 moses 1; +#X obj 212 419 dbtorms; +#X obj 212 443 pack 0 100; +#X obj 175 130 r master-lvl; +#X obj 91 360 r master-lvl; +#X obj 78 269 s master-lvl; +#X obj 212 467 s master-amp; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X restore 480 54 pd output; +#X msg 480 30 mute; +#X text 517 70 MASTER; +#X text 516 84 LEVEL; +#X obj 480 102 s master-lvl; +#X obj 262 437 r master-amp; +#X obj 203 339 osc~; +#X obj 282 394 line~; +#X msg 270 268 bang; +#X floatatom 203 316; +#X obj 203 415 *~; +#X obj 271 343 pack 1 0; +#X obj 316 370 pack 0 0; +#X obj 301 316 del; +#X floatatom 338 283; +#X obj 203 293 mtof; +#X floatatom 203 269; +#X obj 203 364 cos~; +#X obj 202 461 hip~ 5; +#X obj 203 388 hip~ 20; +#X obj 48 313 moses 0.1; +#X msg 114 366 0.005; +#X text 131 9 PIANO REVERB; +#X text 42 29 This is intended as an imitation of how the strings of a piano can act as a reverberator. The sound is more "pitched" and less "whispered" than a standard delay-based reverberator (or for that matter \, than a reverberant room.); +#X text 41 88 Many pieces in the literature call for just this effect \, notably Boulez's Dialogue de l'ombre double.; +#X text 40 118 This particular algorithm is actually TOO clean sounding and would have to be chorused to make a serviceable imitation. However \, it might be interesting in its own right.; +#X text 39 173 The technique is to run a phase vocoder \, but only to "punch" the incoming sound into channels where (1) there's a peak \, and (2) the incoming sound drowns out whatever might already be there.; +#X text 27 238 reverb time; +#X text 179 248 test pitch; +#X text 267 249 trigger; +#X text 334 264 duration; +#X connect 1 0 36 0; +#X connect 2 0 16 0; +#X connect 5 0 10 0; +#X connect 6 0 3 0; +#X connect 6 0 3 1; +#X connect 7 0 6 1; +#X connect 9 0 15 0; +#X connect 11 0 13 0; +#X connect 11 1 39 0; +#X connect 11 2 12 1; +#X connect 12 0 14 1; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 15 0 8 0; +#X connect 16 0 38 0; +#X connect 17 0 22 0; +#X connect 18 0 17 0; +#X connect 19 0 18 0; +#X connect 23 0 7 0; +#X connect 24 0 35 0; +#X connect 25 0 28 1; +#X connect 26 0 29 0; +#X connect 26 0 31 0; +#X connect 27 0 24 0; +#X connect 28 0 1 0; +#X connect 29 0 25 0; +#X connect 30 0 25 0; +#X connect 31 0 30 0; +#X connect 32 0 31 1; +#X connect 32 0 29 1; +#X connect 32 0 30 1; +#X connect 33 0 27 0; +#X connect 34 0 33 0; +#X connect 35 0 37 0; +#X connect 36 0 6 0; +#X connect 37 0 28 0; +#X connect 38 0 9 0; +#X connect 38 1 11 0; +#X connect 39 0 12 0; diff --git a/pd/doc/4.fft.examples/12.sinedecomposer.pd b/pd/doc/4.fft.examples/12.sinedecomposer.pd new file mode 100644 index 00000000..52fb5eb9 --- /dev/null +++ b/pd/doc/4.fft.examples/12.sinedecomposer.pd @@ -0,0 +1,308 @@ +#N struct peak-template float x float y float amp float ampreal float +ampimag; +#N canvas 251 262 858 492 12; +#X msg 501 258 bang; +#X obj 30 360 pack 0 100; +#X obj 30 384 line~; +#X obj 30 336 dbtorms; +#N canvas 95 102 724 400 fft 0; +#X obj 64 67 inlet~; +#X obj 134 107 print~; +#X msg 137 71 bang; +#X obj 64 104 rfft~; +#N canvas 0 0 450 300 graph3 0; +#X array array3 4096 float 0; +#X coords 0 100 4096 -100 400 150 1; +#X restore 254 14 graph; +#N canvas 0 0 450 300 graph4 0; +#X array array4 4096 float 0; +#X coords 0 100 4096 -100 400 150 1; +#X restore 256 165 graph; +#X obj 9 185 tabsend~ array3; +#X obj 50 158 tabsend~ array4; +#X msg 37 246 \; array3 resize 4096 \; array4 resize 4096; +#X obj 62 38 block~ 4096 1; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 2 0 1 0; +#X connect 3 0 6 0; +#X connect 3 1 7 0; +#X restore 134 409 pd fft; +#X obj 30 408 *~; +#X obj 29 435 dac~; +#X obj 476 231 adc~; +#N canvas 204 36 521 368 analysis 0; +#X obj 206 37 inlet; +#X msg 207 68 bang; +#X obj 275 52 r snapshot; +#X msg 220 169 4096 array3 array4 50; +#X obj 127 252 print; +#X obj 206 103 t b b b; +#X obj 122 140 s done-analysis; +#X obj 248 133 s start-analysis; +#X obj 220 219 s found-peak; +#X obj 154 194 r loud; +#X obj 128 226 spigot; +#X obj 220 193 ../../extra/pique; +#X connect 0 0 1 0; +#X connect 1 0 5 0; +#X connect 2 0 1 0; +#X connect 3 0 11 0; +#X connect 5 0 6 0; +#X connect 5 1 3 0; +#X connect 5 2 7 0; +#X connect 9 0 10 1; +#X connect 10 0 4 0; +#X connect 11 0 8 0; +#X connect 11 0 10 0; +#X restore 613 295 pd analysis; +#X obj 30 313 r loop-amp; +#X msg 613 271 snapshot; +#X text 10 215 click here first; +#X text 613 247 analysis; +#N canvas 36 255 884 389 peak-saver 0; +#X floatatom 710 310 0 0 0; +#X floatatom 633 309 0 0 0; +#X floatatom 560 305 0 0 0; +#X floatatom 484 303 0 0 0; +#X obj 406 251 pointer; +#X obj 354 150 pointer; +#X msg 374 60 bang; +#X obj 142 243 rmstodb; +#X obj 10 244 * 0.1; +#X obj 141 268 * -3; +#X floatatom 416 300 0 0 0; +#X obj 353 36 r start-analysis; +#X obj 354 89 t b b; +#X msg 29 89 50 60 70; +#X obj 28 120 append peak-template x y amp; +#X msg 426 225 next; +#X obj 402 276 get peak-template x y amp ampreal ampimag; +#X obj 9 293 append peak-template x y amp ampreal ampimag; +#X obj 116 167 r found-peak; +#X obj 117 196 unpack 0 0 0 0 0; +#X msg 76 244 330; +#X msg 400 87 \; pd-peak-list clear; +#X msg 354 125 traverse pd-peak-list \, bang; +#X msg 408 201 traverse pd-peak-list \, next; +#X connect 4 0 16 0; +#X connect 5 0 14 3; +#X connect 5 0 17 5; +#X connect 6 0 12 0; +#X connect 7 0 9 0; +#X connect 8 0 17 0; +#X connect 9 0 17 2; +#X connect 11 0 12 0; +#X connect 12 0 22 0; +#X connect 12 1 21 0; +#X connect 13 0 14 0; +#X connect 15 0 4 0; +#X connect 16 0 10 0; +#X connect 16 1 3 0; +#X connect 16 2 2 0; +#X connect 16 3 1 0; +#X connect 16 4 0 0; +#X connect 18 0 19 0; +#X connect 19 1 8 0; +#X connect 19 2 20 0; +#X connect 19 2 7 0; +#X connect 19 3 17 3; +#X connect 19 4 17 4; +#X connect 20 0 17 1; +#X connect 22 0 5 0; +#X connect 23 0 4 0; +#X restore 339 378 pd peak-saver; +#N canvas 231 169 656 237 peak-template 0; +#X obj 45 90 filledpolygon 3 3 3 0 0 0 amp 0 0; +#X obj 37 16 struct peak-template float x float y float amp float ampreal +float ampimag; +#X restore 339 402 pd peak-template; +#N canvas 0 0 600 382 peak-list 1; +#X scalar peak-template 6.54702 330 -153.451 -0.00206937 -0.00295808 +\;; +#X scalar peak-template 13.0873 330 -226.384 0.0527068 -0.0271798 \; +; +#X scalar peak-template 26.0747 330 -193.145 -0.004041 0.0160602 \; +; +#X scalar peak-template 35.3241 330 -136.068 -0.00162406 0.000891527 +\;; +#X scalar peak-template 39.3259 330 -172.59 0.00700493 0.00274829 \; +; +#X scalar peak-template 50.8632 330 -126.917 0.000847277 0.000991251 +\;; +#X scalar peak-template 58.0851 330 -130.284 -0.00125865 -0.000785961 +\;; +#X scalar peak-template 61.7223 330 -118.759 -0.000665894 -0.000682444 +\;; +#X scalar peak-template 64.533 330 -123.671 -1.31387e-05 0.00115121 +\;; +#X scalar peak-template 70.7855 330 -192.911 -0.0156921 0.00481118 +\;; +#X scalar peak-template 83.2529 330 -128.585 0.00138656 -0.000101125 +\;; +#X scalar peak-template 87.7921 330 -102.858 -0.00011618 -0.000504767 +\;; +#X scalar peak-template 94.7598 330 -96.8563 -6.587e-06 -0.000411354 +\;; +#X scalar peak-template 238.251 330 -157.634 -0.00175515 0.00385829 +\;; +#X scalar peak-template 120.177 330 -149.995 -0.000220136 -0.00315404 +\;; +#X scalar peak-template 127.613 330 -115.813 0.000761733 0.000380684 +\;; +#X scalar peak-template 133.372 330 -93.2528 -7.56087e-05 -0.000350204 +\;; +#X scalar peak-template 140.63 330 -114.426 0.000604011 0.000535798 +\;; +#X scalar peak-template 147.903 330 -101.806 -0.000357742 0.000345682 +\;; +#X scalar peak-template 151.501 330 -102.007 0.000501161 -1.29982e-05 +\;; +#X scalar peak-template 156.14 330 -133.049 -0.00152793 -0.00062287 +\;; +#X scalar peak-template 168.988 330 -98.4353 1.06068e-05 0.000436979 +\;; +#X scalar peak-template 176.71 330 -80.3132 7.61609e-05 -0.000204315 +\;; +#X scalar peak-template 189.731 330 -124.879 -0.00119891 -0.000129939 +\;; +#X scalar peak-template 202.531 330 -84.7508 -0.000188934 0.000176472 +\;; +#X scalar peak-template 210.532 330 -103.669 -0.000493027 -0.000206012 +\;; +#X scalar peak-template 224.973 330 -86.5866 -0.000200658 -0.000191542 +\;; +#X restore 339 426 pd peak-list; +#X msg 37 235 \; pd dsp 1; +#X floatatom 720 273 0 0 0; +#X obj 720 296 s loud; +#X floatatom 557 77 0 0 0; +#N canvas 194 37 730 728 output 0; +#X obj 77 218 t b; +#X obj 77 154 f; +#X obj 66 71 inlet; +#X text 73 46 mute; +#X obj 77 244 f; +#X msg 156 235 0; +#X msg 69 102 bang; +#X obj 77 189 moses 1; +#X obj 169 33 r loop-amp; +#X obj 78 286 s loop-amp; +#X obj 156 179 t b f; +#X obj 93 462 outlet; +#X msg 92 428 set \$1; +#X obj 93 400 r loop-amp; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 9 0; +#X connect 5 0 9 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 10 0; +#X connect 8 0 1 1; +#X connect 10 0 5 0; +#X connect 10 1 4 1; +#X connect 12 0 11 0; +#X connect 13 0 12 0; +#X restore 557 53 pd output; +#X obj 557 104 s loop-amp; +#X msg 557 30 mute; +#X text 593 80 AMPLITUDE; +#X text 539 189 live sample; +#X text 719 234 print out; +#X text 720 249 peak list; +#X text 168 7 SPECTRAL SNAPSHOTS.; +#X text 15 18 This patch reads a soundfile or records a live sound. +When you click on "snapshot" the peak-list window shows a list of the +sinusoidal peaks that were found at that instant in the sound. You +can also ask for the peak lists to be printed out.; +#N canvas 132 255 634 331 insample 0; +#N canvas 0 0 450 300 graph1 0; +#X array sample 155948 float 0; +#X coords 0 1 155947 -1 400 150 1; +#X restore 199 18 graph; +#X obj 19 70 r read-sample; +#X obj 19 95 unpack s f; +#X obj 53 121 s insamprate; +#X obj 19 171 soundfiler; +#X msg 19 147 read -resize \$1 sample; +#X obj 19 201 s insamplength; +#X msg 357 197 \; sample resize 220500 \; insamplength 220500; +#X connect 1 0 2 0; +#X connect 2 0 5 0; +#X connect 2 1 3 0; +#X connect 4 0 6 0; +#X connect 5 0 4 0; +#X restore 336 350 pd insample; +#X floatatom 134 363 0 0 0; +#N canvas 190 43 405 461 test-signal 0; +#X obj 135 296 tabread4~ sample; +#X obj 135 271 line~; +#X obj 95 146 f; +#X obj 254 46 r insamprate; +#X obj 136 350 *~; +#X obj 171 350 dbtorms; +#X obj 171 327 inlet; +#X obj 135 415 outlet~; +#X obj 146 33 r insamplength; +#X msg 134 247 0 \, \$1 \$2; +#X obj 134 221 pack 0 0; +#X obj 209 190 /; +#X obj 299 99 * 0.001; +#X obj 135 388 hip~ 5; +#X obj 33 5 loadbang; +#X text 242 13 sample playback; +#X msg 33 25 1; +#X obj 33 69 metro 1000; +#X floatatom 33 48 0 0 0; +#X obj 255 75 t b b f; +#X obj 161 84 t b f; +#X connect 0 0 4 0; +#X connect 1 0 0 0; +#X connect 2 0 10 0; +#X connect 3 0 19 0; +#X connect 4 0 13 0; +#X connect 5 0 4 1; +#X connect 6 0 5 0; +#X connect 8 0 20 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 11 0 10 1; +#X connect 11 0 17 1; +#X connect 12 0 11 1; +#X connect 13 0 7 0; +#X connect 14 0 16 0; +#X connect 16 0 18 0; +#X connect 17 0 2 0; +#X connect 18 0 17 0; +#X connect 19 0 16 0; +#X connect 19 1 11 0; +#X connect 19 2 12 0; +#X connect 20 0 16 0; +#X connect 20 1 11 0; +#X connect 20 1 2 1; +#X restore 134 386 pd test-signal; +#X text 135 341 amplitude; +#X text 204 212 read a sample; +#X msg 128 231 \; read-sample ../sound/bell.aiff 44100; +#X text 12 97 The active ingredient is "pique" in the "analysis" subwindow +\, which is in the "extras" directory in the Pd release.; +#X msg 124 275 \; read-sample ../sound/voice.wav 32000; +#X obj 458 295 tabwrite~ sample; +#X connect 0 0 37 0; +#X connect 1 0 2 0; +#X connect 2 0 5 0; +#X connect 3 0 1 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 7 0 37 0; +#X connect 9 0 3 0; +#X connect 10 0 8 0; +#X connect 17 0 18 0; +#X connect 19 0 21 0; +#X connect 20 0 19 0; +#X connect 22 0 20 0; +#X connect 30 0 31 0; +#X connect 31 0 4 0; +#X connect 31 0 5 1; diff --git a/pd/doc/4.fft.examples/13.partialtracer.pd b/pd/doc/4.fft.examples/13.partialtracer.pd new file mode 100644 index 00000000..5458f900 --- /dev/null +++ b/pd/doc/4.fft.examples/13.partialtracer.pd @@ -0,0 +1,783 @@ +#N canvas 234 52 720 591 12; +#X floatatom 598 72; +#N canvas 516 98 663 557 boo 0; +#X obj 79 108 outlet; +#X msg 78 80 set \$1; +#X obj 79 57 r osc-amp; +#X connect 1 0 0 0; +#X connect 2 0 1 0; +#X restore 598 52 pd; +#X obj 598 93 s osc-amp; +#X obj 93 513 pack 0 100; +#X obj 94 533 line~; +#X obj 93 493 dbtorms; +#X obj 94 573 *~; +#X floatatom 624 225; +#X msg 514 269 0; +#X floatatom 567 225; +#X floatatom 645 290; +#X floatatom 498 71; +#N canvas 516 98 663 555 boo 0; +#X obj 79 108 outlet; +#X msg 78 80 set \$1; +#X obj 79 57 r grain-amp; +#X connect 1 0 0 0; +#X connect 2 0 1 0; +#X restore 498 51 pd; +#N canvas 201 90 556 354 analysis 0; +#X obj 220 45 r snapshot; +#X obj 62 283 print; +#X obj 106 154 t b b b; +#X obj 20 189 s done-analysis; +#X obj 209 149 s start-analysis; +#X obj 161 261 s found-peak; +#X obj 107 263 r loud; +#X obj 63 262 spigot; +#X msg 138 101 1; +#X obj 31 99 r fft-done; +#X obj 31 129 spigot; +#X msg 110 101 0; +#X obj 222 84 del 0.01; +#X msg 221 66 bang; +#X text 183 103 Wait for the next FFT to come by before doing the peak search.; +#X obj 341 176 r errthresh; +#X msg 343 219 errthresh \$1; +#X floatatom 341 199; +#X obj 212 173 r window-size; +#X obj 169 190 f; +#X msg 162 211 \$1 fft-real fft-imag 10; +#X obj 162 231 pique; +#X connect 0 0 13 0; +#X connect 2 0 3 0; +#X connect 2 1 19 0; +#X connect 2 2 4 0; +#X connect 2 2 11 0; +#X connect 6 0 7 1; +#X connect 7 0 1 0; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 2 0; +#X connect 11 0 10 1; +#X connect 12 0 8 0; +#X connect 13 0 12 0; +#X connect 15 0 17 0; +#X connect 16 0 21 0; +#X connect 17 0 16 0; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X connect 21 0 5 0; +#X connect 21 0 7 0; +#X restore 270 411 pd analysis; +#N canvas 168 244 411 214 peak-template 0; +#X obj 62 52 filledpolygon 3 3 3 0 0 0 amp 0 0; +#X obj 57 10 template float x float y float amp float ampreal float ampimag float used; +#X restore 270 516 pd peak-template; +#N canvas 0 0 600 386 peak-list 0; +#X restore 270 454 pd peak-list; +#N canvas 20 23 472 426 trace-list 1; +#X restore 270 494 pd trace-list; +#N canvas 56 84 527 179 trace-template 0; +#X obj 93 72 plot bazoo 0 1 0 500 5; +#X obj 96 36 template float x float y float voiceno array bazoo point-template; +#X text 93 93 This template describes a pitch/amplitude trace. The array "bazoo" holds the actual points. In this template \, y is always 0 and x is the starting location in pixels. There are 5 pixels per point.; +#X restore 270 537 pd trace-template; +#N canvas 96 258 494 158 point-template 0; +#X text 98 56 This template describes a single point on a pitch trace (cf. trace-template w describes the trace itself.); +#X obj 163 14 template float y float amp; +#X text 98 89 "y" is the field that is shown on the graph \; it's - 4 * pitch. You also get an "amp" field in dB \, which you can't see as a plot (yet).; +#X restore 270 557 pd point-template; +#X msg 574 506 bang; +#X obj 6 425 pack 0 100; +#X obj 6 449 line~; +#X obj 6 405 dbtorms; +#X floatatom 419 70; +#N canvas 194 37 730 722 output 0; +#X obj 227 76 t b f; +#X obj 220 100 +; +#X obj 396 207 f; +#X obj 409 165 f; +#X obj 276 210 f; +#X obj 64 179 t b; +#X obj 63 127 f; +#X obj 55 58 inlet; +#X text 60 37 mute; +#X obj 64 201 f; +#X msg 181 153 0; +#X msg 57 84 bang; +#X obj 64 155 moses 1; +#X obj 178 69 t b f; +#X obj 171 93 +; +#X obj 139 27 r loop-amp; +#X obj 304 26 r osc-amp; +#X obj 64 236 s loop-amp; +#X obj 276 235 s osc-amp; +#X obj 455 125 print; +#X obj 143 148 f; +#X obj 288 168 f; +#X obj 173 120 t b b; +#X obj 425 23 r grain-amp; +#X obj 397 232 s grain-amp; +#X connect 0 0 1 0; +#X connect 0 1 1 1; +#X connect 1 0 6 1; +#X connect 2 0 24 0; +#X connect 3 0 2 1; +#X connect 4 0 18 0; +#X connect 5 0 9 0; +#X connect 5 0 4 0; +#X connect 5 0 2 0; +#X connect 6 0 12 0; +#X connect 7 0 11 0; +#X connect 9 0 17 0; +#X connect 10 0 17 0; +#X connect 10 0 18 0; +#X connect 10 0 24 0; +#X connect 11 0 6 0; +#X connect 12 0 5 0; +#X connect 12 1 22 0; +#X connect 13 0 14 0; +#X connect 13 1 14 1; +#X connect 14 0 1 0; +#X connect 15 0 14 0; +#X connect 15 0 20 1; +#X connect 16 0 13 0; +#X connect 16 0 21 1; +#X connect 20 0 9 1; +#X connect 21 0 4 1; +#X connect 22 0 10 0; +#X connect 22 1 20 0; +#X connect 22 1 21 0; +#X connect 22 1 3 0; +#X connect 23 0 3 1; +#X connect 23 0 0 0; +#X restore 631 69 pd output; +#N canvas 516 98 663 559 /SUBPATCH/ 0; +#X obj 79 108 outlet; +#X msg 78 80 set \$1; +#X obj 79 57 r loop-amp; +#X connect 1 0 0 0; +#X connect 2 0 1 0; +#X restore 419 50 pd; +#N canvas 209 96 518 375 fft 0; +#X floatatom 235 194; +#X obj 349 160 r sample-rate; +#X obj 349 180 t b f; +#X obj 234 169 r window-size; +#X obj 203 38 r sample-rate; +#X obj 183 16 r window-size; +#X obj 203 58 t b f; +#X obj 183 83 /; +#X obj 131 103 bang~; +#X obj 130 175 line~; +#X obj 183 104 * 1000; +#X text 229 104 window size (msec); +#X obj 129 281 rfft~; +#X obj 131 337 tabsend~ fft-real; +#X obj 159 307 tabsend~ fft-imag; +#X obj 330 140 r location; +#X obj 330 205 *; +#X obj 330 228 * 0.001; +#X text 383 228 location (samples); +#X obj 130 129 f; +#X msg 130 152 0 \, 1 \$1; +#X obj 87 201 *~; +#X obj 87 224 -~; +#X obj 62 301 *~; +#X obj 62 324 outlet~; +#X floatatom 330 252; +#X obj 41 127 s fft-done; +#X obj 51 31 block~ 2048 1; +#X obj 129 255 tabread4~ sample; +#X obj 130 211 *~ 0; +#X obj 129 232 +~ 0; +#X connect 1 0 2 0; +#X connect 2 0 16 0; +#X connect 2 1 16 1; +#X connect 3 0 0 0; +#X connect 3 0 29 1; +#X connect 4 0 6 0; +#X connect 5 0 7 0; +#X connect 6 0 7 0; +#X connect 6 1 7 1; +#X connect 7 0 10 0; +#X connect 8 0 19 0; +#X connect 8 0 26 0; +#X connect 9 0 21 0; +#X connect 9 0 21 1; +#X connect 9 0 22 1; +#X connect 9 0 29 0; +#X connect 10 0 19 1; +#X connect 12 0 13 0; +#X connect 12 1 14 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 17 0 25 0; +#X connect 17 0 30 1; +#X connect 19 0 20 0; +#X connect 20 0 9 0; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 23 0 24 0; +#X connect 28 0 12 0; +#X connect 28 0 23 1; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X restore 17 470 pd fft; +#X obj 6 493 *~; +#X obj 7 544 hip~ 5; +#X obj 7 571 dac~; +#X obj 580 529 adc~; +#X obj 419 91 s loop-amp; +#X msg 631 48 mute; +#X text 13 127 click here first; +#X text 570 489 live sample; +#X text 521 25 AMPLITUDES; +#N canvas 5 1 864 622 make-trace 0; +#X obj 143 220 * -0.33333; +#X obj 70 216 * 10; +#X obj 91 136 pointer; +#X msg 91 115 next; +#X obj 91 97 until; +#X obj 298 134 pointer; +#X msg 299 108 next; +#X obj 154 330 unpack; +#X obj 196 332 s amp; +#X obj 218 378 s frequency; +#X obj 231 361 s pitch; +#X obj 193 375 f 0; +#X obj 154 348 t b b b b f; +#X obj 601 133 pointer; +#X obj 572 602 setsize trace-template bazoo; +#X obj 572 514 random 200; +#X obj 572 532 + 100; +#X obj 659 526 pointer; +#X obj 168 532 pointer; +#X floatatom 274 524; +#X floatatom 228 550; +#X msg 158 509 bang; +#X floatatom 83 461; +#X floatatom 31 509; +#X floatatom 118 590; +#X floatatom 397 556; +#X floatatom 274 489; +#X floatatom 513 511; +#X obj 370 464 pointer; +#X msg 391 447 next; +#X floatatom 409 512; +#X obj 397 539 getsize trace-template bazoo; +#X obj 98 563 get point-template y; +#X obj 31 533 set point-template y; +#X obj 78 486 element trace-template bazoo; +#X obj 228 580 setsize trace-template bazoo; +#X obj 274 507 set trace-template x; +#X obj 274 542 set trace-template y; +#X msg 572 497 bang; +#X obj 572 549 append trace-template x; +#X obj 399 489 get trace-template x y; +#X obj 572 567 t b p; +#X msg 572 584 5; +#X obj 628 93 s clear-traces; +#X obj 602 155 s last-in-list; +#X msg 600 43 bang; +#X obj 600 60 t b b; +#X obj 573 156 f 0; +#X obj 572 176 s nframe; +#X obj 342 337 r nframe; +#X obj 330 356 f; +#X obj 330 373 + 1; +#X obj 330 391 s nframe; +#X obj 330 296 r done-frame; +#X obj 336 315 s done-adding-traces; +#X obj 15 309 r component; +#X obj 15 326 unpack; +#X obj 56 331 s amp; +#X obj 80 370 s frequency; +#X obj 92 354 s pitch; +#X obj 54 388 s added-to-trace; +#X obj 54 370 f 0; +#X obj 48 408 s add-to-trace; +#X obj 15 344 t b b b b f; +#X obj 600 25 r clear-all; +#X obj 154 311 r component2; +#X obj 193 393 s started-new-trace; +#X obj 185 414 s start-new-trace; +#X obj 273 41 r done-analysis; +#X obj 273 62 t b b b b; +#X obj 225 176 r added-to-trace; +#X obj 299 89 until; +#X obj 351 172 get peak-template x amp; +#X obj 425 195 * -0.33333; +#X obj 351 190 * 10; +#X obj 351 210 pack; +#X obj 351 226 s component; +#X obj 92 337 ftom; +#X obj 298 155 t b p p; +#X obj 197 196 set peak-template used; +#X obj 199 176 f; +#X obj 232 344 ftom; +#X msg 135 31 \; done-frame bang; +#X obj 16 178 get peak-template used x amp; +#X obj 27 236 pack 0 0 0; +#X obj 27 255 route 0; +#X obj 27 272 s component2; +#X obj 422 260 print x1; +#X obj 174 276 print x2; +#X obj 559 255 add-trace 1; +#X obj 560 274 add-trace 2; +#X obj 560 291 add-trace 3; +#X obj 559 309 add-trace 4; +#X obj 560 328 add-trace 5; +#X obj 560 345 add-trace 6; +#X obj 560 363 add-trace 7; +#X obj 561 381 add-trace 8; +#X obj 561 399 add-trace 9; +#X obj 561 417 add-trace 10; +#X msg 372 111 traverse pd-peak-list; +#X msg 601 115 traverse pd-trace-list \, bang; +#X msg 641 59 \; pd-trace-list clear; +#X msg 370 430 traverse pd-trace-list \, next; +#X msg 659 509 traverse pd-trace-list \, bang; +#X connect 0 0 84 2; +#X connect 1 0 84 1; +#X connect 2 0 83 0; +#X connect 2 1 4 1; +#X connect 3 0 2 0; +#X connect 4 0 3 0; +#X connect 5 0 78 0; +#X connect 5 1 71 1; +#X connect 6 0 5 0; +#X connect 7 0 12 0; +#X connect 7 1 8 0; +#X connect 11 0 66 0; +#X connect 12 2 67 0; +#X connect 12 3 11 0; +#X connect 12 4 81 0; +#X connect 12 4 9 0; +#X connect 13 0 44 0; +#X connect 15 0 16 0; +#X connect 16 0 39 0; +#X connect 17 0 39 1; +#X connect 18 0 32 0; +#X connect 19 0 37 0; +#X connect 20 0 35 0; +#X connect 21 0 18 0; +#X connect 22 0 34 0; +#X connect 23 0 33 0; +#X connect 26 0 36 0; +#X connect 28 0 35 1; +#X connect 28 0 36 1; +#X connect 28 0 37 1; +#X connect 28 0 34 1; +#X connect 28 0 40 0; +#X connect 28 0 31 0; +#X connect 29 0 28 0; +#X connect 31 0 25 0; +#X connect 32 0 24 0; +#X connect 34 0 18 0; +#X connect 34 0 33 1; +#X connect 38 0 15 0; +#X connect 39 0 41 0; +#X connect 40 0 30 0; +#X connect 40 1 27 0; +#X connect 41 0 42 0; +#X connect 41 1 14 1; +#X connect 42 0 14 0; +#X connect 45 0 46 0; +#X connect 46 0 100 0; +#X connect 46 0 47 0; +#X connect 46 1 101 0; +#X connect 46 1 43 0; +#X connect 47 0 48 0; +#X connect 49 0 50 1; +#X connect 50 0 51 0; +#X connect 51 0 52 0; +#X connect 53 0 50 0; +#X connect 53 0 54 0; +#X connect 55 0 56 0; +#X connect 56 0 63 0; +#X connect 56 1 57 0; +#X connect 61 0 60 0; +#X connect 63 2 62 0; +#X connect 63 3 61 0; +#X connect 63 4 77 0; +#X connect 63 4 58 0; +#X connect 64 0 45 0; +#X connect 65 0 7 0; +#X connect 68 0 69 0; +#X connect 69 0 82 0; +#X connect 69 1 4 0; +#X connect 69 2 71 0; +#X connect 69 3 99 0; +#X connect 70 0 80 1; +#X connect 71 0 6 0; +#X connect 72 0 74 0; +#X connect 72 1 73 0; +#X connect 73 0 75 1; +#X connect 74 0 75 0; +#X connect 75 0 76 0; +#X connect 77 0 59 0; +#X connect 78 0 80 0; +#X connect 78 1 79 1; +#X connect 78 2 72 0; +#X connect 80 0 79 0; +#X connect 81 0 10 0; +#X connect 83 0 84 0; +#X connect 83 1 1 0; +#X connect 83 2 0 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 99 0 5 0; +#X connect 99 0 2 0; +#X connect 100 0 13 0; +#X connect 102 0 28 0; +#X connect 103 0 17 0; +#X restore 270 474 pd make-trace; +#X floatatom 4 289; +#N canvas 0 0 955 721 arrays 0; +#X msg 30 202 \; fft-real resize 4096 \; fft-imag resize 4096; +#X graph graph1 0 -1 4096 1 332 341 732 41; +#X array fft-real 4096 float; +#X pop; +#X graph graph2 0 -1 4096 1 322 565 722 265; +#X array fft-imag 4096 float; +#X pop; +#X restore 439 515 pd arrays; +#X obj 4 309 s location; +#X obj 95 412 r loop-amp; +#X obj 567 288 f; +#X obj 4 248 r location; +#X msg 4 268 set \$1; +#X obj 598 288 +; +#X obj 567 309 moses 900; +#X msg 535 329 0; +#X msg 534 247 1; +#X msg 566 335 \; location \$1 \; snapshot bang; +#X msg 504 177 bang \; location 0 \; clear-all bang; +#X floatatom 504 305; +#X obj 504 225 t b b; +#X obj 645 270 r incr; +#X obj 6 385 r grain-amp; +#X obj 93 473 r osc-amp; +#X obj 110 553 catch~ osc-sum; +#N canvas 102 67 751 619 osc-bank 0; +#X obj 239 433 osc-voice; +#X obj 223 451 osc-voice; +#X obj 207 471 osc-voice; +#X obj 191 490 osc-voice; +#X obj 175 510 osc-voice; +#X obj 159 528 osc-voice; +#X obj 143 547 osc-voice; +#X obj 127 566 osc-voice; +#X obj 111 586 osc-voice; +#X obj 95 410 route 1 2 3 4 5 6 7 8 9 10; +#X msg 290 269 0; +#X obj 560 489 pointer; +#X floatatom 652 417; +#X obj 479 351 pointer; +#X msg 422 491 next; +#X floatatom 479 419; +#X obj 178 111 pointer; +#X floatatom 283 104; +#X floatatom 238 129; +#X msg 168 88 bang; +#X floatatom 92 40; +#X floatatom 41 88; +#X floatatom 127 169; +#X floatatom 420 137; +#X floatatom 283 69; +#X floatatom 523 90; +#X obj 425 43 pointer; +#X msg 447 27 next; +#X floatatom 419 92; +#X obj 420 120 getsize trace-template bazoo; +#X obj 108 142 get point-template y; +#X obj 41 113 set point-template y; +#X obj 87 66 element trace-template bazoo; +#X obj 238 159 setsize trace-template bazoo; +#X obj 283 86 set trace-template x; +#X obj 283 121 set trace-template y; +#X obj 409 68 get trace-template x y; +#X floatatom 403 312; +#X msg 403 288 1; +#X msg 434 288 0; +#X obj 479 451 <; +#X obj 479 398 get trace-template x voiceno; +#X obj 479 374 t p p; +#X obj 302 337 until; +#X obj 477 233 r start-resynth; +#X obj 481 255 t b b; +#X obj 388 353 f; +#X obj 388 372 sel 0 1; +#X obj 514 436 r synth-index; +#X obj 478 555 pack f p; +#X obj 479 470 sel 0 1; +#X obj 235 230 r step-resynth; +#X obj 291 288 f; +#X obj 291 308 s synth-index; +#X obj 489 523 f; +#X obj 322 289 + 5; +#X obj 478 490 t b b b; +#X obj 235 252 t b b b; +#X obj 216 301 s osc-tick; +#X obj 95 604 osc-voice; +#X msg 425 10 traverse pd-trace-list \, next; +#X msg 478 288 traverse pd-trace-list \, next; +#X connect 9 0 59 0; +#X connect 9 1 8 0; +#X connect 9 2 7 0; +#X connect 9 3 6 0; +#X connect 9 4 5 0; +#X connect 9 5 4 0; +#X connect 9 6 3 0; +#X connect 9 7 2 0; +#X connect 9 8 1 0; +#X connect 9 9 0 0; +#X connect 10 0 52 0; +#X connect 11 0 49 1; +#X connect 13 0 42 0; +#X connect 13 1 39 0; +#X connect 13 1 43 1; +#X connect 14 0 13 0; +#X connect 15 0 40 0; +#X connect 16 0 30 0; +#X connect 17 0 35 0; +#X connect 18 0 33 0; +#X connect 19 0 16 0; +#X connect 20 0 32 0; +#X connect 21 0 31 0; +#X connect 24 0 34 0; +#X connect 26 0 33 1; +#X connect 26 0 34 1; +#X connect 26 0 35 1; +#X connect 26 0 32 1; +#X connect 26 0 36 0; +#X connect 26 0 29 0; +#X connect 27 0 26 0; +#X connect 29 0 23 0; +#X connect 30 0 22 0; +#X connect 32 0 16 0; +#X connect 32 0 31 1; +#X connect 36 0 28 0; +#X connect 36 1 25 0; +#X connect 37 0 46 1; +#X connect 38 0 37 0; +#X connect 39 0 37 0; +#X connect 40 0 50 0; +#X connect 41 0 15 0; +#X connect 41 1 54 1; +#X connect 42 0 41 0; +#X connect 42 1 11 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 61 0; +#X connect 45 1 38 0; +#X connect 45 1 10 0; +#X connect 46 0 47 0; +#X connect 47 0 43 1; +#X connect 47 1 15 0; +#X connect 48 0 40 1; +#X connect 49 0 9 0; +#X connect 50 0 43 1; +#X connect 50 1 56 0; +#X connect 51 0 57 0; +#X connect 52 0 53 0; +#X connect 52 0 55 0; +#X connect 54 0 49 0; +#X connect 55 0 52 1; +#X connect 56 0 14 0; +#X connect 56 1 54 0; +#X connect 56 2 11 0; +#X connect 57 0 58 0; +#X connect 57 1 43 0; +#X connect 57 2 52 0; +#X connect 60 0 26 0; +#X connect 61 0 13 0; +#X restore 439 494 pd osc-bank; +#X obj 498 92 s grain-amp; +#N canvas 31 70 662 326 save-list 0; +#X floatatom 584 255; +#X floatatom 521 254; +#X floatatom 461 251; +#X floatatom 398 250; +#X obj 335 206 pointer; +#X obj 236 121 pointer; +#X msg 252 47 bang; +#X obj 117 200 rmstodb; +#X obj 8 201 * 0.1; +#X obj 116 220 * -3; +#X floatatom 342 247; +#X obj 234 27 r start-analysis; +#X obj 235 71 t b b; +#X msg 351 185 next; +#X obj 331 227 get peak-template x y amp ampreal ampimag; +#X obj 7 241 append peak-template x y amp ampreal ampimag; +#X obj 96 138 r found-peak; +#X obj 97 161 unpack 0 0 0 0 0; +#X msg 62 201 330; +#X msg 274 69 \; pd-peak-list clear; +#X msg 235 100 traverse pd-peak-list \, bang; +#X msg 336 166 traverse pd-peak-list \, next; +#X connect 4 0 14 0; +#X connect 5 0 15 5; +#X connect 6 0 12 0; +#X connect 7 0 9 0; +#X connect 8 0 15 0; +#X connect 9 0 15 2; +#X connect 11 0 12 0; +#X connect 12 0 20 0; +#X connect 12 1 19 0; +#X connect 13 0 4 0; +#X connect 14 0 10 0; +#X connect 14 1 3 0; +#X connect 14 2 2 0; +#X connect 14 3 1 0; +#X connect 14 4 0 0; +#X connect 16 0 17 0; +#X connect 17 1 8 0; +#X connect 17 2 18 0; +#X connect 17 2 7 0; +#X connect 17 3 15 3; +#X connect 17 4 15 4; +#X connect 18 0 15 1; +#X connect 20 0 5 0; +#X connect 21 0 4 0; +#X restore 270 431 pd save-list; +#X msg 6 144 \; pd dsp 1 \; window-size 2048 \; sample-rate 44100 \; f-threshold 40 \; incr 10 \; clear-all bang; +#X obj 567 245 metro 150; +#X floatatom 242 309; +#X floatatom 290 309; +#X msg 107 349 \; start-resynth bang; +#X msg 242 350 \; step-resynth bang; +#X obj 242 329 metro 100; +#X msg 368 350 \; osc-stop bang; +#X text 605 107 resynth; +#X text 491 106 analyzed grains; +#X text 423 106 original; +#X text 502 158 ... and here third to analyze; +#N canvas 0 0 276 216 test 0; +#X floatatom 43 120; +#X obj 43 141 s loud; +#X msg 38 84 \; clear-all bang; +#X msg 39 52 \; snapshot bang; +#X connect 0 0 1 0; +#X restore 438 538 pd test; +#X text 244 140 read a sample; +#X msg 165 163 \; read-sample ../sound/bell.aiff 44100; +#X msg 164 200 \; read-sample ../sound/voice.wav 32000; +#N canvas 190 43 405 461 test-signal 0; +#X obj 134 293 tabread4~ sample; +#X obj 134 268 line~; +#X obj 95 146 f; +#X obj 254 46 r insamprate; +#X obj 136 350 *~; +#X obj 164 351 dbtorms; +#X obj 164 328 inlet; +#X obj 135 415 outlet~; +#X obj 146 33 r insamplength; +#X msg 134 247 0 \, \$1 \$2; +#X obj 134 221 pack 0 0; +#X obj 209 190 /; +#X obj 299 99 * 0.001; +#X obj 135 388 hip~ 5; +#X obj 33 5 loadbang; +#X text 242 13 sample playback; +#X msg 33 25 1; +#X obj 33 69 metro 1000; +#X floatatom 33 48; +#X obj 255 75 t b b f; +#X obj 161 84 t b f; +#X connect 0 0 4 0; +#X connect 1 0 0 0; +#X connect 2 0 10 0; +#X connect 3 0 19 0; +#X connect 4 0 13 0; +#X connect 5 0 4 1; +#X connect 6 0 5 0; +#X connect 8 0 20 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 11 0 10 1; +#X connect 11 0 17 1; +#X connect 12 0 11 1; +#X connect 13 0 7 0; +#X connect 14 0 16 0; +#X connect 16 0 18 0; +#X connect 17 0 2 0; +#X connect 18 0 17 0; +#X connect 19 0 16 0; +#X connect 19 1 11 0; +#X connect 19 2 12 0; +#X connect 20 0 16 0; +#X connect 20 1 11 0; +#X connect 20 1 2 1; +#X restore 96 436 pd test-signal; +#N canvas 132 255 634 331 insample 0; +#X graph graph1 0 -1 55408 1 199 168 599 18; +#X array sample 55409 float; +#X pop; +#X obj 19 70 r read-sample; +#X obj 19 95 unpack s f; +#X obj 53 121 s insamprate; +#X obj 19 171 soundfiler; +#X msg 19 147 read -resize \$1 sample; +#X obj 19 201 s insamplength; +#X msg 357 197 \; sample resize 220500 \; insamplength 220500; +#X connect 1 0 2 0; +#X connect 2 0 5 0; +#X connect 2 1 3 0; +#X connect 4 0 6 0; +#X connect 5 0 4 0; +#X restore 438 559 pd insample; +#X obj 572 553 tabwrite~ sample; +#X text 117 0 SINUSOID TRACKING; +#X text 99 259 to resynthesize \, "start" once and "step" ad lib. To stop \, stop stepping and hit osc-stop. Note resynth ampliture control above.; +#X text 3 17 This patch tries to reconstruct sinusoidal "tracks" from a sampled sound using pique~ and the data structure facilities. It turns out to be quite hard \, not least because pique~ 0.1 puts out all sorts of spurious peaks.; +#X connect 0 0 2 0; +#X connect 1 0 0 0; +#X connect 3 0 4 0; +#X connect 4 0 6 0; +#X connect 5 0 3 0; +#X connect 6 0 28 0; +#X connect 7 0 60 1; +#X connect 8 0 41 1; +#X connect 9 0 60 0; +#X connect 10 0 44 1; +#X connect 11 0 57 0; +#X connect 12 0 11 0; +#X connect 19 0 77 0; +#X connect 20 0 21 0; +#X connect 21 0 27 0; +#X connect 22 0 20 0; +#X connect 23 0 31 0; +#X connect 25 0 23 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 28 0 29 1; +#X connect 30 0 77 0; +#X connect 32 0 24 0; +#X connect 37 0 39 0; +#X connect 40 0 75 0; +#X connect 41 0 44 0; +#X connect 41 0 45 0; +#X connect 41 0 50 0; +#X connect 42 0 43 0; +#X connect 43 0 37 0; +#X connect 44 0 41 1; +#X connect 45 0 48 0; +#X connect 45 1 46 0; +#X connect 46 0 9 0; +#X connect 47 0 9 0; +#X connect 49 0 51 0; +#X connect 51 0 47 0; +#X connect 51 1 8 0; +#X connect 52 0 10 0; +#X connect 53 0 22 0; +#X connect 54 0 5 0; +#X connect 55 0 6 1; +#X connect 60 0 41 0; +#X connect 61 0 65 0; +#X connect 62 0 65 1; +#X connect 65 0 64 0; +#X connect 75 0 28 0; diff --git a/pd/doc/4.fft.examples/14.waveformgrab.pd b/pd/doc/4.fft.examples/14.waveformgrab.pd new file mode 100644 index 00000000..a9d17bed --- /dev/null +++ b/pd/doc/4.fft.examples/14.waveformgrab.pd @@ -0,0 +1,385 @@ +#N canvas 59 19 701 580 12; +#X msg 415 337 set \$1; +#X floatatom 596 337; +#N canvas 81 37 483 329 fft 0; +#X obj 102 155 *~; +#X obj 70 155 *~; +#X obj 70 98 *~; +#X obj 70 52 inlet~; +#X obj 70 127 rfft~; +#X obj 70 182 sqrt~; +#X obj 70 209 *~; +#X obj 70 261 rifft~; +#X obj 70 287 tabwrite~ grab; +#X obj 86 74 tabreceive~ half-sine; +#X obj 70 235 /~ 512; +#X obj 137 191 tabreceive~ alternator; +#X obj 162 259 r do-grab; +#X obj 368 310 block~ 1024 2; +#X connect 0 0 5 0; +#X connect 1 0 5 0; +#X connect 2 0 4 0; +#X connect 3 0 2 0; +#X connect 4 0 1 0; +#X connect 4 0 1 1; +#X connect 4 1 0 0; +#X connect 4 1 0 1; +#X connect 5 0 6 0; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 9 0 2 1; +#X connect 10 0 7 0; +#X connect 11 0 6 1; +#X connect 12 0 8 0; +#X restore 186 422 pd fft; +#X floatatom 511 360; +#X floatatom 415 360; +#X obj 186 398 hip~ 5; +#X obj 99 544 dac~; +#N canvas 0 0 600 273 in-sample 0; +#X graph graph1 0 -1 440999 1 160 166 560 16; +#X array grab 441000 float; +#X pop; +#X msg 186 208 \; grab resize 441000; +#X obj 38 224 soundfiler; +#X msg 38 191 write x.wav grab; +#X msg 353 212 \; grab resize 4410; +#X connect 3 0 2 0; +#X restore 371 446 pd in-sample; +#X obj 116 491 hip~ 5; +#X obj 99 515 *~; +#N canvas 59 0 781 602 regenerate 0; +#X obj 90 400 r invblk; +#X obj 50 463 *~; +#X obj 67 443 clip~ 1 1000; +#X floatatom 31 41; +#X floatatom 221 117; +#X obj 430 368 *~; +#X obj 558 345 samphold~; +#X obj 672 345 samphold~; +#X obj 467 345 samphold~; +#X obj 446 493 clip~ -0.5 0.5; +#X obj 446 516 cos~; +#X obj 674 389 +~; +#X obj 565 443 -~; +#X obj 550 463 *~; +#X obj 602 491 +~; +#X obj 585 558 *~; +#X obj 37 373 *~; +#X obj 169 338 samphold~; +#X obj 311 343 samphold~; +#X obj 116 181 sig~; +#X obj 221 230 phasor~; +#X obj 330 180 wrap~; +#X obj 221 92 r pitch; +#X obj 221 161 mtof; +#X obj 116 157 r sample-rate; +#X obj 314 156 line~; +#X text 360 153 read location in blocks; +#X obj 314 234 -~; +#X text 374 179 fractional part; +#X text 338 234 integer part; +#X text 71 128 spectral stretch; +#X obj 66 335 samphold~; +#X obj 319 256 sig~ 0.5; +#X text 294 357 middle of block; +#X obj 413 34 t b f; +#X obj 413 80 /; +#X obj 413 56 1; +#X obj 51 488 clip~ -0.5 0.5; +#X obj 51 510 cos~; +#X obj 294 396 +~; +#X obj 173 450 -~; +#X obj 155 471 *~; +#X obj 162 494 +~; +#X obj 145 550 *~; +#X text 68 365 offset into; +#X text 78 376 sample; +#X text 128 243 samples; +#X text 128 228 period in; +#X text 175 353 weight for; +#X text 174 364 next block; +#X obj 640 193 wrap~; +#X obj 413 102 s invblk; +#X text 411 118 one over block size; +#X obj 483 406 r invblk; +#X obj 145 574 send~ outsig; +#X floatatom 328 87; +#X obj 328 112 pack 0 100; +#X obj 413 11 r window-size; +#X obj 454 239 r window-size; +#X obj 31 17 r specshift; +#X text 103 270 grain size in samples; +#X obj 314 37 r loco; +#X obj 444 472 *~; +#X obj 460 450 clip~ 1 1000; +#X text 91 347 grain; +#X obj 221 141 - 12; +#X obj 173 421 tabread4~ grab; +#X obj 294 422 tabread4~ grab; +#X obj 565 414 tabread4~ grab; +#X obj 674 415 tabread4~ grab; +#X obj 31 64 * 0.01; +#X obj 31 88 + 69; +#X obj 31 111 mtof; +#X obj 31 134 / 440; +#X obj 70 272 *~ 1; +#X obj 640 168 +~ 0.5; +#X obj 67 422 *~ 1; +#X obj 460 429 *~ 1; +#X obj 446 538 +~ 1; +#X obj 51 533 +~ 1; +#X obj 116 208 /~ 1; +#X obj 314 282 *~ 1; +#X obj 173 398 +~ 0; +#X obj 565 392 +~ 0; +#X obj 16 334 -~ 0.5; +#X obj 413 345 -~ 0.5; +#X msg 328 64 set \$1; +#X connect 0 0 76 1; +#X connect 1 0 37 0; +#X connect 2 0 1 1; +#X connect 3 0 70 0; +#X connect 4 0 65 0; +#X connect 5 0 11 0; +#X connect 6 0 13 0; +#X connect 7 0 11 1; +#X connect 8 0 5 1; +#X connect 8 0 77 0; +#X connect 9 0 10 0; +#X connect 10 0 78 0; +#X connect 11 0 69 0; +#X connect 11 0 83 0; +#X connect 12 0 13 1; +#X connect 13 0 14 0; +#X connect 14 0 15 1; +#X connect 15 0 54 0; +#X connect 16 0 39 0; +#X connect 17 0 41 0; +#X connect 18 0 39 1; +#X connect 19 0 80 0; +#X connect 20 0 31 1; +#X connect 20 0 18 1; +#X connect 20 0 17 1; +#X connect 20 0 75 0; +#X connect 20 0 84 0; +#X connect 21 0 27 1; +#X connect 21 0 17 0; +#X connect 21 0 6 0; +#X connect 22 0 4 0; +#X connect 23 0 20 0; +#X connect 23 0 80 1; +#X connect 24 0 19 0; +#X connect 25 0 21 0; +#X connect 25 0 27 0; +#X connect 27 0 81 0; +#X connect 31 0 16 1; +#X connect 31 0 76 0; +#X connect 32 0 81 0; +#X connect 34 0 36 0; +#X connect 34 1 35 1; +#X connect 35 0 51 0; +#X connect 36 0 35 0; +#X connect 37 0 38 0; +#X connect 38 0 79 0; +#X connect 39 0 67 0; +#X connect 39 0 82 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 42 0 43 1; +#X connect 43 0 54 0; +#X connect 50 0 8 1; +#X connect 50 0 6 1; +#X connect 50 0 7 1; +#X connect 50 0 85 0; +#X connect 53 0 77 1; +#X connect 55 0 56 0; +#X connect 56 0 25 0; +#X connect 57 0 34 0; +#X connect 58 0 81 1; +#X connect 58 0 82 1; +#X connect 58 0 83 1; +#X connect 59 0 3 0; +#X connect 61 0 25 0; +#X connect 61 0 86 0; +#X connect 62 0 9 0; +#X connect 63 0 62 1; +#X connect 65 0 23 0; +#X connect 66 0 40 0; +#X connect 67 0 40 1; +#X connect 67 0 42 1; +#X connect 68 0 12 0; +#X connect 69 0 12 1; +#X connect 69 0 14 1; +#X connect 70 0 71 0; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 73 0 74 1; +#X connect 74 0 31 0; +#X connect 74 0 8 0; +#X connect 75 0 50 0; +#X connect 76 0 2 0; +#X connect 77 0 63 0; +#X connect 78 0 15 0; +#X connect 79 0 43 0; +#X connect 80 0 74 0; +#X connect 81 0 18 0; +#X connect 81 0 7 0; +#X connect 82 0 66 0; +#X connect 83 0 68 0; +#X connect 84 0 16 0; +#X connect 84 0 1 0; +#X connect 85 0 5 0; +#X connect 85 0 62 0; +#X connect 86 0 55 0; +#X restore 371 495 pd regenerate; +#X obj 115 464 receive~ outsig; +#X obj 43 467 line~; +#X obj 416 383 s specshift; +#X obj 575 386 s loco; +#X obj 512 383 s pitch; +#X obj 511 319 r pitch; +#X msg 511 339 set \$1; +#X obj 415 317 r specshift; +#X floatatom 553 64; +#N canvas 194 37 397 591 output 0; +#X obj 58 180 t b; +#X obj 58 135 f; +#X obj 58 90 inlet; +#X text 63 71 mute; +#X obj 58 202 f; +#X msg 119 217 0; +#X msg 58 113 bang; +#X obj 58 158 moses 1; +#X obj 119 194 t b f; +#X obj 86 392 outlet; +#X msg 86 370 set \$1; +#X obj 165 145 moses 1; +#X obj 199 394 dbtorms; +#X obj 199 417 pack 0 100; +#X obj 165 122 r master-lvl; +#X obj 86 339 r master-lvl; +#X obj 74 254 s master-lvl; +#X obj 199 439 s master-amp; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X restore 553 42 pd output; +#X msg 553 19 mute; +#X text 587 57 MASTER; +#X text 586 69 LEVEL; +#X obj 553 86 s master-lvl; +#X obj 44 442 r master-amp; +#N canvas 93 44 649 449 window 0; +#X graph graph1 0 -1 1023 1 435 170 635 20; +#X array half-sine 1024 float; +#X pop; +#X obj 108 88 r window-size; +#X obj 108 110 t b f; +#X obj 72 136 /; +#X obj 25 16 r make-window; +#X msg 25 36 bang; +#X msg 109 136 -0.25; +#X obj 70 181 osc~; +#X obj 84 66 samplerate~; +#X graph graph2 0 -1 1023 1 439 331 639 191; +#X array alternator 1024 float; +#X pop; +#X obj 21 249 r make-window; +#X msg 21 269 bang; +#X obj 80 299 samplerate~; +#X obj 451 372 r window-size; +#X msg 451 397 \; half-sine resize \$1 \; alternator resize \$1; +#X obj 80 325 / 2; +#X obj 239 12 r make-window; +#X obj 80 351 phasor~; +#X obj 21 425 tabwrite~ alternator; +#X obj 256 106 switch~; +#X msg 239 70 1; +#X obj 277 44 del 500; +#X msg 277 70 0; +#X obj 80 373 -~ 0.5; +#X obj 25 224 tabwrite~ half-sine; +#X obj 72 160 / 2; +#X obj 80 396 *~ 4; +#X msg 124 325 0.75; +#X obj 68 203 *~; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 2 1 3 1; +#X connect 3 0 25 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 8 0; +#X connect 5 0 24 0; +#X connect 6 0 7 1; +#X connect 7 0 28 0; +#X connect 7 0 28 1; +#X connect 8 0 3 0; +#X connect 10 0 11 0; +#X connect 11 0 27 0; +#X connect 11 0 12 0; +#X connect 11 0 18 0; +#X connect 12 0 15 0; +#X connect 13 0 14 0; +#X connect 15 0 17 0; +#X connect 16 0 20 0; +#X connect 16 0 21 0; +#X connect 17 0 23 0; +#X connect 20 0 19 0; +#X connect 21 0 22 0; +#X connect 22 0 19 0; +#X connect 23 0 26 0; +#X connect 25 0 7 0; +#X connect 26 0 18 0; +#X connect 27 0 17 1; +#X connect 28 0 24 0; +#X restore 371 471 pd window; +#X obj 186 370 readsf~; +#X text 38 285 CLICK HERE FIRST; +#X msg 576 312 0 \, 250 10000; +#X msg 28 309 \; pd dsp 1 \; sample-rate 44100 \; window-size 1024 \; make-window bang \; pitch 48 \; specshift 0 \;; +#X obj 596 360 pack 0 100; +#X text 196 292 analyze from soundfile; +#X text 118 10 WAVEFORM GRABBER; +#X text 21 27 This patch takes an incoming sound does an overlap-2 FFT analysis of it \, and bashes the phases of the spectra to known values. In this way you can use samples as waveforms and cross-fade them at will without getting phase modulation.; +#X text 19 93 This might be useful for making synthetic instruments that mimic the spectral variation of recorded sounds. Here we analyze a soundfile \, but you can replace "readsf~" by "adc~" to analyze on the fly. The result is a massaged sample suitable for reading via the "regenerate" subpatch.; +#X text 18 169 Since the analysis is done with an overlap of 2 \, the analyzed sample is twice the length of the original sound.; +#X text 18 199 When you aren't busy doing analyses \, you can turn the "FFT" window off by replacing the block~ with a switch~.; +#X msg 186 322 open ../sound/voice.wav \, 1 \; specshift -720 \; do-grab bang; +#X text 15 231 The resynthesized sound seems to be skewed slightly north spectrally. The recorded sample should just need -530 cents of correction (because of the different sample rate) but my ears prefer -720; +#X connect 0 0 4 0; +#X connect 1 0 31 0; +#X connect 3 0 15 0; +#X connect 4 0 13 0; +#X connect 5 0 2 0; +#X connect 8 0 9 1; +#X connect 9 0 6 0; +#X connect 9 0 6 1; +#X connect 11 0 8 0; +#X connect 12 0 9 0; +#X connect 16 0 17 0; +#X connect 17 0 3 0; +#X connect 18 0 0 0; +#X connect 19 0 24 0; +#X connect 20 0 19 0; +#X connect 21 0 20 0; +#X connect 25 0 12 0; +#X connect 27 0 5 0; +#X connect 29 0 14 0; +#X connect 31 0 14 0; +#X connect 38 0 27 0; diff --git a/pd/doc/4.fft.examples/add-trace.pd b/pd/doc/4.fft.examples/add-trace.pd new file mode 100644 index 00000000..c04c855a --- /dev/null +++ b/pd/doc/4.fft.examples/add-trace.pd @@ -0,0 +1,152 @@ +#N canvas 222 113 821 785 10; +#X obj 405 551 r amp; +#X obj 466 531 element trace-template bazoo; +#X obj 365 578 set point-template y amp; +#X obj 382 454 r pitch; +#X obj 366 496 f; +#X obj 366 520 * -4; +#X obj 442 417 pointer; +#X obj 443 608 f 1; +#X obj 326 252 f; +#X obj 326 191 f; +#X obj 326 215 sel 0; +#X floatatom 201 220 0; +#X obj 24 72 r add-to-trace; +#X obj 326 143 r start-new-trace; +#X obj 341 305 r nframe; +#X floatatom 203 100 0; +#X obj 22 419 r pitch; +#X obj 75 245 r frequency; +#X obj 68 561 r amp; +#X text 141 200 current pitch; +#X obj 24 262 mtof; +#X obj 24 190 sel 1; +#X obj 24 214 t b b; +#X obj 24 286 -; +#X obj 24 310 abs; +#X obj 24 334 <; +#X obj 79 314 r f-threshold; +#X obj 24 358 sel 1; +#X obj 21 461 f; +#X obj 59 268 f; +#X obj 24 238 f; +#X text 34 374 if this happens \, add to the trace; +#X obj 533 114 r done-adding-traces; +#X obj 533 165 sel 0; +#X obj 583 89 - 1; +#X obj 14 45 f 2; +#X obj 13 385 t b b; +#X obj 203 34 r clear-traces; +#X obj 203 58 f 0; +#X obj 24 166 f; +#X obj 533 141 f; +#X obj 93 403 pointer; +#X text 160 397 current trace; +#X obj 115 454 getsize trace-template bazoo; +#X obj 155 504 + 1; +#X obj 155 528 setsize trace-template bazoo; +#X obj 126 557 element trace-template bazoo; +#X obj 115 478 t f f; +#X obj 21 586 set point-template y amp; +#X obj 93 427 t b p p; +#X obj 21 485 * -4; +#X obj 13 633 s added-to-trace; +#X obj 13 609 f 1; +#X obj 40 97 r added-to-trace; +#X obj 24 118 f; +#X obj 24 142 sel 0; +#X obj 342 170 r started-new-trace; +#X obj 326 276 sel 0; +#X obj 443 633 s started-new-trace; +#X text 535 482 last trace in list; +#X text 514 411 reentrancy protection \; should go away; +#X obj 541 464 s last-in-list; +#X obj 615 350 r last-in-list; +#X obj 443 474 t b b p; +#X obj 465 507 f 0; +#X obj 326 357 * 5; +#X obj 326 332 f; +#X obj 292 300 f 2; +#X text 238 52 "state" -- 0 if free \, 1 if making a trace \, and 2 if we've added a point for the current frame; +#X obj 546 307 f \$1; +#X text 585 306 voice number; +#X obj 442 391 append trace-template x voiceno; +#X obj 516 278 t f b; +#X connect 0 0 2 1; +#X connect 1 0 2 2; +#X connect 3 0 4 1; +#X connect 4 0 5 0; +#X connect 4 0 11 0; +#X connect 5 0 2 0; +#X connect 6 0 63 0; +#X connect 6 0 41 1; +#X connect 7 0 58 0; +#X connect 8 0 57 0; +#X connect 9 0 10 0; +#X connect 10 0 8 0; +#X connect 11 0 30 1; +#X connect 12 0 54 0; +#X connect 13 0 9 0; +#X connect 14 0 66 1; +#X connect 15 0 39 1; +#X connect 15 0 40 1; +#X connect 15 0 8 1; +#X connect 16 0 28 1; +#X connect 17 0 29 1; +#X connect 18 0 48 1; +#X connect 20 0 23 0; +#X connect 21 0 22 0; +#X connect 22 0 30 0; +#X connect 22 1 29 0; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 25 0 27 0; +#X connect 26 0 25 1; +#X connect 27 0 36 0; +#X connect 28 0 50 0; +#X connect 28 0 11 0; +#X connect 29 0 23 1; +#X connect 30 0 20 0; +#X connect 32 0 40 0; +#X connect 33 1 34 0; +#X connect 34 0 15 0; +#X connect 35 0 15 0; +#X connect 36 0 35 0; +#X connect 36 0 52 0; +#X connect 36 1 41 0; +#X connect 37 0 38 0; +#X connect 38 0 15 0; +#X connect 39 0 21 0; +#X connect 40 0 33 0; +#X connect 41 0 49 0; +#X connect 43 0 47 0; +#X connect 44 0 45 0; +#X connect 46 0 48 2; +#X connect 47 0 46 0; +#X connect 47 1 44 0; +#X connect 49 0 28 0; +#X connect 49 1 43 0; +#X connect 49 2 45 1; +#X connect 49 2 46 1; +#X connect 50 0 48 0; +#X connect 52 0 51 0; +#X connect 53 0 54 1; +#X connect 54 0 55 0; +#X connect 55 0 39 0; +#X connect 56 0 9 1; +#X connect 57 0 66 0; +#X connect 57 0 67 0; +#X connect 62 0 71 2; +#X connect 63 0 4 0; +#X connect 63 0 7 0; +#X connect 63 1 64 0; +#X connect 63 2 1 1; +#X connect 63 2 61 0; +#X connect 64 0 1 0; +#X connect 65 0 72 0; +#X connect 66 0 65 0; +#X connect 67 0 15 0; +#X connect 69 0 71 1; +#X connect 71 0 6 0; +#X connect 72 0 71 0; +#X connect 72 1 69 0; diff --git a/pd/doc/4.fft.examples/osc-voice.pd b/pd/doc/4.fft.examples/osc-voice.pd new file mode 100644 index 00000000..02a8bde5 --- /dev/null +++ b/pd/doc/4.fft.examples/osc-voice.pd @@ -0,0 +1,54 @@ +#N canvas 230 103 972 643 10; +#X obj 261 279 element trace-template bazoo; +#X floatatom 320 207 0; +#X obj 297 163 getsize trace-template bazoo; +#X obj 429 466 line~; +#X obj 276 49 inlet; +#X obj 424 357 dbtorms; +#X obj 264 396 mtof; +#X obj 264 476 phasor~; +#X obj 258 513 cos~; +#X obj 265 547 *~; +#X obj 265 587 throw~ osc-sum; +#X obj 185 163 f; +#X obj 245 167 + 1; +#X obj 262 240 moses; +#X obj 261 319 get point-template y amp; +#X obj 426 401 pack 0 30; +#X msg 356 432 0 30; +#X obj 276 89 t b p; +#X msg 225 120 0; +#X obj 96 60 r osc-tick; +#X obj 264 356 * -0.25; +#X obj 81 307 print no; +#X obj 264 436 sig~; +#X msg 609 357 0; +#X obj 616 326 r osc-stop; +#X connect 0 0 14 0; +#X connect 1 0 13 1; +#X connect 2 0 1 0; +#X connect 3 0 9 1; +#X connect 4 0 17 0; +#X connect 5 0 15 0; +#X connect 6 0 22 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 11 0 12 0; +#X connect 11 0 13 0; +#X connect 12 0 11 1; +#X connect 13 0 0 0; +#X connect 13 1 16 0; +#X connect 14 0 20 0; +#X connect 14 1 5 0; +#X connect 15 0 3 0; +#X connect 16 0 3 0; +#X connect 17 0 18 0; +#X connect 17 1 0 1; +#X connect 17 1 2 0; +#X connect 18 0 11 1; +#X connect 19 0 11 0; +#X connect 20 0 6 0; +#X connect 22 0 7 0; +#X connect 23 0 15 0; +#X connect 24 0 23 0; diff --git a/pd/doc/4.fft.examples/x.wav b/pd/doc/4.fft.examples/x.wav Binary files differnew file mode 100644 index 00000000..3a2fd446 --- /dev/null +++ b/pd/doc/4.fft.examples/x.wav diff --git a/pd/doc/5.reference/0.INTRO.txt b/pd/doc/5.reference/0.INTRO.txt new file mode 100644 index 00000000..37380162 --- /dev/null +++ b/pd/doc/5.reference/0.INTRO.txt @@ -0,0 +1,143 @@ +The "reference" section of the documentation should contain a patch +demonstrating how to use each of Pd's classes. As of version 0.29, a complete +list of "object" classes follows. Not included in this list are messages, +atoms, graphs, etc. which aren't typed into object boxes but come +straight off the "add" menu. + +---------------------------- GLUE -------------------------------- +bang - output a bang message +float - store and recall a number +symbol - store and recall a symbol +int - store and recall an integer +send - send a message to a named object +receive - catch "sent" messages +select - test for matching numbers or symbols +route - route messages according to first element +pack - make compound messages +unpack - get elements of compound messages +trigger - sequence and convert messagess +spigot - interruptible message connection +moses - part a numeric stream +until - looping mechanism +print - print out messages +makefilename - format a symbol with a variable field +change - remove repeated numbers from a stream +swap - swap two numbers +value - shared numeric value +------------------------------ TIME ---------------------------------- +delay - send a message after a time delay +metro - send a message periodically +line - send a series of linearly stepped numbers +timer - measure time intervals +cputime - measure CPU time +realtime -measure real time +pipe - dynamically growable delay line for numbers +------------------------------ MATH ---------------------------------- ++ - * / pow arithmetic +== != > < >= <= relational tests +& && | || % bit twiddling +mtof ftom powtodb rmstodb dbtopow dbtorms convert acoustical units +mod div sin cos tan atan atan2 sqrt log exp abs higher math +random lower math +max min greater or lesser of 2 numbers +------------------------------ MIDI ---------------------------------- +notein ctlin pgmin bendin touchin polytouchin midiin sysexin - MIDI input +noteout ctlout pgmout bendout touchout polytouchout midiout - MIDI output +makenote - schedule a delayed "note off" message corresponding to a note-on +stripnote - strip "note off" messages +------------------------------ TABLES---------------------------------- +tabread - read a number from a table +tabread4 - read a number from a table, with 4 point interpolation +tabwrite - write a number to a table +soundfiler - read and write tables to soundfiles +------------------------------ MISC ---------------------------------- +loadbang - bang on load +serial - serial device control for NT only +netsend - send messages over the internet +netreceive - receive them +qlist - message sequencer +textfile - file to message converter +openpanel - "Open" dialog +savepanel - "Save as" dialog +bag - set of numbers +poly - polyphonic voice allocation +key, keyup - numeric key values from keyboard +keyname - symbolic key name +-------------------------- AUDIO MATH ---------------------------------- ++~ -~ *~ /~ arithmetic on audio signals +max~ min~ - maximum or minimum of 2 inputs +clip~ - constrict signal to lie between two bounds +q8_rsqrt~ - cheap reciprocal square root (beware -- 8 bits!) +q8_sqrt~ - cheap square root (beware -- 8 bits!) +wrap~ - wraparound (fractional part, sort of) +fft~ - complex forward discrete Fourier transform +ifft~ - complex inverse discrete Fourier transform +rfft~ - real forward discrete Fourier transform +rifft~ - real inverse discrete Fourier transform +framp~ - output a ramp for each block +mtof~, ftom~, rmstodb~, dbtorms~, rmstopow~, powtorms~ - acoustic conversions +-------------------------- AUDIO GLUE ---------------------------------- +dac~ - audio output +adc~ - audio input +sig~ - convert numbers to audio signals +line~ - generate audio ramps +threshold~ detect signal thresholds +snapshot~ - sample a signal (convert it back to a number) +bang~ - send a bang message after each DSP block +samplerate~ get the sample rate +send~ - nonlocal signal connection with fanout +receive~ - get signal from send~ +throw~ - add to a summing bus +catch~ - define and read a summing bus +block~ - specify block size and overlap +switch~ - switch DSP computation on and off +readsf~ - soundfile playback from disk (UNIX only.) +writesf~ - record sound to disk (UNIX only.) +-------------------- AUDIO OSCILLATORS AND TABLES ------------------------ +phasor~ - sawtooth oscillator +cos~ - cosine +osc~ - cosine oscillator +tabwrite~ - write to a table +tabplay~ - play back from a table (non-transposing) +tabread~ - non-interpolating table read +tabread4~ - four-point interpolating table read +tabsend~ - write one block continuously to a table +tabreceive~ read one block continuously from a table +-------------------- AUDIO FILTERS ------------------------ +vcf~ - voltage controlled filter +noise~ - white noise generator +env~ - envelope follower +hip~ - high pass filter +lop~ - low pass filter +bp~ - band pass filter +biquad~ - raw filter +samphold~ - sample and hold unit +print~ - print out one or more "blocks" +-------------------- AUDIO DELAY ------------------------ +delwrite~ - write to a delay line +delread~ - read from a delay line +vd~ - read from a delay line at a variable delay time +------------------------------ SUBWINDOWS ---------------------------------- +pd - define a subwindow +inlet - add an inlet to a pd +outlet - add an outlet to a pd +table - array of numbers in a subwindow +------------------------------ DATA TEMPLATES ----------------------------- +template - define the fields in a template +drawcurve, filledcurve - draw a curve +drawpolygon, filledpolygon - draw a polygon +plot - plot an array field +drawnumber - print a numeric value +------------------------------ ACCESSING DATA ---------------------------- +pointer - point to an object belonging to a template +get - get numeric fields +set - change numeric fields +element - get an array element +getsize - get the size of an array +setsize - change the size of an array +append - add an element to a list +sublist - get a pointer into a list which is an element of another scalar +scalar - draw a scalar on parent +------------------------------ OBSOLETE ---------------------------- +scope~ (use tabwrite~ now) +namecanvas diff --git a/pd/doc/5.reference/0_all_guis-INTRO.txt b/pd/doc/5.reference/0_all_guis-INTRO.txt new file mode 100644 index 00000000..4eda9f58 --- /dev/null +++ b/pd/doc/5.reference/0_all_guis-INTRO.txt @@ -0,0 +1,131 @@ +HOW TO MOVE A GUI-OBJECT: + +Of course by mouse, and: +select a gui-object , then navigate the object by using the +4 direction-keys: UP , DOWN , LEFT or RIGHT. +If you press the SHIFT-Key too , the object will move 10 times faster. + + +PROPERTIES-DIALOG-WINDOW: + +"dimensions(pix): size:" = square-size of the gui-objects in pixels. +"dimensions(pix)(pix): width: height:" = width & height of the rectangular + gui-object in pixels. +"selectable dimensions(pix): size:" = square-size of the selectable top-left + corner of my_canvas in pixels. +"flash-time(ms)(ms): hold:" = flash-hold-time in msec = duration of activity, + if a bang-object was activated by any message-event + or by a mouse-click. +"flash-time(ms)(ms): intrrpt:" = flash-interrupt-time in msec = duration + of inactivity , if an already activated bang is activated + once more. +"output-range: left: right:" = hslider-bounds for input- as well as + output-values. +"output-range: bottom: top:" = vslider-bounds for input- as well as + output-values. +"non-zero-value: value:" = toggle has 2 value-states: zero and this value. +"visible_rectangle(pix)(pix): width: height:" = width & height of a visible, + deactivated rectangle in pixels. +"init" or "no init" = if "init"-mode is selected , the object gets a loadbang- + behavior and puts out its in-patch-saved value. + if "no init"-mode is selected, nothing will happen. +"new&old" or "new-only" = the hdial- and vdial-object changes its state in 2 ways: + "new&old"-mode: output sends previous state off, current state on; + "new-only"-mode: output sends only current state on. +"lin" or "log" = sliders and numberboxes can have linear or logarithmical scaling. +"number:" = number of buttons of hdials and vdials. +"log-height:" = is the graphical height of the numberbox in logarithmical mode. +"steady on click" or "jump on click" = the 2 slider-objects + react to mouse-click in 2 ways: + "steady on click"-mode: slider-knob stays in position, + mouse and knob will move parallel; + "jump on click"-mode: slider-knob jumps immediately to new + mouse-position, positions of mouse and knob will be identical. +"send-symbol:" = an output-message can be received by a receive-object + with the same send-symbol-name. +"receive-symbol:" = a send-object with the same symbol-name can send + an input-message to the gui-object. +"label: name:" = visible name of a gui-object; it will be moved together with + the gui-object. +"label: x_off: y_off:" = coordinates of the label in relation to top-left + corner of gui-object. +"label: font: fontsize:" = font-properties of label. +"colors:" = a click on radiobuttons "backgd:", "front:" or + "label:" routes the button "compose color" and/or the preset-colors + to background- front- and label-color. + the 2 fields with "testlabel" and "o=||=o" will show you the 3 colors. + "compose color" opens a tcl/tk color-dialog. +"Cancel" quits the properties-dialog without sending down the last changings in dialogbox. +"Apply" sends down the changings. +"OK" sends down the changings and quits the dialogbox. + + +THE DOLLAR-THING: + +If you want to send to, or to receive from gui-objects, +you have to write into the property-entry your send- or receive-name. +If you want an unique-name, write $0 or $0-blabla, if you want to +communicate with this gui-object in an abstraction, write $1 +or $1-blabla or $2 or $2-blabla in your property-entry. +(send- , receive- or label- name) +A new feature is: you can take the same send- and receive-name. +If there is a send-name, the object will loose its output-rectangle, +if there is a receive-name, the object will loose its input-rectangle; +but the connective behavior is the same. + +GUI-MESSAGES: + +all gui-objects (bng, hsl, vsl, nbx, tgl, hdl, vdl, cnv and vu) + understand input-messages which change their properties. + except cnv has no input, so you have to send messages + to its receive-label (edit properties). +"size 15 128" = change width & height of sliders and vu in pixels. +"size 15" = change square-size of rdb, bng and tgl in pixels. +"vis_size 800 600" = change width & height of visual rectangle + of my_canvas in pixels. +"range 0.1 10.0" = change slider-boundaries for + input- as well as output-values. +"nonzero 127.0" = change the nonzero-value of toggle. +"flashtime 50 600" = change flash-interrupt- and + flash-hold-time of bng-object. +"pos 150 170" = change the x-y-position of the top-left + corner of a gui-object in pixels; + "pos 0 0" is the top-left corner of your window; + the positive directions of x- and y-axes are right and down. +"delta 15 17" = move the gui-object in relation to its + current position (in pixels). +"color 0 22 22" = change background-, front- and + label-color of object with one of 30 presets. +"color 0 22" = change background- and label-color + of vu and my_canvas with one of 30 presets. +"color -16777216 (-1) -1" = change background-, (front-) + and label-color of object with RGB-values. + the RGB-value will be calculated: + -65536*RED-value (0 .. 255) + - 256*GREEN-value (0 .. 255) + - BLUE-value (0 .. 255) - 1. +"number 10" = change number of dial-buttons. +"log_height 128" = graphical dimension for logarithmical behavior + of numberbox. +"steady 1" change slider-knob-behaviour on mouse-click. +"single_change" change dial-behaviour + to output only the new state. +"double_change" change dial-behaviour + to first release the previous button, + then output the state of the new button. +"send fromgui" = change send-name of gui-objects, + except vu and cnv. +"receive togui" = change receive-name of object. +"label its_me" = change label-text of object. +"label_pos 20 8" = change offset-coordinates of label-text. +"label_font 0 10" = change font and fontsize of label-text. +"init 1" = change initial loadbang-mode of gui-objects + except vu and cnv. +"set 64" = change only the inner state and display + of gui-objects, except bng and cnv; + no output will result. +"lin" = change scale-mode of slider to linear. +"log" = change scale-mode of slider to logarithmical. +"get_pos" = if my_canvas has a receive-name and a send-name + and you send the message "get_pos" to it, + you receive the current x- and y-coordinates. diff --git a/pd/doc/5.reference/acoustics.pd b/pd/doc/5.reference/acoustics.pd new file mode 100644 index 00000000..2a46f589 --- /dev/null +++ b/pd/doc/5.reference/acoustics.pd @@ -0,0 +1,40 @@ +#N canvas 163 25 582 408 12; +#X obj 15 269 ftom; +#X obj 8 10 mtof; +#X obj 15 217 mtof; +#X floatatom 15 189 0 0 0; +#X floatatom 15 244 0 0 0; +#X obj 64 10 ftom; +#X floatatom 15 293 0 0 0; +#X obj 120 11 dbtorms; +#X obj 196 11 rmstodb; +#X obj 275 11 dbtopow; +#X obj 352 11 powtodb; +#X text 21 53 The mtof object transposes a midi value into a frequency +in Hertz \, so that "69" goes to "440". You can specify microtonal +pitches as in "69.5" (a quarter tone higher than 69). Ftom does the +reverse.; +#X floatatom 147 185 0 0 0; +#X floatatom 147 240 0 0 0; +#X floatatom 147 289 0 0 0; +#X obj 147 213 dbtorms; +#X obj 147 265 rmstodb; +#X floatatom 261 186 0 0 0; +#X floatatom 261 241 0 0 0; +#X floatatom 261 290 0 0 0; +#X obj 261 214 dbtopow; +#X obj 261 266 powtodb; +#X text 27 336 Overflows and underflows are clipped.; +#X text 300 376 updated for pd version 0.33; +#X connect 0 0 6 0; +#X connect 2 0 4 0; +#X connect 3 0 2 0; +#X connect 4 0 0 0; +#X connect 12 0 15 0; +#X connect 13 0 16 0; +#X connect 15 0 13 0; +#X connect 16 0 14 0; +#X connect 17 0 20 0; +#X connect 18 0 21 0; +#X connect 20 0 18 0; +#X connect 21 0 19 0; diff --git a/pd/doc/5.reference/acoustics~.pd b/pd/doc/5.reference/acoustics~.pd new file mode 100644 index 00000000..f7515339 --- /dev/null +++ b/pd/doc/5.reference/acoustics~.pd @@ -0,0 +1,81 @@ +#N canvas 35 42 813 458 12; +#X obj 158 118 mtof~; +#X obj 158 174 snapshot~; +#X obj 698 132 metro 100; +#X floatatom 158 205 0 0 0; +#X obj 49 174 snapshot~; +#X floatatom 49 55 0 0 0; +#X floatatom 49 205 0 0 0; +#X obj 49 118 ftom~; +#X obj 264 174 snapshot~; +#X floatatom 264 205 0 0 0; +#X obj 264 118 dbtorms~; +#X obj 697 58 loadbang; +#X msg 709 88 \; pd dsp 1; +#X obj 49 86 sig~; +#X floatatom 158 55 0 0 0; +#X obj 158 86 sig~; +#X floatatom 264 54 0 0 0; +#X obj 264 86 sig~; +#X obj 492 172 snapshot~; +#X floatatom 492 203 0 0 0; +#X obj 383 172 snapshot~; +#X floatatom 383 53 0 0 0; +#X floatatom 383 203 0 0 0; +#X obj 607 172 snapshot~; +#X floatatom 607 203 0 0 0; +#X obj 383 84 sig~; +#X floatatom 492 53 0 0 0; +#X obj 492 84 sig~; +#X floatatom 607 53 0 0 0; +#X obj 607 84 sig~; +#X obj 383 115 rmstodb~; +#X obj 492 115 dbtopow~; +#X obj 607 115 powtodb~; +#X obj 17 10 mtof~; +#X text 70 11 (etc) - conversions for audio signals; +#X text 60 400 see also:; +#X obj 145 400 mtof; +#X text 192 400 (etc.); +#X text 547 416 updated for Pd version 0.33; +#X text 43 241 These objects convert MIDI pitch to frequency and back +\, and dB to and from RMS and power. THey take audio signals as input +and output (and work sample by sample.) Since they call library math +functions \, they may be much more expensive than other workaday tilde +objects such as *~ and osc~ \, depending on your hardware and math +library.; +#X text 41 343 Boundary conditions are handled "reasonably". 100 db +is assigned an RMS of 1 \, and dbtorms~ and dbtopow~ output true zero +for 0 dB and less.; +#X connect 0 0 1 0; +#X connect 1 0 3 0; +#X connect 2 0 1 0; +#X connect 2 0 8 0; +#X connect 2 0 4 0; +#X connect 2 0 20 0; +#X connect 2 0 18 0; +#X connect 2 0 23 0; +#X connect 4 0 6 0; +#X connect 5 0 13 0; +#X connect 7 0 4 0; +#X connect 8 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 2 0; +#X connect 11 0 12 0; +#X connect 13 0 7 0; +#X connect 14 0 15 0; +#X connect 15 0 0 0; +#X connect 16 0 17 0; +#X connect 17 0 10 0; +#X connect 18 0 19 0; +#X connect 20 0 22 0; +#X connect 21 0 25 0; +#X connect 23 0 24 0; +#X connect 25 0 30 0; +#X connect 26 0 27 0; +#X connect 27 0 31 0; +#X connect 28 0 29 0; +#X connect 29 0 32 0; +#X connect 30 0 20 0; +#X connect 31 0 18 0; +#X connect 32 0 23 0; diff --git a/pd/doc/5.reference/adc~_dac~.pd b/pd/doc/5.reference/adc~_dac~.pd new file mode 100644 index 00000000..e97429b6 --- /dev/null +++ b/pd/doc/5.reference/adc~_dac~.pd @@ -0,0 +1,11 @@ +#N canvas 195 155 575 293 12; +#X obj 8 11 adc~; +#X obj 72 11 dac~; +#X obj 63 121 adc~ 5; +#X text 143 121 (input from channel 5 only); +#X obj 61 145 dac~ 1 2 5 23; +#X text 184 145 (output to channels 1 \, 2 \, 5 \, and 23); +#X text 16 173 The actual number of channels Pd inputs and outputs are set on Pd's command line. You can open patches that want to use more channels \, and channel numbers out of rance will be dropped (dac~) or appear as zero (adc~).; +#X text 308 254 updated for Pd version 0.33; +#X text 122 9 - audio I/O; +#X text 8 46 Adc~ and dac~ rovide real-time audio input and output for Pd \, respectively \, whether analog or digital. By default they are stereo but you can specify channel numbers as in:; diff --git a/pd/doc/5.reference/append.pd b/pd/doc/5.reference/append.pd new file mode 100644 index 00000000..3b5076b8 --- /dev/null +++ b/pd/doc/5.reference/append.pd @@ -0,0 +1,629 @@ +#N struct help-append-template1 float x float y float z; +#N canvas 330 8 595 450 12; +#X text 15 344 see also:; +#N canvas 164 72 425 146 help-append-template1 0; +#X obj 60 21 template float x float y float z; +#X obj 18 81 filledpolygon z z 0 0 0 20 0 20 30 0 30; +#X restore 357 373 pd help-append-template1; +#X obj 141 393 template; +#X obj 16 368 get; +#X obj 48 368 set; +#X obj 148 368 getsize; +#X obj 215 368 setsize; +#X obj 218 393 element; +#X obj 15 394 sublist; +#X obj 83 393 scalar; +#N canvas 0 0 276 163 help-append-data 1; +#X scalar help-append-template1 129 129 129 \;; +#X scalar help-append-template1 130 130 130 \;; +#X scalar help-append-template1 132 132 132 \;; +#X scalar help-append-template1 133 133 133 \;; +#X scalar help-append-template1 135 135 135 \;; +#X scalar help-append-template1 136 136 136 \;; +#X scalar help-append-template1 137 137 137 \;; +#X scalar help-append-template1 138 138 138 \;; +#X scalar help-append-template1 139 139 139 \;; +#X scalar help-append-template1 140 140 140 \;; +#X scalar help-append-template1 141 141 141 \;; +#X scalar help-append-template1 142 142 142 \;; +#X scalar help-append-template1 141 141 141 \;; +#X scalar help-append-template1 139 139 139 \;; +#X scalar help-append-template1 136 136 136 \;; +#X scalar help-append-template1 128 128 128 \;; +#X scalar help-append-template1 125 125 125 \;; +#X scalar help-append-template1 122 122 122 \;; +#X scalar help-append-template1 119 119 119 \;; +#X scalar help-append-template1 117 117 117 \;; +#X scalar help-append-template1 114 114 114 \;; +#X scalar help-append-template1 112 112 112 \;; +#X scalar help-append-template1 110 110 110 \;; +#X scalar help-append-template1 108 108 108 \;; +#X scalar help-append-template1 107 107 107 \;; +#X scalar help-append-template1 105 105 105 \;; +#X scalar help-append-template1 104 104 104 \;; +#X scalar help-append-template1 102 102 102 \;; +#X scalar help-append-template1 101 101 101 \;; +#X scalar help-append-template1 100 100 100 \;; +#X scalar help-append-template1 99 99 99 \;; +#X scalar help-append-template1 98 98 98 \;; +#X scalar help-append-template1 97 97 97 \;; +#X scalar help-append-template1 96 96 96 \;; +#X scalar help-append-template1 95 95 95 \;; +#X scalar help-append-template1 94 94 94 \;; +#X scalar help-append-template1 93 93 93 \;; +#X scalar help-append-template1 92 92 92 \;; +#X scalar help-append-template1 89 89 89 \;; +#X scalar help-append-template1 87 87 87 \;; +#X scalar help-append-template1 85 85 85 \;; +#X scalar help-append-template1 84 84 84 \;; +#X scalar help-append-template1 83 83 83 \;; +#X scalar help-append-template1 82 82 82 \;; +#X scalar help-append-template1 81 81 81 \;; +#X scalar help-append-template1 79 79 79 \;; +#X scalar help-append-template1 77 77 77 \;; +#X scalar help-append-template1 74 74 74 \;; +#X scalar help-append-template1 72 72 72 \;; +#X scalar help-append-template1 70 70 70 \;; +#X scalar help-append-template1 68 68 68 \;; +#X scalar help-append-template1 67 67 67 \;; +#X scalar help-append-template1 66 66 66 \;; +#X scalar help-append-template1 64 64 64 \;; +#X scalar help-append-template1 62 62 62 \;; +#X scalar help-append-template1 61 61 61 \;; +#X scalar help-append-template1 59 59 59 \;; +#X scalar help-append-template1 58 58 58 \;; +#X scalar help-append-template1 57 57 57 \;; +#X scalar help-append-template1 56 56 56 \;; +#X scalar help-append-template1 55 55 55 \;; +#X scalar help-append-template1 54 54 54 \;; +#X scalar help-append-template1 53 53 53 \;; +#X scalar help-append-template1 52 52 52 \;; +#X scalar help-append-template1 50 50 50 \;; +#X scalar help-append-template1 49 49 49 \;; +#X scalar help-append-template1 47 47 47 \;; +#X scalar help-append-template1 46 46 46 \;; +#X scalar help-append-template1 45 45 45 \;; +#X scalar help-append-template1 44 44 44 \;; +#X scalar help-append-template1 43 43 43 \;; +#X scalar help-append-template1 44 44 44 \;; +#X scalar help-append-template1 45 45 45 \;; +#X scalar help-append-template1 47 47 47 \;; +#X scalar help-append-template1 48 48 48 \;; +#X scalar help-append-template1 49 49 49 \;; +#X scalar help-append-template1 51 51 51 \;; +#X scalar help-append-template1 52 52 52 \;; +#X scalar help-append-template1 54 54 54 \;; +#X scalar help-append-template1 56 56 56 \;; +#X scalar help-append-template1 58 58 58 \;; +#X scalar help-append-template1 60 60 60 \;; +#X scalar help-append-template1 62 62 62 \;; +#X scalar help-append-template1 68 68 68 \;; +#X scalar help-append-template1 70 70 70 \;; +#X scalar help-append-template1 76 76 76 \;; +#X scalar help-append-template1 79 79 79 \;; +#X scalar help-append-template1 85 85 85 \;; +#X scalar help-append-template1 88 88 88 \;; +#X scalar help-append-template1 91 91 91 \;; +#X scalar help-append-template1 99 99 99 \;; +#X scalar help-append-template1 101 101 101 \;; +#X scalar help-append-template1 103 103 103 \;; +#X scalar help-append-template1 105 105 105 \;; +#X scalar help-append-template1 107 107 107 \;; +#X scalar help-append-template1 109 109 109 \;; +#X scalar help-append-template1 111 111 111 \;; +#X scalar help-append-template1 113 113 113 \;; +#X scalar help-append-template1 115 115 115 \;; +#X scalar help-append-template1 117 117 117 \;; +#X scalar help-append-template1 119 119 119 \;; +#X scalar help-append-template1 121 121 121 \;; +#X scalar help-append-template1 123 123 123 \;; +#X scalar help-append-template1 129 129 129 \;; +#X scalar help-append-template1 132 132 132 \;; +#X scalar help-append-template1 134 134 134 \;; +#X scalar help-append-template1 136 136 136 \;; +#X scalar help-append-template1 137 137 137 \;; +#X scalar help-append-template1 139 139 139 \;; +#X scalar help-append-template1 140 140 140 \;; +#X scalar help-append-template1 142 142 142 \;; +#X scalar help-append-template1 143 143 143 \;; +#X scalar help-append-template1 144 144 144 \;; +#X scalar help-append-template1 146 146 146 \;; +#X scalar help-append-template1 147 147 147 \;; +#X scalar help-append-template1 149 149 149 \;; +#X scalar help-append-template1 150 150 150 \;; +#X scalar help-append-template1 152 152 152 \;; +#X scalar help-append-template1 153 153 153 \;; +#X scalar help-append-template1 154 154 154 \;; +#X scalar help-append-template1 155 155 155 \;; +#X scalar help-append-template1 156 156 156 \;; +#X scalar help-append-template1 157 157 157 \;; +#X scalar help-append-template1 158 158 158 \;; +#X scalar help-append-template1 160 160 160 \;; +#X scalar help-append-template1 161 161 161 \;; +#X scalar help-append-template1 162 162 162 \;; +#X scalar help-append-template1 163 163 163 \;; +#X scalar help-append-template1 164 164 164 \;; +#X scalar help-append-template1 165 165 165 \;; +#X scalar help-append-template1 166 166 166 \;; +#X scalar help-append-template1 168 168 168 \;; +#X scalar help-append-template1 169 169 169 \;; +#X scalar help-append-template1 170 170 170 \;; +#X scalar help-append-template1 172 172 172 \;; +#X scalar help-append-template1 173 173 173 \;; +#X scalar help-append-template1 175 175 175 \;; +#X scalar help-append-template1 177 177 177 \;; +#X scalar help-append-template1 179 179 179 \;; +#X scalar help-append-template1 180 180 180 \;; +#X scalar help-append-template1 181 181 181 \;; +#X scalar help-append-template1 182 182 182 \;; +#X scalar help-append-template1 181 181 181 \;; +#X scalar help-append-template1 178 178 178 \;; +#X scalar help-append-template1 170 170 170 \;; +#X scalar help-append-template1 160 160 160 \;; +#X scalar help-append-template1 150 150 150 \;; +#X scalar help-append-template1 140 140 140 \;; +#X scalar help-append-template1 137 137 137 \;; +#X scalar help-append-template1 134 134 134 \;; +#X scalar help-append-template1 131 131 131 \;; +#X scalar help-append-template1 130 130 130 \;; +#X scalar help-append-template1 128 128 128 \;; +#X scalar help-append-template1 127 127 127 \;; +#X scalar help-append-template1 125 125 125 \;; +#X scalar help-append-template1 123 123 123 \;; +#X scalar help-append-template1 120 120 120 \;; +#X scalar help-append-template1 118 118 118 \;; +#X scalar help-append-template1 115 115 115 \;; +#X scalar help-append-template1 112 112 112 \;; +#X scalar help-append-template1 110 110 110 \;; +#X scalar help-append-template1 104 104 104 \;; +#X scalar help-append-template1 102 102 102 \;; +#X scalar help-append-template1 100 100 100 \;; +#X scalar help-append-template1 99 99 99 \;; +#X scalar help-append-template1 98 98 98 \;; +#X scalar help-append-template1 97 97 97 \;; +#X scalar help-append-template1 96 96 96 \;; +#X scalar help-append-template1 95 95 95 \;; +#X scalar help-append-template1 94 94 94 \;; +#X scalar help-append-template1 92 92 92 \;; +#X scalar help-append-template1 91 91 91 \;; +#X scalar help-append-template1 90 90 90 \;; +#X scalar help-append-template1 88 88 88 \;; +#X scalar help-append-template1 86 86 86 \;; +#X scalar help-append-template1 84 84 84 \;; +#X scalar help-append-template1 82 82 82 \;; +#X scalar help-append-template1 80 80 80 \;; +#X scalar help-append-template1 79 79 79 \;; +#X scalar help-append-template1 78 78 78 \;; +#X scalar help-append-template1 77 77 77 \;; +#X scalar help-append-template1 76 76 76 \;; +#X scalar help-append-template1 75 75 75 \;; +#X scalar help-append-template1 74 74 74 \;; +#X scalar help-append-template1 75 75 75 \;; +#X scalar help-append-template1 77 77 77 \;; +#X scalar help-append-template1 80 80 80 \;; +#X scalar help-append-template1 83 83 83 \;; +#X scalar help-append-template1 85 85 85 \;; +#X scalar help-append-template1 91 91 91 \;; +#X scalar help-append-template1 99 99 99 \;; +#X scalar help-append-template1 105 105 105 \;; +#X scalar help-append-template1 111 111 111 \;; +#X scalar help-append-template1 117 117 117 \;; +#X scalar help-append-template1 119 119 119 \;; +#X scalar help-append-template1 121 121 121 \;; +#X scalar help-append-template1 123 123 123 \;; +#X scalar help-append-template1 125 125 125 \;; +#X scalar help-append-template1 127 127 127 \;; +#X scalar help-append-template1 129 129 129 \;; +#X scalar help-append-template1 131 131 131 \;; +#X scalar help-append-template1 133 133 133 \;; +#X scalar help-append-template1 135 135 135 \;; +#X scalar help-append-template1 136 136 136 \;; +#X scalar help-append-template1 138 138 138 \;; +#X scalar help-append-template1 139 139 139 \;; +#X scalar help-append-template1 140 140 140 \;; +#X scalar help-append-template1 142 142 142 \;; +#X scalar help-append-template1 144 144 144 \;; +#X scalar help-append-template1 145 145 145 \;; +#X scalar help-append-template1 147 147 147 \;; +#X scalar help-append-template1 149 149 149 \;; +#X scalar help-append-template1 150 150 150 \;; +#X scalar help-append-template1 152 152 152 \;; +#X scalar help-append-template1 153 153 153 \;; +#X scalar help-append-template1 154 154 154 \;; +#X scalar help-append-template1 155 155 155 \;; +#X scalar help-append-template1 156 156 156 \;; +#X scalar help-append-template1 157 157 157 \;; +#X scalar help-append-template1 159 159 159 \;; +#X scalar help-append-template1 160 160 160 \;; +#X scalar help-append-template1 161 161 161 \;; +#X scalar help-append-template1 163 163 163 \;; +#X scalar help-append-template1 165 165 165 \;; +#X scalar help-append-template1 166 166 166 \;; +#X scalar help-append-template1 167 167 167 \;; +#X scalar help-append-template1 168 168 168 \;; +#X scalar help-append-template1 167 167 167 \;; +#X scalar help-append-template1 164 164 164 \;; +#X scalar help-append-template1 161 161 161 \;; +#X scalar help-append-template1 153 153 153 \;; +#X scalar help-append-template1 145 145 145 \;; +#X scalar help-append-template1 142 142 142 \;; +#X scalar help-append-template1 139 139 139 \;; +#X scalar help-append-template1 137 137 137 \;; +#X scalar help-append-template1 135 135 135 \;; +#X scalar help-append-template1 133 133 133 \;; +#X scalar help-append-template1 131 131 131 \;; +#X scalar help-append-template1 130 130 130 \;; +#X scalar help-append-template1 128 128 128 \;; +#X scalar help-append-template1 126 126 126 \;; +#X scalar help-append-template1 124 124 124 \;; +#X scalar help-append-template1 121 121 121 \;; +#X scalar help-append-template1 118 118 118 \;; +#X scalar help-append-template1 116 116 116 \;; +#X scalar help-append-template1 113 113 113 \;; +#X scalar help-append-template1 111 111 111 \;; +#X scalar help-append-template1 109 109 109 \;; +#X scalar help-append-template1 106 106 106 \;; +#X scalar help-append-template1 104 104 104 \;; +#X scalar help-append-template1 102 102 102 \;; +#X scalar help-append-template1 100 100 100 \;; +#X scalar help-append-template1 98 98 98 \;; +#X scalar help-append-template1 96 96 96 \;; +#X scalar help-append-template1 94 94 94 \;; +#X scalar help-append-template1 92 92 92 \;; +#X scalar help-append-template1 90 90 90 \;; +#X scalar help-append-template1 88 88 88 \;; +#X scalar help-append-template1 87 87 87 \;; +#X scalar help-append-template1 85 85 85 \;; +#X scalar help-append-template1 84 84 84 \;; +#X scalar help-append-template1 86 86 86 \;; +#X scalar help-append-template1 92 92 92 \;; +#X scalar help-append-template1 100 100 100 \;; +#X scalar help-append-template1 108 108 108 \;; +#X scalar help-append-template1 118 118 118 \;; +#X scalar help-append-template1 128 128 128 \;; +#X scalar help-append-template1 138 138 138 \;; +#X scalar help-append-template1 150 150 150 \;; +#X scalar help-append-template1 160 160 160 \;; +#X scalar help-append-template1 170 170 170 \;; +#X scalar help-append-template1 180 180 180 \;; +#X scalar help-append-template1 188 188 188 \;; +#X scalar help-append-template1 191 191 191 \;; +#X scalar help-append-template1 194 194 194 \;; +#X scalar help-append-template1 196 196 196 \;; +#X scalar help-append-template1 197 197 197 \;; +#X scalar help-append-template1 195 195 195 \;; +#X scalar help-append-template1 185 185 185 \;; +#X scalar help-append-template1 171 171 171 \;; +#X scalar help-append-template1 157 157 157 \;; +#X scalar help-append-template1 143 143 143 \;; +#X scalar help-append-template1 133 133 133 \;; +#X scalar help-append-template1 125 125 125 \;; +#X scalar help-append-template1 123 123 123 \;; +#X scalar help-append-template1 122 122 122 \;; +#X scalar help-append-template1 123 123 123 \;; +#X scalar help-append-template1 125 125 125 \;; +#X scalar help-append-template1 135 135 135 \;; +#X scalar help-append-template1 147 147 147 \;; +#X scalar help-append-template1 161 161 161 \;; +#X scalar help-append-template1 177 177 177 \;; +#X scalar help-append-template1 191 191 191 \;; +#X scalar help-append-template1 203 203 203 \;; +#X scalar help-append-template1 211 211 211 \;; +#X scalar help-append-template1 212 212 212 \;; +#X scalar help-append-template1 213 213 213 \;; +#X scalar help-append-template1 212 212 212 \;; +#X scalar help-append-template1 211 211 211 \;; +#X scalar help-append-template1 201 201 201 \;; +#X scalar help-append-template1 187 187 187 \;; +#X scalar help-append-template1 171 171 171 \;; +#X scalar help-append-template1 155 155 155 \;; +#X scalar help-append-template1 143 143 143 \;; +#X scalar help-append-template1 140 140 140 \;; +#X scalar help-append-template1 138 138 138 \;; +#X scalar help-append-template1 139 139 139 \;; +#X scalar help-append-template1 141 141 141 \;; +#X scalar help-append-template1 153 153 153 \;; +#X scalar help-append-template1 163 163 163 \;; +#X scalar help-append-template1 173 173 173 \;; +#X scalar help-append-template1 176 176 176 \;; +#X scalar help-append-template1 178 178 178 \;; +#X scalar help-append-template1 179 179 179 \;; +#X scalar help-append-template1 177 177 177 \;; +#X scalar help-append-template1 167 167 167 \;; +#X scalar help-append-template1 149 149 149 \;; +#X scalar help-append-template1 129 129 129 \;; +#X scalar help-append-template1 111 111 111 \;; +#X scalar help-append-template1 97 97 97 \;; +#X scalar help-append-template1 87 87 87 \;; +#X scalar help-append-template1 84 84 84 \;; +#X scalar help-append-template1 85 85 85 \;; +#X scalar help-append-template1 91 91 91 \;; +#X scalar help-append-template1 99 99 99 \;; +#X scalar help-append-template1 111 111 111 \;; +#X scalar help-append-template1 123 123 123 \;; +#X scalar help-append-template1 135 135 135 \;; +#X scalar help-append-template1 147 147 147 \;; +#X scalar help-append-template1 155 155 155 \;; +#X scalar help-append-template1 156 156 156 \;; +#X scalar help-append-template1 154 154 154 \;; +#X scalar help-append-template1 144 144 144 \;; +#X scalar help-append-template1 130 130 130 \;; +#X scalar help-append-template1 114 114 114 \;; +#X scalar help-append-template1 100 100 100 \;; +#X scalar help-append-template1 90 90 90 \;; +#X scalar help-append-template1 88 88 88 \;; +#X scalar help-append-template1 89 89 89 \;; +#X scalar help-append-template1 91 91 91 \;; +#X scalar help-append-template1 99 99 99 \;; +#X scalar help-append-template1 111 111 111 \;; +#X scalar help-append-template1 127 127 127 \;; +#X scalar help-append-template1 141 141 141 \;; +#X scalar help-append-template1 149 149 149 \;; +#X scalar help-append-template1 147 147 147 \;; +#X scalar help-append-template1 135 135 135 \;; +#X scalar help-append-template1 123 123 123 \;; +#X scalar help-append-template1 107 107 107 \;; +#X scalar help-append-template1 91 91 91 \;; +#X scalar help-append-template1 79 79 79 \;; +#X scalar help-append-template1 71 71 71 \;; +#X scalar help-append-template1 70 70 70 \;; +#X scalar help-append-template1 71 71 71 \;; +#X scalar help-append-template1 72 72 72 \;; +#X scalar help-append-template1 82 82 82 \;; +#X scalar help-append-template1 92 92 92 \;; +#X scalar help-append-template1 102 102 102 \;; +#X scalar help-append-template1 104 104 104 \;; +#X scalar help-append-template1 103 103 103 \;; +#X scalar help-append-template1 102 102 102 \;; +#X scalar help-append-template1 92 92 92 \;; +#X scalar help-append-template1 80 80 80 \;; +#X scalar help-append-template1 68 68 68 \;; +#X scalar help-append-template1 56 56 56 \;; +#X scalar help-append-template1 53 53 53 \;; +#X scalar help-append-template1 51 51 51 \;; +#X scalar help-append-template1 52 52 52 \;; +#X scalar help-append-template1 53 53 53 \;; +#X scalar help-append-template1 59 59 59 \;; +#X scalar help-append-template1 65 65 65 \;; +#X scalar help-append-template1 73 73 73 \;; +#X scalar help-append-template1 76 76 76 \;; +#X scalar help-append-template1 78 78 78 \;; +#X scalar help-append-template1 81 81 81 \;; +#X scalar help-append-template1 83 83 83 \;; +#X scalar help-append-template1 85 85 85 \;; +#X scalar help-append-template1 86 86 86 \;; +#X scalar help-append-template1 87 87 87 \;; +#X scalar help-append-template1 88 88 88 \;; +#X scalar help-append-template1 90 90 90 \;; +#X scalar help-append-template1 92 92 92 \;; +#X scalar help-append-template1 94 94 94 \;; +#X scalar help-append-template1 102 102 102 \;; +#X scalar help-append-template1 110 110 110 \;; +#X scalar help-append-template1 118 118 118 \;; +#X scalar help-append-template1 121 121 121 \;; +#X scalar help-append-template1 124 124 124 \;; +#X scalar help-append-template1 127 127 127 \;; +#X scalar help-append-template1 129 129 129 \;; +#X scalar help-append-template1 132 132 132 \;; +#X scalar help-append-template1 134 134 134 \;; +#X scalar help-append-template1 136 136 136 \;; +#X scalar help-append-template1 138 138 138 \;; +#X scalar help-append-template1 140 140 140 \;; +#X scalar help-append-template1 141 141 141 \;; +#X scalar help-append-template1 143 143 143 \;; +#X scalar help-append-template1 145 145 145 \;; +#X scalar help-append-template1 146 146 146 \;; +#X scalar help-append-template1 148 148 148 \;; +#X scalar help-append-template1 149 149 149 \;; +#X scalar help-append-template1 150 150 150 \;; +#X scalar help-append-template1 151 151 151 \;; +#X scalar help-append-template1 153 153 153 \;; +#X scalar help-append-template1 155 155 155 \;; +#X scalar help-append-template1 156 156 156 \;; +#X scalar help-append-template1 158 158 158 \;; +#X scalar help-append-template1 160 160 160 \;; +#X scalar help-append-template1 161 161 161 \;; +#X scalar help-append-template1 163 163 163 \;; +#X scalar help-append-template1 164 164 164 \;; +#X scalar help-append-template1 165 165 165 \;; +#X scalar help-append-template1 166 166 166 \;; +#X scalar help-append-template1 168 168 168 \;; +#X scalar help-append-template1 170 170 170 \;; +#X scalar help-append-template1 172 172 172 \;; +#X scalar help-append-template1 174 174 174 \;; +#X scalar help-append-template1 176 176 176 \;; +#X scalar help-append-template1 178 178 178 \;; +#X scalar help-append-template1 179 179 179 \;; +#X scalar help-append-template1 180 180 180 \;; +#X scalar help-append-template1 182 182 182 \;; +#X scalar help-append-template1 183 183 183 \;; +#X scalar help-append-template1 185 185 185 \;; +#X scalar help-append-template1 187 187 187 \;; +#X scalar help-append-template1 189 189 189 \;; +#X scalar help-append-template1 190 190 190 \;; +#X scalar help-append-template1 192 192 192 \;; +#X scalar help-append-template1 194 194 194 \;; +#X scalar help-append-template1 196 196 196 \;; +#X scalar help-append-template1 198 198 198 \;; +#X scalar help-append-template1 199 199 199 \;; +#X scalar help-append-template1 200 200 200 \;; +#X scalar help-append-template1 201 201 201 \;; +#X scalar help-append-template1 203 203 203 \;; +#X scalar help-append-template1 204 204 204 \;; +#X scalar help-append-template1 206 206 206 \;; +#X scalar help-append-template1 207 207 207 \;; +#X scalar help-append-template1 209 209 209 \;; +#X scalar help-append-template1 210 210 210 \;; +#X scalar help-append-template1 211 211 211 \;; +#X scalar help-append-template1 212 212 212 \;; +#X scalar help-append-template1 213 213 213 \;; +#X scalar help-append-template1 223 223 223 \;; +#X scalar help-append-template1 226 226 226 \;; +#X scalar help-append-template1 228 228 228 \;; +#X scalar help-append-template1 229 229 229 \;; +#X scalar help-append-template1 230 230 230 \;; +#X scalar help-append-template1 231 231 231 \;; +#X scalar help-append-template1 232 232 232 \;; +#X scalar help-append-template1 233 233 233 \;; +#X scalar help-append-template1 234 234 234 \;; +#X scalar help-append-template1 233 233 233 \;; +#X scalar help-append-template1 225 225 225 \;; +#X scalar help-append-template1 217 217 217 \;; +#X scalar help-append-template1 205 205 205 \;; +#X scalar help-append-template1 195 195 195 \;; +#X scalar help-append-template1 183 183 183 \;; +#X scalar help-append-template1 173 173 173 \;; +#X scalar help-append-template1 163 163 163 \;; +#X scalar help-append-template1 155 155 155 \;; +#X scalar help-append-template1 152 152 152 \;; +#X scalar help-append-template1 150 150 150 \;; +#X scalar help-append-template1 148 148 148 \;; +#X scalar help-append-template1 147 147 147 \;; +#X scalar help-append-template1 145 145 145 \;; +#X scalar help-append-template1 143 143 143 \;; +#X scalar help-append-template1 141 141 141 \;; +#X scalar help-append-template1 139 139 139 \;; +#X scalar help-append-template1 136 136 136 \;; +#X scalar help-append-template1 133 133 133 \;; +#X scalar help-append-template1 130 130 130 \;; +#X scalar help-append-template1 122 122 122 \;; +#X scalar help-append-template1 116 116 116 \;; +#X scalar help-append-template1 113 113 113 \;; +#X scalar help-append-template1 110 110 110 \;; +#X scalar help-append-template1 108 108 108 \;; +#X scalar help-append-template1 106 106 106 \;; +#X scalar help-append-template1 104 104 104 \;; +#X scalar help-append-template1 102 102 102 \;; +#X scalar help-append-template1 100 100 100 \;; +#X scalar help-append-template1 99 99 99 \;; +#X scalar help-append-template1 98 98 98 \;; +#X scalar help-append-template1 96 96 96 \;; +#X scalar help-append-template1 95 95 95 \;; +#X scalar help-append-template1 93 93 93 \;; +#X scalar help-append-template1 92 92 92 \;; +#X scalar help-append-template1 90 90 90 \;; +#X scalar help-append-template1 88 88 88 \;; +#X scalar help-append-template1 85 85 85 \;; +#X scalar help-append-template1 82 82 82 \;; +#X scalar help-append-template1 76 76 76 \;; +#X scalar help-append-template1 74 74 74 \;; +#X scalar help-append-template1 71 71 71 \;; +#X scalar help-append-template1 69 69 69 \;; +#X scalar help-append-template1 67 67 67 \;; +#X scalar help-append-template1 65 65 65 \;; +#X scalar help-append-template1 63 63 63 \;; +#X scalar help-append-template1 62 62 62 \;; +#X scalar help-append-template1 60 60 60 \;; +#X scalar help-append-template1 58 58 58 \;; +#X scalar help-append-template1 56 56 56 \;; +#X scalar help-append-template1 54 54 54 \;; +#X scalar help-append-template1 51 51 51 \;; +#X scalar help-append-template1 49 49 49 \;; +#X scalar help-append-template1 47 47 47 \;; +#X scalar help-append-template1 45 45 45 \;; +#X scalar help-append-template1 44 44 44 \;; +#X scalar help-append-template1 42 42 42 \;; +#X scalar help-append-template1 40 40 40 \;; +#X scalar help-append-template1 38 38 38 \;; +#X scalar help-append-template1 36 36 36 \;; +#X scalar help-append-template1 34 34 34 \;; +#X scalar help-append-template1 33 33 33 \;; +#X scalar help-append-template1 32 32 32 \;; +#X scalar help-append-template1 31 31 31 \;; +#X scalar help-append-template1 30 30 30 \;; +#X scalar help-append-template1 28 28 28 \;; +#X scalar help-append-template1 27 27 27 \;; +#X scalar help-append-template1 25 25 25 \;; +#X scalar help-append-template1 24 24 24 \;; +#X scalar help-append-template1 23 23 23 \;; +#X scalar help-append-template1 22 22 22 \;; +#X scalar help-append-template1 21 21 21 \;; +#X scalar help-append-template1 20 20 20 \;; +#X scalar help-append-template1 19 19 19 \;; +#X scalar help-append-template1 18 18 18 \;; +#X scalar help-append-template1 16 16 16 \;; +#X scalar help-append-template1 15 15 15 \;; +#X scalar help-append-template1 14 14 14 \;; +#X scalar help-append-template1 13 13 13 \;; +#X scalar help-append-template1 12 12 12 \;; +#X scalar help-append-template1 11 11 11 \;; +#X scalar help-append-template1 10 10 10 \;; +#X scalar help-append-template1 9 9 9 \;; +#X scalar help-append-template1 8 8 8 \;; +#X scalar help-append-template1 7 7 7 \;; +#X scalar help-append-template1 6 6 6 \;; +#X scalar help-append-template1 5 5 5 \;; +#X scalar help-append-template1 4 4 4 \;; +#X scalar help-append-template1 3 3 3 \;; +#X scalar help-append-template1 2 2 2 \;; +#X scalar help-append-template1 3 3 3 \;; +#X scalar help-append-template1 73 73 73 \;; +#X scalar help-append-template1 75 75 75 \;; +#X scalar help-append-template1 77 77 77 \;; +#X scalar help-append-template1 79 79 79 \;; +#X scalar help-append-template1 81 81 81 \;; +#X scalar help-append-template1 82 82 82 \;; +#X scalar help-append-template1 84 84 84 \;; +#X scalar help-append-template1 85 85 85 \;; +#X scalar help-append-template1 86 86 86 \;; +#X scalar help-append-template1 87 87 87 \;; +#X scalar help-append-template1 93 93 93 \;; +#X scalar help-append-template1 96 96 96 \;; +#X scalar help-append-template1 98 98 98 \;; +#X scalar help-append-template1 100 100 100 \;; +#X scalar help-append-template1 101 101 101 \;; +#X scalar help-append-template1 102 102 102 \;; +#X scalar help-append-template1 103 103 103 \;; +#X scalar help-append-template1 104 104 104 \;; +#X scalar help-append-template1 105 105 105 \;; +#X scalar help-append-template1 106 106 106 \;; +#X scalar help-append-template1 107 107 107 \;; +#X scalar help-append-template1 108 108 108 \;; +#X scalar help-append-template1 110 110 110 \;; +#X scalar help-append-template1 111 111 111 \;; +#X scalar help-append-template1 112 112 112 \;; +#X scalar help-append-template1 113 113 113 \;; +#X scalar help-append-template1 114 114 114 \;; +#X scalar help-append-template1 115 115 115 \;; +#X scalar help-append-template1 116 116 116 \;; +#X scalar help-append-template1 117 117 117 \;; +#X scalar help-append-template1 118 118 118 \;; +#X scalar help-append-template1 119 119 119 \;; +#X scalar help-append-template1 120 120 120 \;; +#X scalar help-append-template1 121 121 121 \;; +#X scalar help-append-template1 122 122 122 \;; +#X scalar help-append-template1 123 123 123 \;; +#X scalar help-append-template1 124 124 124 \;; +#X scalar help-append-template1 125 125 125 \;; +#X scalar help-append-template1 126 126 126 \;; +#X scalar help-append-template1 127 127 127 \;; +#X scalar help-append-template1 128 128 128 \;; +#X restore 357 351 pd help-append-data; +#X obj 212 255 pointer; +#X obj 21 10 append; +#X text 75 9 -- add item to a list; +#X msg 212 231 traverse pd-help-append-data \, bang; +#X obj 34 295 append help-append-template1 x y z; +#X floatatom 34 246 5 0 0; +#X obj 34 266 t f f; +#X msg 356 311 \; pd-help-append-data clear; +#X text 27 28 "append" maintains a pointer to a scalar \, or else an +empty pointer to the head of a list. You may set the pointer using +the leftmost inlet. The creation arguments specify the template of +a new scalar to append \, and the names of the fields (there should +be at least one) you will wish to initialize. To append an object \, +send a number to the leftmost inlet. "Append"'s pointer is updated +to point to the new scalar \, and the new pointer is also output.; +#X text 28 149 To insert to the beginning of a list \, you can append +to the "head" of the list. You may append objects of different templates +using different "append" objects.; +#X obj 81 368 pointer; +#X text 341 408 updated for Pd version 0.35; +#X text 34 226 click this first->; +#X text 230 210 go to (and output) "head" of the list; +#X connect 11 0 15 3; +#X connect 14 0 11 0; +#X connect 16 0 17 0; +#X connect 17 0 15 0; +#X connect 17 1 15 1; +#X connect 17 1 15 2; diff --git a/pd/doc/5.reference/bag.pd b/pd/doc/5.reference/bag.pd new file mode 100644 index 00000000..cdd5bfff --- /dev/null +++ b/pd/doc/5.reference/bag.pd @@ -0,0 +1,27 @@ +#N canvas 118 56 577 366 12; +#X text 18 337 see also:; +#X obj 148 337 makenote; +#X msg 76 151 60 64; +#X msg 127 151 60 0; +#X msg 171 151 62 64; +#X msg 218 151 62 0; +#X obj 76 278 print; +#X text 121 279 Output is in the printout window.; +#X msg 218 197 clear; +#X obj 66 15 bag; +#X text 101 14 - COLLECTION OF NUMBERS; +#X text 12 42 The bag object takes (value \, flag) pairs. If the flag is true (nonzero) \, the value is added to the collection \; if false \, it's removed. The collection may have many copies of the same value. You can output the collection (and empty it) with a "flush" message \, or just empty it with "clear." You can use this to mimic a sustain pedal \, for example.; +#X msg 217 174 flush; +#X obj 104 337 poly; +#X obj 76 248 bag; +#X text 267 151 <-- add or delete elements; +#X text 271 174 <-- output them; +#X text 273 198 <-- start over; +#X text 328 337 updated for Pd version 0.33; +#X connect 2 0 14 0; +#X connect 3 0 14 0; +#X connect 4 0 14 0; +#X connect 5 0 14 0; +#X connect 8 0 14 0; +#X connect 12 0 14 0; +#X connect 14 0 6 0; diff --git a/pd/doc/5.reference/bang.pd b/pd/doc/5.reference/bang.pd new file mode 100644 index 00000000..1f522268 --- /dev/null +++ b/pd/doc/5.reference/bang.pd @@ -0,0 +1,13 @@ +#N canvas 118 56 581 250 12; +#X obj 49 182 print; +#X text 107 183 Output is in the printout window.; +#X obj 66 15 bang; +#X text 112 14 - SEND "BANG" MSSESSAGE; +#X msg 61 105 walk the cat; +#X msg 49 79 45; +#X obj 49 152 bang; +#X text 336 233 updated for Pd version 0.27; +#X text 23 42 Outputs a "bang" message whatever it receives.; +#X connect 4 0 6 0; +#X connect 5 0 6 0; +#X connect 6 0 0 0; diff --git a/pd/doc/5.reference/bang~.pd b/pd/doc/5.reference/bang~.pd new file mode 100644 index 00000000..debade2f --- /dev/null +++ b/pd/doc/5.reference/bang~.pd @@ -0,0 +1,18 @@ +#N canvas 0 0 529 299 12; +#X obj 112 128 bang~; +#X obj 112 159 print; +#X msg 210 223 \; pd dsp 1; +#X msg 297 216 \; pd dsp 0; +#X msg 210 144 bang; +#X obj 19 20 bang~; +#X obj 306 193 loadbang; +#X obj 297 169 delay 100; +#X text 211 122 click to test; +#X text 71 21 - output bang after each DSP cycle; +#X text 5 59 Bang~ outputs a bang after each DSP cycle (at the same logical time as the DSP cycle.) This is primarily useful for sampling the outputs of analysis algorithms.; +#X text 251 266 updated for Pd version 0.33; +#X connect 0 0 1 0; +#X connect 4 0 2 0; +#X connect 4 0 7 0; +#X connect 6 0 3 0; +#X connect 7 0 3 0; diff --git a/pd/doc/5.reference/biquad~.pd b/pd/doc/5.reference/biquad~.pd new file mode 100644 index 00000000..81a31960 --- /dev/null +++ b/pd/doc/5.reference/biquad~.pd @@ -0,0 +1,35 @@ +#N canvas 185 22 655 349 12; +#X obj 27 14 biquad~; +#X msg 448 11 \; pd dsp 1; +#X msg 448 55 \; pd dsp 0; +#X obj 84 248 env~; +#X floatatom 84 275; +#X floatatom 15 110; +#X obj 15 246 env~; +#X floatatom 15 274; +#X text 13 297 Compare the value of the straight signal on the left with the value of the filtered signal on the right.; +#X obj 84 215 biquad~ 1.41407 -0.9998 1 -1.41421 1; +#X msg 101 121 1.41407 -0.9998 1 -1.41421 1; +#X text 76 31 calculates the following difference equation:; +#X text 77 44 y(n) = ff1 * w(n) + ff2 * w(n-1) + ff3 * w(n-2); +#X text 76 58 w(n) = x(n) + fb1 * w(n-1) + fb2 * w(n-2); +#X text 18 76 Syntax: biquad~ fb1 fb2 ff1 ff2 ff3; +#X text 341 213 this biquad~ is a notch filter for fn = Pi/4; +#X text 390 226 (= SR/8 = 5512.5 Hz @44.1k); +#X text 91 14 2-pole-2-zero-filter; +#X text 113 99 list sets filter parameters; +#X msg 119 161 set 0 0; +#X msg 120 186 clear; +#X obj 15 170 osc~ 5512.5; +#X text 422 337 updated for Pd version-0.30; +#X text 189 163 set internal state; +#X text 187 185 ... or just clear it; +#X connect 3 0 4 0; +#X connect 5 0 21 0; +#X connect 6 0 7 0; +#X connect 9 0 3 0; +#X connect 10 0 9 0; +#X connect 19 0 9 0; +#X connect 20 0 9 0; +#X connect 21 0 6 0; +#X connect 21 0 9 0; diff --git a/pd/doc/5.reference/bng.pd b/pd/doc/5.reference/bng.pd new file mode 100644 index 00000000..d48d560a --- /dev/null +++ b/pd/doc/5.reference/bng.pd @@ -0,0 +1,265 @@ +#N canvas 11 201 538 357 10; +#X obj 1 1 cnv 8 100 60 empty empty bng 20 20 1 18 -262144 -1109 0 +; +#X text 10 288 (c) musil@iem.kug.ac.at; +#X text 52 301 IEM KUG; +#X text 118 61 click properties to; +#X text 106 72 modify geometry \, colors \, etc.; +#X obj 64 257 print; +#N canvas 598 330 290 225 once 0; +#X msg 38 73 1; +#X obj 38 47 t b b; +#X obj 68 124 sel 0; +#X obj 68 103 f 0; +#X obj 38 24 inlet; +#X obj 68 154 outlet; +#X connect 0 0 3 1; +#X connect 1 0 0 0; +#X connect 1 1 3 0; +#X connect 2 0 5 0; +#X connect 3 0 2 0; +#X connect 4 0 1 0; +#X restore 64 234 pd once; +#X obj 36 258 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X obj 3 130 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X obj 36 173 bng 50 950 50 1 foo5_snd foo5_rcv big-bang 63 2 192 12 +-262131 -260818 -143491; +#X msg 36 53 33; +#X msg 50 75 -3.14; +#X msg 73 117 11 22 33.33; +#X msg 63 95 open xxx; +#X msg 96 142 funny; +#X text 101 11 gui-bang:; +#X obj 202 135 s foo5_rcv; +#X obj 202 155 r foo5_snd; +#X obj 202 115 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 +-1 -1; +#X obj 202 175 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 +-1 -1; +#X msg 4 53 0; +#X text 125 205 UP- \, DOWN- \, LEFT- or RIGHT-key; +#X text 124 216 for moving selected gui-objects; +#N canvas 425 170 699 530 edit 0; +#X obj 39 197 f; +#X msg 17 176 bang; +#X floatatom 55 175 3 63 88; +#X floatatom 90 197 3 0 37; +#X obj 39 220 pack 0 0; +#X text 117 197 y-label; +#X text 83 175 x-label; +#X floatatom 259 143 3 8 75; +#X text 286 143 size; +#X obj 279 236 f; +#X msg 257 215 bang; +#X floatatom 295 214 3 -10 10; +#X floatatom 330 236 3 -10 10; +#X obj 279 259 pack 0 0; +#X obj 304 348 f; +#X msg 282 327 bang; +#X floatatom 320 326 3 20 90; +#X floatatom 355 348 3 150 200; +#X obj 304 371 pack 0 0; +#X text 323 214 x-delta; +#X text 357 236 y-delta; +#X text 348 326 x-position; +#X text 382 348 y-position; +#X obj 59 312 f; +#X msg 37 291 bang; +#X floatatom 75 290 3 0 2; +#X floatatom 110 312 3 4 36; +#X obj 59 335 pack 0 0; +#X text 103 290 font; +#X text 139 312 height; +#X msg 36 399 \; foo5_rcv label blabla; +#X msg 59 360 \; foo5_rcv label_font \$1 \$2; +#X msg 39 245 \; foo5_rcv label_pos \$1 \$2; +#X msg 47 135 \; foo5_rcv color \$1 \$2 \$3; +#X msg 259 172 \; foo5_rcv size \$1; +#X msg 279 284 \; foo5_rcv delta \$1 \$2; +#X msg 304 396 \; foo5_rcv pos \$1 \$2; +#X msg 483 133 \; foo5_rcv receive foo5a_rcv; +#X msg 482 171 \; foo5a_rcv receive foo5_rcv; +#X msg 483 50 \; foo5_rcv send foo5a_snd; +#X msg 483 88 \; foo5_rcv send foo5_snd; +#X text 526 349 no init; +#X msg 505 368 \; foo5_rcv init 0; +#X msg 512 435 \; foo5_rcv init 1; +#X obj 493 260 f; +#X msg 471 239 bang; +#X floatatom 509 238 4 10 100; +#X floatatom 544 261 5 100 3000; +#X obj 493 283 pack 0 0; +#X msg 493 308 \; foo5_rcv flashtime \$1 \$2; +#X text 548 237 interrupt-time; +#X text 585 262 hold-time; +#X msg 36 435 \; foo5_rcv label big-bang; +#X text 502 417 init bang on loadbang; +#X text 519 221 flash-time:; +#X obj 47 114 pack 0 0 0; +#X obj 47 86 f; +#X msg 24 38 bang; +#X floatatom 63 36 3 0 29; +#X floatatom 79 56 3 0 29; +#X floatatom 112 72 3 0 29; +#X text 91 36 background; +#X text 106 56 front-color; +#X text 140 73 label-color; +#X msg 285 35 back; +#X msg 285 55 front; +#X msg 285 75 label; +#X msg 247 35 bang; +#N canvas 15 207 606 448 RGB_____________ 0; +#X obj 97 56 inlet; +#X obj 262 53 inlet; +#X obj 339 55 inlet; +#X obj 405 56 inlet; +#X obj 97 270 bang; +#X msg 77 295 0; +#X msg 104 295 1; +#X obj 146 268 bang; +#X msg 132 295 0; +#X msg 160 295 1; +#X obj 196 269 bang; +#X msg 187 295 0; +#X msg 214 295 1; +#X obj 265 313 spigot; +#X obj 312 313 spigot; +#X obj 359 313 spigot; +#X obj 249 385 outlet; +#X text 93 33 select; +#X text 267 28 red; +#X text 337 30 green; +#X text 409 30 blue; +#X obj 405 102 t b f; +#X obj 339 160 +; +#X obj 339 185 t b f; +#X obj 339 216 +; +#X obj 296 385 outlet; +#X obj 343 385 outlet; +#X obj 28 180 loadbang; +#X obj 97 135 route back front label bang; +#X obj 343 362 f; +#X obj 296 361 f; +#X obj 249 361 f; +#X obj 262 79 * -65536; +#X obj 339 80 * -256; +#X obj 405 80 * -1; +#X obj 339 247 - 1; +#X obj 235 168 t b b b b; +#X connect 0 0 28 0; +#X connect 1 0 32 0; +#X connect 2 0 33 0; +#X connect 3 0 34 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 14 1; +#X connect 5 0 15 1; +#X connect 6 0 13 1; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 13 1; +#X connect 8 0 15 1; +#X connect 9 0 14 1; +#X connect 10 0 11 0; +#X connect 10 0 12 0; +#X connect 11 0 13 1; +#X connect 11 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 31 1; +#X connect 14 0 30 1; +#X connect 15 0 29 1; +#X connect 21 0 22 0; +#X connect 21 1 22 1; +#X connect 22 0 23 0; +#X connect 23 0 24 0; +#X connect 23 1 24 1; +#X connect 24 0 35 0; +#X connect 27 0 6 0; +#X connect 28 0 4 0; +#X connect 28 1 7 0; +#X connect 28 2 10 0; +#X connect 28 3 36 0; +#X connect 29 0 26 0; +#X connect 30 0 25 0; +#X connect 31 0 16 0; +#X connect 32 0 24 0; +#X connect 33 0 22 0; +#X connect 34 0 21 0; +#X connect 35 0 15 0; +#X connect 35 0 14 0; +#X connect 35 0 13 0; +#X connect 36 0 31 0; +#X connect 36 1 30 0; +#X connect 36 2 29 0; +#X connect 36 3 35 0; +#X restore 285 96 pd RGB_____________; +#X floatatom 327 65 3 0 255; +#X floatatom 370 65 3 0 255; +#X floatatom 413 66 3 0 255; +#X text 34 10 preset-colors; +#X text 296 7 RGB-colors; +#X text 327 47 red; +#X text 363 46 green; +#X text 411 46 blue; +#X connect 0 0 4 0; +#X connect 1 0 0 0; +#X connect 2 0 0 1; +#X connect 3 0 4 1; +#X connect 4 0 32 0; +#X connect 7 0 34 0; +#X connect 9 0 13 0; +#X connect 10 0 9 0; +#X connect 11 0 9 1; +#X connect 12 0 13 1; +#X connect 13 0 35 0; +#X connect 14 0 18 0; +#X connect 15 0 14 0; +#X connect 16 0 14 1; +#X connect 17 0 18 1; +#X connect 18 0 36 0; +#X connect 23 0 27 0; +#X connect 24 0 23 0; +#X connect 25 0 23 1; +#X connect 26 0 27 1; +#X connect 27 0 31 0; +#X connect 44 0 48 0; +#X connect 45 0 44 0; +#X connect 46 0 44 1; +#X connect 47 0 48 1; +#X connect 48 0 49 0; +#X connect 55 0 33 0; +#X connect 56 0 55 0; +#X connect 57 0 56 0; +#X connect 58 0 56 1; +#X connect 59 0 55 1; +#X connect 60 0 55 2; +#X connect 64 0 68 0; +#X connect 65 0 68 0; +#X connect 66 0 68 0; +#X connect 67 0 68 0; +#X connect 68 0 55 0; +#X connect 68 1 55 1; +#X connect 68 2 55 2; +#X connect 69 0 68 1; +#X connect 70 0 68 2; +#X connect 71 0 68 3; +#X restore 297 144 pd edit; +#X obj 248 34 bng 15 250 50 0 aaa aaa empty 20 8 192 8 -262144 -1 -1 +; +#X text 185 312 updated for Pd version 0.35; +#X text 27 313 graz \, austria 2002; +#X obj 180 11 x_all_guis aaa bbb ccc ddd eee fff ggg hhh iii; +#X connect 6 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 7 0; +#X connect 9 0 6 0; +#X connect 10 0 9 0; +#X connect 11 0 9 0; +#X connect 12 0 9 0; +#X connect 13 0 9 0; +#X connect 14 0 9 0; +#X connect 17 0 19 0; +#X connect 18 0 16 0; +#X connect 20 0 9 0; diff --git a/pd/doc/5.reference/bp~.pd b/pd/doc/5.reference/bp~.pd new file mode 100644 index 00000000..8bcd86b4 --- /dev/null +++ b/pd/doc/5.reference/bp~.pd @@ -0,0 +1,40 @@ +#N canvas 533 67 651 393 12; +#X obj 124 11 bp~; +#X text 159 11 - BANDPASS FILTER; +#X obj 70 263 env~; +#X floatatom 70 283 0 0 0; +#X floatatom 104 193 0 0 0; +#X obj 12 261 env~; +#X floatatom 12 282 0 0 0; +#X text 119 264 env~ gives the amplitude of the signal envelop in dB. +; +#X floatatom 12 123 0 0 0; +#X msg 544 67 \; pd dsp 0; +#X obj 12 146 osc~ 100; +#X text 57 121 <-- scroll to change input frequency; +#X msg 72 170 clear; +#X text 122 169 <-- reinitialize internal state; +#X text 398 361 updated for Pd version-0.30; +#X msg 544 28 \; pd dsp 1; +#X text 13 73 The left inlet is the incoming audio signal \, the middle +control input sets center frequency and the rigth input sets "Q".; +#X text 136 194 <-- center frequency; +#X obj 72 241 bp~ 100 10; +#X text 169 242 Arguments initialize center frequency and Q.; +#X text 12 301 Compare the amplitude of the original signal on the +left with the amplitude of the filtered signal on the right.; +#X floatatom 153 215 0 0 0; +#X text 185 216 <-- Q; +#X text 16 35 bp~ passes a sinusoid at the center frequency at unit +gain (approximately). Other frequencies are attenuated.; +#X text 21 357 see also:; +#X obj 110 356 vcf~; +#X connect 2 0 3 0; +#X connect 4 0 18 1; +#X connect 5 0 6 0; +#X connect 8 0 10 0; +#X connect 10 0 5 0; +#X connect 10 0 18 0; +#X connect 12 0 18 0; +#X connect 18 0 2 0; +#X connect 21 0 18 2; diff --git a/pd/doc/5.reference/canvas.pd b/pd/doc/5.reference/canvas.pd new file mode 100644 index 00000000..a6e33be5 --- /dev/null +++ b/pd/doc/5.reference/canvas.pd @@ -0,0 +1,19 @@ +#N canvas 210 82 579 437 12; +#X obj 66 15 table; +#X text 123 16 - Array of numbers; +#X obj 34 199 table help-tab1 25; +#X text 10 43 "Table" builds a subpatch with a graphical array inside. +The creation arguments specify the name and an optional size in points. +; +#X msg 70 265 \; help-tab1 read table.txt; +#X msg 70 309 \; help-tab1 write /tmp/table.txt; +#X text 70 243 You can also send messages to the array by name:; +#X text 216 200 <- optional creation args: name \, size; +#X text 17 355 Unfortunately there's no way to set vertical range \, +etc.; +#X text 9 101 Note that the data (and other properties) of the array +aren't saved with the patch. You can resize \, save to and/or read +from an external file as you would with "array" objects. See "arrays" +in the 2.control examples under the "pure documentation" help menu +item.; +#X text 325 391 updated for Pd version 0.35; diff --git a/pd/doc/5.reference/change.pd b/pd/doc/5.reference/change.pd new file mode 100644 index 00000000..74e16f6a --- /dev/null +++ b/pd/doc/5.reference/change.pd @@ -0,0 +1,23 @@ +#N canvas 376 130 540 355 12; +#X msg 67 124 bang; +#X floatatom 67 266 0 0 0; +#X floatatom 79 154 0 0 0; +#X floatatom 104 182 0 0 0; +#X text 284 309 updated for Pd version 0.27; +#X text 173 239 creation argument initializes first value; +#X obj 66 15 change; +#X text 114 16 - ELIMINATE REDUNDANCY IN A NUMBER STEAM; +#X text 12 42 The change object outputs its input only when it changes. +You can "set" the current value \, or bang to force output.; +#X obj 67 240 change 6.5; +#X msg 105 211 set \$1; +#X text 136 183 set the value; +#X text 112 123 output current value; +#X text 110 154 if different from current value \, output and set; +#X obj 67 293 print; +#X connect 0 0 9 0; +#X connect 1 0 14 0; +#X connect 2 0 9 0; +#X connect 3 0 10 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; diff --git a/pd/doc/5.reference/clip~.pd b/pd/doc/5.reference/clip~.pd new file mode 100644 index 00000000..61c222fa --- /dev/null +++ b/pd/doc/5.reference/clip~.pd @@ -0,0 +1,30 @@ +#N canvas 182 132 778 399 12; +#X obj 75 164 clip~ -0.5 0.5; +#X obj 75 104 osc~ 1000; +#X graph graph1 0 1 100 -1 78 280 278 380; +#X array array99 100 float 0; +#X pop; +#X obj 91 213 metro 500; +#X obj 91 188 r metro; +#X text 239 235 <-- graph the output; +#X obj 75 237 tabwrite~ array99; +#X msg 519 69 \; metro 0; +#X msg 515 12 \; pd dsp 1 \; metro 1; +#X text 604 26 <-- Click to start; +#X text 589 73 <-- Click to stop; +#X obj 42 19 clip~; +#X text 88 18 - restrict a signal to lie between two limits; +#X text 243 136 inlets to reset clip range; +#X floatatom 135 136 4 0 0; +#X floatatom 196 137 4 0 0; +#X text 210 164 creation arguments initialize clip range; +#X text 4 55 The clip~ object passes its signal input to its output +\, clipping it to lie between two limits.; +#X text 470 371 updated for Pd version 0.33; +#X connect 0 0 6 0; +#X connect 1 0 0 0; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 4 0 3 0; +#X connect 14 0 0 1; +#X connect 15 0 0 2; diff --git a/pd/doc/5.reference/cos~.pd b/pd/doc/5.reference/cos~.pd new file mode 100644 index 00000000..ba6f918e --- /dev/null +++ b/pd/doc/5.reference/cos~.pd @@ -0,0 +1,32 @@ +#N canvas 134 143 768 332 12; +#X obj 112 12 cos~; +#X obj 23 200 cos~; +#X obj 23 249 snapshot~; +#X obj 23 152 sig~; +#X floatatom 23 275 0 0 0; +#X obj 23 125 * 0.01; +#X floatatom 23 98 0 0 0; +#X obj 90 215 metro 500; +#X obj 90 189 r metro; +#X msg 540 93 \; metro 0; +#X msg 521 39 \; pd dsp 1 \; metro 1; +#X text 159 13 - COSINE WAVESHAPER; +#X text 86 125 Divide by 100; +#X text 71 153 convert to audio; +#X text 78 100 <-- Scroll to set input value; +#X text 64 276 <-- output of the cos~ object; +#X text 291 195 see also:; +#X obj 379 197 osc~; +#X obj 423 197 tabread4~; +#X text 494 293 updated for Pd version 0.33; +#X text 608 54 <-Click to start; +#X text 609 99 <-Click to stop; +#X text 9 45 The cos~ object outputs the cosine of its signal input.; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 2 0 4 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 5 0; +#X connect 7 0 2 0; +#X connect 8 0 7 0; diff --git a/pd/doc/5.reference/cputime.pd b/pd/doc/5.reference/cputime.pd new file mode 100644 index 00000000..c0a0f43a --- /dev/null +++ b/pd/doc/5.reference/cputime.pd @@ -0,0 +1,15 @@ +#N canvas 302 232 550 286 12; +#X msg 74 144 bang; +#X msg 30 115 bang; +#X floatatom 30 206 0 0 0; +#X text 71 113 Click here to reset; +#X text 27 232 Output is in milliseconds; +#X obj 30 175 cputime; +#X text 124 144 Click here to get elapsed CPU time; +#X text 6 51 The cputime object measures elapsed CPU time \, as measured by your operating system. This appears to work on NT \, IRIX \, and Linux \, but not on W98.; +#X obj 66 15 cputime; +#X text 123 16 - measure CPU usage; +#X text 297 261 updated for Pd version 0.33; +#X connect 0 0 5 1; +#X connect 1 0 5 0; +#X connect 5 0 2 0; diff --git a/pd/doc/5.reference/delay.pd b/pd/doc/5.reference/delay.pd new file mode 100644 index 00000000..5f90cd4b --- /dev/null +++ b/pd/doc/5.reference/delay.pd @@ -0,0 +1,30 @@ +#N canvas 3 0 513 348 12; +#X obj 66 15 delay; +#X obj 13 229 50; +#X msg 13 98 bang; +#X floatatom 13 255; +#X floatatom 116 182; +#X obj 51 230 0; +#X text 111 16 - CALLBACK AFTER TIME DELAY; +#X text 130 205 <-- creation argument initializes delay time; +#X text 6 41 The delay object sends a bang to its outlet after a delay in milliseconds specified by its right inlet or its creation argument.; +#X obj 51 204 delay 1000; +#X text 58 86 Click here to test the delay object by initializing the number box below to 50 and then clearing it after the specified delay.; +#X text 94 132 Click here to CANCEL delay's action; +#X msg 51 133 stop; +#X text 43 324 see also:; +#X obj 155 323 timer; +#X obj 111 323 metro; +#X msg 62 155 2000; +#X text 102 154 Number in right inlet sets time and schedules the action.; +#X text 316 320 updated for Pd version 0.3; +#X text 145 183 <-- scroll to change delay time in milliseconds; +#X text 14 280 Note: sending a bang to a delay which is already set will reschedule its output \, cancelling the old one.; +#X connect 1 0 3 0; +#X connect 2 0 1 0; +#X connect 2 0 9 0; +#X connect 4 0 9 1; +#X connect 5 0 3 0; +#X connect 9 0 5 0; +#X connect 12 0 9 0; +#X connect 16 0 9 0; diff --git a/pd/doc/5.reference/delread~.pd b/pd/doc/5.reference/delread~.pd new file mode 100644 index 00000000..682f6e98 --- /dev/null +++ b/pd/doc/5.reference/delread~.pd @@ -0,0 +1,33 @@ +#N canvas 24 20 796 472 12; +#X text 351 276 1st argument: name of delay line; +#X floatatom 116 253 0 0 0; +#X text 151 255 float input (delay time in ms); +#X text 127 310 signal output (delayed signal); +#X text 21 52 You can use more than one delread~ objects for the same delay line.; +#X text 20 81 If the specified delay time is longer than the size of the delay line or less than zero it is clipped to the length of the delay line.; +#X obj 383 226 delwrite~ del_example 1000; +#X floatatom 383 177 0 0 0; +#X obj 116 375 snapshot~; +#X floatatom 116 399 0 0 0; +#X obj 24 246 loadbang; +#X obj 24 313 metro 200; +#X msg 32 273 \; pd dsp 1; +#X obj 116 286 delread~ del_example 1000; +#X obj 24 16 delread~; +#X text 424 176 input to delay line; +#X obj 383 201 sig~; +#X text 433 443 updated for Pd version 0.33; +#X text 89 16 - read a signal from a delay line; +#X text 21 133 Note: if the delaywrite~ runs after the delread~ the minimum delay is actually one DSP period \, not zero.; +#X text 351 292 2nd argument: (initial) delay time in ms; +#X obj 126 444 delwrite~; +#X obj 217 444 vd~; +#X text 36 443 see also:; +#X connect 1 0 13 0; +#X connect 7 0 16 0; +#X connect 8 0 9 0; +#X connect 10 0 11 0; +#X connect 10 0 12 0; +#X connect 11 0 8 0; +#X connect 13 0 8 0; +#X connect 16 0 6 0; diff --git a/pd/doc/5.reference/delwrite~.pd b/pd/doc/5.reference/delwrite~.pd new file mode 100644 index 00000000..50ca3f63 --- /dev/null +++ b/pd/doc/5.reference/delwrite~.pd @@ -0,0 +1,15 @@ +#N canvas 12 24 663 281 12; +#X obj 24 16 delwrite~; +#X obj 24 158 delwrite~ del_line_xxx 500; +#X text 88 123 signal input; +#X text 116 16 writes a signal in a delay line; +#X text 271 156 1st argument: name of delay line; +#X text 411 243 updated for Pd version 0.33; +#X obj 24 124 sig~ 0; +#X text 19 50 Delwrite~ allocates memory for a delay line and writes an audio signal into it. Delread~ objects by hte same name read from the delay line.; +#X text 294 186 (= max. delay time); +#X text 271 172 2nd argument: length of delay line in msec; +#X text 24 203 see also:; +#X obj 112 205 delread~; +#X obj 193 205 vd~; +#X connect 6 0 1 0; diff --git a/pd/doc/5.reference/drawnumber.pd b/pd/doc/5.reference/drawnumber.pd new file mode 100644 index 00000000..a62a8103 --- /dev/null +++ b/pd/doc/5.reference/drawnumber.pd @@ -0,0 +1,35 @@ +#N struct help-drawnumber-template float x float y float cat float +dog; +#N canvas 369 6 538 189 12; +#X text 15 103 see also:; +#X obj 18 7 drawnumber; +#X obj 204 132 plot; +#X obj 100 131 drawpolygon; +#X obj 22 130 template; +#X text 114 7 -- draw numeric fields from data structures; +#N canvas 14 10 297 129 help-drawnumber-data 1; +#X scalar help-drawnumber-template 50 100 23 43 \;; +#X scalar help-drawnumber-template 150 50 3.14 -1.618 \;; +#X restore 273 71 pd help-drawnumber-data; +#N canvas 57 283 580 439 help-drawnumber-template 1; +#X text 24 316 This object defines the fields for this template. Their +values are initialized in the "works" subwindow. You can see them by +right-clicking on the object in the "data" window and selecting "properties." +; +#X text 44 104 - RGB color (0=black \, 999=white \, 900=red \, 90=green +\, 9=blue \, 555=grey \, etc.); +#X obj 11 294 template float x float y float cat float dog; +#X text 22 166 Any of these can be numbers or field names \, like "dog" +and "cat" here.; +#X text 22 202 When not in "edit" mode \, you can click and drag vertically +on the numbers to change their values. (In edit mode you can move \, +cut \, copy \, and paste the objects.); +#X text 24 251 Keyboard entry isn't supported yet.; +#X obj 24 15 drawnumber cat 0 0 0 cat=; +#X obj 259 16 drawnumber dog 0 -15 900 dog=; +#X text 44 136 - an optional label ("cat=" for instance); +#X text 26 44 drawnumber takes arguments specifying:; +#X text 44 84 - an (x \, y) pair giving relative coordinates \;; +#X text 44 64 - the number to draw; +#X restore 273 45 pd help-drawnumber-template; +#X text 275 159 updated for Pd version 0.35; diff --git a/pd/doc/5.reference/drawpolygon.pd b/pd/doc/5.reference/drawpolygon.pd new file mode 100644 index 00000000..714c404b --- /dev/null +++ b/pd/doc/5.reference/drawpolygon.pd @@ -0,0 +1,42 @@ +#N struct help-drawpolygon-template float x float y float cat float +dog float weasel; +#N canvas 411 8 565 187 12; +#X text 13 130 see also:; +#X obj 111 149 drawnumber; +#X obj 207 149 plot; +#X obj 21 10 drawpolygon; +#X obj 21 33 drawcurve; +#X obj 126 11 filledpolygon; +#X obj 127 33 filledcurve; +#X text 225 10 -- draw shapes for data structures; +#N canvas 30 290 587 435 help-drawpolygon-template 1; +#X obj 14 335 template float x float y float cat float dog float weasel +; +#X obj 19 24 drawpolygon 0 2 0 0 0 weasel; +#X text 26 44 drawpolygon and drawcurve take arguments specifying: +; +#X text 29 137 Any of these can be numbers or field names \, like "weasel" +here. The example above draws a vertical black line of height "weasel". +; +#X obj 19 194 filledpolygon 900 dog 3 10 0 20 cat 30 0; +#X text 31 216 filledpolyconn and filledcurve take the same arguments +\, except that a new first argument is added to specify interior color. +Here the interior color is red (900) \, the outline color is controlled +by the "dog" field \, and the three points describe a triangle of altitude +"cat". The fields x and y automatically govern the placement of the +object as a whole.; +#X text 24 357 This object defines the fields for this template. Their +values are initialized in the "works" subwindow. You can see them by +right-clicking on the object in the "data" window and selecting "properties." +; +#X text 45 62 - RGB color (0=black \, 999=white \, 900=red \, 90=green +\, 9=blue \, 555=grey \, etc.); +#X text 46 95 - line width; +#X text 46 116 - two or more (x \, y) pairs giving coordinates.; +#X restore 274 93 pd help-drawpolygon-template; +#X obj 34 149 template; +#N canvas 10 18 384 178 help-drawpolygon-data 1; +#X scalar help-drawpolygon-template 50 40 30 9 80 \;; +#X scalar help-drawpolygon-template 150 40 -20 90 50 \;; +#X restore 274 119 pd help-drawpolygon-data; +#X text 312 168 updated for Pd version 0.35; diff --git a/pd/doc/5.reference/element.pd b/pd/doc/5.reference/element.pd new file mode 100644 index 00000000..a3faeecf --- /dev/null +++ b/pd/doc/5.reference/element.pd @@ -0,0 +1,51 @@ +#N struct help-element-template float x float y array array1 help-element-array1-template +; +#N struct help-element-array1-template float y; +#N canvas 330 34 668 442 12; +#X text 24 373 see also:; +#X obj 21 393 template; +#N canvas 393 10 491 261 help-element-template 0; +#X obj 27 76 plot array1 500 1 10 15 20; +#X obj 27 174 filledpolygon 509 509 0 -10 -10 10 -10 10 10 -10 10; +#X obj 24 16 template float x float y array array1 help-element-array1-template +; +#X restore 414 349 pd help-element-template; +#N canvas 0 0 288 159 help-element-data 1; +#X scalar help-element-template 35 24 \; 0 \; 10 \; 0 \; 10 \; 20 \; +10 \; 20 \; 70 \; 10 \; \;; +#X restore 450 328 pd help-element-data; +#N canvas 196 292 365 134 help-element-array1-template 0; +#X obj 30 71 filledpolygon 0 0 0 -5 0 0 5 5 0 0 -5; +#X obj 32 27 template float y; +#X restore 354 371 pd help-element-array1-template; +#X obj 22 11 element; +#X text 91 10 -- get pointer to an element of an array; +#X obj 98 393 pointer; +#X obj 166 393 getsize; +#X obj 234 393 setsize; +#X text 24 44 "element" takes a pointer at right and a number at left. +It looks up a field from the pointer \, which should be an array \, +and outputs the element of the array specified by the number. There +are no pointers to arrays themselves \, just to individual elements. +The template and field mane are specified as creation arguments.; +#X obj 150 228 pointer; +#X msg 150 204 traverse pd-help-element-data \, next; +#X floatatom 38 230 5 0 0; +#X obj 38 256 element help-element-template array1; +#X obj 38 303 get help-element-array1-template y; +#X floatatom 38 330 5 0 0; +#X text 370 256 arguments: template \, field name; +#X text 247 230 pointer inlet; +#X text 36 209 index; +#X text 43 277 outlet is pointer to single element; +#X text 89 328 here we just get the value of y.; +#X text 24 143 Indices range from 0 to the number of elements minus +one \; indices out of range are quietly replaced by the nearest endpoint. +; +#X text 152 184 click here first; +#X text 407 416 updated for Pd version 0.35; +#X connect 11 0 14 1; +#X connect 12 0 11 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; diff --git a/pd/doc/5.reference/env~.pd b/pd/doc/5.reference/env~.pd new file mode 100644 index 00000000..64a245ae --- /dev/null +++ b/pd/doc/5.reference/env~.pd @@ -0,0 +1,28 @@ +#N canvas 40 55 711 401 12; +#X floatatom 103 303 0 0 0; +#X obj 74 14 env~; +#X text 120 16 - envelope follower; +#X obj 103 275 env~ 16384; +#X obj 103 214 osc~ 400; +#X obj 103 241 *~; +#X floatatom 217 220 3 -99 300; +#X obj 217 244 dbtorms; +#X text 9 46 The env~ object takes a signal and outputs its RMS amplitude +in dB (with 1 normalized to 100 dB.) Output is bounded below by zero. +; +#X text 8 105 The analysis is Hanning windowed.; +#X text 9 131 The optional creation argument is the analysis window +size in samples \, and should be a power of two. The analysis windows +overlap by two \, so that the period of output is half the window size. +; +#X text 206 274 <- creation argument sets window size; +#X text 265 221 <- set peak-to-peak amplitude here in dB.; +#X text 185 305 <- the output is RMS amplitude which is about 3 dB +below peak-to-peak amplitude.; +#X text 459 375 updated for Pd version 0.35; +#X connect 3 0 0 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 5 1; diff --git a/pd/doc/5.reference/fft~.pd b/pd/doc/5.reference/fft~.pd new file mode 100644 index 00000000..149a6634 --- /dev/null +++ b/pd/doc/5.reference/fft~.pd @@ -0,0 +1,64 @@ +#N canvas 22 7 886 436 12; +#X text 85 158 frequency; +#X floatatom 16 173 0 0 0; +#X obj 16 120 * 44100; +#X floatatom 16 94 0 0 0; +#X text 88 92 frequency; +#X text 91 111 in bins; +#X text 85 175 in Hz.; +#X obj 16 229 osc~; +#X obj 36 16 fft~; +#X obj 86 17 ifft~; +#X text 146 15 - forward and inverse complex FFT; +#X obj 36 42 rfft~; +#X obj 86 43 rifft~; +#X text 146 41 - forward and inverse real FFT; +#X obj 16 254 rfft~; +#X obj 16 148 / 64; +#X obj 574 21 loadbang; +#X msg 574 47 \; pd dsp 1; +#X text 636 403 updated for Pd version 0.33; +#X obj 16 322 rifft~; +#X obj 102 310 print~ real; +#X obj 115 285 print~ imaginary; +#X obj 16 352 /~ 64; +#X obj 16 407 print~ resynthesized; +#X msg 30 380 bang; +#X msg 101 248 bang; +#X msg 100 199 0.25; +#X msg 152 199 0; +#X text 195 200 <-- bash phase; +#X text 152 249 <-- print analysis; +#X text 79 380 <-- print resynthesis; +#X text 76 352 <-- renormalize; +#X text 347 294 There is no normalization \, so that an FFT followed +by an IFFT has a gain of N.; +#X text 346 343 See the FFT examples to see how to use these in practice. +; +#X text 346 112 The FFT objects do Fourier analyses and resyntheses +of incoming real or complex signals. Complex signals are handled as +pairs of signals (real and imaginary part.) The analysis size is one +block (you can use the block~ or switch~ obejcts to control block size). +; +#X text 347 205 The real FFT outputs N/2+1 real parts and N/2-1 imaginary +parts. The other outputs are zero. At DC and at the Nyquist there is +no imaginary part \, but the second through Nth output is as a real +and imaginary pair \, which can be thought of as the cosine and sin +component strengths.; +#X connect 1 0 7 0; +#X connect 2 0 15 0; +#X connect 3 0 2 0; +#X connect 7 0 14 0; +#X connect 14 0 20 0; +#X connect 14 0 19 0; +#X connect 14 1 21 0; +#X connect 14 1 19 1; +#X connect 15 0 1 0; +#X connect 16 0 17 0; +#X connect 19 0 22 0; +#X connect 22 0 23 0; +#X connect 24 0 23 0; +#X connect 25 0 20 0; +#X connect 25 0 21 0; +#X connect 26 0 7 1; +#X connect 27 0 7 1; diff --git a/pd/doc/5.reference/float.pd b/pd/doc/5.reference/float.pd new file mode 100644 index 00000000..efc5235a --- /dev/null +++ b/pd/doc/5.reference/float.pd @@ -0,0 +1,18 @@ +#N canvas 23 20 429 272 12; +#X msg 30 107 bang; +#X obj 30 183 float 6.5; +#X floatatom 30 209; +#X floatatom 42 129; +#X floatatom 88 153; +#X obj 55 12 float; +#X text 97 11 - STORE A (FLOATING POINT) NUMBER; +#X text 12 36 The float object stores a number \, initialized by its creation argument \, which may be reset using its inlet and output by sending it the "bang" message. Sending a number sets a new value and outputs it.; +#X text 77 103 outputs the value; +#X text 74 130 sets and outputs the value; +#X text 123 155 sets the value; +#X text 108 184 creation argument initializes the value; +#X text 223 242 updated for Pd version 0.3; +#X connect 0 0 1 0; +#X connect 1 0 2 0; +#X connect 3 0 1 0; +#X connect 4 0 1 1; diff --git a/pd/doc/5.reference/framp~.pd b/pd/doc/5.reference/framp~.pd new file mode 100644 index 00000000..cbf3f047 --- /dev/null +++ b/pd/doc/5.reference/framp~.pd @@ -0,0 +1,40 @@ +#N canvas 22 7 857 377 12; +#X text 85 158 frequency; +#X floatatom 16 173 0 0 0; +#X obj 16 120 * 44100; +#X floatatom 16 94 0 0 0; +#X text 88 92 frequency; +#X text 91 111 in bins; +#X text 85 175 in Hz.; +#X obj 17 238 rfft~; +#X obj 16 148 / 64; +#X obj 653 14 loadbang; +#X msg 653 40 \; pd dsp 1; +#X text 599 339 updated for Pd version 0.33; +#X msg 103 260 bang; +#X text 154 261 <-- print analysis; +#X obj 36 16 framp~; +#X text 119 15 - estimate frequency and amplitude of FFT components +; +#X obj 16 270 framp~; +#X obj 103 322 print~ frequency; +#X obj 118 297 print~ amplitude; +#X obj 16 204 osc~; +#X text 324 98 Framp~ takes as input a rectangular-windowed FFT and +outputs \, for each FFT channel \, the estimated amplitude and frequency +of any component feedinf that channel. A sinusoidal component should +appear in four components (or three in the special case of a sinusoid +exactly tuned to a bin.) Frequency output is in bins \, i.e. \, units +of SR/N.; +#X connect 1 0 19 0; +#X connect 2 0 8 0; +#X connect 3 0 2 0; +#X connect 7 0 16 0; +#X connect 7 1 16 1; +#X connect 8 0 1 0; +#X connect 9 0 10 0; +#X connect 12 0 17 0; +#X connect 12 0 18 0; +#X connect 16 0 17 0; +#X connect 16 1 18 0; +#X connect 19 0 7 0; diff --git a/pd/doc/5.reference/gatom.pd b/pd/doc/5.reference/gatom.pd new file mode 100644 index 00000000..2dd7ce61 --- /dev/null +++ b/pd/doc/5.reference/gatom.pd @@ -0,0 +1,32 @@ +#N canvas 138 65 675 508 12; +#X floatatom 107 9 0 0 0; +#X text 155 10 atoms (number boxes); +#X floatatom 38 85 0 0 0; +#X floatatom 38 125 0 0 0; +#X msg 51 260 set 45; +#X floatatom 51 288 0 0 0; +#X floatatom 51 317 0 0 0; +#X text 84 40 Number boxes allow you to display numbers or to enter +numbers using the mouse and keyboard. When a number arrives at the +number box's inlet \, it is displayed and sent to the outlet. You can +click on a number box and drag upward or downward to change the value +continuously.; +#X text 88 130 You can shift-click and drag to change the number by +hundredths instead of units. Alt clicking toggles the value between +0 and the last nonzero value.; +#X text 83 184 You can also type in values by clicking and typing a +number followed by "enter."; +#X text 30 220 the "set" message sets the number box's value but does +not send it to the outlet.; +#X text 423 482 updated for Pd version 0.34; +#X text 39 339 You can set the width of the box by right-clicking and +choosing "properties." By default the width is 5 characters. If you +select a width of 0 \, the number box will grow as needed to hold the +number--BUT BEWARE \, THIS IS EXPENSIVE IN CPU TIME. In a production +patch \, you'll want to set a specific width.; +#X floatatom 547 439 1 0 0; +#X text 41 438 A width of one gives a clickable toggle switch ala Max: +; +#X connect 2 0 3 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; diff --git a/pd/doc/5.reference/get.pd b/pd/doc/5.reference/get.pd new file mode 100644 index 00000000..6784a6ce --- /dev/null +++ b/pd/doc/5.reference/get.pd @@ -0,0 +1,46 @@ +#N struct help-get-template1 float x float y; +#N canvas 293 5 629 429 12; +#X text 13 325 see also:; +#X obj 143 370 template; +#X obj 84 345 set; +#X obj 116 345 append; +#X obj 175 345 getsize; +#X obj 243 345 setsize; +#X obj 311 345 element; +#X obj 16 370 sublist; +#X obj 84 370 scalar; +#X msg 60 130 next; +#N canvas 164 72 425 146 help-get-template1 0; +#X obj 41 87 filledpolygon 9 0 1 0 0 20 0 20 30 0 30; +#X obj 60 21 template float x float y; +#X restore 376 234 pd help-get-template1; +#N canvas 0 0 276 156 help-get-data 1; +#X scalar help-get-template1 46 23 \;; +#X scalar help-get-template1 106 73 \;; +#X restore 376 212 pd help-get-data; +#X obj 21 10 get; +#X text 86 10 -- get values from a scalar; +#X msg 45 102 traverse pd-help-get-data \, next; +#X floatatom 45 214 5 0 0; +#X floatatom 222 210 5 0 0; +#X obj 45 157 pointer; +#X text 337 101 output first scalar in list; +#X text 103 129 output next item; +#X text 21 277 If you have data whose template varies (from a heterogeneous +list \, for example) you can use "pointer" to select according to template +before sending to "get".; +#X obj 45 185 get help-get-template1 x y; +#X text 31 37 "Get" \, when sent a pointer to a scalar \, retrieves +fields from it by name. The fields can be float or symbol. In the future +this will also allow access to sublists of scalars.; +#X text 293 167 First argument selects template.; +#X text 294 182 Remaining args are names of fields.; +#X text 41 233 x output; +#X text 220 232 y output; +#X obj 16 345 pointer; +#X text 373 399 updated for Pd version 0.35; +#X connect 9 0 17 0; +#X connect 14 0 17 0; +#X connect 17 0 21 0; +#X connect 21 0 15 0; +#X connect 21 1 16 0; diff --git a/pd/doc/5.reference/getsize.pd b/pd/doc/5.reference/getsize.pd new file mode 100644 index 00000000..f2b17e2f --- /dev/null +++ b/pd/doc/5.reference/getsize.pd @@ -0,0 +1,41 @@ +#N struct help-getsize-template float x float y array array1 help-getsize-array1-template +; +#N struct help-getsize-array1-template float y; +#N canvas 340 20 655 398 12; +#X text 28 319 see also:; +#X obj 25 339 template; +#N canvas 393 10 491 261 help-getsize-template 0; +#X obj 27 76 plot array1 500 1 10 15 20; +#X obj 27 174 filledpolygon 509 509 0 -10 -10 10 -10 10 10 -10 10; +#X obj 24 16 template float x float y array array1 help-getsize-array1-template +; +#X restore 338 311 pd help-getsize-template; +#N canvas 0 0 301 193 help-getsize-data 1; +#X scalar help-getsize-template 43 37 \; 0 \; 10 \; 0 \; 10 \; 20 \; +10 \; 20 \; 70 \; 10 \; \;; +#X restore 337 290 pd help-getsize-data; +#N canvas 196 292 365 134 help-getsize-array1-template 0; +#X obj 30 71 filledpolygon 0 0 0 -5 0 0 5 5 0 0 -5; +#X obj 32 27 template float y; +#X restore 337 334 pd help-getsize-array1-template; +#X obj 102 339 pointer; +#X obj 236 338 setsize; +#X obj 25 166 pointer; +#X msg 25 142 traverse pd-help-getsize-data \, next; +#X floatatom 25 242 5 0 0; +#X text 360 214 arguments: template \, field name; +#X text 76 240 here we just get the value of y.; +#X obj 25 213 getsize help-getsize-template array1; +#X text 34 192 inlet for pointer; +#X obj 35 21 getsize; +#X text 98 22 -- get number of elements of an array; +#X text 24 44 When sent a pointer \, "element" looks up a field \, +which should be an array \, and outputs the number of elements of the +array. The template and field name are specified as creation arguments. +; +#X text 23 110 The smallest possible size is one.; +#X obj 169 339 element; +#X text 397 374 updated for Pd version 0.35; +#X connect 7 0 12 0; +#X connect 8 0 7 0; +#X connect 12 0 9 0; diff --git a/pd/doc/5.reference/graph.pd b/pd/doc/5.reference/graph.pd new file mode 100644 index 00000000..1badaee3 --- /dev/null +++ b/pd/doc/5.reference/graph.pd @@ -0,0 +1,13 @@ +#N canvas 28 3 693 300 12; +#X graph graph1 0 -1 99 1 188 290 338 190; +#X array array99 100 float; +#X pop; +#X text 174 19 GRAPHS; +#X text 20 42 A graph in Pd is a rectangular subregion of the window in +which you can store numeric arrays.; +#X text 19 140 You can change the array values by redrawing it in the graph. +See also "11.arrays" and passim in the "control examples".; +#X text 406 266 last updated for release 0.33; +#X text 18 85 If you create a new array Pd will usually make a new graph +to put it in (you can change this using the "array" dialog that pops up.) +; diff --git a/pd/doc/5.reference/hdial.pd b/pd/doc/5.reference/hdial.pd new file mode 100644 index 00000000..006c0f8b --- /dev/null +++ b/pd/doc/5.reference/hdial.pd @@ -0,0 +1,282 @@ +#N canvas 106 314 612 281 10; +#X obj 1 1 cnv 8 100 60 empty empty hdial=hdl 20 20 1 18 -262144 -1109 +0; +#X text 16 213 (c) musil@iem.kug.ac.at; +#X text 58 226 IEM KUG; +#X text 289 52 click properties to; +#X text 277 63 modify geometry \, colors \, etc.; +#X obj 356 172 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 +-1 -1; +#X obj 21 54 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X obj 355 124 s foo8_rcv; +#X obj 356 150 r foo8_snd; +#X obj 44 100 hdl 25 1 1 10 foo8_snd foo8_rcv hdial_0_9 156 -8 192 +10 -99865 -262144 -260818 2; +#X msg 44 142 \$1; +#X floatatom 44 164 4 0 0; +#X obj 44 186 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X obj 89 161 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 89 140 route 0 1 2 3 4 5 6 7 8 9; +#X msg 176 64 set \$1; +#X floatatom 176 43 4 0 9; +#X floatatom 44 54 4 0 9; +#X msg 91 41 7 0 -5.44; +#X msg 95 63 3 3 4.55; +#X obj 106 161 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 123 161 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 1 +1; +#X obj 140 161 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 157 161 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 174 161 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 191 161 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 208 161 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 225 161 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 242 161 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 82 178 print; +#X floatatom 380 198 4 0 0; +#X msg 380 172 \$1; +#X msg 355 103 set \$1; +#X floatatom 355 82 4 0 9; +#X text 128 178 UP- \, DOWN- \, LEFT- or RIGHT-key; +#X text 127 189 for moving selected gui-objects; +#N canvas 226 227 699 530 edit 0; +#X obj 42 198 f; +#X msg 20 177 bang; +#X floatatom 58 176 3 63 156; +#X floatatom 93 198 3 -20 37; +#X obj 42 221 pack 0 0; +#X text 120 198 y-label; +#X text 86 176 x-label; +#X floatatom 270 187 3 8 50; +#X text 297 187 size; +#X obj 286 293 f; +#X msg 264 272 bang; +#X floatatom 302 271 3 -10 10; +#X floatatom 337 293 3 -10 10; +#X obj 286 316 pack 0 0; +#X obj 300 412 f; +#X msg 278 391 bang; +#X floatatom 316 390 3 20 60; +#X floatatom 351 412 3 100 200; +#X obj 300 435 pack 0 0; +#X text 330 271 x-delta; +#X text 364 293 y-delta; +#X text 344 390 x-position; +#X text 378 412 y-position; +#X obj 62 313 f; +#X msg 40 292 bang; +#X floatatom 78 291 3 0 2; +#X floatatom 113 313 3 4 36; +#X obj 62 336 pack 0 0; +#X text 106 291 font; +#X text 142 313 height; +#X text 504 293 no init; +#X text 475 348 init value on loadbang; +#X floatatom 482 228 5 2 20; +#X msg 47 125 \; foo8_rcv color \$1 \$2 \$3; +#X msg 42 246 \; foo8_rcv label_pos \$1 \$2; +#X msg 62 361 \; foo8_rcv label_font \$1 \$2; +#X msg 34 423 \; foo8_rcv label blabla; +#X msg 300 460 \; foo8_rcv pos \$1 \$2; +#X msg 286 341 \; foo8_rcv delta \$1 \$2; +#X msg 270 216 \; foo8_rcv size \$1; +#X msg 482 171 \; foo8a_rcv receive foo8_rcv; +#X msg 483 133 \; foo8_rcv receive foo8a_rcv; +#X msg 483 88 \; foo8_rcv send foo8_snd; +#X msg 483 50 \; foo8_rcv send foo8a_snd; +#X msg 483 312 \; foo8_rcv init 0; +#X msg 485 366 \; foo8_rcv init 1; +#X msg 490 436 \; foo8_rcv single_change; +#X msg 490 470 \; foo8_rcv double_change; +#X text 491 417 changing-behavior; +#X msg 482 254 \; foo8_rcv number \$1; +#X text 526 228 number of buttons; +#X obj 47 104 pack 0 0 0; +#X obj 47 76 f; +#X msg 24 28 bang; +#X floatatom 63 26 3 0 29; +#X floatatom 79 46 3 0 29; +#X floatatom 112 62 3 0 29; +#X text 91 26 background; +#X text 106 46 front-color; +#X text 140 63 label-color; +#X msg 285 25 back; +#X msg 285 45 front; +#X msg 285 65 label; +#X msg 247 25 bang; +#N canvas 15 207 606 448 RGB_____________ 0; +#X obj 97 56 inlet; +#X obj 262 53 inlet; +#X obj 339 55 inlet; +#X obj 405 56 inlet; +#X obj 97 270 bang; +#X msg 77 295 0; +#X msg 104 295 1; +#X obj 146 268 bang; +#X msg 132 295 0; +#X msg 160 295 1; +#X obj 196 269 bang; +#X msg 187 295 0; +#X msg 214 295 1; +#X obj 265 313 spigot; +#X obj 312 313 spigot; +#X obj 359 313 spigot; +#X obj 249 385 outlet; +#X text 93 33 select; +#X text 267 28 red; +#X text 337 30 green; +#X text 409 30 blue; +#X obj 405 102 t b f; +#X obj 339 160 +; +#X obj 339 185 t b f; +#X obj 339 216 +; +#X obj 296 385 outlet; +#X obj 343 385 outlet; +#X obj 28 180 loadbang; +#X obj 97 135 route back front label bang; +#X obj 343 362 f; +#X obj 296 361 f; +#X obj 249 361 f; +#X obj 262 79 * -65536; +#X obj 339 80 * -256; +#X obj 405 80 * -1; +#X obj 339 247 - 1; +#X obj 235 168 t b b b b; +#X connect 0 0 28 0; +#X connect 1 0 32 0; +#X connect 2 0 33 0; +#X connect 3 0 34 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 14 1; +#X connect 5 0 15 1; +#X connect 6 0 13 1; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 13 1; +#X connect 8 0 15 1; +#X connect 9 0 14 1; +#X connect 10 0 11 0; +#X connect 10 0 12 0; +#X connect 11 0 13 1; +#X connect 11 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 31 1; +#X connect 14 0 30 1; +#X connect 15 0 29 1; +#X connect 21 0 22 0; +#X connect 21 1 22 1; +#X connect 22 0 23 0; +#X connect 23 0 24 0; +#X connect 23 1 24 1; +#X connect 24 0 35 0; +#X connect 27 0 6 0; +#X connect 28 0 4 0; +#X connect 28 1 7 0; +#X connect 28 2 10 0; +#X connect 28 3 36 0; +#X connect 29 0 26 0; +#X connect 30 0 25 0; +#X connect 31 0 16 0; +#X connect 32 0 24 0; +#X connect 33 0 22 0; +#X connect 34 0 21 0; +#X connect 35 0 15 0; +#X connect 35 0 14 0; +#X connect 35 0 13 0; +#X connect 36 0 31 0; +#X connect 36 1 30 0; +#X connect 36 2 29 0; +#X connect 36 3 35 0; +#X restore 285 86 pd RGB_____________; +#X floatatom 327 55 3 0 255; +#X floatatom 370 55 3 0 255; +#X floatatom 413 56 3 0 255; +#X text 34 0 preset-colors; +#X text 296 -3 RGB-colors; +#X text 327 37 red; +#X text 363 36 green; +#X text 411 36 blue; +#X msg 34 459 \; foo8_rcv label hdial_0_9; +#X connect 0 0 4 0; +#X connect 1 0 0 0; +#X connect 2 0 0 1; +#X connect 3 0 4 1; +#X connect 4 0 34 0; +#X connect 7 0 39 0; +#X connect 9 0 13 0; +#X connect 10 0 9 0; +#X connect 11 0 9 1; +#X connect 12 0 13 1; +#X connect 13 0 38 0; +#X connect 14 0 18 0; +#X connect 15 0 14 0; +#X connect 16 0 14 1; +#X connect 17 0 18 1; +#X connect 18 0 37 0; +#X connect 23 0 27 0; +#X connect 24 0 23 0; +#X connect 25 0 23 1; +#X connect 26 0 27 1; +#X connect 27 0 35 0; +#X connect 32 0 49 0; +#X connect 51 0 33 0; +#X connect 52 0 51 0; +#X connect 53 0 52 0; +#X connect 54 0 52 1; +#X connect 55 0 51 1; +#X connect 56 0 51 2; +#X connect 60 0 64 0; +#X connect 61 0 64 0; +#X connect 62 0 64 0; +#X connect 63 0 64 0; +#X connect 64 0 51 0; +#X connect 64 1 51 1; +#X connect 64 2 51 2; +#X connect 65 0 64 1; +#X connect 66 0 64 2; +#X connect 67 0 64 3; +#X restore 469 108 pd edit; +#X obj 346 35 hdl 15 1 0 8 eee eee empty 20 8 192 8 -262144 -1 -1 0 +; +#X obj 260 11 x_all_guis aaa bbb ccc ddd eee fff ggg hhh iii; +#X text 183 11 gui-hdial:; +#X text 33 238 graz \, austria 2002; +#X text 251 232 updated for Pd version 0.35; +#X connect 6 0 9 0; +#X connect 8 0 5 0; +#X connect 8 0 31 0; +#X connect 9 0 10 0; +#X connect 9 0 14 0; +#X connect 9 0 29 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 14 0 13 0; +#X connect 14 1 20 0; +#X connect 14 2 21 0; +#X connect 14 3 22 0; +#X connect 14 4 23 0; +#X connect 14 5 24 0; +#X connect 14 6 25 0; +#X connect 14 7 26 0; +#X connect 14 8 27 0; +#X connect 14 9 28 0; +#X connect 15 0 9 0; +#X connect 16 0 15 0; +#X connect 17 0 9 0; +#X connect 18 0 9 0; +#X connect 19 0 9 0; +#X connect 31 0 30 0; +#X connect 32 0 7 0; +#X connect 33 0 32 0; diff --git a/pd/doc/5.reference/hip~.pd b/pd/doc/5.reference/hip~.pd new file mode 100644 index 00000000..bc8c408d --- /dev/null +++ b/pd/doc/5.reference/hip~.pd @@ -0,0 +1,31 @@ +#N canvas 21 5 556 324 12; +#X obj 70 228 env~; +#X floatatom 70 248; +#X floatatom 107 178; +#X obj 70 206 hip~ 5; +#X text 119 201 The high pass filter is initialized to cutoff frequencies below 5 Hz.; +#X obj 12 226 env~; +#X floatatom 12 245; +#X text 108 227 env~ gives the amplitude of the signal envelop in dB.; +#X floatatom 12 107; +#X msg 452 24 \; pd dsp 1; +#X msg 452 58 \; pd dsp 0; +#X obj 83 6 lop~; +#X text 9 68 The left inlet is the incoming audio signal. The right inlet is the cutoff frequency in Hz.; +#X obj 12 130 osc~ 100; +#X text 57 105 <-- scroll to change input frequency; +#X text 12 266 Compare the value of the original signal on the left with the value of the filtered signal on the right.; +#X text 8 35 lop~ is a one-pole low pass filter with a specified rolloff frequency.; +#X text 114 7 - one-pole low pass filter; +#X msg 70 154 clear; +#X text 114 153 <-- reinitialize internal state; +#X text 139 179 <-- set cutoff frequency; +#X text 361 306 updated for Pd version-0.30; +#X connect 0 0 1 0; +#X connect 2 0 3 1; +#X connect 3 0 0 0; +#X connect 5 0 6 0; +#X connect 8 0 13 0; +#X connect 13 0 5 0; +#X connect 13 0 3 0; +#X connect 18 0 3 0; diff --git a/pd/doc/5.reference/hslider.pd b/pd/doc/5.reference/hslider.pd new file mode 100644 index 00000000..80bd83a5 --- /dev/null +++ b/pd/doc/5.reference/hslider.pd @@ -0,0 +1,303 @@ +#N canvas 243 228 551 413 10; +#X obj 1 1 cnv 8 100 60 empty empty hslider=hsl 20 20 1 18 -262144 +-1109 0; +#X floatatom 38 127 9 0 0; +#X msg 47 84 set \$1; +#X floatatom 38 41 7 0 0; +#X text 13 355 (c) musil@iem.kug.ac.at; +#X text 55 368 IEM KUG; +#X obj 38 149 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X obj 18 41 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X obj 41 107 hsl 101 15 25 75 0 1 foo1_snd foo1_rcv empty 8 -8 192 +10 -225280 -1109 -1 6200 1; +#X text 174 11 gui-horicontal-slider:; +#X floatatom 47 62 7 0 0; +#X floatatom 116 150 9 0 0; +#X obj 110 308 r goo2_snd; +#X obj 145 248 s goo2_rcv; +#X floatatom 105 40 7 0 0; +#X floatatom 145 206 7 0 0; +#X obj 60 170 print; +#N canvas 276 200 290 224 once 0; +#X obj 38 47 t b b f; +#X msg 56 85 1; +#X obj 31 108 f 0; +#X obj 31 131 pack 0 0; +#X obj 31 156 route 0; +#X obj 38 24 inlet; +#X obj 31 180 outlet; +#X connect 0 0 1 0; +#X connect 0 1 2 0; +#X connect 0 2 3 1; +#X connect 1 0 2 1; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 4 0 6 0; +#X connect 5 0 0 0; +#X restore 60 147 pd once; +#X obj 40 265 hsl 73 15 55 3520 1 1 goo2_snd goo2_rcv log.freq. 8 -8 +192 10 -42246 -260818 -90133 1600 1; +#X obj 37 308 ftom; +#X floatatom 37 330 9 0 0; +#X floatatom 64 287 9 0 0; +#X floatatom 110 329 9 0 0; +#X text 175 176 click properties to; +#X floatatom 37 203 8 0 0; +#X obj 37 226 mtof; +#X text 12 184 --------------------; +#X text 163 187 modify geometry \, colors \, etc.; +#X obj 105 82 s foo1_rcv; +#X obj 116 130 r foo1_snd; +#X msg 105 61 set \$1; +#X msg 145 227 set \$1; +#X text 197 120 (0.01 pixels); +#X text 183 99 shift-click & drag; +#X text 189 109 for fine-tuning; +#X text 148 270 UP- \, DOWN- \, LEFT- or RIGHT-key; +#X text 147 281 for moving selected gui-objects; +#N canvas 207 113 716 530 edit 0; +#X obj 32 220 f; +#X msg 10 199 bang; +#X floatatom 48 198 3 63 88; +#X floatatom 83 220 3 0 37; +#X obj 32 243 pack 0 0; +#X text 110 220 y-label; +#X text 76 198 x-label; +#X obj 279 246 f; +#X msg 257 225 bang; +#X floatatom 295 224 3 -10 10; +#X floatatom 330 246 3 -10 10; +#X obj 279 269 pack 0 0; +#X obj 292 358 f; +#X msg 270 337 bang; +#X floatatom 308 336 3 20 60; +#X floatatom 343 358 3 150 200; +#X obj 292 381 pack 0 0; +#X text 323 224 x-delta; +#X text 357 246 y-delta; +#X text 336 336 x-position; +#X text 370 358 y-position; +#X obj 52 335 f; +#X msg 30 314 bang; +#X floatatom 68 313 3 0 2; +#X floatatom 103 335 3 4 36; +#X obj 52 358 pack 0 0; +#X text 96 313 font; +#X text 132 335 height; +#X floatatom 476 188 1 0 1; +#X text 523 401 no init; +#X text 493 453 init value on loadbang; +#X msg 47 154 \; goo2_rcv color \$1 \$2 \$3; +#X msg 32 268 \; goo2_rcv label_pos \$1 \$2; +#X msg 52 383 \; goo2_rcv label_font \$1 \$2; +#X msg 34 427 \; goo2_rcv label blabla; +#X msg 292 406 \; goo2_rcv pos \$1 \$2; +#X msg 279 294 \; goo2_rcv delta \$1 \$2; +#X msg 475 21 \; goo2_rcv send goo2a_snd; +#X msg 475 59 \; goo2_rcv send goo2_snd; +#X msg 476 105 \; goo2_rcv receive goo2a_rcv; +#X msg 476 143 \; goo2a_rcv receive goo2_rcv; +#X msg 502 420 \; goo2_rcv init 0; +#X msg 503 471 \; goo2_rcv init 1; +#X text 520 188 steady; +#X obj 486 291 f; +#X msg 464 270 bang; +#X floatatom 502 269 3 55 440; +#X floatatom 537 291 6 440 3520; +#X obj 486 314 pack 0 0; +#X text 530 269 left-range-bound; +#X text 586 291 right-range-bound; +#X msg 486 339 \; goo2_rcv range \$1 \$2; +#X msg 363 465 \; goo2_rcv log; +#X msg 269 466 \; goo2_rcv lin; +#X text 269 448 linear / logarithmical; +#X obj 275 133 f; +#X msg 250 112 bang; +#X floatatom 291 111 3 15 73; +#X floatatom 326 133 3 8 50; +#X obj 275 156 pack 0 0; +#X text 319 111 width; +#X text 357 134 height; +#X msg 275 181 \; goo2_rcv size \$1 \$2; +#X msg 34 463 \; goo2_rcv label log.freq.; +#X msg 476 212 \; goo2_rcv steady \$1; +#X obj 47 100 pack 0 0 0; +#X obj 47 72 f; +#X msg 24 24 bang; +#X floatatom 63 22 3 0 29; +#X floatatom 79 42 3 0 29; +#X floatatom 112 58 3 0 29; +#X text 91 22 background; +#X text 106 42 front-color; +#X text 140 59 label-color; +#X msg 277 22 back; +#X msg 277 42 front; +#X msg 277 62 label; +#X msg 239 22 bang; +#N canvas 15 207 606 448 RGB_____________ 0; +#X obj 97 56 inlet; +#X obj 262 53 inlet; +#X obj 339 55 inlet; +#X obj 405 56 inlet; +#X obj 97 270 bang; +#X msg 77 295 0; +#X msg 104 295 1; +#X obj 146 268 bang; +#X msg 132 295 0; +#X msg 160 295 1; +#X obj 196 269 bang; +#X msg 187 295 0; +#X msg 214 295 1; +#X obj 265 313 spigot; +#X obj 312 313 spigot; +#X obj 359 313 spigot; +#X obj 249 385 outlet; +#X text 93 33 select; +#X text 267 28 red; +#X text 337 30 green; +#X text 409 30 blue; +#X obj 405 102 t b f; +#X obj 339 160 +; +#X obj 339 185 t b f; +#X obj 339 216 +; +#X obj 296 385 outlet; +#X obj 343 385 outlet; +#X obj 28 180 loadbang; +#X obj 97 135 route back front label bang; +#X obj 343 362 f; +#X obj 296 361 f; +#X obj 249 361 f; +#X obj 262 79 * -65536; +#X obj 339 80 * -256; +#X obj 405 80 * -1; +#X obj 339 247 - 1; +#X obj 235 168 t b b b b; +#X connect 0 0 28 0; +#X connect 1 0 32 0; +#X connect 2 0 33 0; +#X connect 3 0 34 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 14 1; +#X connect 5 0 15 1; +#X connect 6 0 13 1; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 13 1; +#X connect 8 0 15 1; +#X connect 9 0 14 1; +#X connect 10 0 11 0; +#X connect 10 0 12 0; +#X connect 11 0 13 1; +#X connect 11 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 31 1; +#X connect 14 0 30 1; +#X connect 15 0 29 1; +#X connect 21 0 22 0; +#X connect 21 1 22 1; +#X connect 22 0 23 0; +#X connect 23 0 24 0; +#X connect 23 1 24 1; +#X connect 24 0 35 0; +#X connect 27 0 6 0; +#X connect 28 0 4 0; +#X connect 28 1 7 0; +#X connect 28 2 10 0; +#X connect 28 3 36 0; +#X connect 29 0 26 0; +#X connect 30 0 25 0; +#X connect 31 0 16 0; +#X connect 32 0 24 0; +#X connect 33 0 22 0; +#X connect 34 0 21 0; +#X connect 35 0 15 0; +#X connect 35 0 14 0; +#X connect 35 0 13 0; +#X connect 36 0 31 0; +#X connect 36 1 30 0; +#X connect 36 2 29 0; +#X connect 36 3 35 0; +#X restore 277 82 pd RGB_____________; +#X floatatom 319 52 3 0 255; +#X floatatom 362 52 3 0 255; +#X floatatom 405 53 3 0 255; +#X text 34 -1 preset-colors; +#X text 290 1 RGB-colors; +#X text 319 34 red; +#X text 355 33 green; +#X text 403 33 blue; +#X connect 0 0 4 0; +#X connect 1 0 0 0; +#X connect 2 0 0 1; +#X connect 3 0 4 1; +#X connect 4 0 32 0; +#X connect 7 0 11 0; +#X connect 8 0 7 0; +#X connect 9 0 7 1; +#X connect 10 0 11 1; +#X connect 11 0 36 0; +#X connect 12 0 16 0; +#X connect 13 0 12 0; +#X connect 14 0 12 1; +#X connect 15 0 16 1; +#X connect 16 0 35 0; +#X connect 21 0 25 0; +#X connect 22 0 21 0; +#X connect 23 0 21 1; +#X connect 24 0 25 1; +#X connect 25 0 33 0; +#X connect 28 0 64 0; +#X connect 44 0 48 0; +#X connect 45 0 44 0; +#X connect 46 0 44 1; +#X connect 47 0 48 1; +#X connect 48 0 51 0; +#X connect 55 0 59 0; +#X connect 56 0 55 0; +#X connect 57 0 55 1; +#X connect 58 0 59 1; +#X connect 59 0 62 0; +#X connect 65 0 31 0; +#X connect 66 0 65 0; +#X connect 67 0 66 0; +#X connect 68 0 66 1; +#X connect 69 0 65 1; +#X connect 70 0 65 2; +#X connect 74 0 78 0; +#X connect 75 0 78 0; +#X connect 76 0 78 0; +#X connect 77 0 78 0; +#X connect 78 0 65 0; +#X connect 78 1 65 1; +#X connect 78 2 65 2; +#X connect 79 0 78 1; +#X connect 80 0 78 2; +#X connect 81 0 78 3; +#X restore 314 245 pd edit; +#X obj 221 61 hsl 128 15 0 127 0 0 ddd ddd empty 20 8 192 8 -262144 +-1 -1 10600 1; +#X text 187 379 updated for Pd version 0.35; +#X text 30 380 graz \, austria 2002; +#X obj 168 34 x_all_guis aaa bbb ccc ddd eee fff ggg hhh iii; +#X connect 1 0 6 0; +#X connect 2 0 8 0; +#X connect 3 0 8 0; +#X connect 7 0 8 0; +#X connect 8 0 1 0; +#X connect 8 0 17 0; +#X connect 10 0 2 0; +#X connect 12 0 22 0; +#X connect 14 0 30 0; +#X connect 15 0 31 0; +#X connect 17 0 16 0; +#X connect 18 0 21 0; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 24 0 25 0; +#X connect 25 0 18 0; +#X connect 29 0 11 0; +#X connect 30 0 28 0; +#X connect 31 0 13 0; diff --git a/pd/doc/5.reference/int.pd b/pd/doc/5.reference/int.pd new file mode 100644 index 00000000..6b6de2f6 --- /dev/null +++ b/pd/doc/5.reference/int.pd @@ -0,0 +1,24 @@ +#N canvas 4 30 605 319 12; +#X msg 61 101 bang; +#X floatatom 61 248 0 0 0; +#X floatatom 73 125 0 0 0; +#X floatatom 102 198 0 0 0; +#X text 108 97 outputs the value; +#X text 110 126 sets and outputs the value; +#X text 113 220 creation argument initializes the value; +#X obj 61 222 int 6; +#X msg 73 148 9.6; +#X text 106 148 non-integers get truncated; +#X msg 71 173 -9.6; +#X text 113 173 toward zero; +#X text 136 200 set the value but no output; +#X obj 60 11 int; +#X text 108 12 - STORE AN INTEGER; +#X text 37 33 The int object stores a number \, initialized by its creation argument \, which may be reset using its inlet and output by sending it the "bang" message. The output is truncated to an integer ala Max.; +#X text 315 270 updated for Pd version 0.33; +#X connect 0 0 7 0; +#X connect 2 0 7 0; +#X connect 3 0 7 1; +#X connect 7 0 1 0; +#X connect 8 0 7 0; +#X connect 10 0 7 0; diff --git a/pd/doc/5.reference/key.pd b/pd/doc/5.reference/key.pd new file mode 100644 index 00000000..ceab4440 --- /dev/null +++ b/pd/doc/5.reference/key.pd @@ -0,0 +1,19 @@ +#N canvas 243 41 464 286 12; +#X obj 21 10 key; +#X obj 48 10 keyup; +#X obj 89 9 keyname; +#X text 157 8 -- grab keyboard; +#X obj 38 67 key; +#X floatatom 38 95 3 0 0; +#X floatatom 75 95 3 0 0; +#X obj 75 69 keyup; +#X floatatom 122 97 3 0 0; +#X obj 122 71 keyname; +#X symbolatom 166 98 10 0 0; +#X text 254 256 updated for Pd version 0.32.; +#X text 32 143 Key and keyup report the (system dependent) numbers of "printing" keys of the keyboard. Keyname gives the symbolic name of the key \, with a 1 or 0 if it's up or down \, and works with non-printing keys like shift or "F1".; +#X text 33 203 Caveat -- this only works if Pd actually gets the key events which can depend on the stacking order of windows and/or the pointer location \, depending on the system.; +#X connect 4 0 5 0; +#X connect 7 0 6 0; +#X connect 9 0 8 0; +#X connect 9 1 10 0; diff --git a/pd/doc/5.reference/line.pd b/pd/doc/5.reference/line.pd new file mode 100644 index 00000000..31392b86 --- /dev/null +++ b/pd/doc/5.reference/line.pd @@ -0,0 +1,22 @@ +#N canvas 31 15 486 368 12; +#X floatatom 22 323; +#X msg 31 216 0 1000; +#X msg 46 238 39; +#X obj 66 15 line; +#X text 106 14 - ramp generator; +#X obj 22 297 line 100; +#X text 88 292 creation argument sets time increment. In this implementation you can't set this dtnamically.; +#X msg 22 193 1 1000; +#X text 18 36 The line object takes (target \, time) pairs and slews to the specified target over the time given \, updating its output at a "grain rate" given by the creation argument. If you dont' specify a time \, line jumps immediately to the target. Note that the inlet does not remember old values (unlike every other inlet in Pd) -- sending a float causes a jump in the output regardless of whatever time value was specified in some previous message. If the line object receives a message specifying some new target before reaching the previous one \, it takes off from its current value.; +#X text 93 205 send a pair to ramp to a new value; +#X text 105 235 send a single number to jump; +#X text 46 347 see also:; +#X obj 120 347 line~; +#X msg 57 263 stop; +#X text 98 262 "stop" message to stop output; +#X text 273 348 updated for Pd version 0.27; +#X connect 1 0 5 0; +#X connect 2 0 5 0; +#X connect 5 0 0 0; +#X connect 7 0 5 0; +#X connect 13 0 5 0; diff --git a/pd/doc/5.reference/line~.pd b/pd/doc/5.reference/line~.pd new file mode 100644 index 00000000..7b470c2d --- /dev/null +++ b/pd/doc/5.reference/line~.pd @@ -0,0 +1,33 @@ +#N canvas 121 54 813 370 12; +#X obj 33 301 snapshot~; +#X obj 21 8 line~; +#X obj 33 226 line~; +#X floatatom 33 324 0 0 0; +#X obj 43 274 metro 100; +#X obj 43 249 r start; +#X msg 550 21 \; pd dsp 1 \; start bang; +#X msg 34 106 1 1000; +#X text 89 105 a pair of numbers starts a ramp; +#X msg 60 176 2; +#X text 91 150 a single number jumps to value; +#X msg 61 200 stop; +#X text 104 199 "stop" message freezes line~ at its current value; +#X msg 60 153 0; +#X msg 43 128 0 5000; +#X text 10 28 The line~ object generates linear ramps whose levels and timing are determined by messages you send it. The messages may be a single target value (causing the output to jump to the target) or a target and a time in milliseconds (to start a new ramp.); +#X text 644 36 Click to start; +#X text 639 94 Click to stop; +#X text 185 300 see also:; +#X obj 271 302 line; +#X msg 550 75 \; pd dsp 0 \; start 0; +#X text 75 7 - audio ramp generator; +#X text 576 335 updated for version 0.33; +#X connect 0 0 3 0; +#X connect 2 0 0 0; +#X connect 4 0 0 0; +#X connect 5 0 4 0; +#X connect 7 0 2 0; +#X connect 9 0 2 0; +#X connect 11 0 2 0; +#X connect 13 0 2 0; +#X connect 14 0 2 0; diff --git a/pd/doc/5.reference/lop~.pd b/pd/doc/5.reference/lop~.pd new file mode 100644 index 00000000..9f3e85f8 --- /dev/null +++ b/pd/doc/5.reference/lop~.pd @@ -0,0 +1,31 @@ +#N canvas 402 99 566 329 12; +#X obj 70 228 env~; +#X floatatom 70 248; +#X floatatom 107 178; +#X obj 70 206 hip~ 5; +#X text 119 201 The high pass filter is initialized to cutoff frequencies below 5 Hz.; +#X obj 12 226 env~; +#X floatatom 12 245; +#X text 108 227 env~ gives the amplitude of the signal envelop in dB.; +#X floatatom 12 107; +#X msg 452 24 \; pd dsp 1; +#X msg 452 58 \; pd dsp 0; +#X obj 83 6 lop~; +#X text 9 68 The left inlet is the incoming audio signal. The right inlet is the cutoff frequency in Hz.; +#X obj 12 130 osc~ 100; +#X text 57 105 <-- scroll to change input frequency; +#X text 12 266 Compare the value of the original signal on the left with the value of the filtered signal on the right.; +#X text 8 35 lop~ is a one-pole low pass filter with a specified rolloff frequency.; +#X text 114 7 - one-pole low pass filter; +#X msg 70 154 clear; +#X text 114 153 <-- reinitialize internal state; +#X text 139 179 <-- set cutoff frequency; +#X text 364 306 updated for Pd version-0.30; +#X connect 0 0 1 0; +#X connect 2 0 3 1; +#X connect 3 0 0 0; +#X connect 5 0 6 0; +#X connect 8 0 13 0; +#X connect 13 0 5 0; +#X connect 13 0 3 0; +#X connect 18 0 3 0; diff --git a/pd/doc/5.reference/makefilename.pd b/pd/doc/5.reference/makefilename.pd new file mode 100644 index 00000000..6850699b --- /dev/null +++ b/pd/doc/5.reference/makefilename.pd @@ -0,0 +1,17 @@ +#N canvas 18 58 583 301 12; +#X floatatom 30 169 0 0 0; +#X obj 30 223 print; +#X obj 30 196 makefilename dog%d.aif; +#X msg 245 166 symbol meat; +#X msg 355 167 symbol hair; +#X obj 245 223 print; +#X obj 245 196 makefilename dog%s.aif; +#X text 28 49 The Makefilename object generates symbols according to a format string \, for use as a series of filenames \, table names \, or whatnot. You can plug in a variable number or symbol by putting "%d" or "%s" in the string. If you put "%s" in the string be sure to send it a symbol and vice versa... there's no checking.; +#X text 319 257 updated for Pd version 0.33; +#X obj 49 17 makefilename; +#X text 170 18 - format a "name" with a variable field; +#X connect 0 0 2 0; +#X connect 2 0 1 0; +#X connect 3 0 6 0; +#X connect 4 0 6 0; +#X connect 6 0 5 0; diff --git a/pd/doc/5.reference/makenote.pd b/pd/doc/5.reference/makenote.pd new file mode 100644 index 00000000..e3d003fc --- /dev/null +++ b/pd/doc/5.reference/makenote.pd @@ -0,0 +1,26 @@ +#N canvas 39 28 663 385 12; +#X floatatom 180 207 0 0 0; +#X floatatom 110 176 0 0 0; +#X msg 48 127 60; +#X obj 41 262 print x1; +#X obj 180 262 print x2; +#X floatatom 41 104 0 0 0; +#X obj 29 14 makenote; +#X text 113 14 - send note-on messages and schedule note-off for later; +#X text 19 41 Makenote makes MIDI-style note-on/note-off pairs \, which you can use for MIDI output or to drive note-like processes within Pd.; +#X msg 48 153 60.5; +#X text 80 105 numbers at left are "pitches" which may be integers or not.; +#X text 146 178 "velocity"; +#X text 215 210 duration in milliseconds; +#X obj 41 235 makenote 3.2 500; +#X text 193 235 creation arguments initialize velocity and duration; +#X text 38 316 see also; +#X obj 117 316 stripnote; +#X text 389 325 updated for Pd version 0.33; +#X connect 0 0 13 2; +#X connect 1 0 13 1; +#X connect 2 0 13 0; +#X connect 5 0 13 0; +#X connect 9 0 13 0; +#X connect 13 0 3 0; +#X connect 13 1 4 0; diff --git a/pd/doc/5.reference/math.pd b/pd/doc/5.reference/math.pd new file mode 100644 index 00000000..5464b8aa --- /dev/null +++ b/pd/doc/5.reference/math.pd @@ -0,0 +1,60 @@ +#N canvas 0 0 554 555 12; +#X floatatom 283 263 0 0 0; +#X floatatom 226 349 0 0 0; +#X floatatom 226 262 0 0 0; +#X floatatom 281 486 0 0 0; +#X floatatom 281 425 0 0 0; +#X floatatom 185 486 0 0 0; +#X floatatom 185 425 0 0 0; +#X floatatom 117 486 0 0 0; +#X floatatom 117 425 0 0 0; +#X floatatom 117 326 0 0 0; +#X floatatom 117 265 0 0 0; +#X floatatom 30 486 0 0 0; +#X floatatom 30 425 0 0 0; +#X floatatom 218 186 0 0 0; +#X floatatom 135 182 0 0 0; +#X obj 66 146 sin; +#X floatatom 66 53 0 0 0; +#X floatatom 66 180 0 0 0; +#X obj 66 113 * 6.28319; +#X obj 66 83 / 360; +#X obj 135 148 cos; +#X obj 218 152 tan; +#X obj 30 456 sqrt; +#X obj 117 296 atan; +#X obj 117 456 log; +#X obj 185 456 exp; +#X obj 281 456 abs; +#X obj 226 290 float; +#X obj 283 290 t b f; +#X obj 226 319 atan2; +#X text 87 17 Higher math in Pd; +#X text 171 58 trig functions take inputs in radians; +#X text 24 213 The arc tangent takes two forms. The atan2 version takes an (x \, y) pair and gives you an output between -pi and pi.; +#X text 23 380 also \, square root \, natural logarithm and exponential \, and absolute value:; +#X text 292 529 updated for Pd version 0.33; +#X connect 0 0 28 0; +#X connect 2 0 27 0; +#X connect 4 0 26 0; +#X connect 6 0 25 0; +#X connect 8 0 24 0; +#X connect 10 0 23 0; +#X connect 12 0 22 0; +#X connect 15 0 17 0; +#X connect 16 0 19 0; +#X connect 18 0 15 0; +#X connect 18 0 20 0; +#X connect 18 0 21 0; +#X connect 19 0 18 0; +#X connect 20 0 14 0; +#X connect 21 0 13 0; +#X connect 22 0 11 0; +#X connect 23 0 9 0; +#X connect 24 0 7 0; +#X connect 25 0 5 0; +#X connect 26 0 3 0; +#X connect 27 0 29 0; +#X connect 28 0 27 0; +#X connect 28 1 29 1; +#X connect 29 0 1 0; diff --git a/pd/doc/5.reference/message.pd b/pd/doc/5.reference/message.pd new file mode 100644 index 00000000..13a74f55 --- /dev/null +++ b/pd/doc/5.reference/message.pd @@ -0,0 +1,46 @@ +#N canvas 0 365 726 512 12; +#X msg 88 13 message boxes; +#X text 55 36 Message boxes hold one or more message. Anytime the message +box receives any message at all \, the messages in the box are all +sent to their destinations.; +#X obj 178 301 print; +#X msg 178 241 60 64; +#X msg 178 271 pitch \$1 \, velocity \$2; +#X msg 49 378 123 \; my-receiver-name 858 \; another-receiver -45; +#X text 55 84 Clicking on a message also sends it \, so you can use +messsage boxes for push buttins. For instance \, click here while watching +the printout window:; +#X msg 164 141 walk the dog; +#X obj 164 170 print; +#X text 281 141 <--- message; +#X text 265 167 <--- object (different border); +#X text 35 200 You can separate multiple messages by commas. Also \, +you can use "$1" \, "$2" \, etc. to make variable messages:; +#X text 14 323 Finally \, if you separate messages by a semicolon instead +of a comma \, the following message(s) are re-routed to named objects +such as "receives":; +#X obj 49 433 print; +#X obj 253 378 receive my-receiver-name; +#X floatatom 253 402 0 0 0; +#X floatatom 252 449 0 0 0; +#X obj 252 425 receive another-receiver; +#X msg 559 349 dog bird monkey \; monkey \;; +#X msg 559 229 set dog; +#X msg 567 252 set cat; +#X text 593 189 this is; +#X text 592 206 arcane:; +#X msg 576 303 add monkey; +#X msg 581 327 add2 bird; +#X msg 573 277 set; +#X text 415 479 updated for Pd version 0.34; +#X connect 3 0 4 0; +#X connect 4 0 2 0; +#X connect 5 0 13 0; +#X connect 7 0 8 0; +#X connect 14 0 15 0; +#X connect 17 0 16 0; +#X connect 19 0 18 0; +#X connect 20 0 18 0; +#X connect 23 0 18 0; +#X connect 24 0 18 0; +#X connect 25 0 18 0; diff --git a/pd/doc/5.reference/metro.pd b/pd/doc/5.reference/metro.pd new file mode 100644 index 00000000..f848e582 --- /dev/null +++ b/pd/doc/5.reference/metro.pd @@ -0,0 +1,29 @@ +#N canvas 39 7 634 372 12; +#X text 19 36 The metro object sends a series of bangs at a constant rate. The right inlet takes the value in milliseconds between each bang. The left inlet takes a 1 or 0 \, turning the metronome on or off.; +#X obj 67 285 + 1; +#X obj 32 284 int; +#X floatatom 32 317 4 0 0; +#X obj 32 243 metro 500; +#X obj 5 6 metro; +#X floatatom 81 220 4 0 0; +#X text 104 282 These objects work together as a counter. For each bang sent by metro \, the output adds 1; +#X obj 32 103 loadbang; +#X msg 32 125 1; +#X text 92 135 nonzero number or "bang" to start; +#X msg 49 172 0; +#X msg 38 148 bang; +#X msg 49 194 stop; +#X text 99 181 zero or "stop" to stop.; +#X text 351 332 Updated for Pd version 0.33; +#X text 130 220 right inlet sets the rate in msec per tick.; +#X text 127 243 creation argument initializes rate in msec; +#X connect 1 0 2 1; +#X connect 2 0 3 0; +#X connect 2 0 1 0; +#X connect 4 0 2 0; +#X connect 6 0 4 1; +#X connect 8 0 9 0; +#X connect 9 0 4 0; +#X connect 11 0 4 0; +#X connect 12 0 4 0; +#X connect 13 0 4 0; diff --git a/pd/doc/5.reference/midi.pd b/pd/doc/5.reference/midi.pd new file mode 100644 index 00000000..4b731688 --- /dev/null +++ b/pd/doc/5.reference/midi.pd @@ -0,0 +1,129 @@ +#N canvas 68 50 876 553 12; +#X floatatom 318 379 0 0 0; +#X floatatom 282 468 0 0 0; +#X floatatom 200 469 0 0 0; +#X text 96 330 off; +#X floatatom 52 383 0 0 0; +#X floatatom 70 134 0 0 0; +#X obj 34 108 notein; +#X floatatom 34 134 0 0 0; +#X obj 52 488 noteout; +#X obj 52 462 makenote 64 250; +#X obj 52 409 metro 500; +#X msg 52 356 1; +#X msg 84 356 0; +#X text 52 333 on; +#X msg 52 436 60; +#X obj 200 496 pgmout; +#X obj 282 494 bendout; +#X floatatom 416 379 0 0 0; +#X floatatom 197 136 0 0 0; +#X floatatom 145 136 0 0 0; +#X text 41 79 omni; +#X floatatom 106 134 0 0 0; +#X obj 145 109 notein 1; +#X text 145 85 channel 1; +#X text 194 17 MIDI I/O objects; +#X text 85 54 notes; +#X text 334 47 control change; +#X text 264 69 everything; +#X floatatom 309 137 0 0 0; +#X floatatom 271 137 0 0 0; +#X floatatom 347 136 0 0 0; +#X obj 271 110 ctlin; +#X floatatom 440 138 0 0 0; +#X floatatom 396 138 0 0 0; +#X obj 396 111 ctlin 7; +#X text 364 71 specific controller number; +#X text 410 88 omni; +#X text 496 89 channel 1; +#X floatatom 493 140 0 0 0; +#X obj 493 114 ctlin 7 1; +#X obj 61 221 pgmin; +#X floatatom 97 248 0 0 0; +#X floatatom 61 248 0 0 0; +#X floatatom 197 250 0 0 0; +#X floatatom 161 250 0 0 0; +#X floatatom 307 253 0 0 0; +#X floatatom 272 253 0 0 0; +#X floatatom 382 255 0 0 0; +#X floatatom 343 253 0 0 0; +#X floatatom 420 256 0 0 0; +#X obj 161 222 bendin; +#X obj 272 226 touchin; +#X obj 343 227 polytouchin; +#X text 49 167 these can also take an optional channel number as argument but by default are omni:; +#X text 32 197 program change; +#X text 155 198 pitch bend; +#X text 271 203 channel and poly aftertouch; +#X floatatom 191 380 0 0 0; +#X floatatom 224 380 0 0 0; +#X floatatom 260 382 0 0 0; +#X obj 191 407 ctlout; +#X obj 318 406 ctlout 7; +#X text 192 349 control out; +#X text 314 353 control 7; +#X text 409 354 control 7 \, channel 4; +#X obj 416 406 ctlout 7 4; +#X text 101 277 outputs work similarly. They all take an optional channel as creation argument \, and ctlin takes a control number and a channel. You get inlets to change them in any case. IF you specify no channel \, it's channel 1; +#X floatatom 355 467 0 0 0; +#X floatatom 440 466 0 0 0; +#X obj 355 493 touchout; +#X obj 440 492 polytouchout; +#X floatatom 479 467 0 0 0; +#X floatatom 520 467 0 0 0; +#X obj 625 218 midiin; +#X floatatom 625 249 0 0 0; +#X floatatom 656 249 0 0 0; +#X floatatom 695 249 0 0 0; +#X floatatom 726 250 0 0 0; +#X text 590 155 These two are always omni and; +#X text 590 174 output the port number instead; +#X text 594 192 of the channel:; +#X obj 697 218 sysexin; +#X obj 623 472 midiout; +#X text 571 413 use this to output raw MIDI; +#X text 566 433 (the second inlet is the port; +#X text 569 451 number.); +#X text 625 514 updated for Pd release 0.33; +#X connect 0 0 61 0; +#X connect 1 0 16 0; +#X connect 2 0 15 0; +#X connect 4 0 10 0; +#X connect 6 0 7 0; +#X connect 6 1 5 0; +#X connect 6 2 21 0; +#X connect 9 0 8 0; +#X connect 9 1 8 1; +#X connect 10 0 14 0; +#X connect 11 0 4 0; +#X connect 12 0 4 0; +#X connect 14 0 9 0; +#X connect 17 0 65 0; +#X connect 22 0 19 0; +#X connect 22 1 18 0; +#X connect 31 0 29 0; +#X connect 31 1 28 0; +#X connect 31 2 30 0; +#X connect 34 0 33 0; +#X connect 34 1 32 0; +#X connect 39 0 38 0; +#X connect 40 0 42 0; +#X connect 40 1 41 0; +#X connect 50 0 44 0; +#X connect 50 1 43 0; +#X connect 51 0 46 0; +#X connect 51 1 45 0; +#X connect 52 0 48 0; +#X connect 52 1 47 0; +#X connect 52 2 49 0; +#X connect 57 0 60 0; +#X connect 58 0 60 1; +#X connect 59 0 60 2; +#X connect 67 0 69 0; +#X connect 68 0 70 0; +#X connect 71 0 70 1; +#X connect 72 0 70 2; +#X connect 73 0 74 0; +#X connect 73 1 75 0; +#X connect 81 0 76 0; diff --git a/pd/doc/5.reference/moses.pd b/pd/doc/5.reference/moses.pd new file mode 100644 index 00000000..c1f23c90 --- /dev/null +++ b/pd/doc/5.reference/moses.pd @@ -0,0 +1,17 @@ +#N canvas 0 0 624 300 12; +#X obj 72 196 moses 10; +#X floatatom 72 164 4 0 0; +#X floatatom 139 167 4 0 0; +#X floatatom 72 229 4 0 0; +#X floatatom 139 230 4 0 0; +#X obj 63 24 moses; +#X text 118 23 - part a stream of numbers; +#X text 303 235 updated for Pd version 0.33; +#X text 24 64 Moses takes numbers and outputs them at left if they're +less than a control value \, and at right if they're greater or equal +to it. The creation argument initializes the control value (10 in this +example) and the right inlet changes it.; +#X connect 0 0 3 0; +#X connect 0 1 4 0; +#X connect 1 0 0 0; +#X connect 2 0 0 1; diff --git a/pd/doc/5.reference/my_canvas.pd b/pd/doc/5.reference/my_canvas.pd new file mode 100644 index 00000000..decda628 --- /dev/null +++ b/pd/doc/5.reference/my_canvas.pd @@ -0,0 +1,243 @@ +#N canvas 482 81 568 339 10; +#X obj 1 1 cnv 15 300 60 foo10_snd foo10_rcv my_canvas=cnv 63 37 192 +17 -257472 -355 0; +#X text 4 232 (c) musil@iem.kug.ac.at; +#X text 46 245 IEM KUG; +#N canvas 219 100 699 530 edit 0; +#X obj 39 226 f; +#X msg 17 205 bang; +#X floatatom 55 204 3 63 88; +#X floatatom 90 226 3 0 37; +#X obj 39 249 pack 0 0; +#X text 117 226 y-label; +#X text 83 204 x-label; +#X obj 297 281 f; +#X msg 275 260 bang; +#X floatatom 313 259 3 -10 10; +#X floatatom 348 281 3 -10 10; +#X obj 297 304 pack 0 0; +#X obj 309 396 f; +#X msg 287 375 bang; +#X floatatom 325 374 3 20 60; +#X floatatom 360 396 3 150 200; +#X obj 309 419 pack 0 0; +#X text 341 259 x-delta; +#X text 375 281 y-delta; +#X text 353 374 x-position; +#X text 387 396 y-position; +#X obj 59 341 f; +#X msg 37 320 bang; +#X floatatom 75 319 3 0 2; +#X floatatom 110 341 3 4 36; +#X obj 59 364 pack 0 0; +#X text 103 319 font; +#X text 139 341 height; +#X floatatom 275 183 3 2 20; +#X msg 52 137 \; foo10_rcv color \$1 \$2; +#X msg 39 274 \; foo10_rcv label_pos \$1 \$2; +#X msg 59 390 \; foo10_rcv label_font \$1 \$2; +#X msg 36 430 \; foo10_rcv label blabla; +#X msg 36 466 \; foo10_rcv label my_canvas; +#X msg 309 444 \; foo10_rcv pos \$1 \$2; +#X msg 297 329 \; foo10_rcv delta \$1 \$2; +#X obj 505 234 f; +#X msg 483 213 bang; +#X floatatom 521 212 5 100 1000; +#X floatatom 556 234 4 50 500; +#X obj 505 257 pack 0 0; +#X text 566 212 width; +#X text 594 236 height; +#X msg 505 282 \; foo10_rcv vis_size \$1 \$2; +#X msg 275 211 \; foo10_rcv size \$1; +#X text 305 183 selectable size; +#X msg 483 156 \; foo10a_rcv receive foo10_rcv; +#X msg 483 119 \; foo10_rcv receive foo10a_rcv; +#X msg 482 29 \; foo10_rcv send foo10a_snd; +#X msg 482 67 \; foo10_rcv send foo10_snd; +#X msg 509 372 \; foo10_rcv get_pos; +#X obj 510 407 r foo10_snd; +#X obj 510 428 unpack 0 0; +#X floatatom 510 453 4 0 0; +#X floatatom 575 452 4 0 0; +#X text 490 452 x=; +#X text 557 452 y=; +#X obj 52 79 f; +#X msg 29 31 bang; +#X floatatom 68 29 3 0 29; +#X floatatom 103 47 3 0 29; +#X text 96 29 background; +#X text 131 48 label-color; +#X msg 290 25 back; +#X msg 290 49 label; +#X msg 252 25 bang; +#N canvas 15 207 606 448 RGB_____________ 0; +#X obj 97 56 inlet; +#X obj 262 53 inlet; +#X obj 339 55 inlet; +#X obj 405 56 inlet; +#X obj 97 270 bang; +#X msg 77 295 0; +#X msg 104 295 1; +#X obj 146 268 bang; +#X msg 132 295 0; +#X msg 160 295 1; +#X obj 265 313 spigot; +#X obj 312 313 spigot; +#X obj 249 385 outlet; +#X text 93 33 select; +#X text 267 28 red; +#X text 337 30 green; +#X text 409 30 blue; +#X obj 405 102 t b f; +#X obj 339 160 +; +#X obj 339 185 t b f; +#X obj 339 216 +; +#X obj 296 385 outlet; +#X obj 28 180 loadbang; +#X obj 296 361 f; +#X obj 249 361 f; +#X obj 262 79 * -65536; +#X obj 339 80 * -256; +#X obj 405 80 * -1; +#X obj 339 247 - 1; +#X obj 97 135 route back label bang; +#X obj 235 168 t b b b; +#X connect 0 0 29 0; +#X connect 1 0 25 0; +#X connect 2 0 26 0; +#X connect 3 0 27 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 11 1; +#X connect 6 0 10 1; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 10 1; +#X connect 9 0 11 1; +#X connect 10 0 24 1; +#X connect 11 0 23 1; +#X connect 17 0 18 0; +#X connect 17 1 18 1; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 19 1 20 1; +#X connect 20 0 28 0; +#X connect 22 0 6 0; +#X connect 23 0 21 0; +#X connect 24 0 12 0; +#X connect 25 0 20 0; +#X connect 26 0 18 0; +#X connect 27 0 17 0; +#X connect 28 0 11 0; +#X connect 28 0 10 0; +#X connect 29 0 4 0; +#X connect 29 1 7 0; +#X connect 29 2 30 0; +#X connect 30 0 24 0; +#X connect 30 1 23 0; +#X connect 30 2 28 0; +#X restore 290 86 pd RGB_____________; +#X floatatom 332 55 3 0 255; +#X floatatom 375 55 3 0 255; +#X floatatom 418 56 3 0 255; +#X text 39 3 preset-colors; +#X text 301 0 RGB-colors; +#X text 332 37 red; +#X text 368 36 green; +#X text 416 36 blue; +#X obj 52 104 pack 0 0; +#X connect 0 0 4 0; +#X connect 1 0 0 0; +#X connect 2 0 0 1; +#X connect 3 0 4 1; +#X connect 4 0 30 0; +#X connect 7 0 11 0; +#X connect 8 0 7 0; +#X connect 9 0 7 1; +#X connect 10 0 11 1; +#X connect 11 0 35 0; +#X connect 12 0 16 0; +#X connect 13 0 12 0; +#X connect 14 0 12 1; +#X connect 15 0 16 1; +#X connect 16 0 34 0; +#X connect 21 0 25 0; +#X connect 22 0 21 0; +#X connect 23 0 21 1; +#X connect 24 0 25 1; +#X connect 25 0 31 0; +#X connect 28 0 44 0; +#X connect 36 0 40 0; +#X connect 37 0 36 0; +#X connect 38 0 36 1; +#X connect 39 0 40 1; +#X connect 40 0 43 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 52 1 54 0; +#X connect 57 0 75 0; +#X connect 58 0 57 0; +#X connect 59 0 57 1; +#X connect 60 0 75 1; +#X connect 63 0 66 0; +#X connect 64 0 66 0; +#X connect 65 0 66 0; +#X connect 66 0 75 0; +#X connect 66 1 75 1; +#X connect 67 0 66 1; +#X connect 68 0 66 2; +#X connect 69 0 66 3; +#X connect 75 0 29 0; +#X restore 305 20 pd edit; +#X floatatom 110 193 4 0 0; +#X floatatom 147 193 4 0 0; +#X text 121 209 x; +#X text 158 209 y; +#X obj 7 161 metro 100; +#X obj 33 141 tgl 15 1 empty empty empty 20 8 0 10 -262144 -1 -1 1 +1; +#X obj 110 145 r from_K1; +#X floatatom 188 194 4 0 0; +#X floatatom 225 194 4 0 0; +#X text 198 210 x; +#X text 236 210 y; +#X obj 188 146 r from_K2; +#X msg 7 185 \; to_K get_pos; +#N canvas 0 296 395 395 room 1; +#X obj 1 1 cnv 1 400 400 empty empty type...ctrl+e 150 140 2 17 -33289 +-24198 0; +#X obj 15 16 cnv 1 1 360 empty empty move_K1_and_K2 115 160 2 17 -166441 +-24198 0; +#X obj 374 15 cnv 1 1 360 empty empty empty 20 12 2 20 -99865 -66577 +0; +#X obj 15 15 cnv 1 360 1 empty empty empty 20 12 2 20 -166441 -66577 +0; +#X obj 17 375 cnv 1 358 1 empty empty empty 20 12 2 20 -99865 -66577 +0; +#X obj 23 22 cnv 25 25 25 from_K1 to_K K1 1 13 194 14 -261681 -123526 +0; +#X obj 342 342 cnv 25 25 25 from_K2 to_K K2 1 13 194 14 -225280 -1109 +0; +#X restore 307 147 pd room; +#X obj 110 169 unpack; +#X obj 188 170 unpack; +#X text 51 92 to modify geometry \, colors \, etc.; +#X obj 2 115 cnv 1 470 1 empty empty empty 20 12 2 20 -261681 -66577 +0; +#X text 40 78 of the light-blue; +#X text 166 78 my_canvas-object \,; +#X text 5 64 click the properties-dialog on the top-left corner; +#X obj 361 195 r foo10_rcv; +#X obj 403 215 s ggg; +#X text 172 257 updated for Pd version 0.35; +#X text 21 257 graz \, austria 2002; +#X obj 187 236 x_all_guis aaa bbb ccc ddd eee fff ggg hhh iii; +#X connect 8 0 16 0; +#X connect 9 0 8 0; +#X connect 10 0 18 0; +#X connect 15 0 19 0; +#X connect 18 0 4 0; +#X connect 18 1 5 0; +#X connect 19 0 11 0; +#X connect 19 1 12 0; +#X connect 25 0 26 0; diff --git a/pd/doc/5.reference/namecanvas.pd b/pd/doc/5.reference/namecanvas.pd new file mode 100644 index 00000000..4c408bcb --- /dev/null +++ b/pd/doc/5.reference/namecanvas.pd @@ -0,0 +1,8 @@ +#N canvas 38 53 532 261 12; +#X obj 66 15 namecanvas; +#X text 169 15 - ATTACH THIS CANVAS TO A NAME; +#X obj 204 107 namecanvas bonzo; +#X msg 205 64 \; bonzo msg 50 50 hi there; +#X text 252 224 updated for Pd version 0.33; +#X msg 79 180 \; pd-namecanvas.pd msg 50 70 this is better; +#X text 44 153 This is obsolete. Instead \, you can just say:; diff --git a/pd/doc/5.reference/netreceive.pd b/pd/doc/5.reference/netreceive.pd new file mode 100644 index 00000000..b4bd3f9c --- /dev/null +++ b/pd/doc/5.reference/netreceive.pd @@ -0,0 +1,23 @@ +#N canvas 50 24 682 520 12; +#X obj 100 323 netreceive 3000; +#X floatatom 202 353 0 0 0; +#X obj 100 414 netreceive 3001 1; +#X text 33 36 The Netreceive object opens a socket for TCP ("stream") or UDP ("datagram") network reception on a specified port. If using TCP \, an outlet gives you the number of Netsend objects (or other compatible clients) have opened connections here.; +#X text 31 117 Incoming network messages appear on "receive" objects \; it's up to the sender to select which one. Here \, a "receive foo" fields messages sent from the Netsend help window \, q.v.; +#X text 108 270 first argument: portnumber = 3000; +#X text 105 291 second argument: 0 or none for TCP \, nonzero for UDP; +#X text 238 322 <-- TCP \, port 3000; +#X text 262 413 <-- UDP \, port 3001; +#X text 236 354 <--- number of open connections; +#X text 85 12 Netreceive -- listen for incoming messages from network; +#X text 26 383 incoming messages; +#X text 203 488 see also:; +#X obj 289 490 netsend; +#X obj 100 353 print tcp; +#X obj 100 442 print udp; +#X text 425 484 updated for Pd version 0.33; +#X text 30 207 SECURITY ALERT: don't publish the port number of your netreceive unless you wouldn't mind other people being able to send you messages.; +#X text 32 168 There are some possibilities for intercommunication with other programs... see the help for "netsend."; +#X connect 0 0 14 0; +#X connect 0 1 1 0; +#X connect 2 0 15 0; diff --git a/pd/doc/5.reference/netsend.pd b/pd/doc/5.reference/netsend.pd new file mode 100644 index 00000000..f2eb9bad --- /dev/null +++ b/pd/doc/5.reference/netsend.pd @@ -0,0 +1,55 @@ +#N canvas 84 44 866 530 12; +#X obj 15 425 netsend; +#X msg 15 263 connect localhost 3000; +#X msg 24 403 send foo \$1; +#X floatatom 24 376 0 0 0; +#X msg 15 344 disconnect; +#X msg 285 397 send foo \$1; +#X floatatom 285 370 0 0 0; +#X msg 268 344 disconnect; +#X obj 268 422 netsend 1; +#X msg 268 263 connect localhost 3001; +#X floatatom 15 452 0 0 0; +#X floatatom 268 449 0 0 0; +#X text 359 422 creation argument: 0 or none for TCP \, nonzero for +UDP; +#X text 66 242 TCP; +#X text 343 239 UDP; +#X text 197 9 Netsend -- send Pd messages over a network; +#X text 475 261 Connect to "localhost" port 3000/3001; +#X text 373 345 Close the connection; +#X text 325 372 Send messages to "foo" on remote machine; +#X text 10 473 Outlet is nonzero if connection is open \, zero otherwise. +; +#X text 87 38 The Netsend object connects to another machine over the +network for sending TCP ("stream") or UDP ("datagram") messages. An +outlet reports whether the connection is open or not. A connection +request should specify the name or IP address of the other host and +the port number. There should be a "Netreceive" on the remote host +with a matching port number.; +#X obj 409 497 netreceive; +#X text 318 497 see also:; +#X text 607 498 updated for Pd version 0.33; +#X text 87 150 Opt@web.fm has made compatible objects for Max so that +Pd and Max can intercommunicate: see ftp://fals.ch/pub/pdnets/.; +#X text 87 186 The Linux version of Pd comes with "pdsend" and "pdreceive" +standalone programs. These haven't been tested in Windows yet (but +the source is included in the Pd distribution.); +#X msg 15 290 connect molloy 3000; +#X msg 268 290 connect molloy 3001; +#X msg 15 317 connect bug 3000; +#X msg 268 317 connect bug 3000; +#X connect 0 0 10 0; +#X connect 1 0 0 0; +#X connect 2 0 0 0; +#X connect 3 0 2 0; +#X connect 4 0 0 0; +#X connect 5 0 8 0; +#X connect 6 0 5 0; +#X connect 7 0 8 0; +#X connect 8 0 11 0; +#X connect 9 0 8 0; +#X connect 26 0 0 0; +#X connect 27 0 8 0; +#X connect 28 0 0 0; +#X connect 29 0 8 0; diff --git a/pd/doc/5.reference/noise~.pd b/pd/doc/5.reference/noise~.pd new file mode 100644 index 00000000..cafc15c3 --- /dev/null +++ b/pd/doc/5.reference/noise~.pd @@ -0,0 +1,18 @@ +#N canvas 174 90 458 270 12; +#X floatatom 77 178 4 0 0; +#X obj 77 111 noise~; +#X obj 167 149 print~; +#X msg 167 123 bang; +#X obj 282 89 loadbang; +#X msg 282 114 \; pd dsp 1; +#X obj 77 150 env~ 4096; +#X text 67 204 RMS in dB; +#X text 171 242 updated for Pd version 0.33; +#X obj 20 11 noise~; +#X text 84 11 - uniformly distributed white noise; +#X text 38 49 the output range is -1 to 1...; +#X connect 1 0 2 0; +#X connect 1 0 6 0; +#X connect 3 0 2 0; +#X connect 4 0 5 0; +#X connect 6 0 0 0; diff --git a/pd/doc/5.reference/numbox2.pd b/pd/doc/5.reference/numbox2.pd new file mode 100644 index 00000000..a26db250 --- /dev/null +++ b/pd/doc/5.reference/numbox2.pd @@ -0,0 +1,302 @@ +#N canvas 290 235 617 416 10; +#X obj 1 1 cnv 8 100 60 empty empty numbox=nbx 20 20 1 18 -262144 -1109 +0; +#X floatatom 38 300 9 0 0; +#X msg 47 84 set \$1; +#X floatatom 38 43 7 0 0; +#X text 25 363 (c) musil@iem.kug.ac.at; +#X text 67 376 IEM KUG; +#X obj 38 324 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X obj 18 47 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X floatatom 47 63 7 0 0; +#X floatatom 116 324 9 0 0; +#X floatatom 106 42 7 0 0; +#X floatatom 183 113 7 0 0; +#X obj 111 249 ftom; +#X floatatom 111 271 9 0 0; +#X floatatom 147 244 9 0 0; +#X floatatom 221 266 9 0 0; +#X text 217 151 click properties to; +#X floatatom 111 112 9 0 0; +#X obj 111 134 mtof; +#X text 202 65 (0.01 pixels); +#X text 57 99 ------------------------------------------; +#X text 57 286 --------------------------------------------; +#X text 205 162 modify geometry \, colors \, etc.; +#X msg 106 63 set \$1; +#X text 188 44 shift-click & drag; +#X text 194 54 for fine-tuning; +#X text 195 203 UP- \, DOWN- \, LEFT- or RIGHT-key; +#X text 193 214 for moving selected gui-objects; +#N canvas 239 379 699 530 edit 0; +#X obj 37 233 f; +#X msg 15 212 bang; +#X floatatom 53 211 3 6 88; +#X floatatom 88 233 3 -20 37; +#X obj 37 256 pack 0 0; +#X text 115 233 y-label; +#X text 81 211 x-label; +#X obj 287 271 f; +#X msg 265 250 bang; +#X floatatom 303 249 3 -10 10; +#X floatatom 338 271 3 -10 10; +#X obj 287 294 pack 0 0; +#X obj 299 381 f; +#X msg 277 360 bang; +#X floatatom 315 359 3 20 90; +#X floatatom 350 381 3 150 200; +#X obj 299 404 pack 0 0; +#X text 331 249 x-delta; +#X text 365 271 y-delta; +#X text 343 359 x-position; +#X text 377 381 y-position; +#X obj 57 348 f; +#X msg 35 327 bang; +#X floatatom 73 326 3 0 2; +#X floatatom 108 348 3 4 36; +#X obj 57 371 pack 0 0; +#X text 101 326 font; +#X text 137 348 height; +#X floatatom 476 188 1 0 1; +#X text 523 401 no init; +#X text 493 453 init value on loadbang; +#X text 520 188 steady; +#X obj 486 291 f; +#X msg 464 270 bang; +#X floatatom 502 269 4 55 440; +#X floatatom 537 291 6 440 3520; +#X obj 486 314 pack 0 0; +#X text 269 469 linear / logarithmical; +#X msg 47 158 \; goo4_rcv color \$1 \$2 \$3; +#X msg 37 281 \; goo4_rcv label_pos \$1 \$2; +#X msg 57 396 \; goo4_rcv label_font \$1 \$2; +#X msg 40 442 \; goo4_rcv label blabla; +#X msg 269 487 \; goo4_rcv lin; +#X msg 363 486 \; goo4_rcv log; +#X msg 299 429 \; goo4_rcv pos \$1 \$2; +#X msg 287 319 \; goo4_rcv delta \$1 \$2; +#X msg 475 21 \; goo4_rcv send goo4a_snd; +#X msg 475 59 \; goo4_rcv send goo4_snd; +#X msg 476 105 \; goo4_rcv receive goo4a_rcv; +#X msg 476 143 \; goo4a_rcv receive goo4_rcv; +#X msg 486 339 \; goo4_rcv range \$1 \$2; +#X msg 502 420 \; goo4_rcv init 0; +#X msg 503 471 \; goo4_rcv init 1; +#X text 539 270 bottom-range-bound; +#X text 586 292 top-range-bound; +#X obj 286 160 f; +#X msg 264 139 bang; +#X floatatom 302 138 3 4 55; +#X floatatom 337 160 3 15 73; +#X obj 286 183 pack 0 0; +#X msg 286 208 \; goo4_rcv size \$1 \$2; +#X text 330 138 width; +#X text 368 161 height; +#X msg 41 478 \; goo4_rcv label log.freq.; +#X msg 476 212 \; goo4_rcv steady \$1; +#X obj 47 116 pack 0 0 0; +#X obj 47 88 f; +#X msg 24 40 bang; +#X floatatom 63 38 3 0 29; +#X floatatom 79 58 3 0 29; +#X floatatom 112 74 3 0 29; +#X text 91 38 background; +#X text 106 58 front-color; +#X text 140 75 label-color; +#X msg 285 37 back; +#X msg 285 57 front; +#X msg 285 77 label; +#X msg 247 37 bang; +#N canvas 15 207 606 448 RGB_____________ 0; +#X obj 97 56 inlet; +#X obj 262 53 inlet; +#X obj 339 55 inlet; +#X obj 405 56 inlet; +#X obj 97 270 bang; +#X msg 77 295 0; +#X msg 104 295 1; +#X obj 146 268 bang; +#X msg 132 295 0; +#X msg 160 295 1; +#X obj 196 269 bang; +#X msg 187 295 0; +#X msg 214 295 1; +#X obj 265 313 spigot; +#X obj 312 313 spigot; +#X obj 359 313 spigot; +#X obj 249 385 outlet; +#X text 93 33 select; +#X text 267 28 red; +#X text 337 30 green; +#X text 409 30 blue; +#X obj 405 102 t b f; +#X obj 339 160 +; +#X obj 339 185 t b f; +#X obj 339 216 +; +#X obj 296 385 outlet; +#X obj 343 385 outlet; +#X obj 28 180 loadbang; +#X obj 97 135 route back front label bang; +#X obj 343 362 f; +#X obj 296 361 f; +#X obj 249 361 f; +#X obj 262 79 * -65536; +#X obj 339 80 * -256; +#X obj 405 80 * -1; +#X obj 339 247 - 1; +#X obj 235 168 t b b b b; +#X connect 0 0 28 0; +#X connect 1 0 32 0; +#X connect 2 0 33 0; +#X connect 3 0 34 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 14 1; +#X connect 5 0 15 1; +#X connect 6 0 13 1; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 13 1; +#X connect 8 0 15 1; +#X connect 9 0 14 1; +#X connect 10 0 11 0; +#X connect 10 0 12 0; +#X connect 11 0 13 1; +#X connect 11 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 31 1; +#X connect 14 0 30 1; +#X connect 15 0 29 1; +#X connect 21 0 22 0; +#X connect 21 1 22 1; +#X connect 22 0 23 0; +#X connect 23 0 24 0; +#X connect 23 1 24 1; +#X connect 24 0 35 0; +#X connect 27 0 6 0; +#X connect 28 0 4 0; +#X connect 28 1 7 0; +#X connect 28 2 10 0; +#X connect 28 3 36 0; +#X connect 29 0 26 0; +#X connect 30 0 25 0; +#X connect 31 0 16 0; +#X connect 32 0 24 0; +#X connect 33 0 22 0; +#X connect 34 0 21 0; +#X connect 35 0 15 0; +#X connect 35 0 14 0; +#X connect 35 0 13 0; +#X connect 36 0 31 0; +#X connect 36 1 30 0; +#X connect 36 2 29 0; +#X connect 36 3 35 0; +#X restore 285 98 pd RGB_____________; +#X floatatom 327 67 3 0 255; +#X floatatom 370 67 3 0 255; +#X floatatom 413 68 3 0 255; +#X text 34 12 preset-colors; +#X text 296 9 RGB-colors; +#X text 327 49 red; +#X text 363 48 green; +#X text 411 48 blue; +#X connect 0 0 4 0; +#X connect 1 0 0 0; +#X connect 2 0 0 1; +#X connect 3 0 4 1; +#X connect 4 0 39 0; +#X connect 7 0 11 0; +#X connect 8 0 7 0; +#X connect 9 0 7 1; +#X connect 10 0 11 1; +#X connect 11 0 45 0; +#X connect 12 0 16 0; +#X connect 13 0 12 0; +#X connect 14 0 12 1; +#X connect 15 0 16 1; +#X connect 16 0 44 0; +#X connect 21 0 25 0; +#X connect 22 0 21 0; +#X connect 23 0 21 1; +#X connect 24 0 25 1; +#X connect 25 0 40 0; +#X connect 28 0 64 0; +#X connect 32 0 36 0; +#X connect 33 0 32 0; +#X connect 34 0 32 1; +#X connect 35 0 36 1; +#X connect 36 0 50 0; +#X connect 55 0 59 0; +#X connect 56 0 55 0; +#X connect 57 0 55 1; +#X connect 58 0 59 1; +#X connect 59 0 60 0; +#X connect 65 0 38 0; +#X connect 66 0 65 0; +#X connect 67 0 66 0; +#X connect 68 0 66 1; +#X connect 69 0 65 1; +#X connect 70 0 65 2; +#X connect 74 0 78 0; +#X connect 75 0 78 0; +#X connect 76 0 78 0; +#X connect 77 0 78 0; +#X connect 78 0 65 0; +#X connect 78 1 65 1; +#X connect 78 2 65 2; +#X connect 79 0 78 1; +#X connect 80 0 78 2; +#X connect 81 0 78 3; +#X restore 327 48 pd edit; +#X obj 61 345 print; +#N canvas 276 200 290 224 once 0; +#X obj 38 47 t b b f; +#X msg 56 85 1; +#X obj 31 108 f 0; +#X obj 31 131 pack 0 0; +#X obj 31 156 route 0; +#X obj 38 24 inlet; +#X obj 31 180 outlet; +#X connect 0 0 1 0; +#X connect 0 1 2 0; +#X connect 0 2 3 1; +#X connect 1 0 2 1; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 4 0 6 0; +#X connect 5 0 0 0; +#X restore 61 322 pd once; +#X obj 249 87 x_all_guis aaa bbb ccc ddd eee fff ggg hhh iii; +#X text 218 387 updated for Pd version 0.35; +#X text 42 388 graz \, austria 2002; +#X text 192 13 gui-number-box:; +#X obj 106 84 s foo13_rcv; +#X obj 183 133 s goo14_rcv; +#X obj 221 244 r goo14_snd; +#X obj 116 302 r foo13_snd; +#X obj 47 172 nbx 4 15 100 300 0 0 foo13_snd foo13_rcv empty 45 7 192 +10 -225280 -1109 -1 100 256; +#X obj 111 200 nbx 5 18 55 3520 1 0 goo14_snd goo14_rcv log.freq. 45 +-10 192 14 -261681 -260818 -90881 55 72; +#X obj 464 114 nbx 5 14 -1e+37 1e+37 0 0 hhh hhh empty 45 7 192 10 +-262144 -1 -1 0 256; +#X connect 1 0 6 0; +#X connect 2 0 39 0; +#X connect 3 0 39 0; +#X connect 7 0 39 0; +#X connect 8 0 2 0; +#X connect 10 0 23 0; +#X connect 11 0 36 0; +#X connect 12 0 13 0; +#X connect 17 0 18 0; +#X connect 18 0 40 0; +#X connect 23 0 35 0; +#X connect 30 0 29 0; +#X connect 37 0 15 0; +#X connect 38 0 9 0; +#X connect 39 0 30 0; +#X connect 39 0 1 0; +#X connect 40 0 12 0; +#X connect 40 0 14 0; diff --git a/pd/doc/5.reference/openpanel.pd b/pd/doc/5.reference/openpanel.pd new file mode 100644 index 00000000..15e5d244 --- /dev/null +++ b/pd/doc/5.reference/openpanel.pd @@ -0,0 +1,11 @@ +#N canvas 35 31 585 245 12; +#X obj 128 136 openpanel; +#X msg 128 108 bang; +#X obj 128 161 print; +#X text 31 11 openpanel -- query you for a filename; +#X text 48 218 see also:; +#X obj 136 219 savepanel; +#X text 272 223 updated for Pd version 0.33; +#X text 33 59 When Openpanel gets a "bang" an "Open file" browser appears on the screen. If you select a file \, its name appears on the outlet.; +#X connect 0 0 2 0; +#X connect 1 0 0 0; diff --git a/pd/doc/5.reference/operators.pd b/pd/doc/5.reference/operators.pd new file mode 100644 index 00000000..64b47e4d --- /dev/null +++ b/pd/doc/5.reference/operators.pd @@ -0,0 +1,31 @@ +#N canvas 52 109 635 355 12; +#X obj 29 172 +; +#X floatatom 41 113 0 0 0; +#X floatatom 29 197 0 0 0; +#X floatatom 51 143 0 0 0; +#X msg 29 82 bang; +#X obj 44 6 +; +#X text 27 307 see also:; +#X obj 186 314 +~; +#X text 79 5 (etc.) -- ARITHMETIC; +#X text 72 88 Bang outputs sum; +#X text 79 112 Numbers in left inlet add and output sum; +#X text 93 142 Numbers in right inlet only change the inlet's value; +#X obj 113 314 trigger; +#X text 348 325 last updated for version 0.33; +#X text 93 189 You can supply a creation argument to initialize the right inlet:; +#X text 29 29 The floating point binary operators are + \, - \, * \, / \, pow \, max \, and min. Note that pow only works for nonnegative mantissas.; +#X floatatom 101 225 0 0 0; +#X floatatom 101 275 0 0 0; +#X obj 101 250 pow -1; +#X floatatom 179 225 0 0 0; +#X floatatom 179 275 0 0 0; +#X obj 179 250 min 20; +#X connect 0 0 2 0; +#X connect 1 0 0 0; +#X connect 3 0 0 1; +#X connect 4 0 0 0; +#X connect 16 0 18 0; +#X connect 18 0 17 0; +#X connect 19 0 21 0; +#X connect 21 0 20 0; diff --git a/pd/doc/5.reference/osc~.pd b/pd/doc/5.reference/osc~.pd new file mode 100644 index 00000000..2bd5f0df --- /dev/null +++ b/pd/doc/5.reference/osc~.pd @@ -0,0 +1,58 @@ +#N canvas 85 32 811 508 12; +#X obj 252 320 dac~ 1; +#X obj 252 292 *~; +#X floatatom 156 115 0 0 0; +#X obj 276 264 line~; +#X msg 276 208 0.1 100; +#X msg 295 233 0 100; +#X text 347 203 on; +#X text 344 232 off; +#X text 333 261 envelope; +#X text 333 274 generator; +#X text 260 183 amplitude controls:; +#X text 250 344 audio output; +#X text 424 426 see also:; +#X obj 580 428 cos~; +#X obj 629 428 tabread4~; +#X obj 68 14 osc~; +#X text 142 16 - cosine wave oscillator; +#X obj 126 294 metro 500; +#X obj 126 269 r metro; +#X text 88 344 graph the output; +#X obj 510 427 phasor~; +#X msg 571 79 \; metro 0; +#X msg 570 20 \; pd dsp 1 \; metro 1; +#X floatatom 637 245 0 0 0; +#X obj 637 275 sig~; +#X text 522 266 convert to; +#X text 512 282 audio signal; +#X text 518 305 oscillator; +#X text 479 243 frequency control; +#X obj 637 306 osc~; +#X text 3 120 change frequency; +#X text 244 145 <-- creation argument sets initial frequency; +#X text 231 123 v-- inlet resets phase; +#X graph graph1 0 -1 100 1 94 388 294 488; +#X array array99 100 float; +#X pop; +#X text 16 39 The osc~ object outputs a cosine wave. If no argument is supplied \, the input is taken to be an audio signal. With a floating-point argument \, osc~ takes floating-point messages to change frequency.; +#X text 510 336 invoked without argument to; +#X text 512 360 specify audio signal input; +#X text 2 105 incoming numbers; +#X obj 89 322 tabwrite~ array99; +#X obj 156 144 osc~ 1000; +#X text 546 480 updated for Pd version 0.33; +#X text 655 39 <-Click to start; +#X text 648 88 <-Click to stop; +#X connect 1 0 0 0; +#X connect 2 0 39 0; +#X connect 3 0 1 1; +#X connect 4 0 3 0; +#X connect 5 0 3 0; +#X connect 17 0 38 0; +#X connect 18 0 17 0; +#X connect 18 0 17 0; +#X connect 23 0 24 0; +#X connect 24 0 29 0; +#X connect 39 0 1 0; +#X connect 39 0 38 0; diff --git a/pd/doc/5.reference/otherbinops.pd b/pd/doc/5.reference/otherbinops.pd new file mode 100644 index 00000000..3f310818 --- /dev/null +++ b/pd/doc/5.reference/otherbinops.pd @@ -0,0 +1,90 @@ +#N canvas 20 43 698 447 12; +#X floatatom 524 338 0 0 0; +#X floatatom 353 338 0 0 0; +#X floatatom 298 338 0 0 0; +#X floatatom 413 338 0 0 0; +#X floatatom 467 338 0 0 0; +#X obj 524 311 <; +#X obj 298 262 r left; +#X obj 540 267 r right; +#X floatatom 71 335 0 0 0; +#X floatatom 19 334 0 0 0; +#X floatatom 119 335 0 0 0; +#X floatatom 163 334 0 0 0; +#X obj 16 45 &; +#X obj 66 45 |; +#X obj 118 45 &&; +#X obj 169 45 ||; +#X obj 19 307 &; +#X obj 71 308 |; +#X obj 119 308 &&; +#X obj 163 307 ||; +#X text 13 73 The Logical Operators; +#X obj 19 266 r left; +#X obj 218 266 r right; +#X obj 12 118 >; +#X obj 61 118 >=; +#X obj 114 118 ==; +#X obj 215 119 <=; +#X obj 262 119 <; +#X text 11 153 The Relational Operators; +#X obj 298 312 >; +#X obj 353 312 >=; +#X obj 413 312 ==; +#X obj 467 312 <=; +#X text 16 190 relational output is logical- and negative numbers BAD +in bitwise logical operators. These operators as defined by C programming +language. (inputs and outputs are converted to and from floating point). +; +#X floatatom 410 65 0 0 0; +#X obj 410 92 s left; +#X floatatom 481 66 0 0 0; +#X obj 481 94 t b f; +#X obj 481 122 s left; +#X obj 541 122 s right; +#X obj 166 118 !=; +#X text 377 42 set left and right inputs here; +#X floatatom 202 335 0 0 0; +#X floatatom 246 334 0 0 0; +#X obj 208 46 <<; +#X obj 259 46 >>; +#X obj 202 308 <<; +#X obj 246 307 >>; +#X text 421 383 last updated for version 0.32; +#X connect 5 0 0 0; +#X connect 6 0 29 0; +#X connect 6 0 30 0; +#X connect 6 0 31 0; +#X connect 6 0 32 0; +#X connect 6 0 5 0; +#X connect 7 0 29 1; +#X connect 7 0 30 1; +#X connect 7 0 31 1; +#X connect 7 0 32 1; +#X connect 7 0 5 1; +#X connect 16 0 9 0; +#X connect 17 0 8 0; +#X connect 18 0 10 0; +#X connect 19 0 11 0; +#X connect 21 0 16 0; +#X connect 21 0 17 0; +#X connect 21 0 18 0; +#X connect 21 0 19 0; +#X connect 21 0 46 0; +#X connect 21 0 47 0; +#X connect 22 0 19 1; +#X connect 22 0 18 1; +#X connect 22 0 17 1; +#X connect 22 0 16 1; +#X connect 22 0 47 1; +#X connect 22 0 46 1; +#X connect 29 0 2 0; +#X connect 30 0 1 0; +#X connect 31 0 3 0; +#X connect 32 0 4 0; +#X connect 34 0 35 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 37 1 39 0; +#X connect 46 0 42 0; +#X connect 47 0 43 0; diff --git a/pd/doc/5.reference/pack.pd b/pd/doc/5.reference/pack.pd new file mode 100644 index 00000000..c979d480 --- /dev/null +++ b/pd/doc/5.reference/pack.pd @@ -0,0 +1,37 @@ +#N canvas 14 8 809 354 12; +#X floatatom 19 86 0 0 0; +#X msg 29 115 bang; +#X floatatom 49 138 0 0 0; +#X floatatom 188 138 0 0 0; +#X obj 19 254 print; +#X msg 86 138 symbol cat; +#X obj 82 9 pack; +#X text 28 319 See also; +#X obj 106 321 unpack; +#X text 14 34 The pack object takes a series of inputs and outputs +a concatenated list. The number of creation arguments determines the +number of inlets.; +#X text 60 85 <-- number in first inlet generates output; +#X text 70 114 <-- bang generates output without resetting first value +; +#X text 226 135 <-- numbers and symbols in the corresponding inlets +change the values without causing output (see "trigger" for a way to +change this behavior.); +#X text 250 187 <-- as with any Pd object \, you can send a list whose +atoms are automatically distributed to the corresponding inlets.; +#X msg 175 190 1 2 dog; +#X obj 167 321 trigger; +#X obj 19 227 pack 100 0 s 0; +#X text 121 9 - combine several atoms into one message; +#X text 155 226 <-- creation arguments specify the number of inlets +and their types: a number make a numeric outlet (and initializes the +value). A symbol argument can start with "s" \, "f" \, or "p" to specify +a "symbol" \, "float" (number) \, or pointer outlet.; +#X text 538 331 updated for Pd version 0.34; +#X connect 0 0 16 0; +#X connect 1 0 16 0; +#X connect 2 0 16 1; +#X connect 3 0 16 3; +#X connect 5 0 16 2; +#X connect 14 0 16 0; +#X connect 16 0 4 0; diff --git a/pd/doc/5.reference/pd.pd b/pd/doc/5.reference/pd.pd new file mode 100644 index 00000000..f7db8f66 --- /dev/null +++ b/pd/doc/5.reference/pd.pd @@ -0,0 +1,52 @@ +#N canvas 32 130 677 385 12; +#N canvas 0 0 600 400 /SUBPATCH/ 0; +#X restore 59 10 pd; +#X text 88 12 - subpatch; +#X obj 218 10 inlet; +#X text 263 10 - control inlet; +#X obj 442 11 inlet~; +#X text 494 12 - audio inlet; +#X obj 215 39 outlet; +#X text 265 39 - control outlet; +#X obj 435 40 outlet~; +#X text 494 40 - audio outlet; +#X text 37 74 Type "pd" into an object box to make a subpatch. When +in run mode you can click on the object to open the subpatch. You can +name the subpatch with an argument:; +#N canvas 0 0 600 396 my-subpatch 0; +#X restore 133 131 pd my-subpatch; +#N canvas 0 0 600 392 my-subpatch-with-inlets-and-outlets 0; +#X obj 68 126 inlet; +#X text 20 96 control inlet for receiving messages; +#X floatatom 68 154 0 0 0; +#X floatatom 71 255 0 0 0; +#X obj 71 287 outlet; +#X text 35 225 control outlet for sending message; +#X obj 403 121 inlet~; +#X obj 403 172 print~; +#X msg 418 146 bang; +#X obj 402 314 outlet~; +#X obj 402 288 sig~ 34; +#X connect 0 0 2 0; +#X connect 3 0 4 0; +#X connect 6 0 7 0; +#X connect 8 0 7 0; +#X connect 10 0 9 0; +#X restore 86 272 pd my-subpatch-with-inlets-and-outlets; +#X text 55 174 and you can put inlets and outlets by making "inlet" +objects \, etc \, in the subpatch (open the patch below to see them.) +; +#X obj 423 322 print~; +#X msg 362 294 bang; +#X obj 422 243 sig~ 12; +#X floatatom 86 246 0 0 0; +#X floatatom 86 298 0 0 0; +#X text 441 272 (check that audio is on); +#X text 52 221 messages in and out; +#X text 392 220 audio in and out; +#X text 391 351 updated for Pd version 0.26; +#X connect 12 0 18 0; +#X connect 12 1 14 0; +#X connect 15 0 14 0; +#X connect 16 0 12 1; +#X connect 17 0 12 0; diff --git a/pd/doc/5.reference/phasor~.pd b/pd/doc/5.reference/phasor~.pd new file mode 100644 index 00000000..2da01cf9 --- /dev/null +++ b/pd/doc/5.reference/phasor~.pd @@ -0,0 +1,36 @@ +#N canvas 5 31 889 373 12; +#X graph graph1 0 1 100 -1 67 250 267 350; +#X array array99 100 float; +#X pop; +#X obj 29 181 metro 500; +#X obj 13 126 phasor~; +#X floatatom 13 76 0 0 0; +#X obj 57 12 phasor~; +#X obj 29 156 r metro; +#X obj 13 100 sig~ 890; +#X text 78 75 <-- specify frequency; +#X text 92 98 <-- convert it to audio signal; +#X msg 409 75 \; metro 0; +#X msg 405 18 \; pd dsp 1 \; metro 1; +#X text 494 32 <-- Click to start; +#X text 479 79 <-- Click to stop; +#X text 129 14 - sawtooth generator; +#X text 170 207 <-- graph the output; +#X text 82 128 <-- right inlet resets phase; +#X obj 425 227 phasor~ 440; +#X floatatom 425 203 0 0 0; +#X text 348 118 The phasor~ object outputs a sawtooth signal \, traditionally used for table lookup via cos~ or tabread4~. If no argument is supplied \, the input is taken to be an audio signal \; with a floating-point argument \, phasor~ takes floating-point messages to change frequency.; +#X text 294 246 Invoked above with argument for non-signal input. Incoming messages override the initial value.; +#X text 311 301 see also:; +#X obj 396 301 osc~; +#X obj 439 301 cos~; +#X obj 481 301 tabread4~; +#X text 627 345 updated for Pd version 0.33; +#X obj 13 205 tabwrite~ array99; +#X connect 1 0 25 0; +#X connect 2 0 25 0; +#X connect 3 0 6 0; +#X connect 5 0 1 0; +#X connect 5 0 1 0; +#X connect 6 0 2 0; +#X connect 17 0 16 0; diff --git a/pd/doc/5.reference/pipe.pd b/pd/doc/5.reference/pipe.pd new file mode 100644 index 00000000..272057ed --- /dev/null +++ b/pd/doc/5.reference/pipe.pd @@ -0,0 +1,41 @@ +#N canvas 99 89 737 480 12; +#X floatatom 52 127 0 0 0; +#X floatatom 127 227 0 0 0; +#X floatatom 52 284 0 0 0; +#X floatatom 544 281 0 0 0; +#X floatatom 535 392 0 0 0; +#X obj 534 364 pipe 5 6 7 1000; +#X obj 543 307 t f f f; +#X obj 563 338 + 1; +#X obj 597 337 + 2; +#X floatatom 590 390 0 0 0; +#X floatatom 658 391 0 0 0; +#X text 32 433 see also:; +#X text 129 13 pipe -- message "delay line"; +#X obj 52 253 pipe 2000; +#X text 91 125 numbers to store and output later; +#X text 117 148 output all stored messages immediately; +#X msg 63 152 flush; +#X msg 65 180 clear; +#X text 113 180 forget all stored messages; +#X text 91 286 delayed output; +#X obj 116 435 delay; +#X obj 167 435 timer; +#X text 51 42 The Pipe object stores a sequence of messages and outputs them after a specified delay time in miliseconds. You can change the delay time as you wish. The outputs are sorted automatically.; +#X text 140 254 creation argument initializes delay time; +#X text 163 228 set delay time; +#X text 487 449 updated for Pd version 0.33; +#X text 21 330 You can specify compound messages (lists) by adding arguments which set their type and initial value as in "pack." In this case the delay time comes last and is changed by the last inlet. You can also pack symbols and pointers but this feature is UNTESTED.; +#X connect 0 0 13 0; +#X connect 1 0 13 1; +#X connect 3 0 6 0; +#X connect 5 0 4 0; +#X connect 5 1 9 0; +#X connect 5 2 10 0; +#X connect 6 0 5 0; +#X connect 6 1 7 0; +#X connect 6 2 8 0; +#X connect 7 0 5 1; +#X connect 8 0 5 2; +#X connect 13 0 2 0; +#X connect 16 0 13 0; diff --git a/pd/doc/5.reference/plot.pd b/pd/doc/5.reference/plot.pd new file mode 100644 index 00000000..d25eaa15 --- /dev/null +++ b/pd/doc/5.reference/plot.pd @@ -0,0 +1,58 @@ +#N struct help-plot-template float x float y array array1 help-plot-array1-template +array array2 help-plot-array2-template array array3 help-plot-array3-template +; +#N struct help-plot-array1-template float y; +#N struct help-plot-array2-template float x float y; +#N struct help-plot-array3-template float y float w; +#N canvas 398 0 516 229 12; +#N canvas 89 309 626 539 help-plot-template 1; +#X text 29 34 creation arguments:; +#X text 48 71 - RGB color (0=black \, 999=white \, 900=red \, 90=green +\, 9=blue \, 555=grey \, etc.); +#X obj 24 387 template float x float y array array1 help-plot-array1-template +array array2 help-plot-array2-template array array3 help-plot-array3-template +; +#X text 47 52 - OPTIONAL word "curve" to specify bezier; +#X text 46 98 - line width; +#X text 46 114 - relative x and y location; +#X text 47 130 - x spacing; +#X obj 39 217 plot curve array2 70 3 100 0; +#X obj 30 308 plot curve array3 9 1 120 50 20; +#X obj 45 12 plot array1 500 1 10 15 20; +#X text 29 147 This first example plots the red trace (500) \, width +1 \, at point (10 \, 15) \, with horizontal spacing 20 The black diamonds +come from the template of the array1 element itself.; +#X text 62 239 This is the green spiral (color 70 \, line width 3 \, +location (100 \, 0). Since the template for array2 contains an "x" +cariable \, play ignores x spacing requests and takes x from the data +itself.; +#X text 50 328 If a "w" variable is present in the template as for +array3 \, it is added to the line width.; +#X text 33 366 here's the template for all this:; +#X obj 27 501 filledpolygon 509 509 0 -10 -10 10 -10 10 10 -10 10; +#X text 27 454 To see the data itself \, select "properties" for the +scalar by right clicking on the purple square.; +#X restore 243 78 pd help-plot-template; +#N canvas 196 292 273 120 help-plot-array1-template 0; +#X obj 30 71 filledpolygon 0 0 0 -5 0 0 5 5 0 0 -5; +#X obj 32 27 template float y; +#X restore 242 101 pd help-plot-array1-template; +#N canvas 161 163 273 120 help-plot-array2-template 0; +#X obj 32 26 template float x float y; +#X restore 243 123 pd help-plot-array2-template; +#N canvas 0 0 411 207 help-plot-data 1; +#X scalar help-plot-template 39 73 \; 0 \; 20 \; 0 \; 30 \; 0 \; \; +0 0 \; 0 10 \; 20 0 \; 0 -30 \; -40 0 \; 0 50 \; 60 0 \; \; 0 0 \; +10 10 \; 0 10 \; 0 1 \; 20 1 \; 20 10 \; 20 1 \; \;; +#X restore 242 57 pd help-plot-data; +#X text 23 139 see also:; +#X obj 30 184 drawnumber; +#X obj 29 163 template; +#X obj 35 22 plot; +#X text 87 21 -- draw array elements of scalars; +#X obj 29 206 drawpolygon; +#N canvas 161 163 273 120 help-plot-array3-template 0; +#X obj 43 32 template float y float w; +#X restore 242 144 pd help-plot-array3-template; +#X text 8 79 explanation is in here-->; +#X text 264 203 updated for Pd version 0.35; diff --git a/pd/doc/5.reference/pointer.pd b/pd/doc/5.reference/pointer.pd new file mode 100644 index 00000000..96a22ff1 --- /dev/null +++ b/pd/doc/5.reference/pointer.pd @@ -0,0 +1,79 @@ +#N struct template2 float x float y; +#N struct template1 float x float y float z; +#N canvas 223 0 715 654 12; +#X text 20 572 see also:; +#X obj 21 10 pointer; +#X text 95 10 -- remember the location of a scalar in a list; +#N canvas 164 72 425 146 help-pointer-template1 0; +#X obj 18 81 filledpolygon z 0 1 0 0 20 0 20 30 0 30; +#X obj 60 21 struct template1 float x float y float z; +#X restore 327 386 pd help-pointer-template1; +#N canvas 26 456 510 145 help-pointer-template2 0; +#X obj 52 78 filledcurve 909 0 0 0 0 30 30 60 0 30 -30 0 0; +#X obj 60 21 struct template2 float x float y; +#X restore 327 409 pd help-pointer-template2; +#X obj 23 592 get; +#X obj 56 592 set; +#X obj 91 592 append; +#X obj 152 592 getsize; +#X obj 220 593 setsize; +#X obj 290 593 element; +#X obj 23 617 sublist; +#N canvas 0 0 312 185 help-pointer-data 1; +#X scalar template2 20 97 \;; +#X scalar template1 80 17 90 \;; +#X scalar template1 120 117 9 \;; +#X restore 327 364 pd help-pointer-data; +#X obj 54 360 pointer; +#X msg 54 231 traverse pd-help-pointer-data; +#X msg 67 255 bang; +#X text 109 256 outputs current value; +#X msg 69 281 next; +#X obj 54 385 print out1; +#X obj 167 371 print out2; +#X text 119 274 moves forward one item and outputs pointer \; if we +reach the end \, a "bang" goes to out2.; +#X text 16 426 Optional arguments to pointer allow you to select according +to the class of the scalar being output:; +#X msg 74 487 next; +#X msg 60 464 traverse pd-help-pointer-data; +#X obj 60 515 pointer help-pointer-template1 help-pointer-template2 +; +#X obj 60 541 print template1; +#X obj 198 541 print template2; +#X obj 338 541 print other; +#X obj 441 541 print bangout; +#X text 333 232 sets to the "head" of the list; +#X text 29 34 "Pointer" is a storage object like "float" \, except +that the thing stored is the location of a scalar somewhere. You can +send a pointer a value (perhaps from another "pointer" object). The +right inlet takes pointers and simply stores them. A bang in the left +outputs the pointer \, and a pointer in the left both sets and outputs +the value.; +#X text 29 132 The value of a pointer can either indicate a real scalar +\, or else the "head" (before the first element) of the list. This +allows you to point to an empty list \, and also \, to "append" a scalar +to the beginning of the list.; +#X text 29 191 Pointers are "safe": if you delete a scalar pointers +to it are marked invalid.; +#X text 166 391 bang at end; +#X text 167 407 of list; +#X text 53 405 output; +#X text 445 617 updated for Pd version 0.35; +#X obj 92 616 struct; +#X msg 71 307 vnext 1; +#X text 149 308 "vnext" gets the next object (if arg is 0) or the next +selected object (if arg is 1 -- but the window must be visible for +the "selection" to make sense).; +#X connect 13 0 18 0; +#X connect 13 1 19 0; +#X connect 14 0 13 0; +#X connect 15 0 13 0; +#X connect 17 0 13 0; +#X connect 22 0 24 0; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 24 1 26 0; +#X connect 24 2 27 0; +#X connect 24 3 28 0; +#X connect 38 0 13 0; diff --git a/pd/doc/5.reference/poly.pd b/pd/doc/5.reference/poly.pd new file mode 100644 index 00000000..0b34f99e --- /dev/null +++ b/pd/doc/5.reference/poly.pd @@ -0,0 +1,30 @@ +#N canvas 0 0 600 496 12; +#X text 155 228 <-- scroll to change the value of delay in milliseconds.; +#X text 406 383 updated for Pd version 0.25; +#X text 42 383 see also:; +#X obj 66 15 poly; +#X text 101 14 - MIDI-STYLE POLYPHONIC VOICE ALLOCATOR; +#X text 12 42 The poly object takes a stream of pitch/velocity pairs and outputs triples containing voice number \, pitch and velocity. You can pack the output and use the route object to route messages among a bank of voices depending on the first outlet. Poly can be configured to do voice stealing or not (the default.); +#X obj 110 384 route; +#X obj 154 384 makenote; +#X obj 52 254 poly 4 1; +#X text 134 253 <-- first argument \, number of voices \; second argument selects voice stealing; +#X msg 52 168 60 64; +#X msg 103 168 60 0; +#X msg 147 168 62 64; +#X msg 194 168 62 0; +#X obj 52 280 pack 0 0 0; +#X obj 52 306 print; +#X text 97 305 Output is in the printout window.; +#X msg 254 177 stop; +#X msg 296 177 clear; +#X connect 8 0 14 0; +#X connect 8 1 14 1; +#X connect 8 2 14 2; +#X connect 10 0 8 0; +#X connect 11 0 8 0; +#X connect 12 0 8 0; +#X connect 13 0 8 0; +#X connect 14 0 15 0; +#X connect 17 0 8 0; +#X connect 18 0 8 0; diff --git a/pd/doc/5.reference/print.pd b/pd/doc/5.reference/print.pd new file mode 100644 index 00000000..50af069a --- /dev/null +++ b/pd/doc/5.reference/print.pd @@ -0,0 +1,13 @@ +#N canvas 349 65 615 247 12; +#X msg 102 52 walk the dog; +#X msg 29 51 bang; +#X msg 70 51 234; +#X obj 29 96 print x1; +#X obj 21 10 print; +#X text 37 134 Print prints out the messages it receives on the "terminal +window" that Pd is run from.; +#X text 249 200 updated for Pd version 0.31.; +#X text 73 10 -- print messages to terminal window; +#X connect 0 0 3 0; +#X connect 1 0 3 0; +#X connect 2 0 3 0; diff --git a/pd/doc/5.reference/print~.pd b/pd/doc/5.reference/print~.pd new file mode 100644 index 00000000..b3a9c429 --- /dev/null +++ b/pd/doc/5.reference/print~.pd @@ -0,0 +1,18 @@ +#N canvas 118 333 531 212 10; +#X msg 74 143 2; +#X msg 455 77 \; pd dsp 0; +#X msg 454 40 \; pd dsp 1; +#X obj 62 177 print~; +#X msg 74 118 bang; +#X obj 62 92 phasor~ 1000; +#X text 122 119 bang prints one vector; +#X obj 454 18 loadbang; +#X text 109 142 print two or more successive vectors; +#X obj 32 12 print~; +#X text 85 12 - print out raw values of a signal; +#X text 301 171 Updated for Pd version 0.33; +#X text 19 44 The print~ object takes a signal input and prints one or more vectors out when you send it a bang or a number. By default a vector is 64 samples.; +#X connect 0 0 3 0; +#X connect 4 0 3 0; +#X connect 5 0 3 0; +#X connect 7 0 2 0; diff --git a/pd/doc/5.reference/qlist.pd b/pd/doc/5.reference/qlist.pd new file mode 100644 index 00000000..a5b2a574 --- /dev/null +++ b/pd/doc/5.reference/qlist.pd @@ -0,0 +1,76 @@ +#N canvas 7 31 1178 587 12; +#X obj 546 328 qlist; +#X msg 592 110 rewind; +#X msg 591 135 next; +#X floatatom 546 382 0 0 0; +#X msg 593 54 bang; +#X obj 441 515 r this; +#X obj 544 515 r that; +#X obj 441 544 print this; +#X obj 544 544 print that; +#X obj 560 356 print done; +#X msg 593 80 tempo 1; +#X text 18 51 The qlist object reads text files containing time-tagged +Pd messages. You can have them sequenced automatically (by sending +a "bang" message \, possibly changing speed via "tempo" messages) or +manually via the "rewind" and "next" messages.; +#X text 15 136 To run the qlist automatically \, send it a "read" message +(the filename is relative to the directory the patch is in) and later +a "bang." Messages in the file are separated by semicolons. Optional +leading numbers are delay times in milliseconds. If the tempo is diffrerent +from 1 the messages are sent faster or slower accordingly. Messages +should start with a symbol giving the destination object. In the file +"qlist.q" used here \, the messages go to objects "this" and "that" +which are receives below.; +#X text 17 281 To run it manually \, send "rewind" followed by "next". +All messages not preceeded by numbers are sent. As soon as a message +starting with one or more numbers is encountered \, the numbers are +output as a list. There are many ways you could design a sequencer +around this.; +#X text 668 48 sequence automatically; +#X text 670 79 set relative tempo; +#X text 668 105 go to beginning (and stop); +#X text 668 132 single-step forward; +#X text 713 273 read a file; +#X text 777 300 write one; +#X text 552 404 This outlet gets a list of leading numbers for the +next message \, for you to use in designing your own sequencer.; +#X msg 586 274 read qlist.txt; +#X msg 586 300 write /tmp/qlist.txt; +#X text 21 493 see also:; +#X obj 97 493 textfile; +#X text 22 362 You can also record textual messages and save them to +a file. Send "clear" to empty the qlist and "add" to add messages (terminated +with semicolons.) The message \, "add2" adds a list of atoms without +finishing with a semicolon in case you want to make variable-length +messages.; +#X msg 589 190 clear; +#X msg 589 216 add 500 this is another message; +#X msg 590 242 add2 that; +#X text 666 187 empty the qlist; +#X text 882 217 add a message to a qlist; +#X text 683 240 add a message to a qlist but don't terminate it; +#X text 653 341 This outlet gets a bang when you hit the end of the +sequence. In the file "qlist.txt" the end is delayed 1000 milliseconds +after the last message.; +#X text 379 470 These receives are invoked in the file "qlist.txt" +in this directory.; +#X obj 71 13 qlist; +#X text 132 15 - text-based sequencer; +#X text 668 158 single-step forward SUPRESSING MESSAGE-SENDING; +#X msg 591 161 next 1; +#X text 921 558 updated for Pd version 0.35; +#X connect 0 0 3 0; +#X connect 0 1 9 0; +#X connect 1 0 0 0; +#X connect 2 0 0 0; +#X connect 4 0 0 0; +#X connect 5 0 7 0; +#X connect 6 0 8 0; +#X connect 10 0 0 0; +#X connect 21 0 0 0; +#X connect 22 0 0 0; +#X connect 26 0 0 0; +#X connect 27 0 0 0; +#X connect 28 0 0 0; +#X connect 37 0 0 0; diff --git a/pd/doc/5.reference/qlist.txt b/pd/doc/5.reference/qlist.txt new file mode 100644 index 00000000..790a8945 --- /dev/null +++ b/pd/doc/5.reference/qlist.txt @@ -0,0 +1,3 @@ +this text file is read by qlist.pd; +1000 that should explain everything; +1000; diff --git a/pd/doc/5.reference/random.pd b/pd/doc/5.reference/random.pd new file mode 100644 index 00000000..b792325c --- /dev/null +++ b/pd/doc/5.reference/random.pd @@ -0,0 +1,19 @@ +#N canvas 0 0 630 421 12; +#X msg 40 212 bang; +#X obj 40 287 random 5; +#X floatatom 83 261 0 0 0; +#X floatatom 40 312 0 0 0; +#X msg 50 236 seed 123; +#X text 92 210 bang for output; +#X text 132 236 message to set the seed; +#X text 116 259 inlet to reset the range; +#X text 119 286 argument to initialize the range; +#X text 378 337 updated for Pd version 0.33; +#X text 11 46 Random outputs pseudorandom integers from 0 to N-1 where N is the creation argument (5 in the example below.) You can specify a seed if you wish. Seeds are kept locally so that if two Randoms are seeded the same they will have the same output (or indeed you can seed the same one twice to repeat the output.); +#X text 12 139 On the other hand \, if you don't supply a seed each instance of random gets its own seed. WARNING: nothing is known about the quality of teh pseudorandom number generator. It isn't any standard one!; +#X obj 20 11 random; +#X text 84 11 - pseudorandom integers; +#X connect 0 0 1 0; +#X connect 1 0 3 0; +#X connect 2 0 1 1; +#X connect 4 0 1 0; diff --git a/pd/doc/5.reference/readsf~.pd b/pd/doc/5.reference/readsf~.pd new file mode 100644 index 00000000..115f9db6 --- /dev/null +++ b/pd/doc/5.reference/readsf~.pd @@ -0,0 +1,48 @@ +#N canvas 38 26 630 390 10; +#X msg 458 10 \; pd dsp 1; +#X msg 47 186 1; +#X msg 47 205 0; +#X obj 403 305 print didit; +#X obj 126 305 env~ 16384; +#X floatatom 126 324; +#X msg 48 227 print; +#X obj 44 330 dac~; +#X obj 191 305 env~ 16384; +#X floatatom 191 324; +#X obj 38 252 readsf~ 4 1e+06; +#X obj 256 305 env~ 16384; +#X floatatom 256 324; +#X obj 323 306 env~ 16384; +#X floatatom 323 325; +#X msg 45 167 open ../sound/bell.aiff 0 200 4 2 b; +#X obj 82 306 *~ 0.1; +#X obj 40 306 *~ 0.1; +#X text 40 7 READSF~ - read a soundfile; +#X msg 45 146 open ../sound/bell.aiff; +#X text 146 240 optional arguments: number of channels \; buffer size per channnel in bytes.; +#X text 404 286 when the soundfile is done.; +#X text 403 272 last outlet gives a "bang"; +#X text 471 369 Updated for version 0.29; +#X text 271 146 Open takes a filename \, an onset in sample frames \, and \, as an override \, you may also supply a header size to skip \, a number of channels \, bytes per channel \, and endianness.; +#X text 36 93 The wave \, aiff \, and nextstep formats are parsed automatically \, although only 2- 3- and 4- byte samples are accepted (4 bytes implies floating point and is only available in the nextstep format.); +#X text 37 27 The readsf~ object reads a soundfile into its signal outputs. You must open the soundfile in advance (a couple of seconds before you'll need it) using the "open" message. The object immediately starts reading from the file \, but output will only appear after you send a "1" to start playback. A "0" stops it.; +#X connect 1 0 10 0; +#X connect 2 0 10 0; +#X connect 4 0 5 0; +#X connect 6 0 10 0; +#X connect 8 0 9 0; +#X connect 10 0 4 0; +#X connect 10 0 17 0; +#X connect 10 1 8 0; +#X connect 10 1 16 0; +#X connect 10 2 11 0; +#X connect 10 2 16 0; +#X connect 10 3 13 0; +#X connect 10 3 17 0; +#X connect 10 4 3 0; +#X connect 11 0 12 0; +#X connect 13 0 14 0; +#X connect 15 0 10 0; +#X connect 16 0 7 1; +#X connect 17 0 7 0; +#X connect 19 0 10 0; diff --git a/pd/doc/5.reference/realtime.pd b/pd/doc/5.reference/realtime.pd new file mode 100644 index 00000000..60fcffaa --- /dev/null +++ b/pd/doc/5.reference/realtime.pd @@ -0,0 +1,15 @@ +#N canvas 156 202 565 269 12; +#X msg 73 146 bang; +#X msg 30 115 bang; +#X floatatom 30 206 0 0 0; +#X text 71 113 Click here to reset; +#X text 27 232 Output is in milliseconds; +#X text 114 147 Click here to get elapsed CPU time; +#X obj 66 15 realtime; +#X text 12 47 The realtime object measures elapsed real time \, as measured by your operating system.; +#X obj 30 176 realtime; +#X text 134 15 - ask OS for elapsed real time; +#X text 302 244 updated for Pd version 0.33; +#X connect 0 0 8 1; +#X connect 1 0 8 0; +#X connect 8 0 2 0; diff --git a/pd/doc/5.reference/receive.pd b/pd/doc/5.reference/receive.pd new file mode 100644 index 00000000..17bb08cb --- /dev/null +++ b/pd/doc/5.reference/receive.pd @@ -0,0 +1,26 @@ +#N canvas 257 45 511 351 12; +#X text 278 321 updated for Pd version 0.32; +#X floatatom 36 55 5 0 0; +#X floatatom 152 58 5 0 0; +#X floatatom 272 57 5 0 0; +#X floatatom 38 134 5 0 0; +#X floatatom 171 136 5 0 0; +#X floatatom 305 134 5 0 0; +#X text 62 321 abbreviation:; +#X obj 36 80 send help-rcv1; +#X obj 152 81 send help-rcv1; +#X obj 271 81 send help-rcv2; +#X obj 38 110 receive help-rcv1; +#X obj 171 110 receive help-rcv2; +#X obj 305 110 receive help-rcv2; +#X text 31 161 "Receive" outputs messages sent via "send." Sends and receives are named to tell them whom to connect to. They work across windows too. Also \, you can use message boxes as shown:; +#X msg 84 233 \; help-rcv1 34 \; help-rcv2 67; +#X obj 161 320 r; +#X obj 21 10 receive; +#X text 79 10 -- receive messages without patch cords; +#X connect 1 0 8 0; +#X connect 2 0 9 0; +#X connect 3 0 10 0; +#X connect 11 0 4 0; +#X connect 12 0 5 0; +#X connect 13 0 6 0; diff --git a/pd/doc/5.reference/route.pd b/pd/doc/5.reference/route.pd new file mode 100644 index 00000000..224fb0ea --- /dev/null +++ b/pd/doc/5.reference/route.pd @@ -0,0 +1,80 @@ +#N canvas 0 0 815 537 12; +#X obj 183 213 print x1; +#X obj 261 213 print x2; +#X obj 339 213 print x3; +#X obj 422 213 print x4; +#X obj 183 185 route 23 54 1; +#X msg 183 155 234 345 456; +#X msg 308 155 23 34 45; +#X msg 414 155 54 43; +#X msg 485 155 1 foo bar; +#X msg 254 247 impeach ringo starr; +#X obj 191 275 route big apple; +#X msg 435 248 apple pie; +#X msg 191 247 1 2 3; +#X msg 523 248 big apple pie; +#X msg 578 155 walk the dog; +#X text 45 33 Route checks the first element of a message against each +of its arguments \, which may be numbers or symbols (but not a mixture +of the two.); +#X text 44 85 If a match is found \, the rest of the message appears +on the corresponding outlet. If no match \, the message is repeated +to the last "rejection" outlet. The number of outlets is the number +of arguments plus one.; +#X text 19 185 numeric arguments:; +#X text 17 275 symbolic arguments:; +#X obj 157 489 print z1; +#X obj 233 489 print z2; +#X msg 124 424 bang; +#X msg 170 424 list; +#X msg 213 424 5; +#X msg 251 424 float 5; +#X msg 320 424 list 5; +#X msg 385 424 symbol pie; +#X msg 560 424 pie; +#X msg 483 424 list pie; +#X msg 70 424 1 2 3; +#X obj 157 461 route list float symbol bang; +#X obj 310 489 print z3; +#X obj 387 489 print z4; +#X obj 461 489 print z5; +#X obj 191 305 print y1; +#X obj 269 305 print y2; +#X obj 347 305 print y3; +#X text 76 344 To avoid confusion between \, say \, the number 5 and +the list contining only the number 5 \, both messages match "float" +\, and ditto for symbols. An empty list matches "bang". In Pd these +are all considered special cases of lists.; +#X text 545 506 updated for Pd version 0.35; +#X text 97 9 - route messages according to their first element; +#X obj 43 8 route; +#X connect 4 0 0 0; +#X connect 4 1 1 0; +#X connect 4 2 2 0; +#X connect 4 3 3 0; +#X connect 5 0 4 0; +#X connect 6 0 4 0; +#X connect 7 0 4 0; +#X connect 8 0 4 0; +#X connect 9 0 10 0; +#X connect 10 0 34 0; +#X connect 10 1 35 0; +#X connect 10 2 36 0; +#X connect 11 0 10 0; +#X connect 12 0 10 0; +#X connect 13 0 10 0; +#X connect 14 0 4 0; +#X connect 21 0 30 0; +#X connect 22 0 30 0; +#X connect 23 0 30 0; +#X connect 24 0 30 0; +#X connect 25 0 30 0; +#X connect 26 0 30 0; +#X connect 27 0 30 0; +#X connect 28 0 30 0; +#X connect 29 0 30 0; +#X connect 30 0 19 0; +#X connect 30 1 20 0; +#X connect 30 2 31 0; +#X connect 30 3 32 0; +#X connect 30 4 33 0; diff --git a/pd/doc/5.reference/rsqrt~.pd b/pd/doc/5.reference/rsqrt~.pd new file mode 100644 index 00000000..fb0bc350 --- /dev/null +++ b/pd/doc/5.reference/rsqrt~.pd @@ -0,0 +1,32 @@ +#N canvas 183 264 685 375 12; +#X obj 68 211 metro 500; +#X obj 68 186 r metro; +#X msg 575 106 \; metro 0; +#X msg 574 48 \; pd dsp 1 \; metro 1; +#X floatatom 52 112 0 0 0; +#X floatatom 52 268 0 0 0; +#X text 419 349 updated for Pd version 0.33; +#X obj 574 21 loadbang; +#X obj 52 235 snapshot~; +#X floatatom 51 351 9 0 0; +#X obj 51 295 t f f; +#X obj 51 322 *; +#X obj 52 138 sig~; +#X obj 36 16 rsqrt~; +#X text 105 14 - signal reciprocal square root; +#X text 18 45 rsqrt~ takes the approximate reciprocal square root of +the incoming signal \, using a fast \, approximate algorithm which +is probably accurate to about 120 dB (20 bits).; +#X obj 52 162 rsqrt~; +#X connect 0 0 8 0; +#X connect 1 0 0 0; +#X connect 1 0 0 0; +#X connect 4 0 12 0; +#X connect 5 0 10 0; +#X connect 7 0 3 0; +#X connect 8 0 5 0; +#X connect 10 0 11 0; +#X connect 10 1 11 1; +#X connect 11 0 9 0; +#X connect 12 0 16 0; +#X connect 16 0 8 0; diff --git a/pd/doc/5.reference/samphold~.pd b/pd/doc/5.reference/samphold~.pd new file mode 100644 index 00000000..1a58bd02 --- /dev/null +++ b/pd/doc/5.reference/samphold~.pd @@ -0,0 +1,34 @@ +#N canvas 121 54 554 287 10; +#X obj 32 238 snapshot~; +#X floatatom 32 257; +#X obj 41 219 metro 100; +#X obj 41 197 r start; +#X msg 387 21 \; pd dsp 1 \; start bang; +#X text 392 270 updated for version 0.29; +#X text 454 30 Click to start; +#X text 447 78 Click to stop; +#X msg 388 65 \; pd dsp 0 \; start 0; +#X obj 19 7 samphold~; +#X text 96 6 - sample and hold unit; +#X obj 32 170 samphold~; +#X text 10 26 The samphold~ object samples its left input whenever its right input decreases in value (as a phasor~ does each period \, for example.) Both inputs are audio signals.; +#X obj 67 129 sig~; +#X obj 101 148 sig~; +#X floatatom 67 109; +#X floatatom 101 127; +#X msg 32 66 set 34; +#X msg 38 87 reset; +#X text 81 65 set output to a number; +#X text 81 86 force the next sample; +#X text 97 109 sample signal; +#X text 135 127 control signal; +#X connect 0 0 1 0; +#X connect 2 0 0 0; +#X connect 3 0 2 0; +#X connect 11 0 0 0; +#X connect 13 0 11 0; +#X connect 14 0 11 1; +#X connect 15 0 13 0; +#X connect 16 0 14 0; +#X connect 17 0 11 0; +#X connect 18 0 11 0; diff --git a/pd/doc/5.reference/savepanel.pd b/pd/doc/5.reference/savepanel.pd new file mode 100644 index 00000000..b5d7e7a6 --- /dev/null +++ b/pd/doc/5.reference/savepanel.pd @@ -0,0 +1,12 @@ +#N canvas 9 118 567 234 12; +#X msg 102 92 bang; +#X obj 102 145 print; +#X text 295 199 updated for Pd version 0.24; +#X text 28 192 see also:; +#X text 16 35 When Savepanel gets a "bang" a "Save As" file browser appears on the screen \, If you choose a filename \, it appears on the outlet.; +#X obj 102 120 savepanel; +#X obj 115 191 openpanel; +#X obj 19 7 savepanel; +#X text 104 6 - query you for the name of a file to create; +#X connect 0 0 5 0; +#X connect 5 0 1 0; diff --git a/pd/doc/5.reference/select.pd b/pd/doc/5.reference/select.pd new file mode 100644 index 00000000..6bc17ad7 --- /dev/null +++ b/pd/doc/5.reference/select.pd @@ -0,0 +1,73 @@ +#N canvas 47 29 618 662 12; +#X floatatom 22 332 0 0 0; +#X msg 156 120 6; +#X msg 119 120 234; +#X floatatom 119 150 0 0 0; +#X msg 121 301 1; +#X msg 89 301 54; +#X obj 22 392 print x1; +#X obj 100 391 print x2; +#X msg 58 301 23; +#X msg 22 302 234; +#X msg 65 120 6; +#X obj 28 180 select 6; +#X msg 28 120 234; +#X obj 28 210 print x1; +#X obj 107 211 print x2; +#X obj 177 391 print x3; +#X obj 255 392 print x4; +#X floatatom 28 150 0 0 0; +#X obj 22 362 select 23 54 1; +#X text 45 609 abbreviation:; +#X obj 169 610 sel; +#X text 20 37 In its simplest form shown below \, Select checks its input agains the constant "6". If they match \, the first outlet gives "bang" and otherwise the input is copied to the second outlet. If Select is used with a single argument \, a second inlet allows you to change the test value.; +#X text 22 239 You can give several arguments. You get an outlet for each test value and finally an outlet for values which match none of them. In this case you don't get inlets to change the test values:; +#X obj 32 566 print x1; +#X obj 114 567 print x2; +#X msg 34 451 symbol cort; +#X msg 46 476 symbol zack; +#X msg 178 476 symbol cort; +#X msg 184 501 symbol zack; +#X obj 34 539 select cort; +#X msg 308 462 symbol cort; +#X msg 415 462 symbol zack; +#X obj 308 551 print x1; +#X obj 385 551 print x2; +#X obj 308 521 select cort zack; +#X obj 462 551 print x3; +#X msg 413 487 symbol bill; +#X text 24 426 Select can also be used to sort symbols:; +#X text 83 637 see also:; +#X obj 175 639 route; +#X obj 32 10 select; +#X text 92 10 - compare numbers or symbols; +#X text 370 629 updated for Pd version 0.33; +#X connect 0 0 18 0; +#X connect 1 0 3 0; +#X connect 2 0 3 0; +#X connect 3 0 11 1; +#X connect 4 0 0 0; +#X connect 5 0 0 0; +#X connect 8 0 0 0; +#X connect 9 0 0 0; +#X connect 10 0 17 0; +#X connect 11 0 13 0; +#X connect 11 1 14 0; +#X connect 12 0 17 0; +#X connect 17 0 11 0; +#X connect 18 0 6 0; +#X connect 18 1 7 0; +#X connect 18 2 15 0; +#X connect 18 3 16 0; +#X connect 25 0 29 0; +#X connect 26 0 29 0; +#X connect 27 0 29 1; +#X connect 28 0 29 1; +#X connect 29 0 23 0; +#X connect 29 1 24 0; +#X connect 30 0 34 0; +#X connect 31 0 34 0; +#X connect 34 0 32 0; +#X connect 34 1 33 0; +#X connect 34 2 35 0; +#X connect 36 0 34 0; diff --git a/pd/doc/5.reference/send.pd b/pd/doc/5.reference/send.pd new file mode 100644 index 00000000..f8d44a85 --- /dev/null +++ b/pd/doc/5.reference/send.pd @@ -0,0 +1,26 @@ +#N canvas 257 45 511 351 12; +#X text 278 321 updated for Pd version 0.32; +#X obj 21 10 send; +#X text 60 11 -- send messages without patch cords; +#X obj 36 80 send help-send1; +#X obj 152 81 send help-send1; +#X obj 271 81 send help-send2; +#X obj 38 110 receive help-send1; +#X obj 171 110 receive help-send2; +#X obj 305 110 receive help-send2; +#X floatatom 36 55 5 0 0; +#X floatatom 152 58 5 0 0; +#X floatatom 272 57 5 0 0; +#X floatatom 38 134 5 0 0; +#X floatatom 171 136 5 0 0; +#X floatatom 305 134 5 0 0; +#X obj 161 320 s; +#X text 62 321 abbreviation:; +#X text 31 161 "Send" sends messages to "receive" objects. Sends and receives are named to tell them whom to connect to. They work across windows too. Also \, you can use message boxes as shown:; +#X msg 84 233 \; help-send1 34 \; help-send2 67; +#X connect 6 0 12 0; +#X connect 7 0 13 0; +#X connect 8 0 14 0; +#X connect 9 0 3 0; +#X connect 10 0 4 0; +#X connect 11 0 5 0; diff --git a/pd/doc/5.reference/send~.pd b/pd/doc/5.reference/send~.pd new file mode 100644 index 00000000..5c9db395 --- /dev/null +++ b/pd/doc/5.reference/send~.pd @@ -0,0 +1,32 @@ +#N canvas 31 28 678 406 12; +#X floatatom 344 238 0 0 0; +#X obj 344 189 receive~ signal1; +#X obj 17 215 send~ signal1; +#X obj 17 192 sig~ 50; +#X obj 344 213 snapshot~; +#X obj 42 22 send~; +#X obj 94 23 receive~; +#X text 178 23 - one-to-many nonlocal signal connections; +#X obj 507 133 loadbang; +#X obj 507 194 metro 200; +#X msg 517 155 \; pd dsp 1; +#X floatatom 18 168 4 0 0; +#X text 48 51 A send~ object copies its input to a local buffer which all receive~ objects of the same name read from. They may be in different windows or even different patches. Any number of receives may be associated with one send~ but it is an error to have two send~s of the same name.; +#X obj 179 344 tabreceive~; +#X text 405 368 updated for Pd version 0.33.; +#X obj 148 187 sig~ 25; +#X obj 148 215 send~ signal2; +#X msg 355 139 set signal2; +#X msg 356 161 set signal1; +#X text 34 287 Send~/Receive~ only work for the default block size (64) \; for FFT applications see also:; +#X text 35 262 Receive~ takes "set" messages to switch between send~s.; +#X connect 1 0 4 0; +#X connect 3 0 2 0; +#X connect 4 0 0 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 9 0 4 0; +#X connect 11 0 3 0; +#X connect 15 0 16 0; +#X connect 17 0 1 0; +#X connect 18 0 1 0; diff --git a/pd/doc/5.reference/set.pd b/pd/doc/5.reference/set.pd new file mode 100644 index 00000000..227b29b4 --- /dev/null +++ b/pd/doc/5.reference/set.pd @@ -0,0 +1,45 @@ +#N struct help-set-template1 float x float y; +#N canvas 300 3 583 365 12; +#X text 19 263 see also:; +#X obj 137 308 template; +#X obj 112 284 append; +#X obj 170 284 getsize; +#X obj 237 284 setsize; +#X obj 215 308 element; +#X obj 11 308 sublist; +#X obj 78 308 scalar; +#X msg 210 155 next; +#X obj 21 10 get; +#X floatatom 19 173 5 0 0; +#X floatatom 108 181 5 0 0; +#X obj 196 180 pointer; +#X text 273 113 output first scalar in list; +#X text 256 155 output next item; +#X text 262 204 First argument selects template.; +#X text 263 219 Remaining args are names of fields.; +#X obj 11 283 pointer; +#X msg 196 131 traverse pd-help-set-data \, next; +#N canvas 0 0 276 122 help-set-data 1; +#X scalar help-set-template1 39 23 \;; +#X scalar help-set-template1 99 73 \;; +#X restore 377 244 pd help-set-data; +#N canvas 164 72 425 146 help-set-template1 0; +#X obj 41 87 filledpolygon 9 0 1 0 0 20 0 20 30 0 30; +#X obj 60 21 template float x float y; +#X restore 377 266 pd help-set-template1; +#X text 86 10 -- set values in a scalar; +#X obj 19 204 set help-set-template1 x y; +#X text 18 155 x value; +#X text 106 162 y value; +#X obj 79 283 get; +#X text 19 32 "Set" takes a pointer to a scalar in its rightmost inlet +\; the remaining inlets set numeric values of fields. Only the leftmost +inlet is "hot". You can't "set" arrays or sublists. Instead \, you +can get pointers into them using "element" and "sublist" (probably +not working yet) and set individual items.; +#X text 336 342 updated for Pd version 0.35; +#X connect 8 0 12 0; +#X connect 10 0 22 0; +#X connect 11 0 22 1; +#X connect 12 0 22 2; +#X connect 18 0 12 0; diff --git a/pd/doc/5.reference/setsize.pd b/pd/doc/5.reference/setsize.pd new file mode 100644 index 00000000..ce68f5fc --- /dev/null +++ b/pd/doc/5.reference/setsize.pd @@ -0,0 +1,54 @@ +#N struct help-setsize-template float x float y array array1 help-setsize-array1-template +; +#N struct help-setsize-array1-template float y; +#N canvas 331 45 678 459 12; +#X text 31 359 see also:; +#X obj 28 379 template; +#N canvas 393 10 491 261 help-setsize-template 0; +#X obj 27 174 filledpolygon 509 509 0 -10 -10 10 -10 10 10 -10 10; +#X obj 24 16 template float x float y array array1 help-setsize-array1-template +; +#X obj 27 76 plot array1 500 1 10 15 10; +#X restore 364 261 pd help-setsize-template; +#N canvas 0 0 295 165 help-setsize-data 1; +#X scalar help-setsize-template 31 23 \; 0 \; 10 \; 0 \; 10 \; 20 \; +10 \; 20 \; 70 \; 10 \; \;; +#X restore 363 240 pd help-setsize-data; +#N canvas 196 292 365 134 help-setsize-array1-template 0; +#X obj 30 71 filledpolygon 0 0 0 -5 0 0 5 5 0 0 -5; +#X obj 32 27 template float y; +#X restore 363 284 pd help-setsize-array1-template; +#X obj 107 379 pointer; +#X obj 242 379 setsize; +#X obj 272 186 pointer; +#X msg 272 162 traverse pd-help-setsize-data \, next; +#X floatatom 25 189 5 0 0; +#X text 359 210 arguments: template \, field name; +#X obj 25 213 setsize help-setsize-template array1; +#X text 115 183 inlet for pointer; +#X obj 36 11 setsize; +#X obj 174 379 element; +#X text 31 156 number sets; +#X text 30 170 size; +#X text 99 12 -- resize an array; +#X text 25 34 "setsize" takes a pointer to a scalar at left and a number +at right. Its creation arguments specify the template of the pointer +and the name of an array field. Sending a number then sets the number +of elements of the array.; +#X text 24 93 The smallest possible size is one. If the array is resized +downward the extra data are lost. If resized upward \, the new elements +are initialized to default values.; +#X msg 566 335 bang; +#X text 297 333 click to reload from file -->; +#X text 274 143 click here first; +#N canvas 460 63 435 172 readit 1; +#X msg 66 65 \; pd-help-setsize-data read setsize.txt; +#X obj 107 18 inlet; +#X msg 62 123 \; pd-help-setsize-data write setsize.txt; +#X connect 1 0 0 0; +#X restore 566 361 pd readit; +#X text 416 395 updated for Pd version 0.35; +#X connect 7 0 11 1; +#X connect 8 0 7 0; +#X connect 9 0 11 0; +#X connect 20 0 23 0; diff --git a/pd/doc/5.reference/setsize.txt b/pd/doc/5.reference/setsize.txt new file mode 100644 index 00000000..d238fb59 --- /dev/null +++ b/pd/doc/5.reference/setsize.txt @@ -0,0 +1,21 @@ +data; +template help-setsize-template; +float x; +float y; +array array1 help-setsize-array1-template; +; +template help-setsize-array1-template; +float y; +; +; +help-setsize-template 31 23; +0; +10; +0; +10; +20; +10; +20; +70; +10; +; diff --git a/pd/doc/5.reference/sigbinops.pd b/pd/doc/5.reference/sigbinops.pd new file mode 100644 index 00000000..b461c846 --- /dev/null +++ b/pd/doc/5.reference/sigbinops.pd @@ -0,0 +1,60 @@ +#N canvas 18 67 1086 595 10; +#X obj 8 251 +~; +#X obj 115 249 -~; +#X obj 222 249 *~; +#X obj 327 251 /~; +#X obj 38 17 +~; +#X obj 73 17 -~; +#X obj 106 16 *~; +#X obj 140 16 /~; +#X graph graph1 0 -1 100 1 678 446 1078 146; +#X array array1 100 float; +#X pop; +#X obj 327 293 tabwrite~ array1; +#X obj 8 293 tabwrite~ array1; +#X obj 115 293 tabwrite~ array1; +#X obj 222 293 tabwrite~ array1; +#X text 266 14 -- operators on audio signals; +#X obj 8 160 osc~ 440; +#X obj 480 157 osc~ 675; +#X msg 17 271 bang; +#X obj 173 15 max~; +#X obj 207 15 min~; +#X text 487 458 modified for Pd version 0.27; +#X obj 536 293 tabwrite~ array1; +#X obj 431 293 tabwrite~ array1; +#X obj 431 249 max~; +#X obj 536 251 min~; +#X msg 127 272 bang; +#X msg 233 271 bang; +#X msg 343 272 bang; +#X msg 443 271 bang; +#X msg 553 272 bang; +#X text 52 332 The binary signal operators can be configured to combine two signals as above \, or \, if you give a numeric argument \, audio signals are combined with scalars:; +#X obj 204 377 +~ 5; +#X text 60 406 The right inlet takes audio signals or numbers depending on whether the argument is present or not.; +#X msg 68 71 \; pd dsp 1; +#X connect 0 0 10 0; +#X connect 1 0 11 0; +#X connect 2 0 12 0; +#X connect 3 0 9 0; +#X connect 14 0 0 0; +#X connect 14 0 1 0; +#X connect 14 0 3 0; +#X connect 14 0 2 0; +#X connect 14 0 22 0; +#X connect 14 0 23 0; +#X connect 15 0 3 1; +#X connect 15 0 2 1; +#X connect 15 0 1 1; +#X connect 15 0 0 1; +#X connect 15 0 22 1; +#X connect 15 0 23 1; +#X connect 16 0 10 0; +#X connect 22 0 21 0; +#X connect 23 0 20 0; +#X connect 24 0 11 0; +#X connect 25 0 12 0; +#X connect 26 0 9 0; +#X connect 27 0 21 0; +#X connect 28 0 20 0; diff --git a/pd/doc/5.reference/sig~.pd b/pd/doc/5.reference/sig~.pd new file mode 100644 index 00000000..72781487 --- /dev/null +++ b/pd/doc/5.reference/sig~.pd @@ -0,0 +1,20 @@ +#N canvas 132 175 547 284 12; +#X obj 109 221 snapshot~; +#X floatatom 110 246 0 0 0; +#X obj 78 12 sig~; +#X obj 24 133 sig~; +#X floatatom 24 108 0 0 0; +#X text 114 14 - convert numbers to audio signal; +#X text 11 53 In this example \, the sig~ object converts numbers to an audio signal \, which the snapshot~ converts back again.; +#X text 64 108 <-- Scroll to set value; +#X obj 109 131 loadbang; +#X msg 118 155 \; pd dsp 1; +#X obj 109 195 metro 200; +#X text 291 249 updated for Pd version 0.33; +#X connect 0 0 1 0; +#X connect 0 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 3 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 10 0 0 0; diff --git a/pd/doc/5.reference/snapshot~.pd b/pd/doc/5.reference/snapshot~.pd new file mode 100644 index 00000000..244a2a7c --- /dev/null +++ b/pd/doc/5.reference/snapshot~.pd @@ -0,0 +1,28 @@ +#N canvas 40 55 704 399 12; +#X obj 205 266 snapshot~; +#X floatatom 205 292 0 0 0; +#X obj 105 274 snapshot~; +#X floatatom 105 318 0 0 0; +#X obj 74 14 snapshot~; +#X msg 205 236 bang; +#X text 201 313 This output updates each time bang is clicked above.; +#X text 154 14 - convert a signal to a number on demand; +#X text 9 46 The snapshot~ object takes a signal and converts it to a control value whenever it receives a bang in its left outlet. This object is particularly useful for monitoring outputs.; +#X text 459 375 updated for Pd version 0.33; +#X msg 19 212 \; pd dsp 1; +#X obj 12 187 loadbang; +#X obj 12 251 metro 200; +#X text 104 334 This output updates every 200 milliseconds.; +#X obj 105 214 osc~ 0.1; +#X text 110 196 0.1 Hz cosine; +#X text 7 111 In the example below \, the first snapshot~ object prints out the values of a low frequency cosine wave every 200 milliseconds. The second snapshot~ object prints the output value when the bang button above it is clicked.; +#X connect 0 0 1 0; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 2 0 3 0; +#X connect 5 0 0 0; +#X connect 11 0 10 0; +#X connect 11 0 12 0; +#X connect 12 0 2 0; +#X connect 14 0 2 0; +#X connect 14 0 0 0; diff --git a/pd/doc/5.reference/soundfiler.pd b/pd/doc/5.reference/soundfiler.pd new file mode 100644 index 00000000..c6384664 --- /dev/null +++ b/pd/doc/5.reference/soundfiler.pd @@ -0,0 +1,66 @@ +#N canvas 82 31 926 613 10; +#X graph graph1 0 -1 77971 1 71 453 371 353; +#X array array1 77971 float 0; +#X pop; +#X graph graph1 0 -1 77971 1 71 575 371 475; +#X array array2 77971 float 0; +#X pop; +#X obj 12 293 soundfiler; +#X msg 532 476 \; array1 resize 1000 \; array2 resize 1000 \;; +#X msg 18 221 write -aiff /tmp/foo1 array2; +#X msg 19 132 read ../sound/bell.aiff array2; +#X msg 18 179 read -raw 128 2 2 b ../sound/bell.aiff array1 array2 +; +#X msg 532 522 \; array1 resize 160000 \; array2 resize 160000; +#X msg 530 431 \; array1 const 0 \; array2 const 0; +#X text 26 10 SOUNDFILER - read and write soundfiles to arrays; +#X text 18 31 The soundfiler object reads and writes floating point +arrays to binary soundfiles which may contain 2 or 3 byte fixed point +or 4 byte floating point samples in wave \, aiff \, or next formats +(only next supports floating point \, though.). The number of channels +of the soundfile need not match the number of arrays given (extras +are dropped and unsupplied channels are zeroed out.); +#X text 475 9 When reading you can leave soundfiler to figure out which +of the three known soundfile formats the file belongs to or override +all header information using the "-raw" flag.; +#X text 479 51 Flags for reading:; +#X text 498 73 -skip <sample frames to skip in file>; +#X text 498 90 -nframes <maximum number of sample frames to read>; +#X text 499 148 -raw <headersize> <channels> <bytespersample> <endianness> +; +#X text 518 166 This causes all header information to be ignored. Endianness +is "l" ("little") for Intel machines or "b" ("big") for Macintoshes +and SGIs. You can give "n" (natural) to take the byte order your machine +prefers.; +#X text 499 111 -resize; +#X text 499 127 -maxsize <maximum number of samples we can resize to> +; +#X text 488 225 Flags for writing:; +#X text 503 246 -wave \, -nextstep \, -aiff; +#X text 504 265 -big \, -little (nextstep only!); +#X text 503 287 -skip <number of sample frames to skip in array>; +#X text 504 309 -nframes <maximum number to write>; +#X text 505 353 -normalize; +#X text 504 331 -bytes <2 \, 3 \, or 4>; +#X floatatom 12 317 0 0 0; +#X msg 16 155 read -resize ../sound/bell.aiff array2; +#X text 707 581 updated for Pd version 0.29; +#X msg 18 268 write -nextstep -bytes 4 /tmp/foo3 array1 array2; +#X msg 17 245 write -wave -nframes 10000 /tmp/foo2 array2; +#X text 257 130 read a file; +#X text 302 155 ...optionally resize; +#X text 230 196 ...or even overriding everything; +#X text 235 221 write a file; +#X text 376 270 write stereo; +#X text 488 384 The number of channels is limited to 64; +#X text 790 429 see also:; +#X obj 784 452 tabwrite~; +#X obj 785 476 tabread4~; +#X obj 784 503 tabplay~; +#X connect 2 0 26 0; +#X connect 4 0 2 0; +#X connect 5 0 2 0; +#X connect 6 0 2 0; +#X connect 27 0 2 0; +#X connect 29 0 2 0; +#X connect 30 0 2 0; diff --git a/pd/doc/5.reference/spigot.pd b/pd/doc/5.reference/spigot.pd new file mode 100644 index 00000000..3daf9157 --- /dev/null +++ b/pd/doc/5.reference/spigot.pd @@ -0,0 +1,21 @@ +#N canvas 349 223 586 335 12; +#X msg 25 157 0.5 1000; +#X floatatom 74 242 1 0 0; +#X obj 25 267 spigot; +#X obj 25 300 print; +#X msg 38 210 walk the cat; +#X msg 31 182 bang; +#X obj 35 11 spigot; +#X text 100 12 - pass or block messages; +#X text 99 242 control: nonzero to pass messages \, zero to stop them +; +#X text 333 303 updated for Pd version 0.33; +#X text 35 63 Spigot passes messages from its left inlet to its outlet +\, as long as a nonzero number is sent to its right inlet. When its +right inlet gets zero \, incoming messages are "blocked \, " i.e. \, +ignored.; +#X connect 0 0 2 0; +#X connect 1 0 2 1; +#X connect 2 0 3 0; +#X connect 4 0 2 0; +#X connect 5 0 2 0; diff --git a/pd/doc/5.reference/sqrt~.pd b/pd/doc/5.reference/sqrt~.pd new file mode 100644 index 00000000..b7b8e1a4 --- /dev/null +++ b/pd/doc/5.reference/sqrt~.pd @@ -0,0 +1,32 @@ +#N canvas 182 132 778 399 12; +#X obj 71 201 metro 500; +#X obj 71 176 r metro; +#X msg 575 106 \; metro 0; +#X msg 574 48 \; pd dsp 1 \; metro 1; +#X floatatom 55 102 0 0 0; +#X floatatom 55 258 0 0 0; +#X text 470 371 updated for Pd version 0.33; +#X obj 574 21 loadbang; +#X obj 36 16 sqrt~; +#X text 88 18 - signal square root; +#X obj 55 152 sqrt~; +#X obj 55 225 snapshot~; +#X floatatom 54 341 9 0 0; +#X obj 54 285 t f f; +#X obj 54 312 *; +#X obj 55 128 sig~; +#X text 18 45 sqrt~ takes the approximate square root of the incoming +signal \, using a fast \, approximate algorithm which is probably accurate +to about 120 dB (20 bits).; +#X connect 0 0 11 0; +#X connect 1 0 0 0; +#X connect 1 0 0 0; +#X connect 4 0 15 0; +#X connect 5 0 13 0; +#X connect 7 0 3 0; +#X connect 10 0 11 0; +#X connect 11 0 5 0; +#X connect 13 0 14 0; +#X connect 13 1 14 1; +#X connect 14 0 12 0; +#X connect 15 0 10 0; diff --git a/pd/doc/5.reference/stripnote.pd b/pd/doc/5.reference/stripnote.pd new file mode 100644 index 00000000..80a8cecb --- /dev/null +++ b/pd/doc/5.reference/stripnote.pd @@ -0,0 +1,16 @@ +#N canvas 53 36 458 251 10; +#X msg 39 100 23 0; +#X obj 39 175 print x1; +#X obj 96 175 print x2; +#X obj 39 139 stripnote; +#X msg 79 100 34.5 67.8; +#X obj 65 214 makenote; +#X text 83 12 - send note-on messages and schedule note-off for later; +#X text 283 220 updated for Pd version 0.28; +#X text 10 214 see also; +#X obj 23 10 stripnote; +#X text 17 44 Stripnote takes note-off (zero-velocity) messages out of a stream of MIDI-style note message and passes the others through unchanged.; +#X connect 0 0 3 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 0; diff --git a/pd/doc/5.reference/struct.pd b/pd/doc/5.reference/struct.pd new file mode 100644 index 00000000..a18fa6e9 --- /dev/null +++ b/pd/doc/5.reference/struct.pd @@ -0,0 +1,26 @@ +#N canvas 343 45 557 321 12; +#X text 88 11 -- declare the fields in a data structure.; +#N canvas 345 476 638 171 help-template1 0; +#X obj 60 21 struct struct-1 float x float y symbol dog array weasel +struct-2; +#X text 40 76 In this example \, the "struct-1" structure is defined +in which "x" and "y" are "floats" \, i.e. \, numbers \, but "dog" is +a symbol and "weasel" is an array of objects of structure "struct-2". +; +#X restore 324 156 pd help-template1; +#N canvas 10 274 588 157 help-template2 0; +#X text 28 95 Here is one which specifies only the floating point "y" +\; it's used for the elements of the array shown in the other template. +; +#X obj 60 21 struct struct-2 float y; +#X restore 324 183 pd help-template2; +#X obj 36 215 drawpolygon; +#X text 36 195 see also:; +#X obj 141 215 drawnumber; +#X obj 236 216 plot; +#X text 281 290 updated for Pd version 0.35; +#X obj 21 10 struct; +#X text 16 49 There should be one "struct" object in each Pd window +you are using as a data structure template. The arguments specify the +types and names of the fields \; and for array fields \, a third argument +specifies the template that the array elements should belong to.; diff --git a/pd/doc/5.reference/sublist.pd b/pd/doc/5.reference/sublist.pd new file mode 100644 index 00000000..a3067d5a --- /dev/null +++ b/pd/doc/5.reference/sublist.pd @@ -0,0 +1,10 @@ +#N canvas 252 0 559 226 12; +#X text 311 181 updated for Pd version 0.32; +#X obj 21 10 sublist; +#X text 86 10 -- get a list from a field of a scalar; +#X text 31 37 Don't try this yet -- it's untested.; +#X text 36 89 "sublist" will take as creation arguments a template +name and a field name \; its one input takes a pointer. If you send +a pointer (which should agree with the template name) \, "sublist" +will output the field (which should be of type "list".) The output +is in fact a pointer to the head of the sublist.; diff --git a/pd/doc/5.reference/swap.pd b/pd/doc/5.reference/swap.pd new file mode 100644 index 00000000..987a5844 --- /dev/null +++ b/pd/doc/5.reference/swap.pd @@ -0,0 +1,20 @@ +#N canvas 376 130 488 326 12; +#X msg 67 124 bang; +#X floatatom 67 252; +#X floatatom 79 154; +#X floatatom 118 194; +#X obj 66 15 swap; +#X text 114 16 - SWAP TWO NUMBERS \, RESPECTING RIGHT-TO-LEFT ORDER; +#X text 284 309 updated for Pd version 0.27; +#X text 12 42 The swap object stores numbers from its left inlet to output on its right inlet -- after repeating its right hand input out the left.; +#X text 112 123 outputs 2 stored values; +#X obj 67 226 swap 6.5; +#X text 110 154 sets second value and outputs both; +#X text 150 195 sets first value; +#X text 142 226 creation argument initializes first value; +#X floatatom 118 254; +#X connect 0 0 9 0; +#X connect 2 0 9 0; +#X connect 3 0 9 1; +#X connect 9 0 1 0; +#X connect 9 1 13 0; diff --git a/pd/doc/5.reference/switch~.pd b/pd/doc/5.reference/switch~.pd new file mode 100644 index 00000000..c3ab8797 --- /dev/null +++ b/pd/doc/5.reference/switch~.pd @@ -0,0 +1,45 @@ +#N canvas 218 166 619 368 12; +#X msg 382 133 \; metro 0; +#X text 462 92 <-Click to start; +#X text 455 137 <-Click to stop; +#X text 47 13 switch and block - turn DSP on and off for subpatches +and control block size; +#N canvas 15 32 598 301 switched 1; +#X obj 265 148 switch~; +#X floatatom 265 121 1 0 0; +#X floatatom 75 168 4 0 0; +#X obj 75 104 noise~; +#X obj 75 136 env~ 512; +#X text 25 26 DSP in this subwindow is turned on and off by the switch~ +object. Any subwindows of this window can also be switched off here. +If a patch and a superpatch both have switches \, both must be "on" +for DSP to run in the patch.; +#X text 32 203 switch~ takes optional arguments the same as block~. +If you supply arguments to switch \, the patch will be switched AND +reblocked.; +#X text 31 258 Only one switch~ or block~ may appear in any window. +; +#X connect 1 0 0 0; +#X connect 3 0 4 0; +#X connect 4 0 2 0; +#X restore 139 124 pd switched; +#N canvas 13 421 564 200 blocked 1; +#X obj 184 35 block~ 1024 4; +#X text 14 76 This object specified that DSP in this subwindow is to +be computed at a block size of 1024 \, and an overlap of 4 \, i.e. +\, every 256 samples. You may not (yet) specify a block size smaller +than your superpatch. This is useful for writing FFT based patches +(see the "fft examples" tutorial series.); +#X restore 141 158 pd blocked; +#X msg 382 87 \; pd dsp 1; +#X obj 382 61 loadbang; +#X text 38 82 see the subpatches for explanation:; +#X text 362 334 updated for Pd version 0.34; +#X text 34 195 BUG! -- dac~ and adc~ work only with a blocksize of +64 If you want to reblock audio computation \, do so in a sub-patch +and keep the adc~ and dac~ objects in a super-patch. Also \, you can't +send~ or receive~ between windows with different block sizes or overlapping. +Only the inlet~ and outlet~ objects know how to reblock signals. In +this example \, you could put a dac~ in this \, outer window \, or +in the switched subwindow \, but not the blocked one.; +#X connect 7 0 6 0; diff --git a/pd/doc/5.reference/table.txt b/pd/doc/5.reference/table.txt new file mode 100644 index 00000000..f2a27ae0 --- /dev/null +++ b/pd/doc/5.reference/table.txt @@ -0,0 +1 @@ +0 0.1 0.2 0.3 0.4 0.5 0.6 0.5 0.4 0.3 0.2 0.1 0 diff --git a/pd/doc/5.reference/tabosc4~.pd b/pd/doc/5.reference/tabosc4~.pd new file mode 100644 index 00000000..ada694e1 --- /dev/null +++ b/pd/doc/5.reference/tabosc4~.pd @@ -0,0 +1,86 @@ +#N canvas 307 35 742 511 12; +#X floatatom 66 450 0 0 0; +#N canvas 159 26 495 270 output 0; +#X obj 414 196 t b; +#X obj 414 134 f; +#X obj 414 73 inlet; +#X text 421 36 mute; +#X obj 414 227 f; +#X msg 521 218 0; +#X msg 414 104 bang; +#X obj 414 166 moses 1; +#X obj 521 187 t b f; +#X obj 486 143 moses 1; +#X obj 102 181 dbtorms; +#X obj 486 113 r master-lvl; +#X obj 102 52 r master-lvl; +#X obj 414 257 s master-lvl; +#X obj 26 222 inlet~; +#X obj 244 50 inlet; +#X text 244 22 level; +#X obj 244 122 s master-lvl; +#X msg 118 80 set \$1; +#X obj 118 109 outlet; +#X msg 262 78 \; pd dsp 1; +#X obj 102 238 line~; +#X obj 26 259 *~; +#X obj 26 295 dac~; +#X obj 102 210 pack 0 50; +#X text 24 195 audio; +#X text 114 135 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 32 476 pd output; +#X msg 102 450 MUTE; +#X text 148 449 <--- volume in dB; +#X floatatom 32 296 4 0 0; +#X obj 32 326 sig~ 100; +#X obj 547 52 table table1; +#X obj 547 80 table table2; +#X msg 372 287 \; table1 sinesum 512 0.5 0.5 0.5 0.5 \; table2 cosinesum 512 0 1; +#X text 433 474 Updated for Pd version 0.33; +#X obj 20 11 tabosc4~; +#X text 110 12 4-point interpolating oscillator; +#X msg 52 372 set table1; +#X obj 32 413 tabosc4~ table1; +#X msg 156 372 set table2; +#X text 372 343 click above \, start DSP \, and turn output; +#X text 372 361 volume up to hear this; +#X text 14 40 tabosc4~ is a traditional computer music style wavetable lookup oscillator using 4-point polynomial interpolation. The table should have a poiwer of two points plus three "guard points" \, one at the beginning and two at the end \, which should be wraparound copies of the last point and the first two points \, respectively. The "sinesum" and "cosinesum" methods for arrays do this automatically for you if you just want to specify partial strengths.; +#X text 14 178 For good results use 512 points for up to about 15 partials \, or 32*npartials (rounded up to a power of 2) for more than 15; +#X floatatom 275 391 4 0 0; +#X text 12 233 Don't send new "sinesum" messages to tables while you're running -- instead \, use "set" messages to switch between tables.; +#X text 80 298 signal input for frequency (Hz.); +#X text 46 349 message to switch tables; +#X text 325 391 inlet to reset phase; +#X text 166 414 creation argument initializes table; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 4 0 5 0; +#X connect 5 0 13 0; +#X connect 12 0 13 0; +#X connect 13 0 1 0; +#X connect 14 0 13 0; +#X connect 19 0 13 1; diff --git a/pd/doc/5.reference/tabplay~.pd b/pd/doc/5.reference/tabplay~.pd new file mode 100644 index 00000000..92cdb81e --- /dev/null +++ b/pd/doc/5.reference/tabplay~.pd @@ -0,0 +1,66 @@ +#N canvas 28 13 707 471 10; +#X msg 639 93 \; pd dsp 0; +#X graph graph1 0 -1 155948 1 428 369 678 169; +#X array array99 155948 float 0; +#X pop; +#X floatatom 11 342 0 0 0; +#X msg 11 109 set array99; +#X text 93 109 "set" message permits you to switch between arrays; +#X text 128 228 creation argument initializes array name; +#X text 5 392 see also the "array" tutorial in section 2 of the Pd +documentation \, and these objects:; +#X obj 6 438 tabwrite~; +#X obj 140 439 tabread; +#X obj 194 439 tabwrite; +#X obj 254 439 tabsend~; +#X obj 315 439 tabreceive~; +#X obj 41 13 tabplay~; +#X text 108 14 play a table as a sample (non-transposing); +#X obj 11 228 tabplay~ array99; +#X obj 452 82 soundfiler; +#X msg 452 48 read -resize ../sound/bell.aiff array99 \; pd dsp 1 \; +; +#X floatatom 452 104 0 0 0; +#X obj 11 316 env~ 16384; +#X obj 396 439 soundfiler; +#X obj 73 439 tabread4~; +#X obj 87 360 dac~ 1; +#X obj 87 323 *~; +#X obj 100 304 line~; +#X msg 100 263 0.1 100; +#X msg 116 284 0 100; +#X text 162 264 on; +#X text 157 283 off; +#X text 148 301 envelope; +#X text 148 312 generator; +#X text 101 248 amplitude controls:; +#X text 131 362 audio output; +#X obj 87 342 hip~ 5; +#X msg 26 179 0 44100; +#X msg 27 158 44100; +#X msg 26 138 bang; +#X text 475 449 updated for Pd version 0.29; +#X text 29 43 The tabplay~ object plays a sample \, or part of one +\, with no transposition or interpolation. It is cheaper than tabread4~ +and there are none of tabread4~'s interpolation artifacts.; +#X text 509 25 click here to load table; +#X text 80 136 "bang" or 0 plays whole sample; +#X text 82 157 play starting at 44100th sample; +#X text 93 177 play starting at beginning for 44100 samples; +#X msg 25 199 44100 1000; +#X text 103 198 play from 44100 through 45099 (1000 samples); +#X connect 3 0 14 0; +#X connect 14 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 16 0 15 0; +#X connect 18 0 2 0; +#X connect 22 0 32 0; +#X connect 23 0 22 1; +#X connect 24 0 23 0; +#X connect 25 0 23 0; +#X connect 32 0 21 0; +#X connect 33 0 14 0; +#X connect 34 0 14 0; +#X connect 35 0 14 0; +#X connect 42 0 14 0; diff --git a/pd/doc/5.reference/tabread.pd b/pd/doc/5.reference/tabread.pd new file mode 100644 index 00000000..fa671a21 --- /dev/null +++ b/pd/doc/5.reference/tabread.pd @@ -0,0 +1,21 @@ +#N canvas 44 26 703 454 12; +#X text 52 181 index; +#X obj 36 9 tabread; +#X obj 15 244 tabread array99; +#X floatatom 15 182 0 0 0; +#X floatatom 15 278 0 0 0; +#X graph graph1 0 0 10 10 362 379 612 179; +#X array array99 10 float; +#X pop; +#X msg 31 56 \; readout 1 \; array99 resize 10 \; array99 bounds 0 0 10 10 \; array99 xlabel -0.5 0 1 2 3 4 5 6 7 8 9 10 \; array99 ylabel -1 0 1 2 3 4 5 6 7 8 9 10 \; array99 0 1 4 2 8 5 6 1 4 2 8; +#X text 60 276 output = array99[index]; +#X text 141 33 click here to initialize; +#X text 159 236 creation argument; +#X text 155 254 gives array name; +#X msg 25 204 set array99; +#X text 137 204 change array name; +#X text 422 407 updated for Pd version 0.33; +#X text 110 8 - read numbers from a table; +#X connect 2 0 4 0; +#X connect 3 0 2 0; +#X connect 11 0 2 0; diff --git a/pd/doc/5.reference/tabread4~.pd b/pd/doc/5.reference/tabread4~.pd new file mode 100644 index 00000000..c28f580a --- /dev/null +++ b/pd/doc/5.reference/tabread4~.pd @@ -0,0 +1,43 @@ +#N canvas 59 33 814 475 10; +#X obj 11 228 tabread4~ array99; +#X text 21 207 signal input x(n); +#X msg 727 51 \; pd dsp 0; +#X graph graph1 0 -1 9 1 514 373 764 173; +#X array array99 10 float 0; +#X pop; +#X text 127 21 4-point-interpolating table lookup; +#X obj 11 316 snapshot~; +#X obj 30 290 metro 200; +#X obj 11 124 sig~; +#X floatatom 11 98 0 0 0; +#X obj 30 264 r readout; +#X floatatom 11 342 0 0 0; +#X msg 452 50 \; readout 1 \; array99 resize 10 \; array99 0 -0.5 -0.5 +-0.5 0.5 0.5 0.5 \; pd dsp 1 \;; +#X text 49 94 incoming signal is index. Indices should range from 1 +to (size-2) so that the 4-point interpolation is meaningful. You can +shift-drag the number box to see the effect of interpolation.; +#X msg 34 158 set array99; +#X text 116 158 "set" message permits you to switch between arrays +; +#X text 139 228 creation argument initializes array name; +#X text 5 392 see also the "array" tutorial in section 2 of the Pd +documentation \, and these objects:; +#X obj 47 21 tabread4~; +#X text 509 27 click here to test; +#X obj 12 442 tabwrite~; +#X obj 157 442 tabread; +#X obj 216 442 tabwrite; +#X obj 281 442 tabsend~; +#X obj 346 442 tabreceive~; +#X text 7 58 Tabread4~ is used to build samplers and other table lookup +algorithms. The interpolation scheme is 4-point polynomial.; +#X text 616 460 updated for Pd version 0.29; +#X obj 83 442 tabplay~; +#X connect 0 0 5 0; +#X connect 5 0 10 0; +#X connect 6 0 5 0; +#X connect 7 0 0 0; +#X connect 8 0 7 0; +#X connect 9 0 6 0; +#X connect 13 0 0 0; diff --git a/pd/doc/5.reference/tabreceive~.pd b/pd/doc/5.reference/tabreceive~.pd new file mode 100644 index 00000000..7de98346 --- /dev/null +++ b/pd/doc/5.reference/tabreceive~.pd @@ -0,0 +1,6 @@ +#N canvas 109 83 646 239 12; +#X obj 21 18 tabreceive~; +#X text 17 53 creation argument: name of array; +#X text 16 83 By default a block is 64 samples \; this can be reset using the block~ object.; +#X text 380 201 updated for Pd version 0.33; +#X text 129 18 - read a block of a signal from an array continuously; diff --git a/pd/doc/5.reference/tabsend~.pd b/pd/doc/5.reference/tabsend~.pd new file mode 100644 index 00000000..85a4183f --- /dev/null +++ b/pd/doc/5.reference/tabsend~.pd @@ -0,0 +1,6 @@ +#N canvas 151 91 596 222 12; +#X obj 31 27 tabsend~; +#X text 113 26 writes one block of a signal continuously to an array; +#X text 41 60 creation argument: name of array; +#X text 29 96 By default a block is 64 samples \; this can be reset using the block~ object.; +#X text 318 186 updated for Pd version 0.33; diff --git a/pd/doc/5.reference/tabwrite.pd b/pd/doc/5.reference/tabwrite.pd new file mode 100644 index 00000000..60b31513 --- /dev/null +++ b/pd/doc/5.reference/tabwrite.pd @@ -0,0 +1,21 @@ +#N canvas 44 17 653 456 12; +#X obj 31 27 tabwrite; +#X floatatom 9 176 0 0 0; +#X obj 9 282 tabwrite array99; +#X text 113 28 write numbers to a table; +#X graph graph1 0 0 10 10 355 389 605 189; +#X array array99 10 float; +#X pop; +#X msg 9 53 \; readout 1 \; array99 resize 10 \; array99 bounds 0 0 10 10 \; array99 xlabel -0.5 0 1 2 3 4 5 6 7 8 9 10 \; array99 ylabel -1 0 1 2 3 4 5 6 7 8 9 10 \; array99 0 1 4 2 8 5 6 1 4 2 8; +#X text 406 94 click here to initialize; +#X floatatom 146 257 0 0 0; +#X text 158 279 creation argument; +#X text 160 297 is array name; +#X text 46 174 set y value; +#X text 44 239 right inlet selects x value; +#X msg 25 204 set array99; +#X text 133 203 change array name; +#X text 389 423 updated for Pd version 0.33; +#X connect 1 0 2 0; +#X connect 7 0 2 1; +#X connect 12 0 2 0; diff --git a/pd/doc/5.reference/tabwrite~.pd b/pd/doc/5.reference/tabwrite~.pd new file mode 100644 index 00000000..606f4f30 --- /dev/null +++ b/pd/doc/5.reference/tabwrite~.pd @@ -0,0 +1,30 @@ +#N canvas 119 134 697 332 10; +#X obj 31 27 tabwrite~; +#X text 110 27 object to write a signal in an array; +#X msg 43 131 bang; +#X obj 23 211 tabwrite~ array99; +#X graph graph1 0 -1 100 1 460 235 610 135; +#X array array99 100 float; +#X pop; +#X obj 23 82 sig~ 3000; +#X obj 23 110 phasor~; +#X text 149 213 creation argument initializes array name; +#X msg 40 181 set array99; +#X msg 445 35 \; pd dsp 1; +#X msg 524 37 \; pd dsp 0; +#X text 85 133 bang to start recording; +#X text 126 180 set the destination array; +#X text 18 251 see also the "array" tutorial in section 2 of the Pd documentation \, and these objects:; +#X obj 90 282 tabread; +#X obj 149 282 tabwrite; +#X obj 214 282 tabsend~; +#X obj 279 282 tabreceive~; +#X obj 17 282 tabread4~; +#X msg 43 153 stop; +#X text 85 154 stop recording; +#X text 458 288 updated for Pd version 0.29; +#X connect 2 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 3 0; +#X connect 8 0 3 0; +#X connect 19 0 3 0; diff --git a/pd/doc/5.reference/text.pd b/pd/doc/5.reference/text.pd new file mode 100644 index 00000000..96664048 --- /dev/null +++ b/pd/doc/5.reference/text.pd @@ -0,0 +1,4 @@ +#N canvas 74 127 544 214 12; +#X text 281 174 updated for Pd version 0.26; +#X text 107 13 comments; +#X text 38 73 This is Pd's help window for comments \, which don't do anything.; diff --git a/pd/doc/5.reference/textfile.pd b/pd/doc/5.reference/textfile.pd new file mode 100644 index 00000000..8da1dde6 --- /dev/null +++ b/pd/doc/5.reference/textfile.pd @@ -0,0 +1,59 @@ +#N canvas 12 43 1181 529 12; +#X msg 582 27 rewind; +#X obj 577 416 print done; +#X text 745 185 read a file; +#X text 801 214 write one; +#X text 97 472 see also:; +#X obj 521 365 textfile; +#X msg 584 188 read textfile.txt; +#X obj 176 473 qlist; +#X obj 145 20 textfile; +#X text 236 20 read and write text files; +#X text 34 92 The textfile object reads and writes text files to and +from memory. You can read a file and output sequential lines as lists +\, or collect lines and write them out. You can use this object to +generate "models" for Gem \, for instance.; +#X text 665 28 go to beginning; +#X msg 582 54 bang; +#X text 665 53 output one line as a list; +#X msg 584 216 write /tmp/textfile.txt; +#X msg 584 243 write /tmp/textfile2.txt cr; +#X text 593 264 write a file \, terminating lines only with carriage +return (omitting semicolons.) You can read files this way too \, in +which case carriage returns are mapped to semicolons.; +#X obj 521 438 print list; +#X msg 583 312 read textfile.txt cr; +#X msg 582 82 clear; +#X text 737 83 empty the object; +#X text 737 111 add a message; +#X text 521 464 this outlet gets the lines in sequence.; +#X text 35 246 You can also use this object simply for storing heterogeneous +sequences of lists.; +#X text 608 385 This outlet gets a bang when you hit the end of the +sequence.; +#X msg 582 162 set 2 4 6 8; +#X text 740 163 clear and then add one message; +#X msg 582 109 add cis boom bah; +#X msg 582 136 add2 bang; +#X text 734 136 add an unterminated message; +#X text 31 160 To record textual messages and save them to a file \, +first send "clear" to empty the qlist and "add" to add messages (terminated +with semicolons.) The message \, "add2" adds a list of atoms without +finishing with a semicolon in case you want to make variable-length +messages.; +#X msg 582 339 print; +#X text 636 342 debugging printout; +#X text 901 500 updated for Pd version 0.33; +#X connect 0 0 5 0; +#X connect 5 0 17 0; +#X connect 5 1 1 0; +#X connect 6 0 5 0; +#X connect 12 0 5 0; +#X connect 14 0 5 0; +#X connect 15 0 5 0; +#X connect 18 0 5 0; +#X connect 19 0 5 0; +#X connect 25 0 5 0; +#X connect 27 0 5 0; +#X connect 28 0 5 0; +#X connect 31 0 5 0; diff --git a/pd/doc/5.reference/textfile.txt b/pd/doc/5.reference/textfile.txt new file mode 100644 index 00000000..99d21c09 --- /dev/null +++ b/pd/doc/5.reference/textfile.txt @@ -0,0 +1,6 @@ +2 4 6 8; +cis boom bah; +cis boom bah; +cis boom bah; +cis boom bah; +cis boom bah; diff --git a/pd/doc/5.reference/threshold~.pd b/pd/doc/5.reference/threshold~.pd new file mode 100644 index 00000000..5922d15b --- /dev/null +++ b/pd/doc/5.reference/threshold~.pd @@ -0,0 +1,31 @@ +#N canvas 114 43 685 360 12; +#X msg 452 58 \; pd dsp 0; +#X msg 452 24 \; pd dsp 1; +#X obj 124 11 threshold~; +#X text 200 12 - TRIGGER FROM AUDIO SIGNAL; +#X obj 49 183 sig~; +#X obj 49 261 threshold~ 10 100 0 100; +#X text 303 255 Arguments:; +#X text 384 255 1 trigger threshold; +#X floatatom 49 156 5 0 0; +#X obj 49 289 print trigger; +#X obj 205 287 print rest; +#X text 385 271 2 trigger debounce time; +#X text 385 288 3 rest threshold; +#X text 384 303 4 rest debounce time; +#X text 486 342 updated for Pd version 0.32; +#X msg 205 209 1; +#X msg 235 210 0; +#X text 12 39 threshold~ monitors its input signal and outputs bangs when the signal exceeds a specified "trigger" value \, and also when the signal recedes below a "rest" value. You can specify debounce times in milliseconds \, for the threshold~ to wait after the two event types before triggering again.; +#X msg 131 151 set 0 2000 1 2000; +#X msg 131 174 set 10 100 0 100; +#X text 262 150 "set" to change the parameters; +#X text 268 210 zero or nonszero in inlet to set the state to "high" or "low". There is no debounce period after this.; +#X connect 4 0 5 0; +#X connect 5 0 9 0; +#X connect 5 1 10 0; +#X connect 8 0 4 0; +#X connect 15 0 5 1; +#X connect 16 0 5 1; +#X connect 18 0 5 0; +#X connect 19 0 5 0; diff --git a/pd/doc/5.reference/throw~.pd b/pd/doc/5.reference/throw~.pd new file mode 100644 index 00000000..c9a1ce9d --- /dev/null +++ b/pd/doc/5.reference/throw~.pd @@ -0,0 +1,34 @@ +#N canvas 80 120 664 313 12; +#X obj 97 159 throw~ signal1; +#X floatatom 268 211 0 0 0; +#X obj 90 193 sig~ 50; +#X obj 268 181 snapshot~; +#X obj 90 221 throw~ signal1; +#X obj 97 88 sig~ 25; +#X obj 268 135 catch~ signal1; +#X obj 35 17 throw~; +#X obj 97 17 catch~; +#X text 163 16 - summing signal bus and non-local connection; +#X obj 551 88 loadbang; +#X msg 561 110 \; pd dsp 1; +#X obj 551 151 metro 200; +#X text 33 48 Any number of throw~ objects can add into one catch~ object (but two catch~ objects cannot share the same name.); +#X floatatom 401 206 0 0 0; +#X obj 402 182 snapshot~; +#X obj 402 134 catch~ signal2; +#X msg 113 111 set signal2; +#X msg 114 135 set signal1; +#X text 75 252 You can redirect throw~ via a "set" message.; +#X text 410 283 updated for Pd version 0.33; +#X connect 2 0 4 0; +#X connect 3 0 1 0; +#X connect 5 0 0 0; +#X connect 6 0 3 0; +#X connect 10 0 11 0; +#X connect 10 0 12 0; +#X connect 12 0 3 0; +#X connect 12 0 15 0; +#X connect 15 0 14 0; +#X connect 16 0 15 0; +#X connect 17 0 0 0; +#X connect 18 0 0 0; diff --git a/pd/doc/5.reference/timer.pd b/pd/doc/5.reference/timer.pd new file mode 100644 index 00000000..0f7b3829 --- /dev/null +++ b/pd/doc/5.reference/timer.pd @@ -0,0 +1,15 @@ +#N canvas 440 273 514 280 10; +#X msg 60 146 bang; +#X msg 30 115 bang; +#X obj 30 175 timer; +#X obj 66 15 timer; +#X text 111 16 - measure logical time; +#X floatatom 30 206; +#X text 71 113 Click here to reset; +#X text 98 147 Click here to get elapsed logical time; +#X text 27 232 Output is in milliseconds; +#X text 6 51 The timer object measures elapsed logical time. Logical time moves forward as if all computation were instantaneous and as if all "delay" and "metro" objects were exact.; +#X text 319 260 updated for Pd version 0.25; +#X connect 0 0 2 1; +#X connect 1 0 2 0; +#X connect 2 0 5 0; diff --git a/pd/doc/5.reference/toggle.pd b/pd/doc/5.reference/toggle.pd new file mode 100644 index 00000000..5cb9ae75 --- /dev/null +++ b/pd/doc/5.reference/toggle.pd @@ -0,0 +1,273 @@ +#N canvas 205 140 489 376 10; +#X obj 1 1 cnv 8 100 60 empty empty toggle=tgl 20 20 1 18 -262144 -1109 +0; +#X text 21 296 (c) musil@iem.kug.ac.at; +#X text 63 309 IEM KUG; +#X text 115 41 click properties to; +#X text 103 52 modify geometry \, colors \, etc.; +#X obj 168 113 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 +-1 -1; +#X obj 168 179 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 +-1 -1; +#X obj 168 133 s foo6_rcv; +#X obj 168 159 r foo6_snd; +#X text 153 14 gui-toggle:; +#X obj 26 270 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X obj 10 117 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X msg 26 39 33; +#X obj 26 180 tgl 60 1 foo6_snd foo6_rcv big_toggle 63 20 194 13 -228992 +-4033 -34 1 1; +#X msg 42 79 1; +#X msg 49 99 0; +#X floatatom 26 249 4 0 0; +#X msg 33 59 -0.001; +#X msg 103 135 set 1; +#X msg 108 157 set 0; +#X obj 3 155 tgl 15 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 1 +; +#X obj 65 249 tgl 15 0 empty empty empty 8 -8 0 10 -262144 -1 -1 1 +1; +#X msg 95 114 set -0.23; +#X obj 189 93 tgl 15 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 188 179 tgl 15 0 empty empty empty 8 -8 0 10 -262144 -1 -1 1 +1; +#X msg 93 93 0 3 4.55; +#X msg 85 73 0.22 0 -5.44; +#X msg 189 113 set \$1; +#X text 96 222 UP- \, DOWN- \, LEFT- or RIGHT-key; +#X text 95 233 for moving selected gui-objects; +#N canvas 440 175 699 530 edit 0; +#X msg 47 151 \; foo6_rcv color \$1 \$2 \$3; +#X obj 47 126 pack 0 0 0; +#X obj 47 98 f; +#X msg 24 50 bang; +#X floatatom 63 48 3 0 29; +#X floatatom 79 68 3 0 29; +#X floatatom 112 84 3 0 29; +#X text 91 48 background; +#X text 106 68 front-color; +#X text 140 85 label-color; +#X obj 49 223 f; +#X msg 27 202 bang; +#X floatatom 65 201 3 63 88; +#X floatatom 100 223 3 0 37; +#X obj 49 246 pack 0 0; +#X text 127 223 y-label; +#X text 93 201 x-label; +#X msg 49 271 \; foo6_rcv label_pos \$1 \$2; +#X floatatom 505 55 3 8 75; +#X text 532 55 size; +#X msg 505 76 \; foo6_rcv size \$1; +#X obj 282 182 f; +#X msg 260 161 bang; +#X floatatom 298 160 3 -10 10; +#X floatatom 333 182 3 -10 10; +#X obj 282 205 pack 0 0; +#X msg 282 230 \; foo6_rcv delta \$1 \$2; +#X obj 296 301 f; +#X msg 274 280 bang; +#X floatatom 312 279 3 20 60; +#X floatatom 347 301 3 150 200; +#X obj 296 324 pack 0 0; +#X msg 296 349 \; foo6_rcv pos \$1 \$2; +#X text 326 160 x-delta; +#X text 360 182 y-delta; +#X text 340 279 x-position; +#X text 374 301 y-position; +#X obj 305 423 f; +#X msg 283 402 bang; +#X floatatom 321 401 3 -10 10; +#X floatatom 356 423 3 -10 10; +#X obj 305 446 pack 0 0; +#X text 383 423 y-label; +#X text 349 401 x-label; +#X msg 305 471 \; foo6_rcv delta \$1 \$2; +#X msg 499 140 \; foo6_rcv send foo6a_snd; +#X msg 499 178 \; foo6_rcv send foo6_snd; +#X msg 494 216 \; foo6_rcv receive foo6a_rcv; +#X msg 494 254 \; foo6a_rcv receive foo6_rcv; +#X msg 41 448 \; foo6_rcv label blabla; +#X msg 41 484 \; foo6_rcv label big_toggle; +#X obj 69 338 f; +#X msg 47 317 bang; +#X floatatom 85 316 3 0 2; +#X floatatom 120 338 3 4 36; +#X obj 69 361 pack 0 0; +#X msg 69 386 \; foo6_rcv label_font \$1 \$2; +#X text 113 316 font; +#X text 149 338 height; +#X floatatom 498 307 5 -200 200; +#X text 542 307 nonzero-value; +#X msg 498 331 \; foo6_rcv nonzero \$1; +#X msg 503 412 \; foo6_rcv init 0; +#X msg 510 479 \; foo6_rcv init 1; +#X text 524 393 no init; +#X text 500 461 init value on loadbang; +#X msg 285 47 back; +#X msg 285 67 front; +#X msg 285 87 label; +#X msg 247 47 bang; +#N canvas 15 207 606 448 RGB_____________ 0; +#X obj 97 56 inlet; +#X obj 262 53 inlet; +#X obj 339 55 inlet; +#X obj 405 56 inlet; +#X obj 97 270 bang; +#X msg 77 295 0; +#X msg 104 295 1; +#X obj 146 268 bang; +#X msg 132 295 0; +#X msg 160 295 1; +#X obj 196 269 bang; +#X msg 187 295 0; +#X msg 214 295 1; +#X obj 265 313 spigot; +#X obj 312 313 spigot; +#X obj 359 313 spigot; +#X obj 249 385 outlet; +#X text 93 33 select; +#X text 267 28 red; +#X text 337 30 green; +#X text 409 30 blue; +#X obj 405 102 t b f; +#X obj 339 160 +; +#X obj 339 185 t b f; +#X obj 339 216 +; +#X obj 296 385 outlet; +#X obj 343 385 outlet; +#X obj 28 180 loadbang; +#X obj 97 135 route back front label bang; +#X obj 343 362 f; +#X obj 296 361 f; +#X obj 249 361 f; +#X obj 262 79 * -65536; +#X obj 339 80 * -256; +#X obj 405 80 * -1; +#X obj 339 247 - 1; +#X obj 235 168 t b b b b; +#X connect 0 0 28 0; +#X connect 1 0 32 0; +#X connect 2 0 33 0; +#X connect 3 0 34 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 14 1; +#X connect 5 0 15 1; +#X connect 6 0 13 1; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 13 1; +#X connect 8 0 15 1; +#X connect 9 0 14 1; +#X connect 10 0 11 0; +#X connect 10 0 12 0; +#X connect 11 0 13 1; +#X connect 11 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 31 1; +#X connect 14 0 30 1; +#X connect 15 0 29 1; +#X connect 21 0 22 0; +#X connect 21 1 22 1; +#X connect 22 0 23 0; +#X connect 23 0 24 0; +#X connect 23 1 24 1; +#X connect 24 0 35 0; +#X connect 27 0 6 0; +#X connect 28 0 4 0; +#X connect 28 1 7 0; +#X connect 28 2 10 0; +#X connect 28 3 36 0; +#X connect 29 0 26 0; +#X connect 30 0 25 0; +#X connect 31 0 16 0; +#X connect 32 0 24 0; +#X connect 33 0 22 0; +#X connect 34 0 21 0; +#X connect 35 0 15 0; +#X connect 35 0 14 0; +#X connect 35 0 13 0; +#X connect 36 0 31 0; +#X connect 36 1 30 0; +#X connect 36 2 29 0; +#X connect 36 3 35 0; +#X restore 285 108 pd RGB_____________; +#X floatatom 327 77 3 0 255; +#X floatatom 370 77 3 0 255; +#X floatatom 413 78 3 0 255; +#X text 34 22 preset-colors; +#X text 296 19 RGB-colors; +#X text 327 59 red; +#X text 363 58 green; +#X text 411 58 blue; +#X connect 1 0 0 0; +#X connect 2 0 1 0; +#X connect 3 0 2 0; +#X connect 4 0 2 1; +#X connect 5 0 1 1; +#X connect 6 0 1 2; +#X connect 10 0 14 0; +#X connect 11 0 10 0; +#X connect 12 0 10 1; +#X connect 13 0 14 1; +#X connect 14 0 17 0; +#X connect 18 0 20 0; +#X connect 21 0 25 0; +#X connect 22 0 21 0; +#X connect 23 0 21 1; +#X connect 24 0 25 1; +#X connect 25 0 26 0; +#X connect 27 0 31 0; +#X connect 28 0 27 0; +#X connect 29 0 27 1; +#X connect 30 0 31 1; +#X connect 31 0 32 0; +#X connect 37 0 41 0; +#X connect 38 0 37 0; +#X connect 39 0 37 1; +#X connect 40 0 41 1; +#X connect 41 0 44 0; +#X connect 51 0 55 0; +#X connect 52 0 51 0; +#X connect 53 0 51 1; +#X connect 54 0 55 1; +#X connect 55 0 56 0; +#X connect 59 0 61 0; +#X connect 66 0 70 0; +#X connect 67 0 70 0; +#X connect 68 0 70 0; +#X connect 69 0 70 0; +#X connect 70 0 1 0; +#X connect 70 1 1 1; +#X connect 70 2 1 2; +#X connect 71 0 70 1; +#X connect 72 0 70 2; +#X connect 73 0 70 3; +#X restore 278 136 pd edit; +#X obj 222 276 tgl 15 0 bbb bbb empty 20 8 192 8 -262144 -1 -1 1 1 +; +#X text 191 320 updated for Pd version 0.35; +#X text 38 321 graz \, austria 2002; +#X obj 127 255 x_all_guis aaa bbb ccc ddd eee fff ggg hhh iii; +#X connect 5 0 7 0; +#X connect 8 0 6 0; +#X connect 8 0 24 0; +#X connect 11 0 13 0; +#X connect 12 0 13 0; +#X connect 13 0 16 0; +#X connect 13 0 21 0; +#X connect 14 0 13 0; +#X connect 15 0 13 0; +#X connect 16 0 10 0; +#X connect 17 0 13 0; +#X connect 18 0 13 0; +#X connect 19 0 13 0; +#X connect 20 0 13 0; +#X connect 22 0 13 0; +#X connect 23 0 27 0; +#X connect 25 0 13 0; +#X connect 26 0 13 0; +#X connect 27 0 7 0; diff --git a/pd/doc/5.reference/trigger.pd b/pd/doc/5.reference/trigger.pd new file mode 100644 index 00000000..a32d5def --- /dev/null +++ b/pd/doc/5.reference/trigger.pd @@ -0,0 +1,37 @@ +#N canvas 58 142 685 355 12; +#X msg 28 149 2.5; +#X msg 126 151 bang; +#X msg 68 150 23 64; +#X obj 28 242 print x1; +#X obj 112 242 print x2; +#X obj 196 240 print x3; +#X obj 43 26 trigger; +#X obj 286 241 print x4; +#X text 114 27 - sequence messages in right-to-left order; +#X text 417 331 updated for Pd version 0.33; +#X text 81 290 the above can be abbreviated as:; +#X msg 172 152 symbol dog; +#X text 39 59 The trigger object outputs its input from right to left +\, converting to the types indicated by its creation arguments. There +is also a "pointer" argument type (see the pointer object.); +#X obj 381 293 t f b l s a; +#X msg 466 167 dog my cats; +#X obj 466 199 trigger bang anything; +#X obj 374 242 print x5; +#X obj 466 240 print y1; +#X obj 552 242 print y2; +#X obj 28 202 trigger float bang symbol list anything; +#X text 464 122 "anythings" can only; +#X text 461 142 be converted to bang:; +#X connect 0 0 19 0; +#X connect 1 0 19 0; +#X connect 2 0 19 0; +#X connect 11 0 19 0; +#X connect 14 0 15 0; +#X connect 15 0 17 0; +#X connect 15 1 18 0; +#X connect 19 0 3 0; +#X connect 19 1 4 0; +#X connect 19 2 5 0; +#X connect 19 3 7 0; +#X connect 19 4 16 0; diff --git a/pd/doc/5.reference/unpack.pd b/pd/doc/5.reference/unpack.pd new file mode 100644 index 00000000..5f1a4120 --- /dev/null +++ b/pd/doc/5.reference/unpack.pd @@ -0,0 +1,28 @@ +#N canvas 234 84 730 277 12; +#X floatatom 80 180 0 0 0; +#X floatatom 205 180 0 0 0; +#X floatatom 243 180 0 0 0; +#X floatatom 46 180 0 0 0; +#X obj 117 180 print foo; +#X obj 133 243 pack; +#X text 51 242 See also; +#X obj 101 9 unpack; +#X text 164 8 - split a message to atoms; +#X text 196 139 <-- creation arguments specify the types of atoms expected +; +#X msg 46 102 1 2; +#X msg 85 102 3 4 shut; +#X msg 164 102 5 6 pick 7 8; +#X text 368 239 updated for Pd version 0.33; +#X obj 46 139 unpack 0 0 s 0 0; +#X text 25 36 unpack takes lists of atoms and distributes them to its +outlets. The creation arguments specify float (any number or the symbol +'f') \, pointer (symbol 'p') or symbol (symbol 's').; +#X connect 10 0 14 0; +#X connect 11 0 14 0; +#X connect 12 0 14 0; +#X connect 14 0 3 0; +#X connect 14 1 0 0; +#X connect 14 2 4 0; +#X connect 14 3 1 0; +#X connect 14 4 2 0; diff --git a/pd/doc/5.reference/until.pd b/pd/doc/5.reference/until.pd new file mode 100644 index 00000000..9da7a9ce --- /dev/null +++ b/pd/doc/5.reference/until.pd @@ -0,0 +1,25 @@ +#N canvas 142 97 410 273 10; +#X msg 65 116 bang; +#X obj 66 15 until; +#X text 114 16 - LOOP; +#X text 24 36 The until object's left inlet starts a loop in which it outputs "bang" until its right inlet gets a bang which stops it. If you start "until" with a number \, it iterates at most that number of times \, as in the Max "uzi" object.; +#X text 24 85 WARNING: if you bang an "until" which doesn't have a stopping mechanism \, Pd goes into an infinite loop!; +#X obj 65 168 until; +#X text 110 115 start; +#X msg 73 137 3; +#X text 109 138 start limited to 3 iterations; +#X obj 65 196 f; +#X obj 96 198 + 1; +#X obj 140 198 sel 0; +#X obj 65 240 print; +#X obj 96 219 mod 10; +#X text 225 247 updated for Pd version 0.28; +#X connect 0 0 5 0; +#X connect 5 0 9 0; +#X connect 7 0 5 0; +#X connect 9 0 10 0; +#X connect 9 0 12 0; +#X connect 10 0 13 0; +#X connect 11 0 5 1; +#X connect 13 0 9 1; +#X connect 13 0 11 0; diff --git a/pd/doc/5.reference/value.pd b/pd/doc/5.reference/value.pd new file mode 100644 index 00000000..66c457a3 --- /dev/null +++ b/pd/doc/5.reference/value.pd @@ -0,0 +1,30 @@ +#N canvas 257 45 500 281 12; +#X text 290 257 updated for Pd version 0.32; +#X floatatom 36 55 5 0 0; +#X text 50 249 abbreviation:; +#X text 79 10 -- nonlocal shared value (named variable); +#X floatatom 36 130 5 0 0; +#X msg 46 78 bang; +#X obj 21 10 value; +#X obj 36 105 value help-value1; +#X obj 149 248 v; +#X floatatom 163 55 5 0 0; +#X floatatom 163 130 5 0 0; +#X msg 173 78 bang; +#X obj 163 105 value help-value1; +#X floatatom 291 55 5 0 0; +#X floatatom 291 130 5 0 0; +#X msg 301 78 bang; +#X obj 291 105 value help-value2; +#X text 31 171 "Value" stores a numeric value which is shared between all values with the same name (which need not be in the same Pd window.); +#X text 345 54 numbers set the value; +#X text 349 77 bang retrieves it; +#X connect 1 0 7 0; +#X connect 5 0 7 0; +#X connect 7 0 4 0; +#X connect 9 0 12 0; +#X connect 11 0 12 0; +#X connect 12 0 10 0; +#X connect 13 0 16 0; +#X connect 15 0 16 0; +#X connect 16 0 14 0; diff --git a/pd/doc/5.reference/vcf~.pd b/pd/doc/5.reference/vcf~.pd new file mode 100644 index 00000000..45dde1d8 --- /dev/null +++ b/pd/doc/5.reference/vcf~.pd @@ -0,0 +1,35 @@ +#N canvas 0 0 644 422 12; +#X obj 257 200 sig~; +#X text 14 193 test signal; +#X text 100 341 amp in (db); +#X text 92 144 test frequency; +#X text 224 340 amp out (db); +#X obj 220 264 vcf~; +#X text 246 144 center frequency; +#X text 374 184 q; +#X floatatom 122 168 5 0 0; +#X floatatom 257 171 5 0 0; +#X obj 122 193 osc~; +#X floatatom 353 203 5 0 0; +#X obj 122 291 env~ 8192; +#X obj 220 290 env~ 8192; +#X floatatom 121 318 5 0 0; +#X floatatom 220 319 5 0 0; +#X obj 80 13 vcf~; +#X text 135 13 -- voltage-controlled bandpass filter; +#X text 26 395 see also:; +#X obj 115 394 bp~; +#X text 302 394 updated for Pd version 0.35; +#X text 12 45 vcf~ is like bp~ except that it takes an audio signal +to set center frequency \, which may thus change continuously in time. +The "Q" or filter sharpness is still only set by messages. More expensive +than bp~ in CPU time but more powerful too.; +#X connect 0 0 5 1; +#X connect 5 0 13 0; +#X connect 8 0 10 0; +#X connect 9 0 0 0; +#X connect 10 0 5 0; +#X connect 10 0 12 0; +#X connect 11 0 5 2; +#X connect 12 0 14 0; +#X connect 13 0 15 0; diff --git a/pd/doc/5.reference/vdial.pd b/pd/doc/5.reference/vdial.pd new file mode 100644 index 00000000..048c4c2b --- /dev/null +++ b/pd/doc/5.reference/vdial.pd @@ -0,0 +1,282 @@ +#N canvas 106 314 558 455 10; +#X obj 1 1 cnv 8 100 60 empty empty vdial=vdl 20 20 1 18 -262144 -1109 +0; +#X text 13 390 (c) musil@iem.kug.ac.at; +#X text 55 403 IEM KUG; +#X text 132 122 click properties to; +#X text 120 133 modify geometry \, colors \, etc.; +#X obj 159 261 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 +-1 -1; +#X obj 21 54 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X msg 41 319 \$1; +#X floatatom 41 341 4 0 0; +#X obj 41 363 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X obj 86 338 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 86 317 route 0 1 2 3 4 5 6 7 8 9; +#X msg 194 92 set \$1; +#X floatatom 194 71 4 0 9; +#X floatatom 44 54 4 0 9; +#X msg 91 41 7 0 -5.44; +#X msg 95 63 3 3 4.55; +#X obj 103 338 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 120 338 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 1 +1; +#X obj 137 338 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 154 338 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 171 338 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 188 338 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 205 338 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 222 338 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 239 338 tgl 12 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 +1; +#X obj 79 355 print; +#X floatatom 183 287 4 0 0; +#X msg 183 261 \$1; +#X msg 158 192 set \$1; +#X floatatom 158 171 4 0 9; +#X text 125 355 UP- \, DOWN- \, LEFT- or RIGHT-key; +#X text 124 366 for moving selected gui-objects; +#N canvas 230 247 699 530 edit 0; +#X obj 42 198 f; +#X msg 20 177 bang; +#X floatatom 58 176 3 63 156; +#X floatatom 93 198 3 -20 37; +#X obj 42 221 pack 0 0; +#X text 120 198 y-label; +#X text 86 176 x-label; +#X floatatom 270 187 3 8 50; +#X text 297 187 size; +#X obj 286 293 f; +#X msg 264 272 bang; +#X floatatom 302 271 3 -10 10; +#X floatatom 337 293 3 -10 10; +#X obj 286 316 pack 0 0; +#X obj 300 412 f; +#X msg 278 391 bang; +#X floatatom 316 390 3 20 60; +#X floatatom 351 412 3 100 200; +#X obj 300 435 pack 0 0; +#X text 330 271 x-delta; +#X text 364 293 y-delta; +#X text 344 390 x-position; +#X text 378 412 y-position; +#X obj 62 313 f; +#X msg 40 292 bang; +#X floatatom 78 291 3 0 2; +#X floatatom 113 313 3 4 36; +#X obj 62 336 pack 0 0; +#X text 106 291 font; +#X text 142 313 height; +#X text 504 293 no init; +#X text 475 348 init value on loadbang; +#X floatatom 482 228 5 2 20; +#X text 491 417 changing-behavior; +#X text 526 228 number of buttons; +#X obj 47 104 pack 0 0 0; +#X obj 47 76 f; +#X msg 24 28 bang; +#X floatatom 63 26 3 0 29; +#X floatatom 79 46 3 0 29; +#X floatatom 112 62 3 0 29; +#X text 91 26 background; +#X text 106 46 front-color; +#X text 140 63 label-color; +#X msg 285 25 back; +#X msg 285 45 front; +#X msg 285 65 label; +#X msg 247 25 bang; +#N canvas 15 207 606 448 RGB_____________ 0; +#X obj 97 56 inlet; +#X obj 262 53 inlet; +#X obj 339 55 inlet; +#X obj 405 56 inlet; +#X obj 97 270 bang; +#X msg 77 295 0; +#X msg 104 295 1; +#X obj 146 268 bang; +#X msg 132 295 0; +#X msg 160 295 1; +#X obj 196 269 bang; +#X msg 187 295 0; +#X msg 214 295 1; +#X obj 265 313 spigot; +#X obj 312 313 spigot; +#X obj 359 313 spigot; +#X obj 249 385 outlet; +#X text 93 33 select; +#X text 267 28 red; +#X text 337 30 green; +#X text 409 30 blue; +#X obj 405 102 t b f; +#X obj 339 160 +; +#X obj 339 185 t b f; +#X obj 339 216 +; +#X obj 296 385 outlet; +#X obj 343 385 outlet; +#X obj 28 180 loadbang; +#X obj 97 135 route back front label bang; +#X obj 343 362 f; +#X obj 296 361 f; +#X obj 249 361 f; +#X obj 262 79 * -65536; +#X obj 339 80 * -256; +#X obj 405 80 * -1; +#X obj 339 247 - 1; +#X obj 235 168 t b b b b; +#X connect 0 0 28 0; +#X connect 1 0 32 0; +#X connect 2 0 33 0; +#X connect 3 0 34 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 14 1; +#X connect 5 0 15 1; +#X connect 6 0 13 1; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 13 1; +#X connect 8 0 15 1; +#X connect 9 0 14 1; +#X connect 10 0 11 0; +#X connect 10 0 12 0; +#X connect 11 0 13 1; +#X connect 11 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 31 1; +#X connect 14 0 30 1; +#X connect 15 0 29 1; +#X connect 21 0 22 0; +#X connect 21 1 22 1; +#X connect 22 0 23 0; +#X connect 23 0 24 0; +#X connect 23 1 24 1; +#X connect 24 0 35 0; +#X connect 27 0 6 0; +#X connect 28 0 4 0; +#X connect 28 1 7 0; +#X connect 28 2 10 0; +#X connect 28 3 36 0; +#X connect 29 0 26 0; +#X connect 30 0 25 0; +#X connect 31 0 16 0; +#X connect 32 0 24 0; +#X connect 33 0 22 0; +#X connect 34 0 21 0; +#X connect 35 0 15 0; +#X connect 35 0 14 0; +#X connect 35 0 13 0; +#X connect 36 0 31 0; +#X connect 36 1 30 0; +#X connect 36 2 29 0; +#X connect 36 3 35 0; +#X restore 285 86 pd RGB_____________; +#X floatatom 327 55 3 0 255; +#X floatatom 370 55 3 0 255; +#X floatatom 413 56 3 0 255; +#X text 34 0 preset-colors; +#X text 296 -3 RGB-colors; +#X text 327 37 red; +#X text 363 36 green; +#X text 411 36 blue; +#X msg 47 125 \; foo12_rcv color \$1 \$2 \$3; +#X msg 42 246 \; foo12_rcv label_pos \$1 \$2; +#X msg 62 361 \; foo12_rcv label_font \$1 \$2; +#X msg 34 423 \; foo12_rcv label blabla; +#X msg 34 459 \; foo12_rcv label vdial_0_9; +#X msg 300 460 \; foo12_rcv pos \$1 \$2; +#X msg 286 341 \; foo12_rcv delta \$1 \$2; +#X msg 270 216 \; foo12_rcv size \$1; +#X msg 483 50 \; foo12_rcv send foo12a_snd; +#X msg 483 88 \; foo12_rcv send foo12_snd; +#X msg 482 171 \; foo12a_rcv receive foo12_rcv; +#X msg 483 133 \; foo12_rcv receive foo12a_rcv; +#X msg 482 254 \; foo12_rcv number \$1; +#X msg 483 312 \; foo12_rcv init 0; +#X msg 485 366 \; foo12_rcv init 1; +#X msg 490 436 \; foo12_rcv single_change; +#X msg 490 470 \; foo12_rcv double_change; +#X connect 0 0 4 0; +#X connect 1 0 0 0; +#X connect 2 0 0 1; +#X connect 3 0 4 1; +#X connect 4 0 58 0; +#X connect 7 0 64 0; +#X connect 9 0 13 0; +#X connect 10 0 9 0; +#X connect 11 0 9 1; +#X connect 12 0 13 1; +#X connect 13 0 63 0; +#X connect 14 0 18 0; +#X connect 15 0 14 0; +#X connect 16 0 14 1; +#X connect 17 0 18 1; +#X connect 18 0 62 0; +#X connect 23 0 27 0; +#X connect 24 0 23 0; +#X connect 25 0 23 1; +#X connect 26 0 27 1; +#X connect 27 0 59 0; +#X connect 32 0 69 0; +#X connect 35 0 57 0; +#X connect 36 0 35 0; +#X connect 37 0 36 0; +#X connect 38 0 36 1; +#X connect 39 0 35 1; +#X connect 40 0 35 2; +#X connect 44 0 48 0; +#X connect 45 0 48 0; +#X connect 46 0 48 0; +#X connect 47 0 48 0; +#X connect 48 0 35 0; +#X connect 48 1 35 1; +#X connect 48 2 35 2; +#X connect 49 0 48 1; +#X connect 50 0 48 2; +#X connect 51 0 48 3; +#X restore 267 222 pd edit; +#X obj 221 11 x_all_guis aaa bbb ccc ddd eee fff ggg hhh iii; +#X text 30 415 graz \, austria 2002; +#X text 223 401 updated for Pd version 0.35; +#X text 144 11 gui-vdial:; +#X obj 79 110 vdl 25 1 0 8 foo12_snd foo12_rcv vdial_0_9 20 -8 192 +10 -99865 -262144 -260818 0; +#X obj 352 36 vdl 15 1 0 8 iii iii empty 20 8 192 8 -262144 -1 -1 0 +; +#X obj 158 213 s foo12_rcv; +#X obj 159 239 r foo12_snd; +#X connect 6 0 38 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 11 0 10 0; +#X connect 11 1 17 0; +#X connect 11 2 18 0; +#X connect 11 3 19 0; +#X connect 11 4 20 0; +#X connect 11 5 21 0; +#X connect 11 6 22 0; +#X connect 11 7 23 0; +#X connect 11 8 24 0; +#X connect 11 9 25 0; +#X connect 12 0 38 0; +#X connect 13 0 12 0; +#X connect 14 0 38 0; +#X connect 15 0 38 0; +#X connect 16 0 38 0; +#X connect 28 0 27 0; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 38 0 11 0; +#X connect 38 0 26 0; +#X connect 38 0 7 0; +#X connect 41 0 5 0; +#X connect 41 0 28 0; diff --git a/pd/doc/5.reference/vd~.pd b/pd/doc/5.reference/vd~.pd new file mode 100644 index 00000000..5a36ff73 --- /dev/null +++ b/pd/doc/5.reference/vd~.pd @@ -0,0 +1,19 @@ +#N canvas 109 10 654 410 12; +#X floatatom 50 194 0 0 0; +#X obj 50 287 outlet~; +#X text 130 286 signal output (delayed signal); +#X obj 24 16 vd~; +#X text 60 9 reads a signal from a delay line at a variable delay time (4-point-interpolation); +#X obj 50 222 sig~; +#X text 99 219 signal input (delay time in ms); +#X obj 50 254 vd~ del_example; +#X text 193 252 creation argument: name of delay line; +#X text 31 51 vd~ implements a 4-point interpolating delay tap from a corresponding delwrite~ object. The delay in milliseconds of the tap is specified by the incoming signal.; +#X text 35 340 see also:; +#X obj 123 343 delwrite~; +#X obj 212 342 delread~; +#X text 354 373 updated for Pd version 0.33; +#X text 28 103 The delay time is always at least one sample and at most the length of the delay line (specified by hte delwrite~). In addition \, in case the delwrite~ runs later in the DSP loop than the vd~ \, the delay is constrained below by one vector length (64 samples.); +#X connect 0 0 5 0; +#X connect 5 0 7 0; +#X connect 7 0 1 0; diff --git a/pd/doc/5.reference/vslider.pd b/pd/doc/5.reference/vslider.pd new file mode 100644 index 00000000..69452ad6 --- /dev/null +++ b/pd/doc/5.reference/vslider.pd @@ -0,0 +1,302 @@ +#N canvas 147 201 617 416 10; +#X obj 1 1 cnv 8 100 60 empty empty vslider=vsl 20 20 1 18 -262144 +-1109 0; +#X floatatom 38 300 9 0 0; +#X msg 47 84 set \$1; +#X floatatom 38 43 7 0 0; +#X text 25 363 (c) musil@iem.kug.ac.at; +#X text 67 376 IEM KUG; +#X obj 38 324 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X obj 18 47 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X floatatom 47 63 7 0 0; +#X floatatom 116 324 9 0 0; +#X floatatom 106 42 7 0 0; +#X floatatom 147 113 7 0 0; +#X obj 75 249 ftom; +#X floatatom 75 271 9 0 0; +#X floatatom 111 244 9 0 0; +#X floatatom 185 266 9 0 0; +#X text 181 151 click properties to; +#X floatatom 75 112 9 0 0; +#X obj 75 134 mtof; +#X text 166 12 gui-vertical-slider:; +#X obj 38 162 vsl 15 101 100 300 0 1 foo3_snd foo3_rcv empty 8 -8 192 +10 -225280 -1109 -1 2500 1; +#X obj 75 168 vsl 15 73 55 3520 1 1 goo4_snd goo4_rcv log.freq. 11 +-6 192 10 -261681 -260818 -90881 0 1; +#X obj 185 244 r goo4_snd; +#X obj 147 133 s goo4_rcv; +#X text 202 65 (0.01 pixels); +#X text 57 99 ------------------------------------------; +#X text 57 286 --------------------------------------------; +#X text 169 162 modify geometry \, colors \, etc.; +#X obj 106 84 s foo3_rcv; +#X obj 116 302 r foo3_snd; +#X msg 106 63 set \$1; +#X text 188 44 shift-click & drag; +#X text 194 54 for fine-tuning; +#X text 119 192 UP- \, DOWN- \, LEFT- or RIGHT-key; +#X text 118 203 for moving selected gui-objects; +#N canvas 239 379 699 530 edit 0; +#X obj 37 233 f; +#X msg 15 212 bang; +#X floatatom 53 211 3 6 88; +#X floatatom 88 233 3 -20 37; +#X obj 37 256 pack 0 0; +#X text 115 233 y-label; +#X text 81 211 x-label; +#X obj 287 271 f; +#X msg 265 250 bang; +#X floatatom 303 249 3 -10 10; +#X floatatom 338 271 3 -10 10; +#X obj 287 294 pack 0 0; +#X obj 299 381 f; +#X msg 277 360 bang; +#X floatatom 315 359 3 20 90; +#X floatatom 350 381 3 150 200; +#X obj 299 404 pack 0 0; +#X text 331 249 x-delta; +#X text 365 271 y-delta; +#X text 343 359 x-position; +#X text 377 381 y-position; +#X obj 57 348 f; +#X msg 35 327 bang; +#X floatatom 73 326 3 0 2; +#X floatatom 108 348 3 4 36; +#X obj 57 371 pack 0 0; +#X text 101 326 font; +#X text 137 348 height; +#X floatatom 476 188 1 0 1; +#X text 523 401 no init; +#X text 493 453 init value on loadbang; +#X text 520 188 steady; +#X obj 486 291 f; +#X msg 464 270 bang; +#X floatatom 502 269 4 55 440; +#X floatatom 537 291 6 440 3520; +#X obj 486 314 pack 0 0; +#X text 269 469 linear / logarithmical; +#X msg 47 158 \; goo4_rcv color \$1 \$2 \$3; +#X msg 37 281 \; goo4_rcv label_pos \$1 \$2; +#X msg 57 396 \; goo4_rcv label_font \$1 \$2; +#X msg 40 442 \; goo4_rcv label blabla; +#X msg 269 487 \; goo4_rcv lin; +#X msg 363 486 \; goo4_rcv log; +#X msg 299 429 \; goo4_rcv pos \$1 \$2; +#X msg 287 319 \; goo4_rcv delta \$1 \$2; +#X msg 475 21 \; goo4_rcv send goo4a_snd; +#X msg 475 59 \; goo4_rcv send goo4_snd; +#X msg 476 105 \; goo4_rcv receive goo4a_rcv; +#X msg 476 143 \; goo4a_rcv receive goo4_rcv; +#X msg 486 339 \; goo4_rcv range \$1 \$2; +#X msg 502 420 \; goo4_rcv init 0; +#X msg 503 471 \; goo4_rcv init 1; +#X text 539 270 bottom-range-bound; +#X text 586 292 top-range-bound; +#X obj 286 160 f; +#X msg 264 139 bang; +#X floatatom 302 138 3 4 55; +#X floatatom 337 160 3 15 73; +#X obj 286 183 pack 0 0; +#X msg 286 208 \; goo4_rcv size \$1 \$2; +#X text 330 138 width; +#X text 368 161 height; +#X msg 41 478 \; goo4_rcv label log.freq.; +#X msg 476 212 \; goo4_rcv steady \$1; +#X obj 47 116 pack 0 0 0; +#X obj 47 88 f; +#X msg 24 40 bang; +#X floatatom 63 38 3 0 29; +#X floatatom 79 58 3 0 29; +#X floatatom 112 74 3 0 29; +#X text 91 38 background; +#X text 106 58 front-color; +#X text 140 75 label-color; +#X msg 285 37 back; +#X msg 285 57 front; +#X msg 285 77 label; +#X msg 247 37 bang; +#N canvas 15 207 606 448 RGB_____________ 0; +#X obj 97 56 inlet; +#X obj 262 53 inlet; +#X obj 339 55 inlet; +#X obj 405 56 inlet; +#X obj 97 270 bang; +#X msg 77 295 0; +#X msg 104 295 1; +#X obj 146 268 bang; +#X msg 132 295 0; +#X msg 160 295 1; +#X obj 196 269 bang; +#X msg 187 295 0; +#X msg 214 295 1; +#X obj 265 313 spigot; +#X obj 312 313 spigot; +#X obj 359 313 spigot; +#X obj 249 385 outlet; +#X text 93 33 select; +#X text 267 28 red; +#X text 337 30 green; +#X text 409 30 blue; +#X obj 405 102 t b f; +#X obj 339 160 +; +#X obj 339 185 t b f; +#X obj 339 216 +; +#X obj 296 385 outlet; +#X obj 343 385 outlet; +#X obj 28 180 loadbang; +#X obj 97 135 route back front label bang; +#X obj 343 362 f; +#X obj 296 361 f; +#X obj 249 361 f; +#X obj 262 79 * -65536; +#X obj 339 80 * -256; +#X obj 405 80 * -1; +#X obj 339 247 - 1; +#X obj 235 168 t b b b b; +#X connect 0 0 28 0; +#X connect 1 0 32 0; +#X connect 2 0 33 0; +#X connect 3 0 34 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 14 1; +#X connect 5 0 15 1; +#X connect 6 0 13 1; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 13 1; +#X connect 8 0 15 1; +#X connect 9 0 14 1; +#X connect 10 0 11 0; +#X connect 10 0 12 0; +#X connect 11 0 13 1; +#X connect 11 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 31 1; +#X connect 14 0 30 1; +#X connect 15 0 29 1; +#X connect 21 0 22 0; +#X connect 21 1 22 1; +#X connect 22 0 23 0; +#X connect 23 0 24 0; +#X connect 23 1 24 1; +#X connect 24 0 35 0; +#X connect 27 0 6 0; +#X connect 28 0 4 0; +#X connect 28 1 7 0; +#X connect 28 2 10 0; +#X connect 28 3 36 0; +#X connect 29 0 26 0; +#X connect 30 0 25 0; +#X connect 31 0 16 0; +#X connect 32 0 24 0; +#X connect 33 0 22 0; +#X connect 34 0 21 0; +#X connect 35 0 15 0; +#X connect 35 0 14 0; +#X connect 35 0 13 0; +#X connect 36 0 31 0; +#X connect 36 1 30 0; +#X connect 36 2 29 0; +#X connect 36 3 35 0; +#X restore 285 98 pd RGB_____________; +#X floatatom 327 67 3 0 255; +#X floatatom 370 67 3 0 255; +#X floatatom 413 68 3 0 255; +#X text 34 12 preset-colors; +#X text 296 9 RGB-colors; +#X text 327 49 red; +#X text 363 48 green; +#X text 411 48 blue; +#X connect 0 0 4 0; +#X connect 1 0 0 0; +#X connect 2 0 0 1; +#X connect 3 0 4 1; +#X connect 4 0 39 0; +#X connect 7 0 11 0; +#X connect 8 0 7 0; +#X connect 9 0 7 1; +#X connect 10 0 11 1; +#X connect 11 0 45 0; +#X connect 12 0 16 0; +#X connect 13 0 12 0; +#X connect 14 0 12 1; +#X connect 15 0 16 1; +#X connect 16 0 44 0; +#X connect 21 0 25 0; +#X connect 22 0 21 0; +#X connect 23 0 21 1; +#X connect 24 0 25 1; +#X connect 25 0 40 0; +#X connect 28 0 64 0; +#X connect 32 0 36 0; +#X connect 33 0 32 0; +#X connect 34 0 32 1; +#X connect 35 0 36 1; +#X connect 36 0 50 0; +#X connect 55 0 59 0; +#X connect 56 0 55 0; +#X connect 57 0 55 1; +#X connect 58 0 59 1; +#X connect 59 0 60 0; +#X connect 65 0 38 0; +#X connect 66 0 65 0; +#X connect 67 0 66 0; +#X connect 68 0 66 1; +#X connect 69 0 65 1; +#X connect 70 0 65 2; +#X connect 74 0 78 0; +#X connect 75 0 78 0; +#X connect 76 0 78 0; +#X connect 77 0 78 0; +#X connect 78 0 65 0; +#X connect 78 1 65 1; +#X connect 78 2 65 2; +#X connect 79 0 78 1; +#X connect 80 0 78 2; +#X connect 81 0 78 3; +#X restore 327 48 pd edit; +#X obj 61 345 print; +#N canvas 276 200 290 224 once 0; +#X obj 38 47 t b b f; +#X msg 56 85 1; +#X obj 31 108 f 0; +#X obj 31 131 pack 0 0; +#X obj 31 156 route 0; +#X obj 38 24 inlet; +#X obj 31 180 outlet; +#X connect 0 0 1 0; +#X connect 0 1 2 0; +#X connect 0 2 3 1; +#X connect 1 0 2 1; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 4 0 6 0; +#X connect 5 0 0 0; +#X restore 61 322 pd once; +#X obj 377 110 vsl 15 128 0 127 0 0 ccc ccc empty 20 8 192 8 -262144 +-1 -1 4200 1; +#X obj 249 87 x_all_guis aaa bbb ccc ddd eee fff ggg hhh iii; +#X text 218 387 updated for Pd version 0.35; +#X text 42 388 graz \, austria 2002; +#X connect 1 0 6 0; +#X connect 2 0 20 0; +#X connect 3 0 20 0; +#X connect 7 0 20 0; +#X connect 8 0 2 0; +#X connect 10 0 30 0; +#X connect 11 0 23 0; +#X connect 12 0 13 0; +#X connect 17 0 18 0; +#X connect 18 0 21 0; +#X connect 20 0 1 0; +#X connect 20 0 37 0; +#X connect 21 0 14 0; +#X connect 21 0 12 0; +#X connect 22 0 15 0; +#X connect 29 0 9 0; +#X connect 30 0 28 0; +#X connect 37 0 36 0; diff --git a/pd/doc/5.reference/vu.pd b/pd/doc/5.reference/vu.pd new file mode 100644 index 00000000..3c94ba52 --- /dev/null +++ b/pd/doc/5.reference/vu.pd @@ -0,0 +1,247 @@ +#N canvas 171 210 549 418 10; +#X obj 1 1 cnv 8 100 60 empty empty vu 20 20 1 18 -262144 -1109 0; +#X text 19 363 (c) musil@iem.kug.ac.at; +#X text 61 376 IEM KUG; +#X floatatom 177 129 7 -110 20; +#X text 202 41 click properties to; +#X text 190 52 modify geometry \, colors \, etc.; +#X text 49 13 gui-vu-meter-display:; +#X obj 99 39 tgl 15 1 empty empty empty 8 -8 0 10 -262144 -1 -1 1 1 +; +#X obj 12 179 vu 16 120 foo7_rcv vu-meter 60 0 64 10 -1 -355 1 0; +#X floatatom 11 332 6 0 0; +#X floatatom 22 310 6 0 0; +#X text 75 309 dB; +#X text 63 333 dB; +#X text 71 128 dB; +#X text 80 148 dB; +#X text 103 146 peak-level; +#X text 101 125 rms-level; +#X text 96 308 peak-level; +#X text 83 332 rms-level; +#X text 108 99 <list> of rms \, peak; +#X obj 177 231 s foo7_rcv; +#X obj 177 211 pack 0 0; +#X floatatom 195 150 7 -110 20; +#X obj 195 191 t b f; +#X text 236 129 dB; +#X text 255 151 dB; +#X text 71 258 UP- \, DOWN- \, LEFT- or RIGHT-key; +#X text 70 269 for moving selected gui-objects; +#X floatatom 11 128 7 -110 20; +#X floatatom 22 149 7 -110 20; +#N canvas 236 62 699 530 edit 0; +#X obj 37 222 f; +#X msg 15 201 bang; +#X floatatom 53 200 3 50 88; +#X floatatom 88 222 3 0 37; +#X obj 37 245 pack 0 0; +#X text 115 222 y-label; +#X text 81 200 x-label; +#X obj 292 313 f; +#X msg 270 292 bang; +#X floatatom 308 291 3 -10 10; +#X floatatom 343 313 3 -10 10; +#X obj 292 336 pack 0 0; +#X obj 304 435 f; +#X msg 282 414 bang; +#X floatatom 320 413 3 20 140; +#X floatatom 355 435 3 150 200; +#X obj 304 458 pack 0 0; +#X text 336 291 x-delta; +#X text 370 313 y-delta; +#X text 348 413 x-position; +#X text 382 435 y-position; +#X obj 57 337 f; +#X msg 35 316 bang; +#X floatatom 73 315 3 0 2; +#X floatatom 108 337 3 8 36; +#X obj 57 360 pack 0 0; +#X text 101 315 font; +#X text 137 337 height; +#X floatatom 471 106 1 0 1; +#X msg 52 131 \; foo7_rcv color \$1 \$2; +#X msg 37 270 \; foo7_rcv label_pos \$1 \$2; +#X msg 57 386 \; foo7_rcv label_font \$1 \$2; +#X msg 37 427 \; foo7_rcv label blabla; +#X msg 292 361 \; foo7_rcv delta \$1 \$2; +#X msg 304 483 \; foo7_rcv pos \$1 \$2; +#X msg 469 23 \; foo7_rcv receive foo7a_rcv; +#X msg 469 60 \; foo7a_rcv receive foo7_rcv; +#X text 492 106 display scale; +#X msg 471 132 \; foo7_rcv scale \$1; +#X obj 279 193 f; +#X msg 257 172 bang; +#X floatatom 295 171 3 8 50; +#X floatatom 330 193 3 110 200; +#X obj 279 216 pack 0 0; +#X text 323 171 width; +#X text 357 193 height; +#X msg 279 241 \; foo7_rcv size \$1 \$2; +#X msg 37 463 \; foo7_rcv label vu-meter; +#X obj 52 79 f; +#X msg 29 31 bang; +#X floatatom 68 29 3 0 29; +#X floatatom 103 47 3 0 29; +#X text 96 29 background; +#X text 131 48 label-color; +#X msg 290 25 back; +#X msg 290 49 label; +#X msg 252 25 bang; +#N canvas 15 207 606 448 RGB_____________ 0; +#X obj 97 56 inlet; +#X obj 262 53 inlet; +#X obj 339 55 inlet; +#X obj 405 56 inlet; +#X obj 97 270 bang; +#X msg 77 295 0; +#X msg 104 295 1; +#X obj 146 268 bang; +#X msg 132 295 0; +#X msg 160 295 1; +#X obj 265 313 spigot; +#X obj 312 313 spigot; +#X obj 249 385 outlet; +#X text 93 33 select; +#X text 267 28 red; +#X text 337 30 green; +#X text 409 30 blue; +#X obj 405 102 t b f; +#X obj 339 160 +; +#X obj 339 185 t b f; +#X obj 339 216 +; +#X obj 296 385 outlet; +#X obj 28 180 loadbang; +#X obj 296 361 f; +#X obj 249 361 f; +#X obj 262 79 * -65536; +#X obj 339 80 * -256; +#X obj 405 80 * -1; +#X obj 339 247 - 1; +#X obj 97 135 route back label bang; +#X obj 235 168 t b b b; +#X connect 0 0 29 0; +#X connect 1 0 25 0; +#X connect 2 0 26 0; +#X connect 3 0 27 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 11 1; +#X connect 6 0 10 1; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 10 1; +#X connect 9 0 11 1; +#X connect 10 0 24 1; +#X connect 11 0 23 1; +#X connect 17 0 18 0; +#X connect 17 1 18 1; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 19 1 20 1; +#X connect 20 0 28 0; +#X connect 22 0 6 0; +#X connect 23 0 21 0; +#X connect 24 0 12 0; +#X connect 25 0 20 0; +#X connect 26 0 18 0; +#X connect 27 0 17 0; +#X connect 28 0 11 0; +#X connect 28 0 10 0; +#X connect 29 0 4 0; +#X connect 29 1 7 0; +#X connect 29 2 30 0; +#X connect 30 0 24 0; +#X connect 30 1 23 0; +#X connect 30 2 28 0; +#X restore 290 86 pd RGB_____________; +#X floatatom 332 55 3 0 255; +#X floatatom 375 55 3 0 255; +#X floatatom 418 56 3 0 255; +#X text 39 3 preset-colors; +#X text 301 0 RGB-colors; +#X text 332 37 red; +#X text 368 36 green; +#X text 416 36 blue; +#X obj 52 104 pack 0 0; +#X connect 0 0 4 0; +#X connect 1 0 0 0; +#X connect 2 0 0 1; +#X connect 3 0 4 1; +#X connect 4 0 30 0; +#X connect 7 0 11 0; +#X connect 8 0 7 0; +#X connect 9 0 7 1; +#X connect 10 0 11 1; +#X connect 11 0 33 0; +#X connect 12 0 16 0; +#X connect 13 0 12 0; +#X connect 14 0 12 1; +#X connect 15 0 16 1; +#X connect 16 0 34 0; +#X connect 21 0 25 0; +#X connect 22 0 21 0; +#X connect 23 0 21 1; +#X connect 24 0 25 1; +#X connect 25 0 31 0; +#X connect 28 0 38 0; +#X connect 39 0 43 0; +#X connect 40 0 39 0; +#X connect 41 0 39 1; +#X connect 42 0 43 1; +#X connect 43 0 46 0; +#X connect 48 0 66 0; +#X connect 49 0 48 0; +#X connect 50 0 48 1; +#X connect 51 0 66 1; +#X connect 54 0 57 0; +#X connect 55 0 57 0; +#X connect 56 0 57 0; +#X connect 57 0 66 0; +#X connect 57 1 66 1; +#X connect 58 0 57 1; +#X connect 59 0 57 2; +#X connect 60 0 57 3; +#X connect 66 0 29 0; +#X restore 313 188 pd edit; +#N canvas 147 336 290 278 source 0; +#X obj 40 95 random 102; +#X obj 40 171 - 101; +#X obj 40 205 pack 0 0; +#X obj 40 45 metro 300; +#X obj 40 69 t b b; +#X obj 133 95 random 20; +#X obj 40 117 t f f; +#X obj 91 147 +; +#X obj 91 172 - 101; +#X obj 40 21 inlet; +#X obj 40 230 outlet; +#X connect 0 0 6 0; +#X connect 1 0 2 0; +#X connect 2 0 10 0; +#X connect 3 0 4 0; +#X connect 4 0 0 0; +#X connect 4 1 5 0; +#X connect 5 0 7 1; +#X connect 6 0 1 0; +#X connect 6 1 7 0; +#X connect 7 0 8 0; +#X connect 8 0 2 1; +#X connect 9 0 3 0; +#X restore 99 62 pd source; +#X obj 263 94 s fff; +#X obj 186 302 x_all_guis aaa bbb ccc ddd eee fff ggg hhh iii; +#X text 210 386 updated for Pd version 0.35; +#X text 36 388 graz \, austria 2002; +#X connect 3 0 21 0; +#X connect 7 0 31 0; +#X connect 8 0 9 0; +#X connect 8 1 10 0; +#X connect 21 0 20 0; +#X connect 22 0 23 0; +#X connect 23 0 21 0; +#X connect 23 1 21 1; +#X connect 28 0 8 0; +#X connect 29 0 8 1; +#X connect 31 0 8 0; +#X connect 31 0 32 0; diff --git a/pd/doc/5.reference/wrap~.pd b/pd/doc/5.reference/wrap~.pd new file mode 100644 index 00000000..81681f30 --- /dev/null +++ b/pd/doc/5.reference/wrap~.pd @@ -0,0 +1,26 @@ +#N canvas 182 132 703 319 12; +#X obj 58 220 metro 500; +#X obj 58 195 r metro; +#X msg 575 106 \; metro 0; +#X msg 574 48 \; pd dsp 1 \; metro 1; +#X floatatom 42 121 0 0 0; +#X floatatom 42 277 0 0 0; +#X text 443 271 updated for Pd version 0.33; +#X obj 574 21 loadbang; +#X obj 42 244 snapshot~; +#X obj 42 147 sig~; +#X obj 36 16 wrap~; +#X text 93 16 - remainder modulo 1; +#X text 18 45 wrap~ gives the difference between the input and the +largest integer not exceeding it (for positive numbers this is the +fractional part).; +#X obj 42 171 wrap~; +#X text 127 123 <-- shift-drag here to get non-integers to try; +#X connect 0 0 8 0; +#X connect 1 0 0 0; +#X connect 1 0 0 0; +#X connect 4 0 9 0; +#X connect 7 0 3 0; +#X connect 8 0 5 0; +#X connect 9 0 13 0; +#X connect 13 0 8 0; diff --git a/pd/doc/5.reference/writesf~.pd b/pd/doc/5.reference/writesf~.pd new file mode 100644 index 00000000..053e0dee --- /dev/null +++ b/pd/doc/5.reference/writesf~.pd @@ -0,0 +1,27 @@ +#N canvas 388 177 450 290 10; +#X msg 365 19 \; pd dsp 1; +#X msg 141 133 print; +#X msg 56 50 bang; +#X msg 140 85 start; +#X msg 142 111 stop; +#X obj 189 133 osc~ 441; +#X obj 56 81 del 1000; +#X text 41 9 writesf~ -- write audio signals to a soundfile; +#X text 269 276 updated for Pd version 0.32.; +#X text 205 158 creation argument is number of channels; +#X text 206 169 (1 to 64).; +#X text 250 58 create a new soundfile; +#X text 181 85 start streaming audio; +#X text 176 111 stop streaming audio; +#X text 27 186 writesf~ creates a subthread whose task is to write audio streams to disk. You need not provide any access time between "open" and "start" \, but between "stop" and the next "open" you must give the object time to flush all the output to disk.; +#X text 27 240 writesf~ works best with pd in "realtime" mode (pd -rt). Available for linux only at the moment...; +#X obj 132 158 writesf~ 2; +#X msg 136 60 open /tmp/foo.wav; +#X connect 1 0 16 0; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 3 0 16 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 4 0; +#X connect 17 0 16 0; diff --git a/pd/doc/5.reference/x_all_guis.pd b/pd/doc/5.reference/x_all_guis.pd new file mode 100644 index 00000000..3c18031b --- /dev/null +++ b/pd/doc/5.reference/x_all_guis.pd @@ -0,0 +1,20 @@ +#N canvas 209 342 290 271 10; +#X obj 23 31 bng 15 250 50 532480 \$1 \$1 empty 20 8 192 8 -262144 +-1 -1; +#X obj 23 63 tgl 15 1.06496e+06 \$2 \$2 empty 20 8 192 8 -262144 -1 +-1 0 1; +#X obj 22 95 vsl 15 128 0 127 0 1.59744e+06 \$3 \$3 empty 20 8 192 +8 -262144 -1 -1 0 1; +#X obj 65 30 hsl 128 15 0 127 0 2.12992e+06 \$4 \$4 empty 20 8 192 +8 -262144 -1 -1 0 1; +#X obj 63 63 hdl 15 1 2.6624e+06 8 \$5 \$5 empty 20 8 192 8 -262144 +-1 -1 0; +#X obj 62 99 vu 15 120 \$6 empty 35 8 64 8 -66577 -1 1 49152; +#X obj 115 99 cnv 15 100 60 \$7 \$7 \$7 20 12 917696 14 -233017 -66577 +3.72736e+06; +#X obj 41 308 inlet; +#X obj 41 334 outlet; +#X obj 227 30 vdl 15 1 4.79232e+06 8 \$9 \$9 empty 20 8 192 8 -262144 +-1 -1 0; +#X obj 116 176 nbx 5 14 -1e+37 1e+37 0 4.25984e+06 \$8 \$8 empty 45 +7 192 10 -262144 -1 -1 0; diff --git a/pd/doc/6.externs/0.README.txt b/pd/doc/6.externs/0.README.txt new file mode 100644 index 00000000..3b130116 --- /dev/null +++ b/pd/doc/6.externs/0.README.txt @@ -0,0 +1,9 @@ +EXTERNAL OBJECTS in Pd. + +Here are the sources for three simple external objects in Pd. +To compile, type "make pd_linux", "nmake pd_nt", "make pd_irix5" or "make +pd_irix6". + +The objects "foo1" and "foo2" are intended as very simple control objects, and +"dspobj" is a tilde object. + diff --git a/pd/doc/6.externs/dspobj~.c b/pd/doc/6.externs/dspobj~.c new file mode 100644 index 00000000..a8841f21 --- /dev/null +++ b/pd/doc/6.externs/dspobj~.c @@ -0,0 +1,49 @@ +#include "m_pd.h" +#ifdef NT +#pragma warning( disable : 4244 ) +#pragma warning( disable : 4305 ) +#endif + +/* ------------------------ dspobj~ ----------------------------- */ + +/* tilde object to take absolute value. */ + +static t_class *dspobj_class; + +typedef struct _dspobj +{ + t_object x_obj; +} t_dspobj; + +static t_int *dspobj_perform(t_int *w) +{ + t_float *in = (t_float *)(w[1]); + t_float *out = (t_float *)(w[2]); + int n = (int)(w[3]); + while (n--) + { + float f = *(in++); + *out++ = (f > 0 ? f : -f); + } + return (w+4); +} + +static void dspobj_dsp(t_dspobj *x, t_signal **sp) +{ + dsp_add(dspobj_perform, 3, sp[0]->s_vec, sp[1]->s_vec, sp[0]->s_n); +} + +static void *dspobj_new(void) +{ + t_dspobj *x = (t_dspobj *)pd_new(dspobj_class); + outlet_new(&x->x_obj, gensym("signal")); + return (x); +} + +void dspobj_tilde_setup(void) +{ + dspobj_class = class_new(gensym("dspobj~"), (t_newmethod)dspobj_new, 0, + sizeof(t_dspobj), 0, A_DEFFLOAT, 0); + class_addmethod(dspobj_class, nullfn, gensym("signal"), 0); + class_addmethod(dspobj_class, (t_method)dspobj_dsp, gensym("dsp"), 0); +} diff --git a/pd/doc/6.externs/foo1.c b/pd/doc/6.externs/foo1.c new file mode 100644 index 00000000..48d0d344 --- /dev/null +++ b/pd/doc/6.externs/foo1.c @@ -0,0 +1,37 @@ +/* code for foo1 pd class */ + +#include "m_pd.h" + +typedef struct foo1 +{ + t_object t_ob; +} t_foo1; + +void foo1_float(t_foo1 *x, t_floatarg f) +{ + post("foo1: %f", f); +} + +void foo1_rats(t_foo1 *x) +{ + post("foo1: rats"); +} + +t_class *foo1_class; + +void *foo1_new(void) +{ + t_foo1 *x = (t_foo1 *)pd_new(foo1_class); + post("foo1_new"); + return (void *)x; +} + +void foo1_setup(void) +{ + post("foo1_setup"); + foo1_class = class_new(gensym("foo1"), (t_newmethod)foo1_new, 0, + sizeof(t_foo1), 0, 0); + class_addmethod(foo1_class, (t_method)foo1_rats, gensym("rats"), 0); + class_addfloat(foo1_class, foo1_float); +} + diff --git a/pd/doc/6.externs/foo2.c b/pd/doc/6.externs/foo2.c new file mode 100644 index 00000000..e68ed996 --- /dev/null +++ b/pd/doc/6.externs/foo2.c @@ -0,0 +1,49 @@ +/* code for foo2 pd class */ + +#include "m_pd.h" + +typedef struct foo2 +{ + t_object t_ob; +} t_foo2; + +void foo2_float(t_foo2 *x, t_floatarg f) +{ + post("foo2: %f", f); +} + +void foo2_rats(t_foo2 *x) +{ + post("foo2: rats"); +} + +void foo2_ft1(t_foo2 *x, t_floatarg g) +{ + post("ft1: %f", g); +} + +void foo2_free(void) +{ + post("foo2_free"); +} + +t_class *foo2_class; + +void *foo2_new(void) +{ + t_foo2 *x = (t_foo2 *)pd_new(foo2_class); + inlet_new(&x->t_ob, &x->t_ob.ob_pd, gensym("float"), gensym("ft1")); + post("foo2_new"); + return (void *)x; +} + +void foo2_setup(void) +{ + post("foo2_setup"); + foo2_class = class_new(gensym("foo2"), (t_newmethod)foo2_new, + (t_method)foo2_free, sizeof(t_foo2), 0, 0); + class_addmethod(foo2_class, (t_method)foo2_rats, gensym("rats"), 0); + class_addmethod(foo2_class, (t_method)foo2_ft1, gensym("ft1"), A_FLOAT, 0); + class_addfloat(foo2_class, foo2_float); +} + diff --git a/pd/doc/6.externs/makefile b/pd/doc/6.externs/makefile new file mode 100644 index 00000000..f807ba0b --- /dev/null +++ b/pd/doc/6.externs/makefile @@ -0,0 +1,75 @@ +current: + echo make pd_linux, pd_nt, pd_irix5, or pd_irix6 + +clean: ; rm -f *.pd_linux *.o + +# ----------------------- NT ----------------------- + +pd_nt: foo1.dll foo2.dll dspobj~.dll + +.SUFFIXES: .dll + +PDNTCFLAGS = /W3 /WX /DNT /DPD /nologo +VC="C:\Program Files\Microsoft Visual Studio\Vc98" + +PDNTINCLUDE = /I. /I\tcl\include /I\ftp\pd\src /I$(VC)\include + +PDNTLDIR = $(VC)\lib +PDNTLIB = $(PDNTLDIR)\libc.lib \ + $(PDNTLDIR)\oldnames.lib \ + $(PDNTLDIR)\kernel32.lib \ + \ftp\pd\bin\pd.lib + +.c.dll: + cl $(PDNTCFLAGS) $(PDNTINCLUDE) /c $*.c + link /dll /export:$*_setup $*.obj $(PDNTLIB) + +# ----------------------- IRIX 5.x ----------------------- + +pd_irix5: foo1.pd_irix5 foo2.pd_irix5 dspobj~.pd_irix5 + +.SUFFIXES: .pd_irix5 + +SGICFLAGS5 = -o32 -DPD -DUNIX -DIRIX -O2 + + +SGIINCLUDE = -I../../src/ + +.c.pd_irix5: + cc $(SGICFLAGS5) $(SGIINCLUDE) -o $*.o -c $*.c + ld -elf -shared -rdata_shared -o $*.pd_irix5 $*.o + rm $*.o + +# ----------------------- IRIX 6.x ----------------------- + +pd_irix6: foo1.pd_irix6 foo2.pd_irix6 dspobj~.pd_irix6 + +.SUFFIXES: .pd_irix6 + +SGICFLAGS6 = -n32 -DPD -DUNIX -DIRIX -DN32 -woff 1080,1064,1185 \ + -OPT:roundoff=3 -OPT:IEEE_arithmetic=3 -OPT:cray_ivdep=true \ + -Ofast=ip32 + +.c.pd_irix6: + cc $(SGICFLAGS6) $(SGIINCLUDE) -o $*.o -c $*.c + ld -IPA -n32 -shared -rdata_shared -o $*.pd_irix6 $*.o + rm $*.o + +# ----------------------- LINUX i386 ----------------------- + +pd_linux: foo1.pd_linux foo2.pd_linux dspobj~.pd_linux + +.SUFFIXES: .pd_linux + +LINUXCFLAGS = -DPD -O2 -funroll-loops -fomit-frame-pointer \ + -Wall -W -Wshadow -Wstrict-prototypes -Werror \ + -Wno-unused -Wno-parentheses -Wno-switch + +LINUXINCLUDE = -I../../src + +.c.pd_linux: + cc $(LINUXCFLAGS) $(LINUXINCLUDE) -o $*.o -c $*.c + ld -export_dynamic -shared -o $*.pd_linux $*.o -lc -lm + strip --strip-unneeded $*.pd_linux + rm $*.o + diff --git a/pd/doc/6.externs/test-dspobj~.pd b/pd/doc/6.externs/test-dspobj~.pd new file mode 100644 index 00000000..4d1030b3 --- /dev/null +++ b/pd/doc/6.externs/test-dspobj~.pd @@ -0,0 +1,11 @@ +#N canvas 0 0 335 239 10; +#X obj 90 124 dspobj~; +#X obj 90 96 sig~ 0; +#X msg 106 149 bang; +#X obj 90 177 print~; +#X floatatom 89 71; +#X msg 202 37 \; pd dsp 1; +#X connect 0 0 3 0; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 4 0 1 0; diff --git a/pd/doc/6.externs/test-foo1.pd b/pd/doc/6.externs/test-foo1.pd new file mode 100644 index 00000000..280be821 --- /dev/null +++ b/pd/doc/6.externs/test-foo1.pd @@ -0,0 +1,6 @@ +#N canvas 68 38 269 168 10; +#X obj 68 90 foo1; +#X msg 68 52 5; +#X msg 100 52 rats; +#X connect 1 0 0 0; +#X connect 2 0 0 0; diff --git a/pd/doc/6.externs/test-foo2.pd b/pd/doc/6.externs/test-foo2.pd new file mode 100644 index 00000000..be62e140 --- /dev/null +++ b/pd/doc/6.externs/test-foo2.pd @@ -0,0 +1,8 @@ +#N canvas 171 53 269 164 10; +#X msg 100 52 rats; +#X obj 68 90 foo2; +#X msg 155 55 7; +#X msg 68 52 4; +#X connect 0 0 1 0; +#X connect 2 0 1 1; +#X connect 3 0 1 0; diff --git a/pd/doc/7.stuff/audio-playpen/1_DSP_INTRO.pd b/pd/doc/7.stuff/audio-playpen/1_DSP_INTRO.pd new file mode 100644 index 00000000..17ee73c6 --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/1_DSP_INTRO.pd @@ -0,0 +1,84 @@ +#N canvas 10 10 551 484 10; +#X text 41 3 ABSTRACTIONS IN THIS DIRECTORY; +#X text 117 22 sampler; +#X text 117 36 gain control; +#X text 117 50 ring mod; +#X text 21 142 OTHER OBJECTS YOU WILL NEED; +#X obj 21 171 dac~; +#X text 54 173 output; +#X text 21 156 audio:; +#X obj 21 188 adc~; +#X text 54 187 input; +#X obj 21 205 +~; +#X obj 45 205 -~; +#X obj 21 222 *~; +#X obj 45 222 /~; +#X text 71 215 arithmetic; +#X obj 28 280 bp~; +#X text 56 278 bandpass filter; +#X text 58 293 bandpass with "audio"; +#X text 55 301 control for second input; +#X obj 28 297 vcf~; +#X obj 261 37 metro; +#X text 294 40 repeated message; +#X obj 253 157 float; +#X text 292 156 store numbers; +#X obj 252 398 random; +#X text 298 397 random; +#X obj 253 174 pack; +#X text 292 170 combines numbers; +#X obj 253 191 unpack; +#X text 297 196 opposite; +#X obj 253 208 trigger; +#X text 302 215 control order of execution; +#X text 261 22 TIME; +#X obj 261 54 del; +#X text 294 54 wait then bang; +#X obj 261 71 timer; +#X text 294 68 measure time intervals; +#X text 278 142 GLUE; +#X obj 253 225 select; +#X text 302 229 test values; +#X obj 253 259 moses; +#X text 302 257 parting the waters; +#X obj 253 242 route; +#X text 302 243 heavy select; +#X obj 252 415 line; +#X text 291 412 control ramp generator; +#X obj 23 324 delwrite~; +#X obj 23 341 delread~; +#X obj 23 359 vd~; +#X text 84 323 declare a delay line; +#X text 83 340 read a delay line; +#X text 282 303 UNIT CONVERSION; +#X obj 258 324 mtof; +#X obj 287 324 ftom; +#X obj 258 341 dbtorms; +#X obj 305 341 rmstodb; +#X obj 258 358 dbtopow; +#X obj 305 358 powtodb; +#X text 357 323 frequency to MIDI; +#X text 355 339 db to amplitude; +#X text 356 356 db to power; +#N canvas 0 0 600 400 /SUBPATCH/ 0; +#X restore 64 405 pd; +#X text 100 404 subpatch; +#X obj 64 422 inlet; +#X obj 100 419 inlet~; +#X obj 64 439 outlet; +#X obj 105 436 outlet~; +#X obj 28 246 hip~; +#X text 55 245 high pass filter; +#X obj 28 263 lop~; +#X text 55 263 low pass filter; +#X text 257 101 ARITHMETIC; +#X text 117 64 control-to-signal; +#X text 116 94 delay loop; +#X text 116 108 variable delay loop; +#X obj 41 36 qgain; +#X obj 41 53 qring; +#X obj 41 70 qslew; +#X obj 41 89 qdelay; +#X obj 41 18 qsample ...; +#X obj 42 108 qvd ...; +#X text 50 359 variable time delay read; diff --git a/pd/doc/7.stuff/audio-playpen/2_sampler.pd b/pd/doc/7.stuff/audio-playpen/2_sampler.pd new file mode 100644 index 00000000..327e4116 --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/2_sampler.pd @@ -0,0 +1,33 @@ +#N canvas 8 0 476 273 10; +#X floatatom 108 154; +#X floatatom 282 62; +#X floatatom 244 62; +#X obj 81 127 qsample ---------------; +#X msg 113 60 record; +#X msg 158 60 play; +#X text 184 42 transpose; +#X floatatom 197 60; +#X text 242 47 start; +#X text 280 48 length; +#X obj 81 203 dac~; +#X obj 81 176 qgain; +#X text 139 155 loudnesss; +#X text 225 151 TO USE ME:; +#X text 243 167 turn DSP on (ctrl + "/"); +#X text 244 192 turn loudness to 80 (say); +#X text 244 221 hit "play" button.; +#X obj 81 59 adc~; +#X msg 227 128 read; +#X text 242 179 read a sample; +#X text 244 207 set length to 2000; +#X connect 0 0 11 1; +#X connect 1 0 3 5; +#X connect 2 0 3 4; +#X connect 3 0 11 0; +#X connect 4 0 3 1; +#X connect 5 0 3 2; +#X connect 7 0 3 3; +#X connect 11 0 10 0; +#X connect 11 0 10 1; +#X connect 17 0 3 0; +#X connect 18 0 3 6; diff --git a/pd/doc/7.stuff/audio-playpen/3_filter_and_ring.pd b/pd/doc/7.stuff/audio-playpen/3_filter_and_ring.pd new file mode 100644 index 00000000..a994cc85 --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/3_filter_and_ring.pd @@ -0,0 +1,64 @@ +#N canvas 4 21 576 397 10; +#X floatatom 221 271; +#X floatatom 209 250; +#X floatatom 78 269; +#X floatatom 68 250; +#X floatatom 104 217; +#X floatatom 169 68; +#X floatatom 83 314; +#X floatatom 298 149; +#X floatatom 297 83; +#X obj 61 181 qsample ---------------; +#X msg 101 114 record; +#X msg 169 113 play; +#X text 339 63 transpose; +#X floatatom 297 62; +#X text 339 81 start; +#X text 339 152 length; +#X obj 58 371 dac~; +#X obj 58 334 qgain; +#X text 324 189 read a file; +#X text 335 241 TO USE ME:; +#X text 371 272 turn DSP on (ctrl + "/"); +#X text 370 297 read the sample; +#X text 373 322 turn loudness to 80 (say); +#X text 373 346 hit "play" button.; +#X obj 61 113 adc~; +#X obj 169 90 metro 50; +#X floatatom 212 67; +#X obj 63 213 qring; +#X obj 297 112 loadbang; +#X msg 298 131 2000; +#X obj 59 289 vcf~; +#X obj 200 296 vcf~; +#X text 118 315 amp 1; +#X floatatom 224 317; +#X obj 199 337 qgain; +#X text 259 318 amp 2; +#X msg 292 190 read; +#X connect 0 0 31 2; +#X connect 1 0 31 1; +#X connect 2 0 30 2; +#X connect 3 0 30 1; +#X connect 4 0 27 1; +#X connect 5 0 25 0; +#X connect 6 0 17 1; +#X connect 7 0 9 5; +#X connect 8 0 9 4; +#X connect 9 0 27 0; +#X connect 10 0 9 1; +#X connect 11 0 9 2; +#X connect 13 0 9 3; +#X connect 17 0 16 0; +#X connect 24 0 9 0; +#X connect 25 0 11 0; +#X connect 26 0 25 1; +#X connect 27 0 30 0; +#X connect 27 0 31 0; +#X connect 28 0 29 0; +#X connect 29 0 7 0; +#X connect 30 0 17 0; +#X connect 31 0 34 0; +#X connect 33 0 34 1; +#X connect 34 0 16 1; +#X connect 36 0 9 6; diff --git a/pd/doc/7.stuff/audio-playpen/4_more_filters.pd b/pd/doc/7.stuff/audio-playpen/4_more_filters.pd new file mode 100644 index 00000000..aaa81f34 --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/4_more_filters.pd @@ -0,0 +1,55 @@ +#N canvas 55 0 373 335 10; +#X floatatom 163 156; +#X floatatom 220 175; +#X floatatom 98 154; +#X floatatom 118 221; +#X floatatom 151 33; +#X floatatom 134 266; +#X floatatom 234 99; +#X floatatom 235 75; +#X obj 81 127 qsample ---------------; +#X msg 111 93 record; +#X msg 156 93 play; +#X text 279 49 transpose; +#X floatatom 234 51; +#X text 279 73 start; +#X text 280 97 length; +#X obj 92 292 dac~; +#X obj 94 264 qgain; +#X text 163 269 loudnesss; +#X obj 81 93 adc~; +#X obj 153 60 metro 50; +#X floatatom 194 29; +#X obj 93 243 qring; +#X obj 77 212 vcf~; +#X obj 282 23 random 2000; +#X msg 257 135 read; +#X obj 98 174 qring; +#X floatatom 130 155; +#X obj 163 175 sig~; +#X obj 252 241 env~ 16384; +#X floatatom 258 270; +#X connect 0 0 27 0; +#X connect 1 0 22 2; +#X connect 2 0 25 0; +#X connect 3 0 21 1; +#X connect 4 0 19 0; +#X connect 5 0 16 1; +#X connect 6 0 8 5; +#X connect 7 0 8 4; +#X connect 8 0 22 0; +#X connect 9 0 8 1; +#X connect 10 0 8 2; +#X connect 12 0 8 3; +#X connect 16 0 15 0; +#X connect 16 0 15 1; +#X connect 18 0 8 0; +#X connect 19 0 10 0; +#X connect 20 0 19 1; +#X connect 21 0 16 0; +#X connect 22 0 21 0; +#X connect 24 0 8 6; +#X connect 25 0 22 1; +#X connect 26 0 25 1; +#X connect 27 0 22 1; +#X connect 28 0 29 0; diff --git a/pd/doc/7.stuff/audio-playpen/5_delay.pd b/pd/doc/7.stuff/audio-playpen/5_delay.pd new file mode 100644 index 00000000..63006b8d --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/5_delay.pd @@ -0,0 +1,55 @@ +#N canvas 34 147 523 368 10; +#X floatatom 58 216; +#X obj 7 235 qgain; +#X floatatom 150 176; +#X floatatom 146 151; +#X floatatom 151 33; +#X floatatom 148 220; +#X floatatom 234 99; +#X floatatom 235 75; +#X obj 84 123 qsample ---------------; +#X msg 111 93 record; +#X msg 156 93 play; +#X text 279 49 transpose; +#X floatatom 234 51; +#X text 279 73 start; +#X text 280 97 length; +#X obj 23 272 dac~; +#X obj 97 239 qgain; +#X text 261 220 TO USE ME:; +#X text 279 236 turn DSP on (ctrl + "/"); +#X text 279 248 read the sample; +#X text 280 261 turn loudness to 80 (say); +#X text 280 273 hit "play" button.; +#X obj 81 93 adc~; +#X obj 153 60 metro 50; +#X floatatom 203 29; +#X obj 96 199 qdelay; +#X text 47 188 direct; +#X text 49 201 gain; +#X text 179 220 delay gain; +#X text 173 152 delay time; +#X text 177 176 recirculation (0-100); +#X text 255 294 the direct signal comes out; +#X text 255 304 channel 1 and the delays out; +#X text 255 315 channel 2; +#X msg 257 135 read; +#X connect 0 0 1 1; +#X connect 1 0 15 0; +#X connect 2 0 25 2; +#X connect 3 0 25 1; +#X connect 4 0 23 0; +#X connect 5 0 16 1; +#X connect 6 0 8 5; +#X connect 7 0 8 4; +#X connect 8 0 1 0; +#X connect 8 0 25 0; +#X connect 9 0 8 1; +#X connect 10 0 8 2; +#X connect 12 0 8 3; +#X connect 16 0 15 1; +#X connect 22 0 8 0; +#X connect 23 0 10 0; +#X connect 24 0 23 1; +#X connect 25 0 16 0; +#X connect 34 0 8 6; diff --git a/pd/doc/7.stuff/audio-playpen/6_flanger.pd b/pd/doc/7.stuff/audio-playpen/6_flanger.pd new file mode 100644 index 00000000..cf927c32 --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/6_flanger.pd @@ -0,0 +1,71 @@ +#N canvas 42 0 531 395 10; +#X floatatom 301 189; +#X floatatom 237 154; +#X floatatom 59 241; +#X obj 8 260 qgain; +#X floatatom 147 223; +#X floatatom 118 148; +#X floatatom 151 33; +#X floatatom 149 244; +#X floatatom 273 87; +#X floatatom 330 85; +#X obj 84 123 qsample ---------------; +#X msg 111 93 record; +#X msg 156 93 play; +#X text 192 72 transpose; +#X floatatom 193 86; +#X text 374 83 start; +#X text 268 73 length; +#X obj 24 297 dac~; +#X obj 98 263 qgain; +#X obj 81 93 adc~; +#X obj 153 60 metro 50; +#X floatatom 202 41; +#X text 48 213 direct; +#X text 50 225 gain; +#X text 180 244 delay gain; +#X text 156 147 delay time; +#X text 173 223 recirculation (0-100); +#X obj 97 223 qvd; +#X obj 116 170 qslew; +#X obj 237 190 qring; +#X obj 237 172 sig~; +#X text 266 154 osc depth; +#X text 327 188 osc speed; +#X obj 202 23 r metro-time; +#X msg 385 191 \; metro-on 0 \; metro-time 100; +#X obj 152 7 r metro-on; +#X msg 384 234 \; metro-on 1 \; metro-time 50; +#X obj 329 37 r start-time; +#X obj 330 61 line; +#X msg 374 280 \; start-time 0; +#X msg 288 317 \; start-time 0 \, 2000 10000; +#X msg 289 131 read; +#X connect 0 0 29 1; +#X connect 1 0 30 0; +#X connect 2 0 3 1; +#X connect 3 0 17 0; +#X connect 4 0 27 2; +#X connect 5 0 28 0; +#X connect 6 0 20 0; +#X connect 7 0 18 1; +#X connect 8 0 10 5; +#X connect 9 0 10 4; +#X connect 10 0 3 0; +#X connect 10 0 27 0; +#X connect 11 0 10 1; +#X connect 12 0 10 2; +#X connect 14 0 10 3; +#X connect 18 0 17 0; +#X connect 19 0 10 0; +#X connect 20 0 12 0; +#X connect 21 0 20 1; +#X connect 27 0 18 0; +#X connect 28 0 27 1; +#X connect 29 0 27 1; +#X connect 30 0 29 0; +#X connect 33 0 21 0; +#X connect 35 0 6 0; +#X connect 37 0 38 0; +#X connect 38 0 9 0; +#X connect 41 0 10 6; diff --git a/pd/doc/7.stuff/audio-playpen/README.txt b/pd/doc/7.stuff/audio-playpen/README.txt new file mode 100644 index 00000000..e6a94951 --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/README.txt @@ -0,0 +1,9 @@ +The "audio playpen" is intended as a collection of analog-style modules +for people who just want to patch stuff together without worrying much +about how Pd works. A fair amount of work would be needed to make this into +a more usable package than it is now. At the moment it's unclear what +should be the relationship between this collection, the "examples," and +the "tools". + +At the very least there should be oscillators and envelope generators here, +and audio-rate db/rms/dB, mtof, ftom conversion... diff --git a/pd/doc/7.stuff/audio-playpen/qdelay.pd b/pd/doc/7.stuff/audio-playpen/qdelay.pd new file mode 100644 index 00000000..c22edc3a --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/qdelay.pd @@ -0,0 +1,34 @@ +#N canvas 94 85 429 238 10; +#X floatatom 252 62; +#X obj 252 153 line~; +#X obj 252 134 pack 0 100; +#X obj 232 180 *~; +#X obj 252 44 inlet; +#X obj 106 52 inlet; +#X obj 26 78 inlet~; +#X floatatom 106 70; +#X obj 22 176 outlet~; +#X text 20 61 audio in; +#X text 22 193 audio out; +#X text 220 11 recirculation; +#X text 92 23 delay time; +#X obj 106 88 delread~ qdelay1; +#X obj 120 210 delwrite~ qdelay1 2000; +#X obj 252 116 * 0.01; +#X text 228 27 (0-100); +#X text 100 35 (msec); +#X obj 252 80 max 0; +#X obj 252 98 min 100; +#X connect 0 0 18 0; +#X connect 1 0 3 1; +#X connect 2 0 1 0; +#X connect 3 0 14 0; +#X connect 4 0 0 0; +#X connect 5 0 7 0; +#X connect 6 0 14 0; +#X connect 7 0 13 0; +#X connect 13 0 3 0; +#X connect 13 0 8 0; +#X connect 15 0 2 0; +#X connect 18 0 19 0; +#X connect 19 0 15 0; diff --git a/pd/doc/7.stuff/audio-playpen/qgain.pd b/pd/doc/7.stuff/audio-playpen/qgain.pd new file mode 100644 index 00000000..20f228e8 --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/qgain.pd @@ -0,0 +1,14 @@ +#N canvas 236 128 179 191 10; +#X obj 89 112 line~; +#X obj 89 93 pack 0 100; +#X obj 89 55 inlet; +#X obj 89 74 dbtorms; +#X obj 30 67 inlet~; +#X obj 30 118 outlet~; +#X obj 30 86 *~; +#X connect 0 0 6 1; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 3 0 1 0; +#X connect 4 0 6 0; +#X connect 6 0 5 0; diff --git a/pd/doc/7.stuff/audio-playpen/qring.pd b/pd/doc/7.stuff/audio-playpen/qring.pd new file mode 100644 index 00000000..25b99c2e --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/qring.pd @@ -0,0 +1,14 @@ +#N canvas 163 135 216 211 10; +#X obj 112 91 inlet; +#X obj 54 93 inlet~; +#X obj 55 117 *~; +#X obj 54 142 outlet~; +#X text 54 76 audio in; +#X text 49 173 audio out; +#X text 117 59 modulation; +#X text 117 72 frequency; +#X obj 112 112 osc~; +#X connect 0 0 8 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 8 0 2 1; diff --git a/pd/doc/7.stuff/audio-playpen/qsample.pd b/pd/doc/7.stuff/audio-playpen/qsample.pd new file mode 100644 index 00000000..bc4ebb2f --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/qsample.pd @@ -0,0 +1,114 @@ +#N canvas 0 9 731 358 10; +#X obj 483 52 inlet; +#X obj 386 66 inlet; +#X obj 314 78 inlet; +#X obj 223 42 inlet; +#X obj 152 63 inlet; +#X obj 75 38 inlet; +#X obj 19 48 inlet~; +#X text 11 33 audio in; +#X msg 250 268 0 5; +#X floatatom 299 217; +#X floatatom 386 87; +#X floatatom 223 60; +#X msg 152 81 bang; +#X text 152 47 button; +#X obj 39 354 outlet~; +#X graph sample1-graph 0 -1 88200 1 404 352 704 202; +#X array sample1 88200 float; +#X pop; +#X obj 19 91 tabwrite~ sample1; +#X msg 75 56 bang; +#X text 74 12 record; +#X text 75 22 button; +#X text 157 33 play; +#X obj 39 299 tabread4~ sample1; +#X obj 39 317 *~; +#X obj 174 313 line~; +#X obj 39 335 hip~ 5; +#X obj 199 235 del 5; +#X msg 169 266 0 5; +#X msg 199 266 1 5; +#X floatatom 316 116; +#X text 211 22 transpose; +#X obj 223 78 mtof; +#X text 386 50 length; +#X obj 223 96 t b f; +#X obj 223 114 8.1758; +#X obj 223 132 /; +#X obj 299 143 t b f; +#X obj 250 250 del 2000; +#X obj 299 179 * 1980; +#X obj 299 161 f 1; +#X text 304 52 beginning; +#X text 314 62 point; +#X obj 39 281 line~; +#X obj 73 205 f; +#X obj 22 243 + 88200; +#X obj 22 261 pack; +#X obj 110 261 * 2000; +#X text 482 26 read; +#X text 483 38 file; +#X obj 73 223 t f f b; +#X floatatom 110 280; +#X obj 110 243 f 1; +#X obj 89 182 * 44.1; +#X obj 483 91 openpanel; +#X msg 483 73 bang; +#X obj 386 110 min 1980; +#X obj 315 96 max 1; +#X obj 484 133 soundfiler; +#X msg 485 114 read \$1 sample1; +#X obj 299 198 max 6; +#X connect 0 0 53 0; +#X connect 1 0 10 0; +#X connect 2 0 55 0; +#X connect 3 0 11 0; +#X connect 4 0 12 0; +#X connect 5 0 17 0; +#X connect 6 0 16 0; +#X connect 8 0 23 0; +#X connect 9 0 36 1; +#X connect 10 0 54 0; +#X connect 11 0 30 0; +#X connect 12 0 26 0; +#X connect 12 0 25 0; +#X connect 12 0 36 0; +#X connect 17 0 16 0; +#X connect 21 0 22 0; +#X connect 22 0 24 0; +#X connect 23 0 22 1; +#X connect 24 0 14 0; +#X connect 25 0 27 0; +#X connect 25 0 42 0; +#X connect 26 0 23 0; +#X connect 27 0 23 0; +#X connect 28 0 51 0; +#X connect 30 0 32 0; +#X connect 32 0 33 0; +#X connect 32 1 34 1; +#X connect 33 0 34 0; +#X connect 34 0 38 0; +#X connect 34 0 50 1; +#X connect 35 0 38 0; +#X connect 35 1 37 1; +#X connect 36 0 8 0; +#X connect 37 0 58 0; +#X connect 38 0 37 0; +#X connect 41 0 21 0; +#X connect 42 0 48 0; +#X connect 43 0 44 0; +#X connect 44 0 41 0; +#X connect 45 0 44 1; +#X connect 45 0 49 0; +#X connect 48 0 43 0; +#X connect 48 1 41 0; +#X connect 48 2 50 0; +#X connect 50 0 45 0; +#X connect 51 0 42 1; +#X connect 52 0 57 0; +#X connect 53 0 52 0; +#X connect 54 0 35 0; +#X connect 55 0 28 0; +#X connect 57 0 56 0; +#X connect 58 0 9 0; diff --git a/pd/doc/7.stuff/audio-playpen/qslew.pd b/pd/doc/7.stuff/audio-playpen/qslew.pd new file mode 100644 index 00000000..d56bb90f --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/qslew.pd @@ -0,0 +1,8 @@ +#N canvas 236 128 164 154 10; +#X obj 47 79 line~; +#X obj 47 58 pack 0 100; +#X obj 47 38 inlet; +#X obj 47 100 outlet~; +#X connect 0 0 3 0; +#X connect 1 0 0 0; +#X connect 2 0 1 0; diff --git a/pd/doc/7.stuff/audio-playpen/qvd.pd b/pd/doc/7.stuff/audio-playpen/qvd.pd new file mode 100644 index 00000000..8a03d9c3 --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/qvd.pd @@ -0,0 +1,32 @@ +#N canvas 78 104 411 254 10; +#X obj 246 47 inlet; +#X floatatom 246 66; +#X obj 245 162 line~; +#X obj 245 143 pack 0 100; +#X obj 232 180 *~; +#X obj 104 66 inlet~; +#X obj 22 175 outlet~; +#X text 19 60 audio in; +#X text 18 193 audio out; +#X text 213 7 recirculation; +#X text 92 25 delay time; +#X obj 246 125 * 0.01; +#X text 212 23 (0-100); +#X text 100 37 (msec); +#X obj 105 94 vd~ qdel2; +#X obj 120 210 delwrite~ qdel2 2000; +#X obj 20 75 inlet~; +#X obj 246 84 max 0; +#X obj 246 104 min 100; +#X connect 0 0 1 0; +#X connect 1 0 17 0; +#X connect 2 0 4 1; +#X connect 3 0 2 0; +#X connect 4 0 15 0; +#X connect 5 0 14 0; +#X connect 11 0 3 0; +#X connect 14 0 4 0; +#X connect 14 0 6 0; +#X connect 16 0 15 0; +#X connect 17 0 18 0; +#X connect 18 0 11 0; diff --git a/pd/doc/7.stuff/data-structures/0.intro.txt b/pd/doc/7.stuff/data-structures/0.intro.txt new file mode 100644 index 00000000..a1df9a88 --- /dev/null +++ b/pd/doc/7.stuff/data-structures/0.intro.txt @@ -0,0 +1,113 @@ +Pd release 0.23 and onward include objects for managing lists of data. The +objects allow you to describe data structures and how they are viewed +("template objects") and to traverse lists ("traversal objects.") + +The rest of this file gives a highly condensed summary of what's there; the +patches, starting with "1.scalars.pd", act as a tutorial. + +1. TEMPLATE OBJECTS. + +templates describe data structures. You can add an item to a data structure +using "field" or ask for a shape to be drawn using a "display command." + +1.1. "template" -- data structure. + +usage, "template <field1> <field2> ..." + +where the fields are either "float <name>", "symbol <name>", "list <name>" +(don't try that yet); or "array <name> <template-for-elements>. + +1.2. DISPLAY COMMANDS. + + +These are objects which ask Pd to draw a shape corresponding to some fields +of the datum. + +1.2.1. POLYGONS and CURVES. + +polygons: polygon <outline-color> <line-width> <x, y> ... +filled polygons: fpolygon <fill-color> <outline-color> <line-width> <x, y> ... +curves: curve <outline-color> <line-width> <x, y> ... +filled curves: fcurve <fill-color> <outline-color> <line-width> <x, y> ... + +Each argument can either be a number or a symbol. If a symbol, it's the +name of a field (which must be a "float) which specifies the vaiue. +So for instance in the "1.scalar.pd" example, in the template "template1", +the object "fpolygon 244 q 5 0 0 20 z 40 0" draws a filled polygon whose +interior color is 244 (red 2, green 4, blue 4) but whose outline color +depends on the value of the field "q". Its coordinates describe a triangle +whose altitude is given by "z." + +1.2.2 PLOT. + +The "plot" objects plots an array field as shown in 5_array.pd. + +2. TRAVERSAL. + +In this release of Pd, you can only traverse lists all of whose elements +belong to the same template; this restriction will be relaxed in a future +release. You "traverse" a list either to build it, to get its elements, +or to change their values. + +2.1. POINTER. + +The "pointer" object can be used to refer to an element of a list. Its +methods are: + +2.1.1. traverse <symbol>. + +Point to the "head" of a list. The symbol should match the name of a Pd +window holding the list. The pointer is output, but you can't set or get the +fields of the "head" pointer; you can only get the "next" element or "append" +to the list. + +2.1.2. next. Goes to the next element of the list. Either the pointer +is output on the left side, or else a "bang" at right tells you that no +more objects are forthcoming. + +2.1.3. bang. +outputs the current pointer. + +2.2. APPEND. Adds an element of the specified template to the list. You +specify what fields you want to supply and the last inlet takes a pointer to +the element you want to "append" after. + +2.3. GET. + + get <template> <field...> + +send it a pointer to an object belonging to the <template> and it outputs +the (floating-point) fields. + +2.4. SET. + + set <template> <field...> + +send it a pointer (at the rightmost inlet) and values for the specified +fields, and their values are changed accordingly. + +2.5. GETSIZE. + + getsize <template> <array-field> + +outputs the size of the named field, which must be an array, when it receives +a pointer to the owner as input. + +2.6. SETSIZE. + + setsize <template> <array-field> + +Send it a pointer to the owner (right inlet) and then the desired size +(left inlet) and the array is resized. If a template contains an array, +each scalar belonging to the template can have its own size for the array. + +2.7. ELEMENT. + + element <template> <array-field> + +Pass it an index and a pointer and it outputs a pointer to an element of the +array. + + + + diff --git a/pd/doc/7.stuff/data-structures/1.scalars.pd b/pd/doc/7.stuff/data-structures/1.scalars.pd new file mode 100644 index 00000000..c2c465bf --- /dev/null +++ b/pd/doc/7.stuff/data-structures/1.scalars.pd @@ -0,0 +1,60 @@ +#N canvas 363 11 579 461 12; +#N canvas 13 22 297 180 data 1; +#X restore 60 347 pd data; +#N canvas 10 274 550 324 template1 1; +#X obj 60 46 filledpolygon 244 q 5 0 0 20 z 40 0; +#X obj 60 21 template float x float y float z float q; +#X text 3 67 This subpatch acts as a template which describes the data +structure. The "template" specifies four floating point values named +x \, y \, z \, and q. The "filledpolygon" is a drawing instruction. +Templates should have only one template object but may have any number +of drawing instructions.; +#X text 4 164 The filledpolygon's arguments are interior color \, border +color \, border width \, and then the points of the polygon. Arguments +which are symbols ("q" and "z" in this case) mean to take the values +from the data structure. Other values are constant. The position of +the object is automatically controlled by fields named "x" and "y". +; +#X restore 60 371 pd template1; +#N canvas 0 0 440 292 stuff 0; +#X obj 235 185 pointer; +#X obj 28 187 append template1 x y z q; +#X msg 235 127 \; pd-data clear; +#X msg 235 163 traverse pd-data \, bang; +#X obj 125 128 t b b b; +#X msg 125 87 bang; +#X obj 125 56 loadbang; +#X text 159 87 click here to re-initialize; +#X text 25 243 This subpatch sets up the "data" window with two objects. +How this works will get explained later.; +#X msg 28 164 50 100 30 9 \, 150 100 -20 900; +#X connect 0 0 1 4; +#X connect 3 0 0 0; +#X connect 4 0 9 0; +#X connect 4 1 3 0; +#X connect 4 2 2 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 9 0 1 0; +#X restore 59 397 pd stuff; +#X text 37 72 The positions \, border color \, and altitude of each +triangle are numeric values which can control \, or be controlled by +\, other elements of the patch.; +#X text 37 124 When the data window is locked (not in edit mode) you +can drag the apex of either triangle up or down to change the altitude +(you should see the cursor change with dragging is meaningful.) In +edit (unlocked) mode \, you can move teh entire triangles around \, +or cut \, copy \, and paste them.; +#X text 47 325 subpatches:; +#X text 37 281 Data is not persistent. If you save a Pd patch and reopen +it \, the "data" isn't preserved.; +#X text 37 5 This patch shows a simple data window with two objects +in it. The objects' data structures and appearances are defined by +the "template1" subpatch. This kind of object is called a "scalar." +; +#X text 37 207 Scalars are described by "templates" \, which are subwindows. +The subwindows are found by their name \, in this case "template1." +The template describes what form the data take and how it is shown. +It's possible to mix data of many different templates in the same collection. +; +#X text 294 398 updated for Pd version 0.35.; diff --git a/pd/doc/7.stuff/data-structures/2.getting.data.pd b/pd/doc/7.stuff/data-structures/2.getting.data.pd new file mode 100644 index 00000000..bebd7371 --- /dev/null +++ b/pd/doc/7.stuff/data-structures/2.getting.data.pd @@ -0,0 +1,73 @@ +#N canvas 363 11 630 603 12; +#X text 311 559 updated for Pd version 0.32.; +#N canvas 42 312 598 266 stuff 0; +#X obj 353 159 pointer; +#X obj 117 103 t b b b; +#X msg 117 62 bang; +#X obj 117 31 loadbang; +#X text 151 62 click here to re-initialize; +#X text 126 206 Explained later...; +#X msg 20 139 50 250 30 9 \, 200 200 -20 900 \, 100 200 -50 30; +#X obj 20 162 append template2 x y z q; +#X msg 353 101 \; pd-data2 clear; +#X msg 353 137 traverse pd-data2 \, bang; +#X connect 0 0 7 4; +#X connect 1 0 6 0; +#X connect 1 1 9 0; +#X connect 1 2 8 0; +#X connect 2 0 1 0; +#X connect 3 0 2 0; +#X connect 6 0 7 0; +#X connect 9 0 0 0; +#X restore 506 310 pd stuff; +#X text 506 242 subpatches:; +#X obj 15 303 pointer; +#X msg 27 271 next; +#X text 75 301 <- object that outputs pointers to scalars; +#N canvas 13 22 345 271 data2 1; +#X restore 506 265 pd data2; +#N canvas 15 278 427 138 template2 0; +#X obj 60 46 filledpolygon 244 q 5 0 0 20 z 40 0; +#X obj 60 21 template float x float y float z float q; +#X text 13 79 The template for the two scalars \, as in the last patch +; +#X restore 506 288 pd template2; +#X obj 15 355 get template2 x y z q; +#X floatatom 15 384 5 0 0; +#X floatatom 76 384 5 0 0; +#X floatatom 137 384 5 0 0; +#X floatatom 199 385 5 0 0; +#X msg 15 246 traverse pd-data2; +#X obj 59 330 print; +#X text 100 330 <- this gets a bang when we reach the end; +#X text 211 353 <- this takes incoming pointers; +#X text 214 367 and outputs the values of x \, y \, z \, and q.; +#X text 172 245 <- go to head of list (click first); +#X text 68 273 <- output next item (click 4 times); +#X text 14 5 The simplest thing you can do with a collection of scalars +(a list) is to traverse it \, getting the numbers back out. This is +done using two objects \, "pointer" which does the traversal \, and +"get" which \, given a pointer to a scalar \, extracts numeric quantities +from it.; +#X text 14 85 You can send the "pointer" object a "traverse" message +to point it to the head of the list. The argument "pd-data2" indicates +the Pd window named "data2." The head of the list means \, not the +first scalar in the list \, but the position before the first scalar +\, which is a valid pointer in Pd but has no data or template.; +#X text 14 180 The "next" message tells the "pointer" object to go +to the next scalar in the list and output it. If there are no more +\, "pointer" outputs a bang at right.; +#X text 19 424 The "get" object takes a pointer \, checks that its +template agrees with what "get" is expecting \, i.e. \, "template2" +\, and if so outputs the values of x \, y \, z \, and q in the usual +reverse order.; +#X text 18 492 The pointer sent from "pointer" to "get" is an elementary +Pd type on a level with "float" and "symbol".; +#X connect 3 0 8 0; +#X connect 3 1 14 0; +#X connect 4 0 3 0; +#X connect 8 0 9 0; +#X connect 8 1 10 0; +#X connect 8 2 11 0; +#X connect 8 3 12 0; +#X connect 13 0 3 0; diff --git a/pd/doc/7.stuff/data-structures/3.setting.data.pd b/pd/doc/7.stuff/data-structures/3.setting.data.pd new file mode 100644 index 00000000..d951a0a8 --- /dev/null +++ b/pd/doc/7.stuff/data-structures/3.setting.data.pd @@ -0,0 +1,105 @@ +#N canvas 401 39 490 472 12; +#X floatatom 60 371 0 0 0; +#X floatatom 60 323 0 0 0; +#X floatatom 60 275 0 0 0; +#X floatatom 60 227 0 0 0; +#X floatatom 324 322 0 0 0; +#X floatatom 283 322 0 0 0; +#X floatatom 240 322 0 0 0; +#X obj 197 274 pointer; +#X msg 205 249 next; +#X floatatom 197 322 0 0 0; +#N canvas 19 29 363 341 data3 1; +#X restore 269 425 pd data3; +#N canvas 100 436 466 223 template3 0; +#X obj 25 68 filledpolygon q 0 1 0 0 w 0 w h 0 h; +#X obj 26 163 drawnumber q 0 0 0; +#X obj 24 19 template float x float y float w float h float q; +#X text 22 39 five numeric ("float") fields; +#X text 25 88 drawing a rectangle \, interior color q \, border black and one unit thick \, through the points (0 \, 0) \, (w \, 0) \, (w \, h) \, and (0 \, h). Note that the three points containing variables become hot spots for mouse dragging.; +#X text 26 184 Draw the value of q as an Araboc numeral \, at (0 \, 0) \, in black.; +#X restore 269 446 pd template3; +#N canvas 313 223 587 367 stuff 0; +#X obj 352 180 pointer; +#X obj 352 204 t b b p; +#X obj 222 333 append template3 x y w h q; +#X obj 288 9 loadbang; +#X obj 288 62 t b b b; +#X msg 331 138 traverse pd-data3; +#X msg 477 136 \; pd-data3 clear; +#X msg 240 110 0; +#X obj 187 136 f; +#X obj 220 136 + 1; +#X obj 189 112 until; +#X obj 201 159 sel 20; +#X obj 251 159 t b; +#X msg 290 32 bang; +#X obj 25 237 random 300; +#X obj 100 237 random 300; +#X obj 323 236 random 1000; +#X obj 177 237 random 80; +#X obj 252 237 random 80; +#X obj 101 263 - 30; +#X obj 354 11 inlet; +#X connect 0 0 1 0; +#X connect 1 0 14 0; +#X connect 1 1 15 0; +#X connect 1 1 16 0; +#X connect 1 1 17 0; +#X connect 1 1 18 0; +#X connect 1 2 2 5; +#X connect 3 0 13 0; +#X connect 4 0 10 0; +#X connect 4 1 5 0; +#X connect 4 1 7 0; +#X connect 4 2 6 0; +#X connect 5 0 0 0; +#X connect 7 0 8 1; +#X connect 8 0 11 0; +#X connect 8 0 9 0; +#X connect 9 0 8 1; +#X connect 10 0 8 0; +#X connect 11 0 10 1; +#X connect 11 1 12 0; +#X connect 12 0 0 0; +#X connect 13 0 4 0; +#X connect 14 0 2 0; +#X connect 15 0 19 0; +#X connect 16 0 2 4; +#X connect 17 0 2 2; +#X connect 18 0 2 3; +#X connect 19 0 2 1; +#X connect 20 0 13 0; +#X restore 269 404 pd stuff; +#X msg 269 379 remake; +#X obj 197 298 get template3 x y w h q; +#X floatatom 356 322 0 0 0; +#X obj 60 251 set template3 x; +#X obj 60 299 set template3 y; +#X obj 60 347 set template3 w; +#X obj 60 394 set template3 h; +#X floatatom 60 418 0 0 0; +#X obj 60 441 set template3 q; +#X msg 197 226 traverse pd-data3; +#X text 46 5 The "set" object allows you to change numeric values. In this example \, the template specifies five fields describing the (x \, y) location \, width \, height \, and color. A new feature is that the color is also getting printed out under the rectangles. This is done using the "drawnumber" object in the template.; +#X text 323 378 <- click to randomize; +#X text 46 87 Getting parameter values is as inthe previous patch \; however \, as you traverse the list with "next" messages the new pointers are also sent to the five "set" objects. These have as arguments the template name and the name of the field they will set. You can drag on the five number boxes (after selecting an object with "traverse" and "next" messages) to change its location \, shape \, and color.; +#X connect 0 0 19 0; +#X connect 1 0 18 0; +#X connect 2 0 17 0; +#X connect 3 0 16 0; +#X connect 7 0 14 0; +#X connect 7 0 16 1; +#X connect 7 0 17 1; +#X connect 7 0 18 1; +#X connect 7 0 19 1; +#X connect 7 0 21 1; +#X connect 8 0 7 0; +#X connect 13 0 12 0; +#X connect 14 0 9 0; +#X connect 14 1 6 0; +#X connect 14 2 5 0; +#X connect 14 3 4 0; +#X connect 14 4 15 0; +#X connect 20 0 21 0; +#X connect 22 0 7 0; diff --git a/pd/doc/7.stuff/data-structures/4.append.pd b/pd/doc/7.stuff/data-structures/4.append.pd new file mode 100644 index 00000000..2c1991d9 --- /dev/null +++ b/pd/doc/7.stuff/data-structures/4.append.pd @@ -0,0 +1,36 @@ +#N canvas 308 71 688 415 12; +#X obj 421 332 pointer; +#X obj 108 277 t b b b; +#X msg 120 241 bang; +#X text 161 240 click here to re-initialize; +#X msg 11 313 50 250 30 9 \, 200 200 -20 900 \, 100 200 -50 30; +#X text 56 27 The objects below put three items in the data window. +First the window is cleared. Then a "pointer" object is instructed +to point to the beginning of the data window ("traverse pd-data") \, +and to output its value ("bang") to the "append" object. This object +is then given numeric values to create three items.; +#X obj 11 336 append template4 x y z q; +#X msg 421 269 \; pd-data4 clear; +#N canvas 0 0 318 188 data4 1; +#X restore 430 219 pd data4; +#N canvas 15 278 427 138 template4 0; +#X obj 60 46 filledpolygon 244 q 5 0 0 20 z 40 0; +#X obj 60 21 template float x float y float z float q; +#X text 13 79 The template for the two scalars \, as in the last patch +; +#X restore 428 243 pd template4; +#X msg 421 309 traverse pd-data4 \, bang; +#X text 57 165 The outlet of "append" is a pointer to the newly created +scalar. You can pass that on to other append objects if you want to +build heterogenous lists.; +#X text 363 375 Updated for Pd version 0.32; +#X text 57 121 The "append" object is given the argument "template4" +to specify what kind of data structure to append. The other arguments +are the names of variables we'll set.; +#X connect 0 0 6 4; +#X connect 1 0 4 0; +#X connect 1 1 10 0; +#X connect 1 2 7 0; +#X connect 2 0 1 0; +#X connect 4 0 6 0; +#X connect 10 0 0 0; diff --git a/pd/doc/7.stuff/data-structures/5.array.pd b/pd/doc/7.stuff/data-structures/5.array.pd new file mode 100644 index 00000000..9c1996a7 --- /dev/null +++ b/pd/doc/7.stuff/data-structures/5.array.pd @@ -0,0 +1,112 @@ +#N canvas 67 294 709 456 12; +#X obj 235 323 pointer; +#X floatatom 232 183 0 0 0; +#X msg 235 300 bang; +#X floatatom 15 200 0 0 0; +#X floatatom 17 350 0 0 0; +#X floatatom 235 369 0 0 0; +#X floatatom 451 276 0 0 0; +#X obj 451 229 pointer; +#X obj 318 163 pointer; +#X msg 449 194 bang; +#N canvas 0 0 384 196 data5 1; +#X restore 508 314 pd data5; +#N canvas 5 272 431 226 template5 0; +#X obj 8 91 filledpolygon 244 q 3 0 0 20 z 40 0; +#X obj 6 8 template float x float y float z float q array bazoo template5-element +; +#X obj 8 113 plot bazoo 700 3 30 10 4; +#X text 6 44 this declares an array named "bazoo" whose elements are +described by "template5-element." Array declarations take three arguments +while "float" declarations take only two.; +#X text 6 136 Here we ask to plot the array \, color 700 \, line width +3 \, starting location (30 \, 10) relative to the scalar \, points +spaced 4 apart.; +#X text 7 186 You can also do (x \, y) plots and/or make the line thickness +variable---see the help window for "plot".; +#X restore 508 337 pd template5; +#N canvas 65 248 442 101 template5-element 0; +#X obj 35 11 template float y; +#X text 12 36 This says that array elements will have a single floating-point +number named "y". The variable name "y" is automatically assumed to +control screen height \; if you don't have at least that variable you +can't plot the array..; +#X restore 508 360 pd template5-element; +#N canvas 515 84 589 429 stuff 0; +#X obj 354 163 pointer; +#X obj 136 102 t b b b; +#X msg 136 61 bang; +#X text 170 61 click here to re-initialize; +#X obj 134 163 append template5 x y z q; +#X msg 354 100 \; pd-data5 clear; +#X msg 354 140 traverse pd-data5 \, bang; +#X msg 283 280 50; +#X obj 284 307 setsize template5 bazoo; +#X obj 137 23 loadbang; +#X msg 134 140 50 150 30 9; +#X obj 134 191 t b b p; +#X floatatom 68 327 0 0 0; +#X floatatom 14 332 0 0 0; +#X obj 14 376 set template5-element y; +#X obj 68 350 element template5 bazoo; +#X obj 20 303 unpack; +#X msg 12 258 3 5 \, 7 9 \, -30 10 \, 43 45; +#X connect 0 0 4 4; +#X connect 1 0 10 0; +#X connect 1 1 6 0; +#X connect 1 2 5 0; +#X connect 2 0 1 0; +#X connect 4 0 11 0; +#X connect 6 0 0 0; +#X connect 7 0 8 0; +#X connect 9 0 2 0; +#X connect 10 0 4 0; +#X connect 11 0 17 0; +#X connect 11 1 7 0; +#X connect 11 2 8 1; +#X connect 11 2 15 1; +#X connect 12 0 15 0; +#X connect 13 0 14 0; +#X connect 15 0 14 1; +#X connect 16 0 13 0; +#X connect 16 1 12 0; +#X connect 17 0 16 0; +#X restore 508 383 pd stuff; +#X msg 318 140 traverse pd-data5 \, next; +#X obj 451 252 getsize template5 bazoo; +#X obj 232 229 setsize template5 bazoo; +#X obj 17 373 set template5-element y; +#X obj 235 346 get template5-element y; +#X obj 15 223 element template5 bazoo; +#X text 38 15 Scalars may contain arrays \, and moreover the elements +of an array can be of any scalar type (and can have sub-arrays recursively.) +The type of the element of an array is fixed in the template. In this +case \, "template5" contains the definition of the top-level scalar +and "template5-element" is the template of each array element (see +the template subpatch.); +#X text 328 121 click to get pointer; +#X text 449 173 get size; +#X text 221 158 set size; +#X text 16 133 select an individual; +#X text 16 153 element \, which is a; +#X text 14 169 scalar with template; +#X text 104 189 template5; +#X text 12 413 work as before \, but on; +#X text 12 433 array elements...; +#X text 433 424 Updated for Pd version 0.35; +#X text 17 395 normal "set" amd "get"; +#X connect 0 0 18 0; +#X connect 1 0 16 0; +#X connect 2 0 0 0; +#X connect 3 0 19 0; +#X connect 4 0 17 0; +#X connect 7 0 15 0; +#X connect 8 0 16 1; +#X connect 8 0 19 1; +#X connect 8 0 7 0; +#X connect 9 0 7 0; +#X connect 14 0 8 0; +#X connect 15 0 6 0; +#X connect 18 0 5 0; +#X connect 19 0 0 0; +#X connect 19 0 17 1; diff --git a/pd/doc/7.stuff/data-structures/6.file.pd b/pd/doc/7.stuff/data-structures/6.file.pd new file mode 100644 index 00000000..1196d1a1 --- /dev/null +++ b/pd/doc/7.stuff/data-structures/6.file.pd @@ -0,0 +1,68 @@ +#N canvas 405 27 291 318 12; +#N canvas 0 0 377 383 data 1; +#X restore 40 153 pd data; +#N canvas 50 470 523 157 template-toplevel 0; +#X obj 120 112 plot bazoo 700 3 10 20 20; +#X obj 120 48 template float x float y float z float q array bazoo template-element; +#X obj 120 86 drawpolygon q 4 0 0 20 z z -5 10 20; +#X restore 40 174 pd template-toplevel; +#N canvas 199 231 600 239 template-element 0; +#X obj 59 48 template float x float y float w; +#X obj 80 89 drawpolygon 10 2 5 0 0 -5 -5 0 0 5 5 0; +#X restore 40 197 pd template-element; +#X msg 45 16 \; pd-data clear; +#N canvas 125 240 709 410 traversal 0; +#X floatatom 212 353 0 0 0; +#X obj 212 376 set template-toplevel q; +#X floatatom 212 307 0 0 0; +#X floatatom 210 255 0 0 0; +#X floatatom 96 62 0 0 0; +#X floatatom 97 114 0 0 0; +#X floatatom 23 144 0 0 0; +#X floatatom 210 209 0 0 0; +#X floatatom 617 194 0 0 0; +#X floatatom 550 192 0 0 0; +#X floatatom 486 191 0 0 0; +#X obj 419 116 pointer; +#X obj 419 168 get template-toplevel x y z q; +#X msg 450 90 next; +#X floatatom 419 191 0 0 0; +#X obj 23 169 set template-element y; +#X obj 97 137 element template-toplevel bazoo; +#X obj 96 85 setsize template-toplevel bazoo; +#X obj 210 232 set template-toplevel x; +#X obj 210 278 set template-toplevel y; +#X obj 212 330 set template-toplevel z; +#X floatatom 22 200 0 0 0; +#X obj 22 225 set template-element x; +#X msg 419 67 traverse pd-data \, next; +#X floatatom 26 258 0 0 0; +#X obj 26 283 set template-element w; +#X connect 0 0 1 0; +#X connect 2 0 20 0; +#X connect 3 0 19 0; +#X connect 4 0 17 0; +#X connect 5 0 16 0; +#X connect 6 0 15 0; +#X connect 7 0 18 0; +#X connect 11 0 12 0; +#X connect 11 0 17 1; +#X connect 11 0 18 1; +#X connect 11 0 19 1; +#X connect 11 0 20 1; +#X connect 11 0 1 1; +#X connect 11 0 16 1; +#X connect 12 0 14 0; +#X connect 12 1 10 0; +#X connect 12 2 9 0; +#X connect 12 3 8 0; +#X connect 13 0 11 0; +#X connect 16 0 15 1; +#X connect 16 0 22 1; +#X connect 16 0 25 1; +#X connect 21 0 22 0; +#X connect 23 0 11 0; +#X connect 24 0 25 0; +#X restore 41 218 pd traversal; +#X msg 43 55 \; pd-data write xx.txt; +#X msg 41 102 \; pd-data read file.txt; diff --git a/pd/doc/7.stuff/data-structures/7.sequencer.pd b/pd/doc/7.stuff/data-structures/7.sequencer.pd new file mode 100644 index 00000000..6b815191 --- /dev/null +++ b/pd/doc/7.stuff/data-structures/7.sequencer.pd @@ -0,0 +1,192 @@ +#N struct template-toplevel float x float y float voiceno array pitch +template-pitch array amp template-amp; +#N struct template-pitch float x float y float w; +#N struct template-amp float x float y float w; +#N canvas 467 44 543 446 12; +#N canvas 565 104 524 166 template-toplevel 0; +#X obj 25 86 plot pitch voiceno 3 10 0; +#X obj 25 113 plot amp 0 3 10 0; +#X obj 27 60 filledpolygon 9 9 0 0 -10 0 10 5 10 5 -10; +#X obj 25 21 struct template-toplevel float x float y float voiceno +array pitch template-pitch array amp template-amp; +#X restore 64 197 pd template-toplevel; +#N canvas 0 0 419 102 template-amp 0; +#X obj 15 41 struct template-amp float x float y float w; +#X restore 64 219 pd template-amp; +#N canvas 42 221 452 87 template-pitch 0; +#X obj 21 29 struct template-pitch float x float y float w; +#X restore 66 242 pd template-pitch; +#N canvas 282 38 522 569 synthesis 0; +#X msg 125 220 next; +#X msg 108 172 traverse pd-data \, next; +#X obj 108 250 pointer template-toplevel; +#X obj 108 273 t p p; +#X obj 108 296 get template-toplevel voiceno; +#X obj 108 325 pack 0 p; +#X obj 108 4 inlet; +#X obj 108 33 route start stop; +#X msg 161 54 \; reset bang; +#X obj 298 30 r reset; +#X obj 152 112 s reset; +#X obj 125 194 r next-evt; +#X obj 108 354 route 0 9 90 900 99 909 990; +#X obj 55 372 voice; +#X obj 55 536 outlet~; +#X obj 55 395 voice; +#X obj 55 418 voice; +#X obj 55 441 voice; +#X msg 298 58 \; reset-stop stop \; time-of-last-evt 0 \; pd-data sort +; +#X obj 55 465 voice; +#X obj 55 488 voice; +#X obj 55 511 voice; +#X obj 372 351 s delay-multiplier; +#X obj 375 276 t b f; +#X msg 372 303 1000; +#X obj 389 327 /; +#X obj 375 250 r tempo; +#X obj 108 90 t b b b; +#X msg 130 136 \; pd-data sort; +#X connect 0 0 2 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 3 1 5 1; +#X connect 4 0 5 0; +#X connect 5 0 12 0; +#X connect 6 0 7 0; +#X connect 7 0 27 0; +#X connect 7 1 8 0; +#X connect 9 0 18 0; +#X connect 11 0 0 0; +#X connect 12 0 13 1; +#X connect 12 1 15 1; +#X connect 12 2 16 1; +#X connect 12 3 17 1; +#X connect 12 4 19 1; +#X connect 12 5 20 1; +#X connect 12 6 21 1; +#X connect 13 0 15 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 17 0 19 0; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X connect 21 0 14 0; +#X connect 23 0 24 0; +#X connect 23 1 25 1; +#X connect 24 0 25 0; +#X connect 25 0 22 0; +#X connect 26 0 23 0; +#X connect 27 0 1 0; +#X connect 27 1 28 0; +#X connect 27 2 10 0; +#X restore 64 323 pd synthesis; +#X floatatom 278 276 0 0 0; +#X floatatom 92 358 0 0 0; +#N canvas 159 26 495 270 output 0; +#X obj 345 163 t b; +#X obj 345 112 f; +#X obj 345 61 inlet; +#X text 351 30 mute; +#X obj 345 189 f; +#X msg 434 182 0; +#X msg 345 87 bang; +#X obj 345 138 moses 1; +#X obj 434 156 t b f; +#X obj 405 119 moses 1; +#X obj 85 151 dbtorms; +#X obj 405 94 r master-lvl; +#X obj 85 43 r master-lvl; +#X obj 345 214 s master-lvl; +#X obj 22 185 inlet~; +#X obj 203 42 inlet; +#X text 203 18 level; +#X obj 203 102 s master-lvl; +#X msg 98 67 set \$1; +#X obj 98 91 outlet; +#X msg 218 65 \; pd dsp 1; +#X obj 85 198 line~; +#X obj 22 216 *~; +#X obj 22 246 dac~; +#X obj 85 175 pack 0 50; +#X text 20 162 audio; +#X text 95 112 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 64 380 pd output; +#X msg 122 358 MUTE; +#X msg 64 296 start; +#X msg 111 296 stop; +#N canvas 22 39 392 386 data 0; +#X scalar template-toplevel 2 246 900 \; 0 0 50 \; 10 0 50 \; \; 0 +0 0 \; 10 0 10 \; 11 0 0 \; \;; +#X scalar template-toplevel 13 220 990 \; 0 0 50 \; 10 0 50 \; \; 0 +0 10 \; 10 0 10 \; 11 0 0 \; \;; +#X scalar template-toplevel 34 73 90 \; 0 250 50 \; 100 50 0 \; 100 +50 50 \; 230 200 0 \; 230 50 10 \; 240 300 1 \; 240 100 50 \; 250 250 +1 \; 250 150 50 \; 260 250 1 \; 285 250 1 \; \; 0 0 2 \; 100 0 5 \; +200 0 6 \; 225 0 2 \; 230 0 5 \; 260 0 10 \; 261 0 5 \; 265 0 0 \; +266 0 6 \; 270 0 0 \; 271 0 8 \; 275 0 0 \; 276 0 10 \; 280 0 0 \; +281 0 12 \; 285 0 0 \; \;; +#X scalar template-toplevel 67 282 900 \; 0 20 1 \; 60 20 1 \; \; 0 +0 0 \; 30 0 14 \; 60 0 0 \; \;; +#X scalar template-toplevel 141 322 900 \; 0 0 50 \; 70 -70 50 \; \; +0 0 0 \; 10 0 10 \; 20 0 0 \; 30 0 0 \; 40 0 10 \; 50 0 0 \; 60 0 10 +\; 70 0 0 \; \;; +#X scalar template-toplevel 326 192 909 \; 0 0 50 \; 50 0 50 \; \; +0 0 15 \; 10 0 10 \; 50 0 0 \; \;; +#X restore 64 176 pd data; +#N canvas 82 467 332 145 stuff 0; +#X msg 1 101 \; pd-data write xx.txt; +#X msg -3 39 \; pd-data read score.txt; +#X obj 208 7 loadbang; +#X msg 208 34 \; tempo 60; +#X msg 198 101 \; pd-data sort; +#X connect 2 0 3 0; +#X restore 65 264 pd stuff; +#X obj 278 229 r tempo; +#X msg 278 252 set \$1; +#X obj 278 300 s tempo; +#X text 13 4 This patch shows an example of how to use data collections +as musical sequences (with apologies to Yuasa and Stockhausen). Here +the black traces show dynamics and the colored ones show pitch. The +fatness of the pitch traces give bandwidth. Any of the three can change +over the life of the event.; +#X text 160 357 <--- volume in dB; +#X text 13 96 To hear the result \, turn the volume up to 70 or so +(higher if it's not loud enough the first time) and hit "start". You +can set the tempo lower if that helps you follow the "score" the first +couple of times.; +#X text 311 276 <--- tempo; +#X text 256 416 Updated for Pd version 0.32; +#X connect 3 0 6 0; +#X connect 4 0 14 0; +#X connect 5 0 6 1; +#X connect 6 0 5 0; +#X connect 7 0 6 2; +#X connect 8 0 3 0; +#X connect 9 0 3 0; +#X connect 12 0 13 0; +#X connect 13 0 4 0; diff --git a/pd/doc/7.stuff/data-structures/data-array.pd b/pd/doc/7.stuff/data-structures/data-array.pd new file mode 100644 index 00000000..25cb1ec8 --- /dev/null +++ b/pd/doc/7.stuff/data-structures/data-array.pd @@ -0,0 +1,64 @@ +#N canvas 230 71 587 465 12; +#X floatatom 179 207 0 0 0; +#X obj 53 199 f; +#X obj 89 194 + 1; +#X obj 53 232 sel; +#X msg 69 165 1; +#X msg 285 213 0; +#X obj 418 342 *; +#X obj 418 392 del; +#X obj 414 292 t f f; +#X obj 418 322 -; +#X msg 469 304 0; +#X obj 449 346 r delay-multiplier; +#X obj 432 369 r reset-stop; +#X obj 238 110 inlet; +#X obj 179 184 getsize \$1 \$2; +#X obj 285 233 element \$1 \$2; +#X obj 187 234 element \$1 \$2; +#X obj 208 408 outlet; +#X obj 349 408 outlet; +#X obj 187 254 get \$3 y w x; +#X obj 285 253 get \$3 y w; +#X obj 265 408 outlet; +#X obj 342 302 t f b; +#X obj 372 326 0; +#X obj 238 130 t b b p b; +#X text 229 93 pointer in; +#X text 20 12 This is an abstraction used in the sequencer example. Here we take a pointer and sequence an array belonging to it \, either the amplitude or the frequency \, depending on the value of argument 2 The template of the scalar is given by argument 1 and that of the array elements by argument 3; +#X text 90 431 Outlets: new y value \, new w value \, time to ramp to new values.; +#X connect 1 0 2 0; +#X connect 1 0 3 0; +#X connect 2 0 1 1; +#X connect 3 1 16 0; +#X connect 4 0 1 1; +#X connect 5 0 15 0; +#X connect 6 0 7 0; +#X connect 6 0 18 0; +#X connect 7 0 1 0; +#X connect 8 0 9 1; +#X connect 8 1 9 0; +#X connect 9 0 6 0; +#X connect 10 0 9 1; +#X connect 11 0 6 1; +#X connect 12 0 7 0; +#X connect 13 0 24 0; +#X connect 14 0 0 0; +#X connect 14 0 3 1; +#X connect 15 0 20 0; +#X connect 16 0 19 0; +#X connect 19 0 17 0; +#X connect 19 1 21 0; +#X connect 19 2 8 0; +#X connect 20 0 17 0; +#X connect 20 1 22 0; +#X connect 22 0 21 0; +#X connect 22 1 23 0; +#X connect 23 0 18 0; +#X connect 24 0 1 0; +#X connect 24 1 5 0; +#X connect 24 2 15 1; +#X connect 24 2 14 0; +#X connect 24 2 16 1; +#X connect 24 3 4 0; +#X connect 24 3 10 0; diff --git a/pd/doc/7.stuff/data-structures/data-start.pd b/pd/doc/7.stuff/data-structures/data-start.pd new file mode 100644 index 00000000..b0522fbf --- /dev/null +++ b/pd/doc/7.stuff/data-structures/data-start.pd @@ -0,0 +1,40 @@ +#N canvas 404 0 597 385 12; +#X obj 248 142 inlet; +#X obj 295 250 *; +#X obj 165 262 del; +#X obj 130 141 r reset-stop; +#X obj 195 339 outlet; +#X obj 375 172 outlet; +#X obj 310 145 get \$1 x y; +#X obj 195 312 pointer; +#X text 46 101 outlets: pointer (delayed) \, y-value.; +#X obj 248 167 t b p; +#X obj 165 288 t b b; +#X obj 335 224 r time-of-last-evt; +#X obj 295 223 -; +#X obj 310 167 t f f; +#X obj 97 339 s next-evt; +#X obj 335 201 s time-of-last-evt; +#X obj 329 251 r delay-multiplier; +#X text 49 10 This is an abstraction used by the sequencer example. +; +#X text 46 45 Here we carry out the actual sequencing. Argument is +template of the scalar. Note the sends and receives which must agree +with the rest of the patch.; +#X connect 0 0 9 0; +#X connect 1 0 2 1; +#X connect 2 0 10 0; +#X connect 3 0 2 0; +#X connect 6 0 13 0; +#X connect 6 1 5 0; +#X connect 7 0 4 0; +#X connect 9 0 2 0; +#X connect 9 1 7 1; +#X connect 9 1 6 0; +#X connect 10 0 14 0; +#X connect 10 1 7 0; +#X connect 11 0 12 1; +#X connect 12 0 1 0; +#X connect 13 0 15 0; +#X connect 13 1 12 0; +#X connect 16 0 1 1; diff --git a/pd/doc/7.stuff/data-structures/file.txt b/pd/doc/7.stuff/data-structures/file.txt new file mode 100644 index 00000000..62b6a167 --- /dev/null +++ b/pd/doc/7.stuff/data-structures/file.txt @@ -0,0 +1,39 @@ +data; +template template-toplevel; +float x; +float y; +float z; +float q; +array bazoo template-element; +; +template template-element; +float x; +float y; +float w; +; +; +template-toplevel 76 177 -66 85; +0 0 0; +30 0 0; +0 111 8; +-47 22 0; +0 0 0; +0 70 0; +0 70 70; +70 70 0; +0 70 0; +; +template-toplevel 196 109 77 802; +-20 77 0; +0 0 4; +67 59 0; +0 76 12; +-45 -68 0; +; +template-toplevel 150 250 20 80; +0 0 0; +40 0 4; +60 50 0; +100 30 3; +200 0 0; +; diff --git a/pd/doc/7.stuff/data-structures/score.txt b/pd/doc/7.stuff/data-structures/score.txt new file mode 100644 index 00000000..84ef0376 --- /dev/null +++ b/pd/doc/7.stuff/data-structures/score.txt @@ -0,0 +1,94 @@ +data; +template template-toplevel; +float x; +float y; +float voiceno; +array pitch template-pitch; +array amp template-amp; +; +template template-pitch; +float x; +float y; +float w; +; +template template-amp; +float x; +float y; +float w; +; +; +template-toplevel 2 246 900; +0 0 50; +10 0 50; +; +0 0 0; +10 0 10; +11 0 0; +; +template-toplevel 13 220 990; +0 0 50; +10 0 50; +; +0 0 10; +10 0 10; +11 0 0; +; +template-toplevel 34 73 90; +0 250 50; +100 50 0; +100 50 50; +230 200 0; +230 50 10; +240 300 1; +240 100 50; +250 250 1; +250 150 50; +260 250 1; +285 250 1; +; +0 0 2; +100 0 5; +200 0 6; +225 0 2; +230 0 5; +260 0 10; +261 0 5; +265 0 0; +266 0 6; +270 0 0; +271 0 8; +275 0 0; +276 0 10; +280 0 0; +281 0 12; +285 0 0; +; +template-toplevel 67 282 900; +0 20 1; +60 20 1; +; +0 0 0; +30 0 14; +60 0 0; +; +template-toplevel 141 322 900; +0 0 50; +70 -70 50; +; +0 0 0; +10 0 10; +20 0 0; +30 0 0; +40 0 10; +50 0 0; +60 0 10; +70 0 0; +; +template-toplevel 326 192 909; +0 0 50; +50 0 50; +; +0 0 15; +10 0 10; +50 0 0; +; diff --git a/pd/doc/7.stuff/data-structures/voice.pd b/pd/doc/7.stuff/data-structures/voice.pd new file mode 100644 index 00000000..2d124db7 --- /dev/null +++ b/pd/doc/7.stuff/data-structures/voice.pd @@ -0,0 +1,127 @@ +#N canvas 0 34 918 591 12; +#X obj 180 96 inlet; +#X obj 169 288 pack; +#X obj 169 395 line~; +#X obj 169 238 sqrt; +#X obj 169 262 sqrt; +#X obj 169 480 *~; +#X obj 169 419 *~; +#X obj 169 443 *~; +#X obj 92 478 inlet~; +#X obj 92 526 outlet~; +#X obj 92 502 +~; +#X obj 436 411 line~; +#X obj 436 435 *~; +#X obj 436 459 *~; +#X obj 436 283 mtof; +#X obj 394 187 +; +#X obj 436 307 sqrt; +#X obj 436 331 sqrt; +#X obj 436 387 pack; +#X obj 169 214 / 6; +#X obj 189 343 r reset; +#X msg 189 367 0 20; +#X obj 180 120 data-start template-toplevel; +#X obj 6 150 data-array template-toplevel amp template-amp; +#X obj 433 148 data-array template-toplevel pitch template-pitch; +#X obj 308 437 noise~; +#X obj 477 259 +; +#X obj 477 282 mtof; +#X obj 477 306 sqrt; +#X obj 477 330 sqrt; +#X obj 477 411 line~; +#X obj 477 435 *~; +#X obj 477 459 *~; +#X obj 477 387 pack; +#X obj 394 411 line~; +#X obj 394 435 *~; +#X obj 394 459 *~; +#X obj 394 387 pack; +#X obj 394 284 mtof; +#X obj 394 308 sqrt; +#X obj 394 332 sqrt; +#X obj 394 262 -; +#X obj 240 520 vcf~ 10; +#X obj 315 520 vcf~ 10; +#X obj 390 516 vcf~ 10; +#X text 13 7 This is an abstraction used in the sequencer example. +Here we take care of the audio synthesis \, according to timed controls +from the the "data-start" and "data-array" subpatches.; +#X text 505 458 calculate time-varying center frequencies; +#X text 470 512 ... for three VCFs acting on a noise source.; +#X text 92 394 Amplitude; +#X text 93 410 envelope; +#X text 117 508 summing bus; +#X text 346 62 Pitch is in eighth-tones (because 4 pixels per half +tone looks reasonable on the screen.) Hence the * 0.25 objects below. +; +#X obj 394 209 * 0.25; +#X obj 493 233 * 0.25; +#X obj 394 230 + 24; +#X connect 0 0 22 0; +#X connect 1 0 2 0; +#X connect 2 0 6 0; +#X connect 2 0 6 1; +#X connect 3 0 4 0; +#X connect 4 0 1 0; +#X connect 5 0 10 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 5 0; +#X connect 8 0 10 0; +#X connect 10 0 9 0; +#X connect 11 0 12 0; +#X connect 11 0 12 1; +#X connect 12 0 13 0; +#X connect 12 0 13 1; +#X connect 13 0 43 1; +#X connect 14 0 16 0; +#X connect 15 0 52 0; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 18 0 11 0; +#X connect 19 0 3 0; +#X connect 20 0 21 0; +#X connect 21 0 2 0; +#X connect 22 0 23 0; +#X connect 22 0 24 0; +#X connect 22 1 15 1; +#X connect 23 1 19 0; +#X connect 23 2 1 1; +#X connect 24 0 15 0; +#X connect 24 1 53 0; +#X connect 24 2 18 1; +#X connect 24 2 37 1; +#X connect 24 2 33 1; +#X connect 25 0 42 0; +#X connect 25 0 43 0; +#X connect 25 0 44 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 33 0; +#X connect 30 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 32 0 44 1; +#X connect 33 0 30 0; +#X connect 34 0 35 0; +#X connect 34 0 35 1; +#X connect 35 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 42 1; +#X connect 37 0 34 0; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 40 0 37 0; +#X connect 41 0 38 0; +#X connect 42 0 5 1; +#X connect 43 0 5 1; +#X connect 44 0 5 1; +#X connect 52 0 54 0; +#X connect 53 0 26 1; +#X connect 53 0 41 1; +#X connect 54 0 41 0; +#X connect 54 0 26 0; +#X connect 54 0 14 0; diff --git a/pd/doc/7.stuff/data-structures/z.txt b/pd/doc/7.stuff/data-structures/z.txt new file mode 100644 index 00000000..6cdd0a4a --- /dev/null +++ b/pd/doc/7.stuff/data-structures/z.txt @@ -0,0 +1,64 @@ +data; +template template5; +float x; +float y; +float z; +float q; +array bazoo template5-element; +; +template template5-element; +float y; +; +; +template5 50 150 30 9; +0; +0; +0; +0; +0; +3; +0; +0; +0; +7; +-30; +0; +0; +0; +0; +0; +-4; +-18; +-26; +-36; +-46; +-62; +-74; +-78; +-70; +-62; +-52; +-40; +-30; +-20; +-4; +1; +7; +11; +13; +0; +0; +0; +0; +0; +0; +0; +0; +0; +0; +43; +0; +0; +0; +0; +; diff --git a/pd/doc/7.stuff/soundfile-tools/1.ring-mod.pd b/pd/doc/7.stuff/soundfile-tools/1.ring-mod.pd new file mode 100644 index 00000000..72fb9c7f --- /dev/null +++ b/pd/doc/7.stuff/soundfile-tools/1.ring-mod.pd @@ -0,0 +1,189 @@ +#N canvas 73 28 687 421 12; +#N canvas 213 187 495 352 input-sample 0; +#N canvas 0 0 450 300 graph1 0; +#X array array1 91065 float 0; +#X coords 0 1 91065 -1 400 300 1; +#X restore 56 23 graph; +#X text 151 393 INPUT SAMPLE; +#X restore 179 299 pd input-sample; +#N canvas 192 180 507 343 output-sample 0; +#N canvas 0 0 450 300 graph2 0; +#X array array2 95475 float 0; +#X coords 0 1 95475 -1 400 300 1; +#X restore 60 13 graph; +#X text 161 388 OUTPUT SAMPLE; +#X restore 179 323 pd output-sample; +#N canvas 110 33 827 602 guts 0; +#X msg 25 133 bang; +#X obj 25 360 openpanel; +#X obj 144 31 inlet; +#X obj 441 403 dac~; +#X obj 441 342 *~; +#X obj 456 318 line~; +#X obj 456 296 r master-amp; +#X msg 597 130 bang; +#X obj 597 155 savepanel; +#X obj 231 164 spigot; +#X msg 233 132 0; +#X msg 265 132 1; +#X obj 497 427 outlet; +#X obj 299 132 r frequency; +#X obj 219 321 tabwrite~ array2; +#X msg 219 193 bang; +#X obj 420 289 +~; +#X msg 96 129 \; pd dsp 1; +#X obj 441 370 hip~ 7; +#X obj 231 223 tabplay~ array1; +#X msg 439 131 bang; +#X obj 439 160 tabplay~ array2; +#X msg 597 180 write \$1 array2; +#X obj 597 205 soundfiler; +#X obj 144 53 route read run start hear save; +#N canvas 0 0 368 263 audio-transformation 0; +#X obj 113 95 osc~; +#X obj 97 116 *~; +#X obj 97 138 hip~ 7; +#X obj 113 71 r frequency; +#X obj 97 22 inlet~; +#X obj 97 169 outlet~; +#X obj 97 47 hip~ 7; +#X connect 0 0 1 1; +#X connect 1 0 2 0; +#X connect 2 0 5 0; +#X connect 3 0 0 0; +#X connect 4 0 6 0; +#X connect 6 0 1 0; +#X restore 231 251 pd audio-transformation; +#X obj 497 402 env~ 16384; +#X obj 570 91 route normalized; +#X msg 571 300 write -normalize \$1 array2; +#X msg 571 250 bang; +#X obj 571 276 savepanel; +#X obj 571 325 soundfiler; +#X obj 25 413 soundfiler; +#X msg 25 390 read -resize -maxsize 1e+06 \$1 array1; +#X msg 25 460 \; array2 resize \$1; +#X obj 25 437 + 4410; +#X floatatom 96 436 0 0 0; +#X connect 0 0 1 0; +#X connect 1 0 33 0; +#X connect 2 0 24 0; +#X connect 4 0 18 0; +#X connect 5 0 4 1; +#X connect 6 0 5 0; +#X connect 7 0 8 0; +#X connect 8 0 22 0; +#X connect 9 0 10 0; +#X connect 9 0 15 0; +#X connect 10 0 9 1; +#X connect 11 0 9 1; +#X connect 13 0 9 0; +#X connect 15 0 14 0; +#X connect 15 0 19 0; +#X connect 16 0 4 0; +#X connect 18 0 3 0; +#X connect 18 0 3 1; +#X connect 18 0 26 0; +#X connect 19 0 25 0; +#X connect 20 0 21 0; +#X connect 21 0 16 1; +#X connect 22 0 23 0; +#X connect 24 0 0 0; +#X connect 24 1 15 0; +#X connect 24 1 10 0; +#X connect 24 1 17 0; +#X connect 24 2 11 0; +#X connect 24 2 17 0; +#X connect 24 3 20 0; +#X connect 24 4 27 0; +#X connect 25 0 14 0; +#X connect 25 0 16 0; +#X connect 26 0 12 0; +#X connect 27 0 29 0; +#X connect 27 1 7 0; +#X connect 28 0 31 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 32 0 35 0; +#X connect 32 0 36 0; +#X connect 33 0 32 0; +#X connect 35 0 34 0; +#X restore 28 265 pd guts; +#X msg 28 155 run the transformation; +#X msg 28 199 hear the output buffer again; +#X text 28 113 click below to:; +#X msg 28 221 save the output buffer; +#X floatatom 404 257 0 0 0; +#N canvas 194 37 397 591 output 0; +#X obj 66 203 t b; +#X obj 66 152 f; +#X obj 66 102 inlet; +#X text 71 81 mute; +#X obj 66 228 f; +#X msg 134 244 0; +#X msg 66 127 bang; +#X obj 66 178 moses 1; +#X obj 134 218 t b f; +#X obj 96 442 outlet; +#X msg 96 416 set \$1; +#X obj 186 163 moses 1; +#X obj 224 444 dbtorms; +#X obj 224 469 pack 0 100; +#X obj 186 138 r master-lvl; +#X obj 96 382 r master-lvl; +#X obj 83 286 s master-lvl; +#X obj 224 494 s master-amp; +#X obj 208 244 loadbang; +#X msg 208 269 \; master-lvl 90; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X connect 18 0 19 0; +#X restore 404 235 pd output; +#X msg 404 213 mute; +#X obj 404 279 s master-lvl; +#X text 448 212 <-- mute button; +#X msg 28 177 start transformation when I change frequency; +#X floatatom 392 117 0 0 0; +#X obj 392 139 s frequency; +#X text 392 97 modulation frequency (Hz.); +#X floatatom 28 287 0 0 0; +#X text 10 330 100 maximum; +#X text 10 311 output meter; +#X text 429 115 <--set me; +#X text 443 255 <--set me; +#X msg 28 133 read an input file; +#X msg 28 243 save normalized to max amplitude; +#X text 29 8 Ring modulator. Read in a sample first \, then you can +either set a frequency and hit the "run" button or else hit the "start..." +button and start the transformation by dragging on the frequency control. +The output level should be "100" for unit gain.; +#X text 22 361 Outputs are saved as "wav" files \, although you can +edit the patch to make "aiff" or "nextstep" instead. Any of the three +are OK for source files.; +#X text 397 302 LINE OUT LEVEL in dB (100 max); +#X connect 2 0 16 0; +#X connect 3 0 2 0; +#X connect 4 0 2 0; +#X connect 6 0 2 0; +#X connect 7 0 10 0; +#X connect 8 0 7 0; +#X connect 9 0 8 0; +#X connect 12 0 2 0; +#X connect 13 0 14 0; +#X connect 21 0 2 0; +#X connect 22 0 2 0; diff --git a/pd/doc/7.stuff/soundfile-tools/2.bandpass.pd b/pd/doc/7.stuff/soundfile-tools/2.bandpass.pd new file mode 100644 index 00000000..c75335eb --- /dev/null +++ b/pd/doc/7.stuff/soundfile-tools/2.bandpass.pd @@ -0,0 +1,202 @@ +#N canvas 73 28 846 432 12; +#N canvas 213 187 495 352 input-sample 0; +#N canvas 0 0 450 300 graph1 0; +#X array array1 155948 float 0; +#X coords 0 1 155948 -1 400 300 1; +#X restore 55 22 graph; +#X text 149 386 INPUT SAMPLE; +#X restore 238 282 pd input-sample; +#N canvas 192 180 507 343 output-sample 0; +#N canvas 0 0 450 300 graph2 0; +#X array array2 160358 float 0; +#X coords 0 1 160358 -1 400 300 1; +#X restore 59 13 graph; +#X text 158 381 OUTPUT SAMPLE; +#X restore 237 305 pd output-sample; +#N canvas 116 150 735 425 guts 0; +#X msg 25 131 bang; +#X obj 25 354 openpanel; +#X obj 142 31 inlet; +#X obj 458 378 dac~; +#X obj 458 335 *~; +#X obj 473 312 line~; +#X obj 473 290 r master-amp; +#X msg 726 87 bang; +#X obj 726 109 savepanel; +#X obj 275 165 spigot; +#X msg 260 131 0; +#X msg 291 131 1; +#X obj 513 408 outlet; +#X obj 324 131 r frequency; +#X obj 263 320 tabwrite~ array2; +#X msg 263 194 bang; +#X obj 438 283 +~; +#X msg 143 131 \; pd dsp 1; +#X obj 458 356 hip~ 7; +#X obj 275 223 tabplay~ array1; +#X msg 453 127 bang; +#X obj 453 149 tabplay~ array2; +#X msg 726 130 write \$1 array2; +#X obj 726 151 soundfiler; +#X obj 142 52 route read run start hear save; +#N canvas 0 0 368 259 audio-transformation 0; +#X obj 111 70 r frequency; +#X obj 96 21 inlet~; +#X obj 96 178 outlet~; +#X obj 179 123 r q; +#X obj 111 94 pack 0 100; +#X obj 110 119 line~; +#X obj 96 153 vcf~; +#X connect 0 0 4 0; +#X connect 1 0 6 0; +#X connect 3 0 6 2; +#X connect 4 0 5 0; +#X connect 5 0 6 1; +#X connect 6 0 2 0; +#X restore 275 244 pd audio-transformation; +#X obj 513 387 env~ 16384; +#X obj 585 88 route normalized; +#X msg 585 184 write -normalize \$1 array2; +#X msg 585 142 bang; +#X obj 585 163 savepanel; +#X obj 585 209 soundfiler; +#X obj 25 406 soundfiler; +#X msg 25 383 read -resize -maxsize 1e+06 \$1 array1; +#X msg 25 452 \; array2 resize \$1; +#X obj 25 430 + 4410; +#X floatatom 94 428 0 0 0; +#X obj 413 132 r q; +#X connect 0 0 1 0; +#X connect 1 0 33 0; +#X connect 2 0 24 0; +#X connect 4 0 18 0; +#X connect 5 0 4 1; +#X connect 6 0 5 0; +#X connect 7 0 8 0; +#X connect 8 0 22 0; +#X connect 9 0 10 0; +#X connect 9 0 15 0; +#X connect 10 0 9 1; +#X connect 11 0 9 1; +#X connect 13 0 9 0; +#X connect 15 0 14 0; +#X connect 15 0 19 0; +#X connect 16 0 4 0; +#X connect 18 0 3 0; +#X connect 18 0 3 1; +#X connect 18 0 26 0; +#X connect 19 0 25 0; +#X connect 20 0 21 0; +#X connect 21 0 16 1; +#X connect 22 0 23 0; +#X connect 24 0 0 0; +#X connect 24 1 15 0; +#X connect 24 1 10 0; +#X connect 24 1 17 0; +#X connect 24 2 11 0; +#X connect 24 2 17 0; +#X connect 24 3 20 0; +#X connect 24 4 27 0; +#X connect 25 0 14 0; +#X connect 25 0 16 0; +#X connect 26 0 12 0; +#X connect 27 0 29 0; +#X connect 27 1 7 0; +#X connect 28 0 31 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 32 0 35 0; +#X connect 32 0 36 0; +#X connect 33 0 32 0; +#X connect 35 0 34 0; +#X connect 37 0 9 0; +#X restore 34 236 pd guts; +#X msg 34 131 run the transformation; +#X msg 34 173 hear the output buffer again; +#X text 34 91 click below to:; +#X msg 34 194 save the output buffer; +#X floatatom 562 334 0 0 120; +#N canvas 194 37 397 591 output 0; +#X obj 65 199 t b; +#X obj 65 150 f; +#X obj 65 100 inlet; +#X text 70 79 mute; +#X obj 65 224 f; +#X msg 132 240 0; +#X msg 65 125 bang; +#X obj 65 175 moses 1; +#X obj 132 215 t b f; +#X obj 94 434 outlet; +#X msg 94 409 set \$1; +#X obj 183 160 moses 1; +#X obj 221 437 dbtorms; +#X obj 221 461 pack 0 100; +#X obj 183 136 r master-lvl; +#X obj 94 375 r master-lvl; +#X obj 81 281 s master-lvl; +#X obj 221 486 s master-amp; +#X obj 204 240 loadbang; +#X msg 204 264 \; master-lvl 90; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X connect 18 0 19 0; +#X restore 562 313 pd output; +#X msg 562 292 mute; +#X obj 562 355 s master-lvl; +#X text 604 291 <-- mute button; +#X floatatom 34 257 0 0 0; +#X text 35 300 100 maximum; +#X text 35 282 output meter; +#X text 600 335 <--set me; +#X msg 34 110 read an input file; +#X msg 34 215 save normalized to max amplitude; +#X msg 34 152 start transformation when I change f or q; +#X floatatom 479 164 0 0 0; +#X obj 479 185 s frequency; +#X text 479 85 center; +#X floatatom 482 229 0 0 10000; +#X text 482 210 "q"; +#X obj 482 252 s q; +#X obj 479 143 mtof; +#X floatatom 479 122 0 0 128; +#X text 536 163 <- set in Hz; +#X text 533 230 <--set selectivity; +#X text 479 103 frequency; +#X text 534 123 <- set in MIDI units; +#X text 31 341 Note -- you can shift-click on the controls to change +them in hundredths. You can also click and type numbers in \, followed +by the "enter" key.; +#X text 16 5 Bandpass filter. Read in a sample first \, then you can +either set a frequency and hit the "run" button or else hit the "start..." +button and start the transformation by dragging on the frequency or +q control.; +#X text 552 377 OUTPUT LEVEL in dB (100 norm); +#X connect 2 0 12 0; +#X connect 3 0 2 0; +#X connect 4 0 2 0; +#X connect 6 0 2 0; +#X connect 7 0 10 0; +#X connect 8 0 7 0; +#X connect 9 0 8 0; +#X connect 16 0 2 0; +#X connect 17 0 2 0; +#X connect 18 0 2 0; +#X connect 19 0 20 0; +#X connect 22 0 24 0; +#X connect 25 0 19 0; +#X connect 26 0 25 0; diff --git a/pd/doc/7.stuff/soundfile-tools/3.phase.vocoder.pd b/pd/doc/7.stuff/soundfile-tools/3.phase.vocoder.pd new file mode 100644 index 00000000..b69d5e86 --- /dev/null +++ b/pd/doc/7.stuff/soundfile-tools/3.phase.vocoder.pd @@ -0,0 +1,551 @@ +#N canvas 223 113 913 495 12; +#X floatatom 457 258 0 0 0; +#X floatatom 793 114 0 0 0; +#X floatatom 654 114 0 0 0; +#N canvas 249 280 600 398 loc&precess 0; +#X floatatom 218 312 0 0 0; +#X msg 369 239 set \$1; +#X obj 367 282 outlet; +#X obj 114 364 outlet; +#X obj 233 96 r location; +#X msg 113 321 set \$1; +#X obj 368 203 r speed; +#X obj 75 95 r see-location; +#X obj 92 139 t b f; +#X obj 113 292 f; +#X obj 73 173 int; +#X obj 73 206 sel 0; +#X msg 209 139 1; +#X msg 275 138 0; +#X obj 150 245 del 300; +#X connect 1 0 2 0; +#X connect 4 0 8 0; +#X connect 5 0 3 0; +#X connect 6 0 1 0; +#X connect 7 0 8 0; +#X connect 8 0 10 0; +#X connect 8 1 9 1; +#X connect 9 0 5 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 11 0 14 0; +#X connect 12 0 10 1; +#X connect 13 0 10 1; +#X connect 14 0 13 0; +#X connect 14 0 9 0; +#X restore 654 91 pd loc&precess; +#N canvas 0 0 600 400 setlocprecess 0; +#X obj 235 113 inlet; +#X obj 100 109 inlet; +#X obj 231 144 s speed; +#X obj 101 144 s location; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X restore 654 138 pd setlocprecess; +#X obj 457 279 s transpo; +#X obj 457 216 r transpo; +#X msg 457 237 set \$1; +#X msg 673 387 \; location 0 \; speed 200; +#X text 200 8 PHASE VOCODER; +#X text 609 18 set location; +#X text 609 36 and stop; +#X text 609 54 precession; +#X text 785 53 precession; +#X text 785 71 speed in; +#X text 785 89 hundredths; +#X text 457 179 transposition; +#X text 457 197 in cents; +#X text 666 360 contraction; +#X text 784 360 expansion; +#X msg 776 387 \; location 0 \; speed 10; +#X text 30 349 100 maximum; +#X text 30 331 output meter; +#X floatatom 610 218 0 5 60; +#X text 645 218 <--set me to change length; +#N canvas 0 0 265 196 length 0; +#X obj 46 23 inlet; +#X obj 48 101 * 44100; +#X msg 84 125 \; array2 resize \$1; +#X obj 46 48 min 60; +#X obj 60 75 s output-length; +#X obj 46 159 s maxoutsize; +#X connect 0 0 3 0; +#X connect 1 0 2 0; +#X connect 1 0 5 0; +#X connect 3 0 1 0; +#X connect 3 0 4 0; +#X restore 610 239 pd length; +#N canvas 219 38 198 151 /SUBPATCH/ 0; +#X obj 77 118 outlet; +#X obj 77 72 loadbang; +#X msg 77 95 10; +#X connect 1 0 2 0; +#X connect 2 0 0 0; +#X restore 610 197 pd; +#X text 610 259 length in seconds of the output; +#X text 610 277 buffer... maximum 60; +#N canvas 42 0 1083 546 guts 0; +#X msg 24 129 bang; +#X obj 24 405 openpanel; +#X obj 139 30 inlet; +#X obj 450 385 dac~; +#X obj 450 329 *~; +#X obj 465 306 line~; +#X obj 465 283 r master-amp; +#X msg 728 129 bang; +#X obj 728 150 savepanel; +#X obj 219 164 spigot; +#X msg 206 102 0; +#X msg 238 102 1; +#X obj 503 444 outlet; +#X obj 292 251 tabwrite~ array2; +#X obj 449 246 +~; +#X obj 450 356 hip~ 7; +#X msg 446 97 bang; +#X obj 446 118 tabplay~ array2; +#X msg 728 175 write \$1 array2; +#X obj 728 200 soundfiler; +#X obj 505 386 env~ 16384; +#X obj 591 101 route normalized; +#X msg 591 284 write -normalize \$1 array2; +#X msg 591 242 bang; +#X obj 591 263 savepanel; +#X obj 591 308 soundfiler; +#X obj 24 450 soundfiler; +#X msg 24 428 read -resize -maxsize 1e+06 \$1 array1; +#X floatatom 24 473 0 0 0; +#X obj 680 345 loadbang; +#X msg 680 368 \; window-size 2048 \; transpo 0; +#N canvas 9 7 835 599 fft-analysis 0; +#X obj 267 304 *~; +#X obj 235 304 *~; +#X obj 235 326 -~; +#X obj 333 305 *~; +#X obj 302 305 *~; +#X obj 302 328 +~; +#X obj 348 131 *~; +#X obj 317 131 *~; +#X obj 288 131 *~; +#X obj 256 131 *~; +#X obj 256 153 +~; +#X obj 225 183 *~; +#X obj 88 570 *~; +#X obj 375 256 rfft~; +#X obj 396 55 rfft~; +#X obj 488 652 *~; +#X obj 702 295 r window-size; +#X obj 770 211 r sample-rate; +#X obj 624 239 f; +#X obj 617 53 r sample-rate; +#X obj 592 30 r window-size; +#X obj 615 100 t b f; +#X obj 592 124 /; +#X obj 519 652 *~; +#X obj 89 549 *~; +#X obj 106 525 rifft~; +#X obj 89 596 outlet~; +#X obj 639 457 print~; +#X msg 639 428 bang; +#X text 155 526 inverse real FFT; +#X obj 603 215 bang~; +#X obj 528 434 line~; +#X obj 592 146 * 1000; +#X text 645 139 window size (msec); +#X obj 617 78 * 4; +#X obj 647 162 r speed; +#X obj 726 164 r location; +#X obj 655 240 +; +#X obj 648 204 *; +#X msg 726 193 0; +#X obj 624 349 +; +#X obj 615 305 t f f; +#X msg 528 406 \$1 \, \$2 \$3; +#X obj 528 378 pack 0 0 0; +#X obj 770 234 / 1000; +#X obj 624 276 *; +#X text 654 276 reading location (samples); +#X obj 652 390 / 4; +#X text 684 395 hop size (samples); +#X obj 578 476 sig~; +#X obj 546 474 +~; +#X text 653 85 (overlap times parent SR); +#X text 653 71 local sample rate; +#X obj 23 52 tabreceive~ phase-real; +#X obj 194 183 *~; +#X obj 194 205 +~; +#X obj 194 231 rsqrt~; +#X obj 317 153 -~; +#X obj 237 261 *~; +#X obj 298 261 *~; +#X obj 203 52 tabreceive~ phase-imag; +#X obj 108 390 sig~; +#X obj 90 319 t b f; +#X msg 90 340 1; +#X obj 104 364 /; +#X obj 232 447 tabsend~ phase-real; +#X obj 262 418 tabsend~ phase-imag; +#X obj 107 136 sig~ 1.5e-20; +#X obj 647 184 * 0.01; +#X obj 708 217 s speed; +#X obj 479 256 s see-location; +#X floatatom 688 368 0 0 0; +#X obj 686 347 *; +#X obj 848 245 r transpo; +#X obj 848 264 * 0.01; +#X obj 849 285 + 69; +#X obj 851 307 mtof; +#X obj 851 327 / 440; +#X obj 705 324 t b f; +#X obj 90 297 r window-size; +#X floatatom 855 361 0 0 0; +#X obj 564 556 tabreceive~ hanning; +#X obj 549 500 tabread4~ array1; +#X obj 514 524 tabread4~ array1; +#X obj 612 608 r running; +#X obj 612 632 switch~ 2048 4; +#X connect 0 0 2 1; +#X connect 1 0 2 0; +#X connect 2 0 65 0; +#X connect 2 0 25 0; +#X connect 3 0 5 1; +#X connect 4 0 5 0; +#X connect 5 0 66 0; +#X connect 5 0 25 1; +#X connect 6 0 57 1; +#X connect 7 0 57 0; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 58 1; +#X connect 10 0 54 0; +#X connect 10 0 54 1; +#X connect 11 0 55 1; +#X connect 12 0 26 0; +#X connect 13 0 1 1; +#X connect 13 0 3 1; +#X connect 13 1 0 1; +#X connect 13 1 4 1; +#X connect 14 0 9 1; +#X connect 14 0 7 1; +#X connect 14 1 6 1; +#X connect 14 1 8 1; +#X connect 15 0 14 0; +#X connect 16 0 72 0; +#X connect 17 0 44 0; +#X connect 18 0 37 0; +#X connect 18 0 45 0; +#X connect 18 0 70 0; +#X connect 19 0 34 0; +#X connect 20 0 22 0; +#X connect 21 0 22 0; +#X connect 21 1 22 1; +#X connect 22 0 32 0; +#X connect 23 0 13 0; +#X connect 24 0 12 0; +#X connect 25 0 24 1; +#X connect 28 0 27 0; +#X connect 30 0 18 0; +#X connect 31 0 27 0; +#X connect 31 0 50 0; +#X connect 31 0 83 0; +#X connect 32 0 43 2; +#X connect 32 0 38 1; +#X connect 34 0 21 0; +#X connect 35 0 68 0; +#X connect 36 0 39 0; +#X connect 36 0 18 1; +#X connect 37 0 18 1; +#X connect 38 0 37 1; +#X connect 39 0 69 0; +#X connect 40 0 43 1; +#X connect 41 0 43 0; +#X connect 41 1 40 0; +#X connect 42 0 31 0; +#X connect 43 0 42 0; +#X connect 44 0 45 1; +#X connect 45 0 41 0; +#X connect 47 0 49 0; +#X connect 49 0 50 1; +#X connect 50 0 82 0; +#X connect 53 0 9 0; +#X connect 53 0 6 0; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 56 0 58 0; +#X connect 56 0 59 0; +#X connect 57 0 59 1; +#X connect 57 0 11 0; +#X connect 57 0 11 1; +#X connect 58 0 1 0; +#X connect 58 0 4 0; +#X connect 59 0 0 0; +#X connect 59 0 3 0; +#X connect 60 0 7 0; +#X connect 60 0 8 0; +#X connect 61 0 24 0; +#X connect 62 0 63 0; +#X connect 62 1 64 1; +#X connect 63 0 64 0; +#X connect 64 0 61 0; +#X connect 67 0 10 0; +#X connect 68 0 38 0; +#X connect 71 0 47 0; +#X connect 71 0 40 1; +#X connect 72 0 71 0; +#X connect 73 0 74 0; +#X connect 74 0 75 0; +#X connect 75 0 76 0; +#X connect 76 0 77 0; +#X connect 77 0 78 0; +#X connect 77 0 80 0; +#X connect 78 0 72 0; +#X connect 78 1 72 1; +#X connect 79 0 62 0; +#X connect 81 0 23 1; +#X connect 81 0 15 1; +#X connect 81 0 12 1; +#X connect 82 0 23 0; +#X connect 83 0 15 0; +#X connect 84 0 85 0; +#X restore 291 222 pd fft-analysis; +#X msg 203 187 bang; +#X obj 38 225 samplerate~; +#X obj 38 247 s sample-rate; +#N canvas 260 23 647 768 phase-tables 0; +#N canvas 0 0 450 300 graph2 0; +#X array phase-imag 4096 float 0; +#X coords 0 1 4096 -1 400 300 1; +#X restore 234 396 graph; +#N canvas 0 0 450 300 graph3 0; +#X array phase-real 4096 float 0; +#X coords 0 1 4096 -1 400 300 1; +#X restore 232 23 graph; +#X msg 229 769 \; phase-real resize 4096 \; phase-imag resize 4096 +; +#X restore 681 423 pd phase-tables; +#N canvas 138 111 767 761 hanning-window 0; +#X obj 125 281 phasor~; +#X obj 125 319 cos~; +#X obj 31 448 tabwrite~ hanning; +#X obj 41 345 -~; +#X obj 38 298 sig~ 1; +#X msg 51 246 0; +#X text 193 19 CALCULATE HANNING; +#X text 193 37 WINDOW TABLE; +#N canvas 0 0 450 300 graph1 0; +#X array hanning 4096 float 0; +#X coords 0 1 4096 -1 400 300 1; +#X restore 375 384 graph; +#X obj 126 233 sig~; +#X text 239 202 sample rate / window size; +#X msg 31 196 bang; +#X obj 90 367 sig~ 0.5; +#X obj 67 409 *~; +#X obj 128 109 samplerate~; +#X obj 34 31 r window-size; +#X obj 34 72 t b f; +#X msg 375 746 \; hanning resize 4096; +#X obj 126 180 /; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 3 0 13 0; +#X connect 4 0 3 0; +#X connect 5 0 0 1; +#X connect 9 0 0 0; +#X connect 11 0 2 0; +#X connect 11 0 5 0; +#X connect 12 0 13 1; +#X connect 13 0 2 0; +#X connect 14 0 18 0; +#X connect 15 0 16 0; +#X connect 16 0 14 0; +#X connect 16 0 11 0; +#X connect 16 1 18 1; +#X connect 18 0 9 0; +#X restore 681 447 pd hanning-window; +#X obj 100 335 delay; +#X obj 160 332 + 100; +#X obj 139 51 route read run start hear save stop; +#X obj 895 245 timer; +#X obj 895 269 * 44.1; +#X obj 232 314 r maxoutsize; +#X obj 217 338 f; +#X msg 217 360 \; array2 resize \$1; +#X msg 100 358 \; action stop; +#X obj 186 30 r action; +#X obj 910 172 r running; +#X obj 894 195 f; +#X obj 894 219 sel 1; +#X obj 895 344 moses; +#X obj 946 345 r maxoutsize; +#X msg 895 366 \; array2 resize \$1; +#X msg 918 293 \; running 0; +#X msg 293 277 \; running 1; +#X obj 160 310 / 44.1; +#X msg 751 10 bang; +#X obj 277 92 r location; +#X obj 277 115 r speed; +#X obj 278 137 r transpo; +#X msg 43 283 \; pd dsp 1; +#X obj 503 414 int; +#X connect 0 0 1 0; +#X connect 1 0 27 0; +#X connect 2 0 39 0; +#X connect 4 0 15 0; +#X connect 5 0 4 1; +#X connect 6 0 5 0; +#X connect 7 0 8 0; +#X connect 8 0 18 0; +#X connect 9 0 10 0; +#X connect 9 0 32 0; +#X connect 10 0 9 1; +#X connect 11 0 9 1; +#X connect 14 0 4 0; +#X connect 15 0 3 0; +#X connect 15 0 3 1; +#X connect 15 0 20 0; +#X connect 16 0 17 0; +#X connect 17 0 14 1; +#X connect 18 0 19 0; +#X connect 20 0 61 0; +#X connect 21 0 23 0; +#X connect 21 1 7 0; +#X connect 22 0 25 0; +#X connect 23 0 24 0; +#X connect 24 0 22 0; +#X connect 26 0 28 0; +#X connect 27 0 26 0; +#X connect 29 0 30 0; +#X connect 31 0 13 0; +#X connect 31 0 14 0; +#X connect 32 0 33 0; +#X connect 32 0 37 0; +#X connect 32 0 40 0; +#X connect 32 0 43 0; +#X connect 32 0 13 0; +#X connect 32 0 54 0; +#X connect 32 0 60 0; +#X connect 33 0 34 0; +#X connect 37 0 45 0; +#X connect 38 0 37 1; +#X connect 39 0 0 0; +#X connect 39 1 10 0; +#X connect 39 1 32 0; +#X connect 39 2 11 0; +#X connect 39 3 16 0; +#X connect 39 4 21 0; +#X connect 39 5 56 0; +#X connect 40 0 41 0; +#X connect 41 0 53 0; +#X connect 41 0 50 0; +#X connect 42 0 43 1; +#X connect 42 0 55 0; +#X connect 43 0 44 0; +#X connect 46 0 39 0; +#X connect 47 0 48 1; +#X connect 48 0 49 0; +#X connect 49 0 40 1; +#X connect 50 0 52 0; +#X connect 51 0 50 1; +#X connect 55 0 38 0; +#X connect 56 0 48 0; +#X connect 57 0 9 0; +#X connect 58 0 9 0; +#X connect 59 0 9 0; +#X connect 61 0 12 0; +#X restore 30 290 pd guts; +#X msg 30 164 run the transformation; +#X msg 30 227 hear the output buffer again; +#X text 30 124 click below to:; +#X msg 30 248 save the output buffer; +#X floatatom 30 311 0 0 0; +#X msg 30 143 read an input file; +#X msg 30 269 save normalized to max amplitude; +#N canvas 213 187 495 352 input-sample 0; +#N canvas 0 0 450 300 graph1 0; +#X array array1 63024 float 0; +#X coords 0 1 63023 -1 400 300 1; +#X restore 55 22 graph; +#X text 146 379 INPUT SAMPLE; +#X restore 41 401 pd input-sample; +#N canvas 192 180 507 343 output-sample 0; +#N canvas 0 0 450 300 graph2 0; +#X array array2 2.646e+06 float 0; +#X coords 0 1 2.646e+06 -1 400 300 1; +#X restore 58 13 graph; +#X text 155 375 OUTPUT SAMPLE; +#X restore 41 426 pd output-sample; +#X floatatom 385 382 0 0 120; +#N canvas 194 37 397 591 output 0; +#X obj 64 196 t b; +#X obj 64 147 f; +#X obj 64 99 inlet; +#X text 68 78 mute; +#X obj 64 220 f; +#X msg 130 235 0; +#X msg 64 123 bang; +#X obj 64 172 moses 1; +#X obj 130 211 t b f; +#X obj 93 427 outlet; +#X msg 93 403 set \$1; +#X obj 180 158 moses 1; +#X obj 217 429 dbtorms; +#X obj 217 454 pack 0 100; +#X obj 180 133 r master-lvl; +#X obj 93 369 r master-lvl; +#X obj 80 276 s master-lvl; +#X obj 217 478 s master-amp; +#X obj 201 235 loadbang; +#X msg 201 260 \; master-lvl 90; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X connect 18 0 19 0; +#X restore 385 361 pd output; +#X msg 385 340 mute; +#X obj 385 403 s master-lvl; +#X text 427 339 <-- mute button; +#X text 422 381 <--set me; +#X text 385 423 LINE OUT LEVEL in dB (100 norm); +#X text 14 25 This is a Fourier-based analysis/resynthesis tool.; +#X text 22 45 You can move forward or backward in the sample \, or +"freeze" at any point using the "precession" and "location" controls. +Transposition is in hundredths of a half-tone.; +#X msg 30 185 start transformation when I change controls; +#X msg 30 206 stop the transformation; +#X text 731 329 examples:; +#X msg 614 94 -40; +#X connect 0 0 5 0; +#X connect 1 0 4 1; +#X connect 2 0 4 0; +#X connect 3 0 2 0; +#X connect 3 1 1 0; +#X connect 6 0 7 0; +#X connect 7 0 0 0; +#X connect 23 0 25 0; +#X connect 26 0 23 0; +#X connect 29 0 34 0; +#X connect 30 0 29 0; +#X connect 31 0 29 0; +#X connect 33 0 29 0; +#X connect 35 0 29 0; +#X connect 36 0 29 0; +#X connect 39 0 42 0; +#X connect 40 0 39 0; +#X connect 41 0 40 0; +#X connect 48 0 29 0; +#X connect 49 0 29 0; +#X connect 51 0 2 0; diff --git a/pd/doc/7.stuff/soundfile-tools/4.looper.pd b/pd/doc/7.stuff/soundfile-tools/4.looper.pd new file mode 100644 index 00000000..0b969a42 --- /dev/null +++ b/pd/doc/7.stuff/soundfile-tools/4.looper.pd @@ -0,0 +1,338 @@ +#N canvas 0 16 878 417 12; +#N canvas 213 187 495 352 input-sample 0; +#N canvas 0 0 450 300 graph1 0; +#X array array1 63024 float 0; +#X coords 0 1 63023 -1 400 300 1; +#X restore 56 23 graph; +#X text 151 393 INPUT SAMPLE; +#X restore 143 301 pd input-sample; +#N canvas 192 180 507 343 output-sample 0; +#N canvas 0 0 450 300 graph2 0; +#X array array2 441000 float 0; +#X coords 0 1 440999 -1 400 300 1; +#X restore 60 13 graph; +#X text 161 388 OUTPUT SAMPLE; +#X restore 143 325 pd output-sample; +#N canvas 41 102 912 552 guts 0; +#X msg 25 133 bang; +#X obj 15 468 openpanel; +#X obj 144 28 inlet; +#X obj 478 392 dac~; +#X obj 478 342 *~; +#X obj 494 301 line~; +#X obj 494 276 r master-amp; +#X msg 759 352 bang; +#X obj 759 377 savepanel; +#X obj 274 203 spigot; +#X msg 248 133 0; +#X msg 281 133 1; +#X obj 555 384 outlet; +#X obj 268 325 tabwrite~ array2; +#X msg 262 232 bang; +#X obj 456 312 +~; +#X obj 478 367 hip~ 7; +#X msg 480 228 bang; +#X obj 480 253 tabplay~ array2; +#X msg 759 402 write \$1 array2; +#X obj 759 427 soundfiler; +#N canvas 92 118 921 631 audio-transformation 0; +#X obj 320 509 outlet~; +#X obj 221 41 r transposition; +#X obj 287 175 r looplength; +#X obj 221 66 / 120; +#X obj 235 139 pow; +#X obj 221 91 t b f; +#X msg 221 115 2; +#X text 305 107 2 to the power (octaves); +#X text 304 123 gives speed change for the; +#X text 305 141 desired transposition; +#X text 280 65 transposition in octaves; +#X obj 470 264 * 441; +#X floatatom 470 234 0 0 0; +#X obj 426 352 samphold~; +#X obj 545 335 -~ 0.5; +#X obj 545 461 clip~ -0.5 0.5; +#X obj 545 437 *~ 1; +#X obj 545 486 cos~; +#X obj 545 365 wrap~; +#X obj 545 400 -~ 0.5; +#X obj 545 532 *~ -0.5; +#X obj 545 508 -~ 1; +#X floatatom 617 406 0 0 0; +#X obj 601 254 r smoothing; +#X obj 470 208 r startpoint; +#X obj 617 431 max 1; +#X obj 602 308 max 0.001; +#X obj 602 334 t b f; +#X obj 602 358 1; +#X obj 617 382 /; +#X obj 320 482 *~; +#X obj 320 456 tabread4~ array1; +#X obj 320 430 +~; +#X obj 227 472 print~; +#X msg 227 443 bang; +#X obj 601 61 loadbang; +#X msg 598 91 \; transposition 0 \; looplength 0 \; startpoint 0 \; +smoothing 0; +#X obj 236 263 ../../../extra/loop~; +#X obj 285 233 * 441; +#X obj 284 307 *~; +#X obj 133 41 loadbang; +#X obj 78 174 r running; +#X obj 78 203 sel 1; +#X obj 602 282 * 0.01; +#X obj 286 202 max 0.01; +#X connect 1 0 3 0; +#X connect 2 0 44 0; +#X connect 3 0 5 0; +#X connect 4 0 37 0; +#X connect 5 0 6 0; +#X connect 5 1 4 1; +#X connect 6 0 4 0; +#X connect 11 0 13 0; +#X connect 12 0 11 0; +#X connect 13 0 32 1; +#X connect 14 0 18 0; +#X connect 15 0 17 0; +#X connect 16 0 15 0; +#X connect 17 0 21 0; +#X connect 18 0 19 0; +#X connect 19 0 16 0; +#X connect 20 0 30 1; +#X connect 21 0 20 0; +#X connect 22 0 25 0; +#X connect 23 0 43 0; +#X connect 24 0 12 0; +#X connect 25 0 16 1; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 27 1 29 1; +#X connect 28 0 29 0; +#X connect 29 0 22 0; +#X connect 30 0 0 0; +#X connect 31 0 30 0; +#X connect 32 0 31 0; +#X connect 32 0 33 0; +#X connect 34 0 33 0; +#X connect 35 0 36 0; +#X connect 37 0 13 1; +#X connect 37 0 39 0; +#X connect 37 0 14 0; +#X connect 37 1 39 1; +#X connect 38 0 37 1; +#X connect 39 0 32 0; +#X connect 40 0 3 0; +#X connect 41 0 42 0; +#X connect 42 0 37 0; +#X connect 43 0 26 0; +#X connect 44 0 38 0; +#X restore 274 283 pd audio-transformation; +#X obj 553 331 env~ 16384; +#X obj 665 317 route normalized; +#X msg 667 457 write -normalize \$1 array2; +#X msg 667 407 bang; +#X obj 667 432 savepanel; +#X obj 667 482 soundfiler; +#X obj 15 518 soundfiler; +#X msg 15 493 read -resize -maxsize 1e+06 \$1 array1; +#X obj 330 100 r transposition; +#X obj 330 125 r looplength; +#X obj 330 175 r smoothing; +#X obj 708 110 timer; +#X obj 708 135 * 44.1; +#X obj 724 37 r running; +#X obj 708 60 f; +#X obj 708 85 sel 1; +#X obj 708 227 moses; +#X obj 753 227 r maxoutsize; +#X msg 708 252 \; array2 resize \$1; +#X msg 685 37 bang; +#X obj 144 53 route read run start hear save stop; +#X obj 312 427 delay; +#X obj 331 404 + 100; +#X obj 145 329 r maxoutsize; +#X obj 86 329 f; +#X msg 86 354 \; array2 resize \$1; +#X msg 312 452 \; action stop; +#X obj 331 379 / 44.1; +#X msg 62 271 \; pd dsp 1; +#X msg 334 240 \; running 1; +#X obj 202 28 r action; +#X msg 733 160 \; running 0 \; pd dsp 0; +#X obj 330 150 r startpoint; +#X obj 553 357 int; +#X connect 0 0 1 0; +#X connect 1 0 29 0; +#X connect 2 0 42 0; +#X connect 4 0 16 0; +#X connect 5 0 4 1; +#X connect 6 0 5 0; +#X connect 7 0 8 0; +#X connect 8 0 19 0; +#X connect 9 0 10 0; +#X connect 9 0 14 0; +#X connect 10 0 9 1; +#X connect 11 0 9 1; +#X connect 14 0 13 0; +#X connect 14 0 46 0; +#X connect 14 0 43 0; +#X connect 14 0 50 0; +#X connect 14 0 51 0; +#X connect 14 0 33 0; +#X connect 15 0 4 0; +#X connect 15 0 22 0; +#X connect 16 0 3 0; +#X connect 16 0 3 1; +#X connect 17 0 18 0; +#X connect 18 0 15 1; +#X connect 19 0 20 0; +#X connect 21 0 13 0; +#X connect 21 0 15 0; +#X connect 22 0 55 0; +#X connect 23 0 25 0; +#X connect 23 1 7 0; +#X connect 24 0 27 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 28 0; +#X connect 30 0 9 0; +#X connect 31 0 9 0; +#X connect 32 0 9 0; +#X connect 33 0 34 0; +#X connect 34 0 53 0; +#X connect 34 0 38 0; +#X connect 35 0 36 1; +#X connect 36 0 37 0; +#X connect 37 0 33 1; +#X connect 38 0 40 0; +#X connect 39 0 38 1; +#X connect 41 0 36 0; +#X connect 42 0 0 0; +#X connect 42 1 14 0; +#X connect 42 1 10 0; +#X connect 42 2 11 0; +#X connect 42 3 17 0; +#X connect 42 4 23 0; +#X connect 42 5 41 0; +#X connect 43 0 48 0; +#X connect 44 0 43 1; +#X connect 45 0 46 1; +#X connect 45 0 49 0; +#X connect 46 0 47 0; +#X connect 49 0 44 0; +#X connect 52 0 42 0; +#X connect 54 0 9 0; +#X connect 55 0 12 0; +#X restore 19 228 pd guts; +#X msg 19 96 run the transformation; +#X msg 19 163 hear the output buffer again; +#X text 19 55 click below to:; +#X msg 19 185 save the output buffer; +#X floatatom 367 337 0 0 120; +#N canvas 194 37 397 591 output 0; +#X obj 66 203 t b; +#X obj 66 152 f; +#X obj 66 102 inlet; +#X text 71 81 mute; +#X obj 66 228 f; +#X msg 134 244 0; +#X msg 66 127 bang; +#X obj 66 178 moses 1; +#X obj 134 218 t b f; +#X obj 96 442 outlet; +#X msg 96 416 set \$1; +#X obj 186 163 moses 1; +#X obj 224 444 dbtorms; +#X obj 224 469 pack 0 100; +#X obj 186 138 r master-lvl; +#X obj 96 382 r master-lvl; +#X obj 83 286 s master-lvl; +#X obj 224 494 s master-amp; +#X obj 208 244 loadbang; +#X msg 208 269 \; master-lvl 90; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X connect 18 0 19 0; +#X restore 367 316 pd output; +#X msg 367 294 mute; +#X obj 367 359 s master-lvl; +#X text 410 293 <-- mute button; +#X floatatom 19 250 0 0 0; +#X text 20 294 100 maximum; +#X text 20 276 output meter; +#X text 405 336 <--set me; +#X msg 19 74 read an input file; +#X text 367 379 LINE OUT LEVEL in dB (100 norm); +#X msg 19 206 save normalized to max amplitude; +#X floatatom 368 73 0 0 1000; +#X floatatom 369 19 0 0 0; +#X obj 369 47 s transposition; +#X floatatom 369 170 0 0 100; +#X obj 369 192 s smoothing; +#X obj 368 95 s looplength; +#X text 418 73 <- loop length \, hundredths of a second; +#X floatatom 369 122 0 0 60000; +#X obj 369 144 s startpoint; +#X text 420 123 <- start point \, hundredths of a second; +#X text 419 171 <- envelope smoothing \, 0-100; +#X text 38 9 looping sample player.; +#X msg 19 118 start looping when I change something; +#X msg 19 140 stop looping; +#X floatatom 368 239 0 0 60; +#N canvas 0 0 265 196 length 0; +#X obj 48 24 inlet; +#X obj 49 104 * 44100; +#X msg 86 130 \; array2 resize \$1; +#X obj 48 49 min 60; +#X obj 62 78 s output-length; +#X obj 48 164 s maxoutsize; +#X connect 0 0 3 0; +#X connect 1 0 2 0; +#X connect 1 0 5 0; +#X connect 3 0 1 0; +#X connect 3 0 4 0; +#X restore 368 260 pd length; +#N canvas 219 38 198 151 /SUBPATCH/ 0; +#X obj 79 122 outlet; +#X obj 79 74 loadbang; +#X msg 79 98 10; +#X connect 1 0 2 0; +#X connect 2 0 0 0; +#X restore 368 217 pd; +#X text 455 241 length in seconds of the output; +#X text 453 259 buffer... maximum 60; +#X text 404 241 <- set; +#X text 408 20 <- transposition up or down \, 10ths of a half step +; +#X connect 2 0 12 0; +#X connect 3 0 2 0; +#X connect 4 0 2 0; +#X connect 6 0 2 0; +#X connect 7 0 10 0; +#X connect 8 0 7 0; +#X connect 9 0 8 0; +#X connect 16 0 2 0; +#X connect 18 0 2 0; +#X connect 19 0 24 0; +#X connect 20 0 21 0; +#X connect 22 0 23 0; +#X connect 26 0 27 0; +#X connect 31 0 2 0; +#X connect 32 0 2 0; +#X connect 33 0 34 0; +#X connect 35 0 33 0; diff --git a/pd/doc/7.stuff/soundfile-tools/5.reverb.pd b/pd/doc/7.stuff/soundfile-tools/5.reverb.pd new file mode 100644 index 00000000..0b0cdb11 --- /dev/null +++ b/pd/doc/7.stuff/soundfile-tools/5.reverb.pd @@ -0,0 +1,214 @@ +#N canvas 186 43 739 364 12; +#N canvas 213 187 495 352 input-sample 0; +#N canvas 0 0 450 300 graph1 0; +#X array array1 63024 float 0; +#X coords 0 1 63023 -1 400 300 1; +#X restore 54 22 graph; +#X text 145 376 INPUT SAMPLE; +#X restore 154 226 pd input-sample; +#N canvas 192 180 507 343 output-sample 0; +#N canvas 0 0 450 300 graph2 0; +#X array array2 504024 float 0; +#X coords 0 1 504023 -1 400 300 1; +#X restore 57 13 graph; +#X text 154 372 OUTPUT SAMPLE; +#X restore 155 249 pd output-sample; +#N canvas 116 150 735 421 guts 0; +#X msg 24 128 bang; +#X obj 24 345 openpanel; +#X obj 138 30 inlet; +#X obj 446 368 dac~; +#X obj 446 327 *~; +#X obj 461 304 line~; +#X obj 461 283 r master-amp; +#X msg 707 85 bang; +#X obj 707 106 savepanel; +#X obj 268 161 spigot; +#X msg 253 128 0; +#X msg 284 128 1; +#X obj 500 398 outlet; +#X obj 316 128 r frequency; +#X obj 256 312 tabwrite~ array2; +#X msg 256 189 bang; +#X obj 427 276 +~; +#X msg 139 128 \; pd dsp 1; +#X obj 446 347 hip~ 7; +#X obj 268 217 tabplay~ array1; +#X msg 442 124 bang; +#X obj 442 145 tabplay~ array2; +#X msg 707 126 write \$1 array2; +#X obj 707 147 soundfiler; +#X obj 138 51 route read run start hear save; +#N canvas 0 0 632 395 audio-transformation 0; +#X obj 101 49 inlet~; +#X obj 105 268 outlet~; +#X obj 101 148 ../../../extra/rev1~ xxx; +#X obj 339 79 r revgain; +#X obj 338 102 dbtorms; +#X obj 338 130 pack 0 50; +#X obj 338 154 line~; +#X obj 103 204 *~; +#X obj 181 51 r revtime; +#X obj 213 236 *~; +#X obj 340 209 dbtorms; +#X obj 340 237 pack 0 50; +#X obj 340 261 line~; +#X obj 294 37 inlet; +#X msg 293 61 bang; +#X obj 342 186 r drygain; +#X connect 0 0 2 0; +#X connect 0 0 9 0; +#X connect 2 0 7 0; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 7 1; +#X connect 7 0 1 0; +#X connect 8 0 2 1; +#X connect 9 0 1 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 9 1; +#X connect 13 0 14 0; +#X connect 14 0 2 2; +#X connect 15 0 10 0; +#X restore 268 238 pd audio-transformation; +#X obj 500 377 env~ 16384; +#X obj 570 86 route normalized; +#X msg 570 179 write -normalize \$1 array2; +#X msg 570 138 bang; +#X obj 570 159 savepanel; +#X obj 570 204 soundfiler; +#X obj 24 396 soundfiler; +#X msg 24 374 read -resize -maxsize 1e+06 \$1 array1; +#X msg 24 440 \; array2 resize \$1; +#X obj 402 129 r q; +#X obj 24 419 + 441000; +#X connect 0 0 1 0; +#X connect 1 0 33 0; +#X connect 2 0 24 0; +#X connect 4 0 18 0; +#X connect 5 0 4 1; +#X connect 6 0 5 0; +#X connect 7 0 8 0; +#X connect 8 0 22 0; +#X connect 9 0 10 0; +#X connect 9 0 15 0; +#X connect 10 0 9 1; +#X connect 11 0 9 1; +#X connect 13 0 9 0; +#X connect 15 0 14 0; +#X connect 15 0 19 0; +#X connect 15 0 25 1; +#X connect 16 0 4 0; +#X connect 18 0 3 0; +#X connect 18 0 3 1; +#X connect 18 0 26 0; +#X connect 19 0 25 0; +#X connect 20 0 21 0; +#X connect 21 0 16 1; +#X connect 22 0 23 0; +#X connect 24 0 0 0; +#X connect 24 1 15 0; +#X connect 24 1 10 0; +#X connect 24 1 17 0; +#X connect 24 2 11 0; +#X connect 24 2 17 0; +#X connect 24 3 20 0; +#X connect 24 4 27 0; +#X connect 25 0 14 0; +#X connect 25 0 16 0; +#X connect 26 0 12 0; +#X connect 27 0 29 0; +#X connect 27 1 7 0; +#X connect 28 0 31 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 32 0 36 0; +#X connect 33 0 32 0; +#X connect 35 0 9 0; +#X connect 36 0 34 0; +#X restore 35 190 pd guts; +#X msg 35 85 run the transformation; +#X msg 35 127 hear the output buffer again; +#X text 35 45 click below to:; +#X msg 35 148 save the output buffer; +#X floatatom 445 285 0 0 120; +#N canvas 194 37 397 591 output 0; +#X obj 63 194 t b; +#X obj 63 146 f; +#X obj 63 98 inlet; +#X text 68 77 mute; +#X obj 63 218 f; +#X msg 129 233 0; +#X msg 63 122 bang; +#X obj 63 170 moses 1; +#X obj 129 209 t b f; +#X obj 92 423 outlet; +#X msg 92 399 set \$1; +#X obj 178 156 moses 1; +#X obj 215 425 dbtorms; +#X obj 215 450 pack 0 100; +#X obj 178 132 r master-lvl; +#X obj 92 366 r master-lvl; +#X obj 79 274 s master-lvl; +#X obj 215 474 s master-amp; +#X obj 199 233 loadbang; +#X msg 199 258 \; master-lvl 90; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X connect 18 0 19 0; +#X restore 445 264 pd output; +#X msg 445 243 mute; +#X obj 445 306 s master-lvl; +#X text 486 242 <-- mute button; +#X floatatom 35 211 0 0 0; +#X text 13 251 100 maximum; +#X text 13 233 output meter; +#X text 482 284 <--set me; +#X msg 35 64 read an input file; +#X text 445 326 LINE OUT LEVEL in dB (100 norm); +#X msg 35 169 save normalized to max amplitude; +#X msg 35 106 start transformation when I change f or q; +#X floatatom 445 82 0 0 120; +#X floatatom 445 40 0 0 100; +#X obj 445 61 s revtime; +#X obj 445 103 s revgain; +#X floatatom 446 184 0 0 120; +#X text 494 84 <-- reverb gain; +#X text 482 185 <-- dry gain; +#X obj 446 205 s drygain; +#X obj 446 142 loadbang; +#X msg 446 163 100; +#X text 486 39 <- reverb time 0-100; +#X text 23 15 Reverberator. Read in a sample first.; +#X connect 2 0 12 0; +#X connect 3 0 2 0; +#X connect 4 0 2 0; +#X connect 6 0 2 0; +#X connect 7 0 10 0; +#X connect 8 0 7 0; +#X connect 9 0 8 0; +#X connect 16 0 2 0; +#X connect 18 0 2 0; +#X connect 19 0 2 0; +#X connect 20 0 23 0; +#X connect 21 0 22 0; +#X connect 24 0 27 0; +#X connect 28 0 29 0; +#X connect 29 0 24 0; diff --git a/pd/doc/7.stuff/soundfile-tools/6.vocoder.pd b/pd/doc/7.stuff/soundfile-tools/6.vocoder.pd new file mode 100644 index 00000000..ce822ef4 --- /dev/null +++ b/pd/doc/7.stuff/soundfile-tools/6.vocoder.pd @@ -0,0 +1,314 @@ +#N canvas 73 102 706 428 12; +#X floatatom 462 162 0 0 100; +#X msg 462 137 set \$1; +#X text 29 322 100 maximum; +#X text 29 304 output meter; +#N canvas 145 136 937 540 guts 0; +#X msg 5 296 bang; +#X obj 5 321 openpanel; +#X obj 136 29 inlet; +#X obj 452 375 dac~; +#X obj 452 323 *~; +#X obj 467 300 line~; +#X obj 467 280 r master-amp; +#X msg 689 157 bang; +#X obj 689 177 savepanel; +#X obj 506 393 outlet; +#X obj 297 238 tabwrite~ array2; +#X obj 454 238 +~; +#X obj 452 343 hip~ 7; +#X msg 446 108 bang; +#X obj 446 133 tabplay~ array2; +#X msg 689 197 write \$1 array2; +#X obj 689 218 soundfiler; +#X obj 506 373 env~ 16384; +#X obj 587 129 route normalized; +#X msg 587 250 write -normalize \$1 array2; +#X msg 587 209 bang; +#X obj 587 230 savepanel; +#X obj 587 274 soundfiler; +#X obj 5 365 soundfiler; +#X msg 5 343 read -resize -maxsize 1e+06 \$1 array1; +#X obj 676 338 loadbang; +#N canvas 0 0 690 470 fft-analysis 0; +#X obj 275 314 *~; +#X obj 257 348 *~; +#X obj 218 348 *~; +#X obj 105 163 *~; +#X obj 66 156 *~; +#X obj 66 182 +~; +#X obj 216 104 *~; +#X obj 253 104 inlet~; +#X obj 216 130 rfft~; +#X obj 42 371 *~; +#X floatatom 458 208 0 0 0; +#X obj 334 177 *~; +#X obj 66 104 *~; +#X obj 103 104 inlet~; +#X obj 45 65 tabreceive~ hanning; +#X obj 66 130 rfft~; +#X obj 218 374 rifft~; +#X obj 42 397 outlet~; +#X obj 297 177 *~; +#X obj 297 203 +~; +#X obj 307 314 sig~ 0.001; +#X text 122 214 modulus; +#X obj 66 208 sqrt~; +#X obj 275 288 *~; +#X obj 457 58 r squelch; +#X obj 329 418 block~ 1024 4; +#X obj 297 229 rsqrt~; +#X obj 341 203 sig~ 1e-20; +#X obj 297 255 clip~; +#X obj 458 130 t f f; +#X obj 458 156 *; +#X obj 458 182 * 0.01; +#X obj 456 94 max 1; +#X obj 559 58 loadbang; +#X obj 458 234 max 0; +#X connect 0 0 1 1; +#X connect 0 0 2 1; +#X connect 1 0 16 1; +#X connect 2 0 16 0; +#X connect 3 0 5 1; +#X connect 4 0 5 0; +#X connect 5 0 22 0; +#X connect 6 0 8 0; +#X connect 7 0 6 1; +#X connect 8 0 18 0; +#X connect 8 0 18 1; +#X connect 8 0 2 0; +#X connect 8 1 11 0; +#X connect 8 1 11 1; +#X connect 8 1 1 0; +#X connect 9 0 17 0; +#X connect 10 0 34 0; +#X connect 11 0 19 1; +#X connect 12 0 15 0; +#X connect 13 0 12 1; +#X connect 14 0 12 0; +#X connect 14 0 6 0; +#X connect 14 0 9 0; +#X connect 15 0 4 0; +#X connect 15 0 4 1; +#X connect 15 1 3 0; +#X connect 15 1 3 1; +#X connect 16 0 9 1; +#X connect 18 0 19 0; +#X connect 19 0 26 0; +#X connect 20 0 0 1; +#X connect 22 0 23 0; +#X connect 23 0 0 0; +#X connect 24 0 32 0; +#X connect 26 0 28 0; +#X connect 27 0 26 0; +#X connect 28 0 23 1; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 31 0; +#X connect 31 0 10 0; +#X connect 32 0 29 0; +#X connect 33 0 32 0; +#X connect 34 0 28 2; +#X restore 296 194 pd fft-analysis; +#X msg 202 86 bang; +#N canvas 46 0 723 534 hanning-window 0; +#X obj 122 273 phasor~; +#X obj 122 311 cos~; +#X obj 31 436 tabwrite~ hanning; +#X obj 40 336 -~; +#X obj 37 290 sig~ 1; +#X msg 50 240 0; +#X text 188 18 CALCULATE HANNING; +#X text 188 36 WINDOW TABLE; +#N canvas 0 0 450 300 graph1 0; +#X array hanning 1024 float 0; +#X coords 0 1 1023 -1 400 300 1; +#X restore 342 235 graph; +#X obj 123 227 sig~; +#X text 156 173 sample rate / window size; +#X msg 31 191 bang; +#X obj 88 357 sig~ 0.5; +#X obj 66 399 *~; +#X obj 124 106 samplerate~; +#X obj 33 31 r window-size; +#X obj 123 175 /; +#X msg 262 106 \; hanning resize \$1; +#X obj 31 70 t b f f; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 3 0 13 0; +#X connect 4 0 3 0; +#X connect 5 0 0 1; +#X connect 9 0 0 0; +#X connect 11 0 2 0; +#X connect 11 0 5 0; +#X connect 12 0 13 1; +#X connect 13 0 2 0; +#X connect 14 0 16 0; +#X connect 15 0 18 0; +#X connect 16 0 9 0; +#X connect 18 0 14 0; +#X connect 18 0 11 0; +#X connect 18 1 16 1; +#X connect 18 2 17 0; +#X restore 673 403 pd hanning-window; +#X obj 181 29 r action; +#X msg 150 163 \; pd dsp 1; +#X msg 389 106 stop; +#X msg 58 455 \; array2 resize \$1; +#X obj 58 434 + 4410; +#X obj 136 50 route read AND run hear save stop; +#X obj 58 412 min; +#X obj 107 380 t b f; +#X obj 107 270 openpanel; +#X obj 107 314 soundfiler; +#X msg 107 293 read -resize -maxsize 1e+06 \$1 array3; +#X msg 106 239 bang; +#X msg 676 360 \; window-size 1024 \;; +#X obj 296 145 tabplay~ array1; +#X obj 314 167 tabplay~ array3; +#X connect 0 0 1 0; +#X connect 1 0 24 0; +#X connect 2 0 34 0; +#X connect 4 0 12 0; +#X connect 5 0 4 1; +#X connect 6 0 5 0; +#X connect 7 0 8 0; +#X connect 8 0 15 0; +#X connect 11 0 4 0; +#X connect 12 0 3 0; +#X connect 12 0 3 1; +#X connect 12 0 17 0; +#X connect 13 0 14 0; +#X connect 14 0 11 1; +#X connect 15 0 16 0; +#X connect 17 0 9 0; +#X connect 18 0 20 0; +#X connect 18 1 7 0; +#X connect 19 0 22 0; +#X connect 20 0 21 0; +#X connect 21 0 19 0; +#X connect 23 0 35 0; +#X connect 24 0 23 0; +#X connect 25 0 41 0; +#X connect 26 0 10 0; +#X connect 26 0 11 0; +#X connect 27 0 10 0; +#X connect 27 0 30 0; +#X connect 27 0 42 0; +#X connect 27 0 43 0; +#X connect 29 0 34 0; +#X connect 31 0 14 0; +#X connect 33 0 32 0; +#X connect 34 0 0 0; +#X connect 34 1 40 0; +#X connect 34 2 27 0; +#X connect 34 3 13 0; +#X connect 34 4 18 0; +#X connect 34 5 31 0; +#X connect 35 0 33 0; +#X connect 36 0 35 0; +#X connect 36 1 35 1; +#X connect 37 0 39 0; +#X connect 38 0 36 0; +#X connect 39 0 38 0; +#X connect 40 0 37 0; +#X connect 42 0 26 0; +#X connect 43 0 26 1; +#X restore 29 263 pd guts; +#X msg 29 158 run the transformation; +#X msg 29 200 hear the output buffer again; +#X text 29 97 click below to:; +#X msg 29 221 save the output buffer; +#X floatatom 29 284 0 0 0; +#X msg 29 242 save normalized to max amplitude; +#N canvas 130 10 488 287 input-sample 0; +#N canvas 0 0 450 300 graph1 0; +#X array array1 188955 float 0; +#X coords 0 1 188954 -1 400 100 1; +#X restore 53 21 graph; +#N canvas 0 0 450 300 graph3 0; +#X array array3 225280 float 0; +#X coords 0 1 225279 -1 400 100 1; +#X restore 54 146 graph; +#X text 227 279 INPUT SAMPLES; +#X restore 169 368 pd input-sample; +#N canvas 192 180 507 343 output-sample 0; +#N canvas 0 0 450 300 graph2 0; +#X array array2 193365 float 0; +#X coords 0 1 193364 -1 400 300 1; +#X restore 56 12 graph; +#X text 151 365 OUTPUT SAMPLE; +#X restore 168 393 pd output-sample; +#X floatatom 408 365 0 0 0; +#N canvas 194 37 397 591 output 0; +#X obj 62 191 t b; +#X obj 62 144 f; +#X obj 62 96 inlet; +#X text 67 76 mute; +#X obj 62 215 f; +#X msg 127 229 0; +#X msg 62 120 bang; +#X obj 62 167 moses 1; +#X obj 127 206 t b f; +#X obj 90 416 outlet; +#X msg 90 392 set \$1; +#X obj 175 154 moses 1; +#X obj 211 418 dbtorms; +#X obj 211 442 pack 0 100; +#X obj 175 130 r master-lvl; +#X obj 90 359 r master-lvl; +#X obj 78 269 s master-lvl; +#X obj 211 466 s master-amp; +#X obj 195 229 loadbang; +#X msg 195 253 \; master-lvl 90; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X connect 18 0 19 0; +#X restore 408 344 pd output; +#X msg 408 323 mute; +#X obj 408 386 s master-lvl; +#X text 449 322 <-- mute button; +#X text 444 363 <--set me; +#X text 408 406 LINE OUT LEVEL in dB (100 norm); +#X msg 29 179 stop the transformation; +#X text 193 9 (old-fashioned) VOCODER; +#X text 28 31 This takes in two soundfiles and uses the first to "vocode" +the second. THe resulting sound is as long as the shorter of the two +inputs.; +#X msg 29 116 read the analysis sound from file; +#X msg 29 137 AND read the sound to be processed from file; +#X text 462 97 SQUELCH; +#X obj 462 116 r squelch; +#X obj 462 187 s squelch; +#X text 526 161 1-100 or so; +#X connect 0 0 27 0; +#X connect 1 0 0 0; +#X connect 4 0 9 0; +#X connect 5 0 4 0; +#X connect 6 0 4 0; +#X connect 8 0 4 0; +#X connect 10 0 4 0; +#X connect 13 0 16 0; +#X connect 14 0 13 0; +#X connect 15 0 14 0; +#X connect 20 0 4 0; +#X connect 23 0 4 0; +#X connect 24 0 4 0; +#X connect 26 0 1 0; diff --git a/pd/doc/7.stuff/soundfile-tools/README.txt b/pd/doc/7.stuff/soundfile-tools/README.txt new file mode 100644 index 00000000..1670af3f --- /dev/null +++ b/pd/doc/7.stuff/soundfile-tools/README.txt @@ -0,0 +1,2 @@ +Here are some standard audio transformations packaged to work with mono
+soundfiles.
diff --git a/pd/doc/7.stuff/synth/1.poly.synth.pd b/pd/doc/7.stuff/synth/1.poly.synth.pd new file mode 100644 index 00000000..bd2a95a8 --- /dev/null +++ b/pd/doc/7.stuff/synth/1.poly.synth.pd @@ -0,0 +1,311 @@ +#N canvas 232 162 657 719 12; +#X floatatom 424 666 0 0 100; +#N canvas 269 205 698 344 output 0; +#X obj 388 156 t b; +#X obj 388 105 f; +#X obj 388 54 inlet; +#X obj 388 181 f; +#X msg 482 174 0; +#X msg 388 79 bang; +#X obj 388 130 moses 1; +#X obj 482 149 t b f; +#X obj 444 111 moses 1; +#X obj 91 148 dbtorms; +#X obj 444 86 r master-lvl; +#X obj 91 48 r master-lvl; +#X obj 388 207 s master-lvl; +#X obj 28 169 inlet~; +#X obj 213 195 inlet; +#X obj 229 218 s master-lvl; +#X msg 101 72 set \$1; +#X obj 101 98 outlet; +#X msg 213 241 \; pd dsp 1; +#X obj 91 201 line~; +#X obj 31 219 *~; +#X obj 31 247 dac~; +#X obj 91 173 pack 0 50; +#X text 17 149 audio in; +#X obj 28 194 hip~ 1; +#X connect 0 0 3 0; +#X connect 1 0 6 0; +#X connect 2 0 5 0; +#X connect 3 0 12 0; +#X connect 4 0 12 0; +#X connect 5 0 1 0; +#X connect 6 0 0 0; +#X connect 6 1 7 0; +#X connect 7 0 4 0; +#X connect 8 1 3 1; +#X connect 9 0 22 0; +#X connect 10 0 1 1; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 11 0 16 0; +#X connect 13 0 24 0; +#X connect 14 0 15 0; +#X connect 14 0 18 0; +#X connect 16 0 17 0; +#X connect 19 0 20 1; +#X connect 20 0 21 0; +#X connect 20 0 21 1; +#X connect 22 0 19 0; +#X connect 24 0 20 0; +#X restore 386 690 pd output; +#X msg 462 666 MUTE; +#X obj 16 382 unpack; +#X obj 16 299 notein; +#X obj 16 327 pack; +#X obj 329 213 numset amp x; +#X obj 329 242 numset aa x; +#X obj 329 329 numset ar x; +#X obj 329 271 numset ad x; +#X obj 329 300 numset as x; +#N canvas 248 85 884 761 synth 0; +#X obj 114 588 synthvoice; +#X obj 114 561 synthvoice; +#X obj 114 534 synthvoice; +#X obj 114 507 synthvoice; +#X obj 114 480 synthvoice; +#X obj 114 453 synthvoice; +#X obj 114 426 synthvoice; +#X obj 114 399 synthvoice; +#X obj 40 91 t b f; +#X obj 22 185 f; +#X obj 44 130 + 1; +#X obj 44 158 mod 1e+06; +#X obj 317 670 outlet~; +#X obj 45 24 r syn-note; +#X obj 454 25 r syn-noteon; +#X text 445 652 todo: field to stamp note for later messages; +#X obj 22 212 + 1e+06; +#X obj 55 239 makenote; +#X obj 109 309 moses 1e+06; +#X obj 26 352 r all-off; +#X msg 26 377 stop; +#X obj 196 368 route 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16; +#X obj 317 644 synthvoice; +#X obj 317 617 synthvoice; +#X obj 317 590 synthvoice; +#X obj 317 563 synthvoice; +#X obj 317 536 synthvoice; +#X obj 317 509 synthvoice; +#X obj 317 482 synthvoice; +#X obj 317 455 synthvoice; +#X obj 55 279 poly 16 1; +#X obj 45 54 unpack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; +#X obj 455 51 unpack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; +#X obj 196 339 pack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; +#X connect 0 0 29 0; +#X connect 1 0 0 0; +#X connect 2 0 1 0; +#X connect 3 0 2 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 8 1 33 2; +#X connect 9 0 10 0; +#X connect 9 0 16 0; +#X connect 10 0 11 0; +#X connect 11 0 9 1; +#X connect 13 0 31 0; +#X connect 14 0 32 0; +#X connect 16 0 17 0; +#X connect 17 0 30 0; +#X connect 17 1 30 1; +#X connect 18 0 33 2; +#X connect 19 0 20 0; +#X connect 20 0 30 0; +#X connect 21 0 7 1; +#X connect 21 1 6 1; +#X connect 21 2 5 1; +#X connect 21 3 4 1; +#X connect 21 4 3 1; +#X connect 21 5 2 1; +#X connect 21 6 1 1; +#X connect 21 7 0 1; +#X connect 21 8 29 1; +#X connect 21 9 28 1; +#X connect 21 10 27 1; +#X connect 21 11 26 1; +#X connect 21 12 25 1; +#X connect 21 13 24 1; +#X connect 21 14 23 1; +#X connect 21 15 22 1; +#X connect 22 0 12 0; +#X connect 23 0 22 0; +#X connect 24 0 23 0; +#X connect 25 0 24 0; +#X connect 26 0 25 0; +#X connect 27 0 26 0; +#X connect 28 0 27 0; +#X connect 29 0 28 0; +#X connect 30 0 33 0; +#X connect 30 1 18 0; +#X connect 30 2 33 1; +#X connect 31 0 8 0; +#X connect 31 1 17 1; +#X connect 31 2 17 2; +#X connect 31 3 33 3; +#X connect 31 4 33 4; +#X connect 31 5 33 5; +#X connect 31 6 33 6; +#X connect 31 7 33 7; +#X connect 31 8 33 8; +#X connect 31 9 33 9; +#X connect 31 10 33 10; +#X connect 31 11 33 11; +#X connect 31 12 33 12; +#X connect 31 13 33 13; +#X connect 31 14 33 14; +#X connect 31 15 33 15; +#X connect 31 16 33 16; +#X connect 32 0 30 0; +#X connect 32 1 30 1; +#X connect 32 2 33 3; +#X connect 32 3 33 4; +#X connect 32 4 33 5; +#X connect 32 5 33 6; +#X connect 32 6 33 7; +#X connect 32 7 33 8; +#X connect 32 8 33 9; +#X connect 32 9 33 10; +#X connect 32 10 33 11; +#X connect 32 11 33 12; +#X connect 32 12 33 13; +#X connect 32 13 33 14; +#X connect 32 14 33 15; +#X connect 32 15 33 16; +#X connect 33 0 21 0; +#X restore 386 640 pd synth; +#X obj 24 351 r syn-midinoteon; +#X obj 16 649 s syn-noteon; +#N canvas 0 0 690 415 tables 0; +#X msg 107 49 bang; +#X obj 107 78 t b b; +#X obj 159 142 f; +#X obj 197 142 + 1; +#X msg 181 115 0; +#X obj 107 107 until; +#X obj 161 177 t f f; +#X obj 109 210 mtof; +#X obj 90 177 sel 129; +#X obj 109 237 tabwrite mtof; +#X text 48 15 patch to regenerate the mtof table; +#N canvas 0 0 450 300 graph2 0; +#X array mtof 130 float 1; +#A 0 8.1758 8.66196 9.17702 9.72272 10.3009 10.9134 11.5623 12.2499 +12.9783 13.75 14.5676 15.4339 16.3516 17.3239 18.354 19.4454 20.6017 +21.8268 23.1247 24.4997 25.9565 27.5 29.1352 30.8677 32.7032 34.6478 +36.7081 38.8909 41.2034 43.6535 46.2493 48.9994 51.9131 55 58.2705 +61.7354 65.4064 69.2957 73.4162 77.7817 82.4069 87.3071 92.4986 97.9989 +103.826 110 116.541 123.471 130.813 138.591 146.832 155.563 164.814 +174.614 184.997 195.998 207.652 220 233.082 246.942 261.626 277.183 +293.665 311.127 329.628 349.228 369.994 391.995 415.305 440 466.164 +493.883 523.251 554.365 587.33 622.254 659.255 698.456 739.989 783.991 +830.609 880 932.328 987.767 1046.5 1108.73 1174.66 1244.51 1318.51 +1396.91 1479.98 1567.98 1661.22 1760 1864.66 1975.53 2093 2217.46 2349.32 +2489.02 2637.02 2793.83 2959.96 3135.96 3322.44 3520 3729.31 3951.07 +4186.01 4434.92 4698.64 4978.03 5274.04 5587.65 5919.91 6271.93 6644.88 +7040 7458.62 7902.13 8372.02 8869.84 9397.27 9956.06 10548.1 11175.3 +11839.8 12543.9 13289.8 14080; +#X coords 0 12000 130 0 200 100 1; +#X restore 381 116 graph; +#X text 391 224 ------ 130 samples ------; +#X text 590 209 0; +#X text 592 109 12000; +#X connect 0 0 1 0; +#X connect 1 0 5 0; +#X connect 1 1 4 0; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 2 0 8 0; +#X connect 3 0 2 1; +#X connect 4 0 2 1; +#X connect 5 0 2 0; +#X connect 6 0 7 0; +#X connect 6 1 9 1; +#X connect 7 0 9 0; +#X connect 8 0 5 1; +#X restore 186 132 pd tables; +#X obj 25 117 metro 500; +#X floatatom 67 178 5 0 0; +#X obj 25 203 makenote 64 250; +#X obj 27 229 pack; +#X obj 27 253 s syn-midinoteon; +#X obj 25 98 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 +; +#X obj 329 358 numset fil x; +#X obj 329 387 numset fb x; +#X obj 329 416 numset fa x; +#X obj 329 445 numset fd x; +#X obj 329 474 numset fs x; +#X obj 329 503 numset fr x; +#X obj 329 532 numset q x; +#X floatatom 101 96 5 0 0; +#X floatatom 155 176 5 0 0; +#X floatatom 115 149 5 0 0; +#X obj 25 178 + 24; +#X obj 25 149 random 48; +#X obj 329 15 preset preset1 x; +#X obj 329 62 preset preset2 x; +#X obj 329 108 preset preset3 x; +#X obj 329 155 preset preset4 x; +#X obj 330 561 numset 2nd x; +#X obj 330 590 numset 2pc; +#X obj 16 626 pack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; +#X text 451 219 amplitude; +#X text 440 246 amp attack time; +#X text 445 279 amp decay time; +#X text 448 305 amp sustain level (%); +#X text 448 331 amp release time; +#X text 454 362 filter sweep; +#X text 445 392 filter base pitch; +#X text 444 424 filter attack time; +#X text 444 450 filter decay time; +#X text 448 480 filter sustain; +#X text 448 507 filter release time; +#X text 453 535 q; +#X text 450 566 2nd osc detune; +#X text 432 596 2nd osc amp (%); +#X text 508 666 OUTPUT LEVEL; +#X text 41 14 polyphonic synth with; +#X text 40 37 voice presets; +#X text 21 74 random-note tester; +#X connect 0 0 1 1; +#X connect 1 0 0 0; +#X connect 2 0 1 2; +#X connect 3 0 39 0; +#X connect 3 1 39 1; +#X connect 4 0 5 0; +#X connect 4 1 5 1; +#X connect 5 0 3 0; +#X connect 6 0 39 2; +#X connect 7 0 39 3; +#X connect 8 0 39 6; +#X connect 9 0 39 4; +#X connect 10 0 39 5; +#X connect 11 0 1 0; +#X connect 12 0 3 0; +#X connect 15 0 32 0; +#X connect 16 0 31 1; +#X connect 17 0 18 0; +#X connect 17 1 18 1; +#X connect 18 0 19 0; +#X connect 20 0 15 0; +#X connect 21 0 39 7; +#X connect 22 0 39 8; +#X connect 23 0 39 9; +#X connect 24 0 39 10; +#X connect 25 0 39 11; +#X connect 26 0 39 12; +#X connect 27 0 39 13; +#X connect 28 0 15 1; +#X connect 29 0 17 2; +#X connect 30 0 32 1; +#X connect 31 0 17 0; +#X connect 32 0 31 0; +#X connect 37 0 39 14; +#X connect 38 0 39 15; +#X connect 39 0 13 0; diff --git a/pd/doc/7.stuff/synth/README.txt b/pd/doc/7.stuff/synth/README.txt new file mode 100644 index 00000000..b6e6c994 --- /dev/null +++ b/pd/doc/7.stuff/synth/README.txt @@ -0,0 +1,7 @@ +This patch (1.poly.synth) is a polyphonic subtractive synthesizer with +a dozen or so voice parameters you can control live or via presets. Four +presets are defined. To test, recall a preset (you should see numbers pop up +in all the parameter controls) start the metronome and turn up the output +volume to around 100. + + diff --git a/pd/doc/7.stuff/synth/gadsr.pd b/pd/doc/7.stuff/synth/gadsr.pd new file mode 100644 index 00000000..242ec877 --- /dev/null +++ b/pd/doc/7.stuff/synth/gadsr.pd @@ -0,0 +1,146 @@ +#N canvas 71 56 698 578 12; +#X obj 9 412 inlet; +#X obj 24 314 inlet; +#X text 21 437 trigger; +#X obj 154 314 inlet; +#X obj 156 477 line~; +#X obj 289 316 inlet; +#X obj 426 321 inlet; +#X obj 566 321 inlet; +#X text 26 366 level; +#X obj 156 512 outlet~; +#X text 148 365 attack; +#X text 284 366 decay; +#X text 390 366 sustain; +#X text 536 374 release; +#X obj 460 480 snapshot~; +#X obj 460 452 metro 200; +#X msg 460 508 set \$1; +#X floatatom 475 13 5 0 0; +#X obj 15 286 f \$1; +#X obj 460 426 loadbang; +#X obj 13 233 loadbang; +#X obj 273 58 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 346 63 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X msg 346 85 0; +#X obj 206 60 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X msg 206 81 1; +#X msg 273 83 -1; +#X obj 143 288 f \$2; +#X floatatom 143 342 4 0 0; +#N canvas 110 169 840 732 control 0; +#X obj 368 662 outlet; +#X obj 37 46 inlet; +#X obj 170 120 inlet; +#X obj 256 121 inlet; +#X text 74 12 trigger; +#X text 167 82 level; +#X text 392 640 to line~; +#X obj 42 332 pack; +#X obj 22 152 moses; +#X text 76 168 from; +#X text 78 180 here; +#X obj 13 199 t b b; +#X text 21 170 from; +#X text 23 182 zero; +#X msg 206 336 0; +#X obj 36 302 f; +#X text 245 84 attack time; +#X obj 373 120 inlet; +#X text 362 83 decay time; +#X obj 494 119 inlet; +#X text 478 85 sustain level; +#X obj 617 117 inlet; +#X text 610 86 release time; +#X text 471 472 DECAY; +#X obj 401 423 * 0.01; +#X obj 415 329 del; +#X obj 401 397 *; +#X obj 420 358 f; +#X obj 464 454 pack; +#X obj 624 346 pack; +#X obj 50 81 sel 0; +#X msg 80 120 stop; +#X obj 68 197 t b; +#X connect 1 0 30 0; +#X connect 2 0 15 1; +#X connect 2 0 26 1; +#X connect 3 0 7 1; +#X connect 3 0 25 0; +#X connect 7 0 0 0; +#X connect 8 0 11 0; +#X connect 8 1 32 0; +#X connect 11 0 15 0; +#X connect 11 1 14 0; +#X connect 14 0 0 0; +#X connect 15 0 7 0; +#X connect 17 0 28 1; +#X connect 19 0 27 1; +#X connect 21 0 29 1; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 24 0; +#X connect 27 0 26 0; +#X connect 28 0 0 0; +#X connect 29 0 0 0; +#X connect 30 0 31 0; +#X connect 30 0 29 0; +#X connect 30 1 8 0; +#X connect 31 0 25 0; +#X connect 32 0 15 0; +#X restore 135 395 pd control; +#X obj 280 288 f \$2; +#X obj 410 286 f \$2; +#X obj 543 286 f \$2; +#X floatatom 280 345 4 0 0; +#X floatatom 410 345 4 0 0; +#X floatatom 543 346 4 0 0; +#X obj 489 74 pack 0 20; +#X msg 495 110 0; +#X obj 489 47 t f b; +#X text 104 541 gadsr - arguments: level \, attack time \, decay time +\, sustain percentage \, release time; +#X floatatom 15 341 4 0 0; +#X connect 0 0 29 0; +#X connect 1 0 40 0; +#X connect 3 0 28 0; +#X connect 4 0 9 0; +#X connect 4 0 14 0; +#X connect 5 0 33 0; +#X connect 6 0 34 0; +#X connect 7 0 35 0; +#X connect 14 0 16 0; +#X connect 15 0 14 0; +#X connect 16 0 17 0; +#X connect 17 0 38 0; +#X connect 18 0 40 0; +#X connect 19 0 15 0; +#X connect 20 0 18 0; +#X connect 20 0 27 0; +#X connect 20 0 30 0; +#X connect 20 0 31 0; +#X connect 20 0 32 0; +#X connect 21 0 26 0; +#X connect 22 0 23 0; +#X connect 23 0 29 0; +#X connect 24 0 25 0; +#X connect 25 0 29 0; +#X connect 26 0 29 0; +#X connect 27 0 28 0; +#X connect 28 0 29 2; +#X connect 29 0 4 0; +#X connect 30 0 33 0; +#X connect 31 0 34 0; +#X connect 32 0 35 0; +#X connect 33 0 29 3; +#X connect 34 0 29 4; +#X connect 35 0 29 5; +#X connect 36 0 4 0; +#X connect 37 0 29 0; +#X connect 38 0 36 0; +#X connect 38 1 37 0; +#X connect 40 0 29 1; +#X coords 0 0 1 1 200 40 1; diff --git a/pd/doc/7.stuff/synth/numset.pd b/pd/doc/7.stuff/synth/numset.pd new file mode 100644 index 00000000..fcbeb159 --- /dev/null +++ b/pd/doc/7.stuff/synth/numset.pd @@ -0,0 +1,27 @@ +#N canvas 672 25 448 396 10; +#X obj 11 240 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 0 0 10 +-262144 -1 -1 0 256; +#X obj 11 262 outlet; +#X obj 78 267 s \$1-out; +#X obj 189 49 r \$1-in; +#X obj 191 130 r \$2-in; +#X obj 191 177 route \$1 -record-; +#X obj 191 205 f; +#X obj 245 289 pack s 0; +#X obj 248 203 b; +#X obj 245 340 s \$2-out; +#X msg 245 315 add list \$1 \$2; +#X obj 248 228 symbol \$1-in; +#X connect 0 0 1 0; +#X connect 0 0 2 0; +#X connect 0 0 7 1; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 1 8 0; +#X connect 6 0 0 0; +#X connect 7 0 10 0; +#X connect 8 0 11 0; +#X connect 10 0 9 0; +#X connect 11 0 7 0; +#X coords 0 0 1 1 80 24 1; diff --git a/pd/doc/7.stuff/synth/preset.pd b/pd/doc/7.stuff/synth/preset.pd new file mode 100644 index 00000000..8148f3b0 --- /dev/null +++ b/pd/doc/7.stuff/synth/preset.pd @@ -0,0 +1,54 @@ +#N canvas 69 59 443 360 12; +#X obj 210 286 textfile; +#X obj 8 174 bng 15 250 50 0 empty empty store 16 7 0 10 -262144 -1 +-1; +#X obj 8 320 bng 15 250 50 0 empty empty recall 15 7 0 10 -262144 -1 +-1; +#X obj 408 330 tgl 10 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 +1; +#X obj 104 59 t b b b; +#X msg 219 121 clear; +#X msg 114 149 -record-; +#X obj 61 207 symbol \$1.txt; +#X obj 363 115 1; +#X obj 310 191 symbol \$1.txt; +#X obj 312 165 loadbang; +#X msg 310 216 read \$1 cr; +#X msg 62 234 write \$1 cr; +#X obj 75 299 until; +#X msg 210 322 \; \$1 \$2; +#X obj 112 175 s \$2-in; +#X obj 224 187 r \$2-out; +#X obj 77 265 t b b; +#X msg 140 268 rewind; +#X obj 308 295 print; +#X obj 224 220 spigot; +#X obj 311 126 1; +#X obj 278 124 0; +#X connect 0 0 14 0; +#X connect 0 1 13 1; +#X connect 1 0 4 0; +#X connect 2 0 17 0; +#X connect 4 0 7 0; +#X connect 4 0 8 0; +#X connect 4 0 22 0; +#X connect 4 1 6 0; +#X connect 4 2 5 0; +#X connect 4 2 21 0; +#X connect 5 0 0 0; +#X connect 6 0 15 0; +#X connect 7 0 12 0; +#X connect 8 0 3 0; +#X connect 9 0 11 0; +#X connect 10 0 9 0; +#X connect 11 0 0 0; +#X connect 12 0 0 0; +#X connect 13 0 0 0; +#X connect 16 0 20 0; +#X connect 17 0 13 0; +#X connect 17 1 18 0; +#X connect 18 0 0 0; +#X connect 20 0 0 0; +#X connect 21 0 20 1; +#X connect 22 0 20 1; +#X coords 0 0 1 1 90 35 1; diff --git a/pd/doc/7.stuff/synth/preset1.txt b/pd/doc/7.stuff/synth/preset1.txt new file mode 100644 index 00000000..38e342fc --- /dev/null +++ b/pd/doc/7.stuff/synth/preset1.txt @@ -0,0 +1,13 @@ +list 2nd-in 1200 +list q-in 0.48 +list fr-in 200 +list fs-in 37 +list fd-in 509 +list fa-in 2 +list fb-in 15 +list fil-in 51 +list as-in 81 +list ad-in 11 +list ar-in 207 +list aa-in 6 +list amp-in 94 diff --git a/pd/doc/7.stuff/synth/preset2.txt b/pd/doc/7.stuff/synth/preset2.txt new file mode 100644 index 00000000..ce0352fb --- /dev/null +++ b/pd/doc/7.stuff/synth/preset2.txt @@ -0,0 +1,13 @@ +list 2nd-in 1200 +list q-in 0.87 +list fr-in 200 +list fs-in 37 +list fd-in 509 +list fa-in 2 +list fb-in 39 +list fil-in 51 +list as-in 63 +list ad-in 1631 +list ar-in 207 +list aa-in 6 +list amp-in 90 diff --git a/pd/doc/7.stuff/synth/preset3.txt b/pd/doc/7.stuff/synth/preset3.txt new file mode 100644 index 00000000..a53f57df --- /dev/null +++ b/pd/doc/7.stuff/synth/preset3.txt @@ -0,0 +1,13 @@ +list 2nd-in 1200 +list q-in 10 +list fr-in 200 +list fs-in 46 +list fd-in 360 +list fa-in 2 +list fb-in 30 +list fil-in 73 +list as-in 63 +list ad-in 1631 +list ar-in 207 +list aa-in 6 +list amp-in 95 diff --git a/pd/doc/7.stuff/synth/preset4.txt b/pd/doc/7.stuff/synth/preset4.txt new file mode 100644 index 00000000..f9ce0b38 --- /dev/null +++ b/pd/doc/7.stuff/synth/preset4.txt @@ -0,0 +1,13 @@ +list 2nd-in 0 +list q-in 3.01 +list fr-in 200 +list fs-in 18 +list fd-in 323 +list fa-in 2 +list fb-in 6 +list fil-in 50 +list as-in 88 +list ad-in 72 +list ar-in 207 +list aa-in 6 +list amp-in 100 diff --git a/pd/doc/7.stuff/synth/synthvoice.pd b/pd/doc/7.stuff/synth/synthvoice.pd new file mode 100644 index 00000000..e43fe42d --- /dev/null +++ b/pd/doc/7.stuff/synth/synthvoice.pd @@ -0,0 +1,73 @@ +#N canvas 218 43 728 639 12; +#X obj 61 616 outlet~; +#X obj 363 475 *~; +#X obj 166 328 *~; +#X obj 166 351 *~; +#X obj 40 325 mtof; +#X obj 180 52 inlet; +#X obj 61 565 inlet~; +#X obj 61 592 +~; +#X obj 473 266 gadsr; +#X obj 166 265 gadsr; +#X obj 106 115 dbtorms; +#X obj 106 141 sqrt; +#X obj 106 166 sqrt; +#X obj 461 322 +~; +#X obj 461 348 tabread4~ mtof; +#X obj 405 464 vcf~; +#X obj 42 416 phasor~; +#X obj 106 349 + 0.3; +#X obj 106 377 phasor~; +#X obj 42 455 +~; +#X obj 180 75 unpack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; +#X text 173 19 on/off pitch amp a d s r filt filt-bias a d s r filt-q +2nd-interval 2nd-percentage; +#X obj 106 281 +; +#X obj 106 319 mtof; +#X obj 120 414 *~ 1; +#X obj 345 391 * 0.01; +#X obj 133 241 * 0.01; +#X connect 1 0 7 1; +#X connect 2 0 3 0; +#X connect 2 0 3 1; +#X connect 3 0 1 0; +#X connect 4 0 16 0; +#X connect 5 0 20 0; +#X connect 6 0 7 0; +#X connect 7 0 0 0; +#X connect 8 0 13 1; +#X connect 9 0 2 0; +#X connect 9 0 2 1; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 9 1; +#X connect 13 0 14 0; +#X connect 14 0 15 1; +#X connect 15 0 1 1; +#X connect 16 0 19 0; +#X connect 17 0 18 0; +#X connect 18 0 24 0; +#X connect 19 0 15 0; +#X connect 20 0 9 0; +#X connect 20 0 8 0; +#X connect 20 1 4 0; +#X connect 20 1 22 0; +#X connect 20 2 10 0; +#X connect 20 3 9 2; +#X connect 20 4 9 3; +#X connect 20 5 9 4; +#X connect 20 6 9 5; +#X connect 20 7 8 1; +#X connect 20 8 13 0; +#X connect 20 9 8 2; +#X connect 20 10 8 3; +#X connect 20 11 8 4; +#X connect 20 12 8 5; +#X connect 20 13 15 2; +#X connect 20 14 26 0; +#X connect 20 15 25 0; +#X connect 22 0 23 0; +#X connect 23 0 17 0; +#X connect 24 0 19 1; +#X connect 25 0 24 1; +#X connect 26 0 22 1; diff --git a/pd/doc/7.stuff/synth/test-gadsr.pd b/pd/doc/7.stuff/synth/test-gadsr.pd new file mode 100644 index 00000000..ea26fe46 --- /dev/null +++ b/pd/doc/7.stuff/synth/test-gadsr.pd @@ -0,0 +1,2 @@ +#N canvas 45 88 785 525 10; +#X obj 208 171 gadsr; diff --git a/pd/doc/7.stuff/tools/latency.pd b/pd/doc/7.stuff/tools/latency.pd new file mode 100644 index 00000000..ce6db34d --- /dev/null +++ b/pd/doc/7.stuff/tools/latency.pd @@ -0,0 +1,97 @@ +#N canvas 37 -7 825 630 12;
+#X obj 98 184 metro 500;
+#X obj 60 296 sig~;
+#X msg 60 267 0.5;
+#X obj 96 245 del 3;
+#X msg 96 270 0;
+#X obj 33 325 dac~;
+#X obj 286 216 adc~;
+#X obj 290 312 timer;
+#X obj 92 335 env~ 65536;
+#X floatatom 92 362 4 0 0;
+#X floatatom 339 170 4 0 0;
+#X obj 339 193 + 100;
+#X obj 339 218 dbtorms;
+#X obj 180 335 env~ 65536;
+#X floatatom 180 364 4 0 0;
+#X floatatom 290 349 4 0 0;
+#X obj 312 245 *~ 1;
+#X obj 312 282 threshold~ 0.1 5 0.05 5;
+#X obj 634 160 bonk~;
+#X obj 634 188 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 508 188 osc~ 440;
+#X obj 530 214 *~ 0;
+#X obj 582 189 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 571 211 * 0.1;
+#X obj 80 25 vdl 15 1 0 3 empty empty empty 0 -6 0 8 -262144 -1 -1
+0;
+#X msg 17 138 \; pd dsp 1;
+#X obj 634 132 *~;
+#X obj 16 113 sel 0;
+#X text 100 20 off;
+#X obj 96 156 == 1;
+#X obj 80 78 t f;
+#X text 102 36 measure latency;
+#X text 100 53 test continuity;
+#X obj 582 97 == 2;
+#X text 89 381 level out;
+#X text 181 382 level in;
+#X obj 530 244 dac~;
+#X text 291 370 latency in;
+#X text 292 386 msec;
+#X text 656 188 this flashes when;
+#X text 656 207 a discontinuity is;
+#X text 657 226 detected;
+#X obj 642 105 adc~;
+#X text 328 131 you can;
+#X text 324 147 adjust gain here;
+#X text 538 66 --- continuity check ---;
+#X text 169 105 --- latency measurement ---;
+#X text 63 410 To use this patch \, connect your audio output back
+to the audio input (channel 1 should suffice.) The latency measurement
+assumes the feedback gain is at least about -14 dB - you can increase
+the input sensitivity if need be.;
+#X text 66 481 If you select "measure latency" a series of pulses are
+timed using the "threshold~" object - note that it has an uncertainty
+of 1.45 msec (at 44K1) \, so you might see the number jitter even if
+the latency is constant.;
+#X text 66 554 Select "test continuity' to see if there are interruptions
+in the sound \, either at the input or output stage. If there are \,
+the button will flash.;
+#X connect 0 0 2 0;
+#X connect 0 0 3 0;
+#X connect 0 0 7 0;
+#X connect 1 0 8 0;
+#X connect 1 0 5 0;
+#X connect 1 0 5 1;
+#X connect 2 0 1 0;
+#X connect 3 0 4 0;
+#X connect 4 0 1 0;
+#X connect 6 0 16 0;
+#X connect 7 0 15 0;
+#X connect 8 0 9 0;
+#X connect 10 0 11 0;
+#X connect 11 0 12 0;
+#X connect 12 0 16 1;
+#X connect 13 0 14 0;
+#X connect 16 0 13 0;
+#X connect 16 0 17 0;
+#X connect 17 0 7 1;
+#X connect 18 0 19 0;
+#X connect 20 0 21 0;
+#X connect 21 0 36 0;
+#X connect 21 0 36 1;
+#X connect 22 0 23 0;
+#X connect 23 0 21 1;
+#X connect 24 0 30 0;
+#X connect 26 0 18 0;
+#X connect 27 1 25 0;
+#X connect 29 0 0 0;
+#X connect 30 0 27 0;
+#X connect 30 0 29 0;
+#X connect 30 0 33 0;
+#X connect 33 0 22 0;
+#X connect 33 0 26 1;
+#X connect 42 0 26 0;
diff --git a/pd/doc/7.stuff/tools/load-meter.pd b/pd/doc/7.stuff/tools/load-meter.pd new file mode 100644 index 00000000..6a73b5a4 --- /dev/null +++ b/pd/doc/7.stuff/tools/load-meter.pd @@ -0,0 +1,21 @@ +#N canvas 161 261 299 317 12; +#X floatatom 118 256; +#X obj 118 168 cputime; +#X obj 118 28 loadbang; +#X obj 118 112 metro 1000; +#X msg 118 56 1; +#X floatatom 118 84; +#X obj 118 140 t b b; +#X obj 118 228 * 0.1; +#X obj 118 197 int; +#X text 163 84 <-- on/off; +#X text 51 284 CPU load in percent; +#X connect 1 0 8 0; +#X connect 2 0 4 0; +#X connect 3 0 6 0; +#X connect 4 0 5 0; +#X connect 5 0 3 0; +#X connect 6 0 1 0; +#X connect 6 1 1 1; +#X connect 7 0 0 0; +#X connect 8 0 7 0; diff --git a/pd/doc/7.stuff/tools/testtone.pd b/pd/doc/7.stuff/tools/testtone.pd new file mode 100644 index 00000000..965859c7 --- /dev/null +++ b/pd/doc/7.stuff/tools/testtone.pd @@ -0,0 +1,366 @@ +#N canvas 36 16 581 402 12; +#X floatatom 83 307 3 0 0; +#X obj 33 257 notein; +#X obj 33 283 stripnote; +#X floatatom 32 308 3 0 0; +#X text 35 5 Welcome to Pd ("Pure Data"). This window can test your +audio and MIDI connections. To see Pd's DOCUMENTATION select "getting +started" in the Help menu.; +#X text 236 258 MIDI OUT; +#X text 33 233 MIDI IN; +#X floatatom 175 305 3 0 0; +#X floatatom 136 304 3 0 0; +#X obj 136 279 ctlin; +#N canvas 0 0 484 446 midi 0; +#X obj 95 61 inlet; +#X obj 96 262 noteout; +#X floatatom 96 92 0 0 0; +#X obj 107 120 outlet; +#X obj 338 113 loadbang; +#X obj 96 184 metro; +#X obj 96 236 makenote; +#X floatatom 189 166 0 0 0; +#X obj 96 210 f; +#X floatatom 145 166 0 0 0; +#X floatatom 233 166 0 0 0; +#X floatatom 276 166 0 0 0; +#X msg 338 148 500; +#X msg 370 148 60; +#X msg 399 148 64; +#X msg 427 148 250; +#X text 144 145 rate; +#X text 187 145 pitch; +#X text 232 145 vel; +#X text 268 146 length; +#X obj 230 257 ctlout 1; +#X floatatom 231 228 0 0 0; +#X connect 0 0 2 0; +#X connect 2 0 3 0; +#X connect 2 0 5 0; +#X connect 4 0 12 0; +#X connect 4 0 13 0; +#X connect 4 0 14 0; +#X connect 4 0 15 0; +#X connect 5 0 8 0; +#X connect 6 0 1 0; +#X connect 6 1 1 1; +#X connect 7 0 8 1; +#X connect 8 0 6 0; +#X connect 9 0 5 1; +#X connect 10 0 6 1; +#X connect 11 0 6 2; +#X connect 12 0 9 0; +#X connect 13 0 7 0; +#X connect 14 0 10 0; +#X connect 15 0 11 0; +#X connect 21 0 20 0; +#X restore 236 308 pd midi; +#X floatatom 149 183 3 0 0; +#X floatatom 182 183 3 0 0; +#X text 24 341 PD is COPYRIGHT 1997-2002 by Miller Puckette and others +but is free for you to use for any reasonable purpose. See the file +\, LICENSE.txt in the distribution.; +#X obj 145 115 tgl 20 0 tone-ch1 tone-ch1 1 5 -8 192 12 -262144 -1 +-1 1 1; +#X obj 170 115 tgl 20 0 tone-ch2 tone-ch2 2 5 -8 192 12 -262144 -1 +-1 1 1; +#X obj 236 282 tgl 20 0 empty empty empty 20 8 0 8 -262144 -1 -1 0 +1; +#X obj 394 110 tgl 20 0 tone-monitor set-tone-monitor monitor 25 10 +192 12 -262144 -1 -1 0 1; +#X obj 36 132 vdl 20 1 0 3 tone-radio set-tone-radio empty 20 8 192 +8 -262144 -1 -1 2; +#X text 62 177 OFF; +#X text 62 154 -40; +#X text 62 131 -20; +#N canvas 0 0 536 251 more 0; +#X floatatom 42 209 0 0 0; +#X obj 42 183 f; +#X obj 79 183 + 1; +#X obj 42 150 metro 1000; +#X obj 42 123 tgl 20 0 empty empty empty 20 8 0 8 -262144 -1 -1 0 1 +; +#X msg 264 142 \; pd restart-audio; +#X text 24 30 this window has various wierd debugging stuff...; +#X text 218 97 ALSA gets twisted after a few; +#X text 216 118 hours sometimes... use this to fix:; +#X text 22 74 see if Pd's time; +#X text 22 93 measurement works:; +#X connect 1 0 2 0; +#X connect 1 0 0 0; +#X connect 2 0 1 1; +#X connect 3 0 1 0; +#X connect 4 0 3 0; +#X restore 459 298 pd more; +#X obj 393 148 tgl 20 0 tone-hipass set-tone-hipass input-hipass 25 +10 192 12 -262144 -1 -1 0 1; +#X obj 195 115 tgl 20 0 tone-ch3 tone-ch3 3 5 -8 192 12 -262144 -1 +-1 1 1; +#X obj 220 115 tgl 20 0 tone-ch4 tone-ch4 4 5 -8 192 12 -262144 -1 +-1 1 1; +#X obj 245 115 tgl 20 0 tone-ch5 tone-ch5 5 5 -8 192 12 -262144 -1 +-1 1 1; +#X obj 270 115 tgl 20 0 tone-ch6 tone-ch6 6 5 -8 192 12 -262144 -1 +-1 1 1; +#X obj 304 106 bng 15 250 50 0 tone-all empty ALL 20 8 128 12 -262144 +-1 -1; +#X obj 304 127 bng 15 250 50 0 tone-none empty NONE 20 8 128 12 -262144 +-1 -1; +#X floatatom 215 183 3 0 0; +#X floatatom 248 183 3 0 0; +#X floatatom 281 184 3 0 0; +#X floatatom 315 184 3 0 0; +#X text 164 208 AUDIO INPUT (RMS dB); +#X text 41 83 TEST; +#X text 40 103 TONE; +#X text 152 76 test tone channels:; +#N canvas 29 216 908 548 -------audio---- 0; +#X obj 182 92 hip~ 5; +#X obj 23 351 *~; +#X obj 45 324 line~; +#X obj 190 169 outlet; +#X obj 45 297 pack 0 50; +#X obj 22 134 osc~; +#X floatatom 45 245 0 0 0; +#X obj 45 270 dbtorms; +#X obj 190 143 int; +#X obj 22 66 mtof; +#X floatatom 22 43 0 0 0; +#X floatatom 22 88 0 0 0; +#X obj 22 110 sig~; +#X obj 190 117 env~ 8192; +#X obj 182 39 adc~ 1; +#X obj 23 377 s~ tone-osc; +#X obj 45 162 r tone-radio; +#X obj 22 18 r tone-pitch; +#X obj 45 190 sel 0 1 2; +#X msg 114 213 0; +#X msg 45 215 80; +#X msg 78 215 60; +#X obj 192 192 r~ tone-mon; +#X obj 201 327 line~; +#X obj 182 217 *~; +#X obj 201 300 pack 0 50; +#X obj 201 274 r tone-ch1; +#X obj 192 247 r~ tone-osc; +#X obj 192 352 *~; +#X obj 182 407 dac~ 1; +#X obj 182 382 +~; +#X obj 190 65 r tone-hip; +#X obj 16 487 s~ tone-mon; +#X obj 16 461 line~; +#X obj 17 433 pack 0 50; +#X obj 17 407 r tone-monitor; +#X obj 302 91 hip~ 5; +#X obj 310 168 outlet; +#X obj 310 142 int; +#X obj 310 116 env~ 8192; +#X obj 312 191 r~ tone-mon; +#X obj 321 326 line~; +#X obj 302 216 *~; +#X obj 321 299 pack 0 50; +#X obj 312 246 r~ tone-osc; +#X obj 312 351 *~; +#X obj 302 381 +~; +#X obj 310 64 r tone-hip; +#X obj 302 38 adc~ 2; +#X obj 302 406 dac~ 2; +#X obj 321 273 r tone-ch2; +#X obj 177 485 * 5; +#X obj 177 510 s tone-hip; +#X obj 179 459 r tone-hipass; +#N canvas 499 63 548 519 glue+loadbang 0; +#X obj 171 21 loadbang; +#X msg 171 49 \; pd dsp 1 \; tone-pitch 69 \; tone-radio 2 \; set-tone-radio +2 \; tone-all 1 \;; +#X obj 171 176 r tone-all; +#X msg 171 204 \; tone-ch1 1 \; tone-ch2 1 \; tone-ch3 1 \; tone-ch4 +1 \; tone-ch5 1 \; tone-ch6 1; +#X obj 168 323 r tone-none; +#X msg 168 352 \; tone-ch1 0 \; tone-ch2 0 \; tone-ch3 0 \; tone-ch4 +0 \; tone-ch5 0 \; tone-ch6 0; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 4 0 5 0; +#X restore 14 516 pd glue+loadbang; +#X obj 424 93 hip~ 5; +#X obj 432 170 outlet; +#X obj 432 144 int; +#X obj 432 118 env~ 8192; +#X obj 434 193 r~ tone-mon; +#X obj 443 328 line~; +#X obj 424 218 *~; +#X obj 443 301 pack 0 50; +#X obj 434 248 r~ tone-osc; +#X obj 434 353 *~; +#X obj 424 383 +~; +#X obj 432 66 r tone-hip; +#X obj 544 92 hip~ 5; +#X obj 552 169 outlet; +#X obj 552 143 int; +#X obj 552 117 env~ 8192; +#X obj 554 192 r~ tone-mon; +#X obj 563 327 line~; +#X obj 544 217 *~; +#X obj 563 300 pack 0 50; +#X obj 554 247 r~ tone-osc; +#X obj 554 352 *~; +#X obj 544 382 +~; +#X obj 552 65 r tone-hip; +#X obj 661 92 hip~ 5; +#X obj 669 169 outlet; +#X obj 669 143 int; +#X obj 669 117 env~ 8192; +#X obj 671 192 r~ tone-mon; +#X obj 680 327 line~; +#X obj 661 217 *~; +#X obj 680 300 pack 0 50; +#X obj 671 247 r~ tone-osc; +#X obj 671 352 *~; +#X obj 661 382 +~; +#X obj 669 65 r tone-hip; +#X obj 781 91 hip~ 5; +#X obj 789 168 outlet; +#X obj 789 142 int; +#X obj 789 116 env~ 8192; +#X obj 791 191 r~ tone-mon; +#X obj 800 326 line~; +#X obj 781 216 *~; +#X obj 800 299 pack 0 50; +#X obj 791 246 r~ tone-osc; +#X obj 791 351 *~; +#X obj 781 381 +~; +#X obj 789 64 r tone-hip; +#X obj 424 40 adc~ 3; +#X obj 544 39 adc~ 4; +#X obj 661 39 adc~ 5; +#X obj 781 38 adc~ 6; +#X obj 443 275 r tone-ch3; +#X obj 563 273 r tone-ch4; +#X obj 680 274 r tone-ch5; +#X obj 800 273 r tone-ch6; +#X obj 424 408 dac~ 3; +#X obj 543 406 dac~ 4; +#X obj 661 407 dac~ 5; +#X obj 781 406 dac~ 6; +#X connect 0 0 24 0; +#X connect 0 0 13 0; +#X connect 1 0 15 0; +#X connect 2 0 1 1; +#X connect 4 0 2 0; +#X connect 5 0 1 0; +#X connect 6 0 7 0; +#X connect 7 0 4 0; +#X connect 8 0 3 0; +#X connect 9 0 11 0; +#X connect 10 0 9 0; +#X connect 11 0 12 0; +#X connect 12 0 5 0; +#X connect 13 0 8 0; +#X connect 14 0 0 0; +#X connect 16 0 18 0; +#X connect 17 0 10 0; +#X connect 18 0 20 0; +#X connect 18 1 21 0; +#X connect 18 2 19 0; +#X connect 19 0 6 0; +#X connect 20 0 6 0; +#X connect 21 0 6 0; +#X connect 22 0 24 1; +#X connect 23 0 28 1; +#X connect 24 0 30 0; +#X connect 25 0 23 0; +#X connect 26 0 25 0; +#X connect 27 0 28 0; +#X connect 28 0 30 1; +#X connect 30 0 29 0; +#X connect 31 0 0 1; +#X connect 33 0 32 0; +#X connect 34 0 33 0; +#X connect 35 0 34 0; +#X connect 36 0 42 0; +#X connect 36 0 39 0; +#X connect 38 0 37 0; +#X connect 39 0 38 0; +#X connect 40 0 42 1; +#X connect 41 0 45 1; +#X connect 42 0 46 0; +#X connect 43 0 41 0; +#X connect 44 0 45 0; +#X connect 45 0 46 1; +#X connect 46 0 49 0; +#X connect 47 0 36 1; +#X connect 48 0 36 0; +#X connect 50 0 43 0; +#X connect 51 0 52 0; +#X connect 53 0 51 0; +#X connect 55 0 61 0; +#X connect 55 0 58 0; +#X connect 57 0 56 0; +#X connect 58 0 57 0; +#X connect 59 0 61 1; +#X connect 60 0 64 1; +#X connect 61 0 65 0; +#X connect 62 0 60 0; +#X connect 63 0 64 0; +#X connect 64 0 65 1; +#X connect 65 0 111 0; +#X connect 66 0 55 1; +#X connect 67 0 73 0; +#X connect 67 0 70 0; +#X connect 69 0 68 0; +#X connect 70 0 69 0; +#X connect 71 0 73 1; +#X connect 72 0 76 1; +#X connect 73 0 77 0; +#X connect 74 0 72 0; +#X connect 75 0 76 0; +#X connect 76 0 77 1; +#X connect 77 0 112 0; +#X connect 78 0 67 1; +#X connect 79 0 85 0; +#X connect 79 0 82 0; +#X connect 81 0 80 0; +#X connect 82 0 81 0; +#X connect 83 0 85 1; +#X connect 84 0 88 1; +#X connect 85 0 89 0; +#X connect 86 0 84 0; +#X connect 87 0 88 0; +#X connect 88 0 89 1; +#X connect 89 0 113 0; +#X connect 90 0 79 1; +#X connect 91 0 97 0; +#X connect 91 0 94 0; +#X connect 93 0 92 0; +#X connect 94 0 93 0; +#X connect 95 0 97 1; +#X connect 96 0 100 1; +#X connect 97 0 101 0; +#X connect 98 0 96 0; +#X connect 99 0 100 0; +#X connect 100 0 101 1; +#X connect 101 0 114 0; +#X connect 102 0 91 1; +#X connect 103 0 55 0; +#X connect 104 0 67 0; +#X connect 105 0 79 0; +#X connect 106 0 91 0; +#X connect 107 0 62 0; +#X connect 108 0 74 0; +#X connect 109 0 86 0; +#X connect 110 0 98 0; +#X restore 149 157 pd -------audio----; +#X connect 1 0 2 0; +#X connect 1 1 2 1; +#X connect 2 0 3 0; +#X connect 2 1 0 0; +#X connect 9 0 8 0; +#X connect 9 1 7 0; +#X connect 16 0 10 0; +#X connect 38 0 11 0; +#X connect 38 1 12 0; +#X connect 38 2 30 0; +#X connect 38 3 31 0; +#X connect 38 4 32 0; +#X connect 38 5 33 0; diff --git a/pd/doc/sound/bell.aiff b/pd/doc/sound/bell.aiff Binary files differnew file mode 100644 index 00000000..4b2a49ae --- /dev/null +++ b/pd/doc/sound/bell.aiff diff --git a/pd/doc/sound/voice.wav b/pd/doc/sound/voice.wav Binary files differnew file mode 100644 index 00000000..efb6f45e --- /dev/null +++ b/pd/doc/sound/voice.wav diff --git a/pd/doc/sound/voice2.wav b/pd/doc/sound/voice2.wav Binary files differnew file mode 100644 index 00000000..9bd9d484 --- /dev/null +++ b/pd/doc/sound/voice2.wav |
