1 <!DOCTYPE html PUBLIC
"-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
4 <meta http-equiv=
"Content-Type" content=
"text/html; charset=UTF-8">
5 <meta http-equiv=
"Content-Style-Type" content=
"text/css">
7 <meta name=
"Generator" content=
"Cocoa HTML Writer">
8 <meta name=
"CocoaVersion" content=
"1038.25">
9 <style type=
"text/css">
10 p
.p1
{margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica
}
11 p
.p2
{margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica
; min-height: 14.0px}
12 p
.p3
{margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco
; min-height: 12.0px}
13 p
.p4
{margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco
}
14 p
.p5
{margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco
; color: #0000bf}
15 p
.p6
{margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco
; color: #bf0000}
16 span
.s1
{font: 18.0px Helvetica
}
17 span
.s2
{color: #0000bf}
18 span
.s3
{color: #007300}
19 span
.s4
{color: #000000}
20 span
.Apple-tab-span
{white-space:pre
}
24 <p class=
"p1"><span class=
"s1"><b>Pbus
</b></span> <span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>isolate a pattern by restricting it to a bus
</b></p>
25 <p class=
"p2"><br></p>
26 <p class=
"p1"><b>superclass: FilterPattern
</b></p>
27 <p class=
"p2"><br></p>
28 <p class=
"p2"><br></p>
29 <p class=
"p2"><br></p>
30 <p class=
"p1"><b>Pbus(pattern, dur, fadeTime)
</b></p>
31 <p class=
"p2"><br></p>
32 <p class=
"p1">Starts a new group and plays the pattern in this group, on a private bus.
<span class=
"Apple-converted-space"> </span></p>
33 <p class=
"p1">The group and the bus is released when the stream has ended.
</p>
34 <p class=
"p2"><br></p>
35 <p class=
"p1">This is useful in order to isolate a Pfx.
</p>
36 <p class=
"p2"><br></p>
37 <p class=
"p1"><b>dur
</b> <span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>delay to allow inner patterns to decay.
<span class=
"Apple-converted-space"> </span></p>
38 <p class=
"p1"><b>fadeTime
</b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>fading out the inner pattern after dur over this time
</p>
39 <p class=
"p1"><b>numChannels
</b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>number of channels of the bus (should match the synthdef)
<b>default:
2</b></p>
40 <p class=
"p1"><b>rate
</b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>bus rate (default: 'audio')
</p>
41 <p class=
"p2"><br></p>
42 <p class=
"p2"><br></p>
43 <p class=
"p2"><br></p>
44 <p class=
"p2"><br></p>
45 <p class=
"p1">Example:
</p>
46 <p class=
"p2"><br></p>
47 <p class=
"p3"><br></p>
49 <p class=
"p4"><span class=
"s2">SynthDef
</span>(
<span class=
"s3">\echo
</span>, {
<span class=
"s2">arg
</span> out=
0, maxdtime=
0.2, dtime=
0.2, decay=
2, gate=
1;
</p>
50 <p class=
"p4"><span class=
"Apple-tab-span"> </span><span class=
"s2">var
</span> env, in;
</p>
51 <p class=
"p4"><span class=
"Apple-tab-span"> </span>env =
<span class=
"s2">Linen
</span>.kr(gate,
0.05,
1,
0.1,
2);
</p>
52 <p class=
"p4"><span class=
"Apple-tab-span"> </span>in =
<span class=
"s2">In
</span>.ar(out,
2);
</p>
53 <p class=
"p4"><span class=
"Apple-tab-span"> </span><span class=
"s2">XOut
</span>.ar(out, env,
<span class=
"s2">CombL
</span>.ar(in * env, maxdtime, dtime, decay,
1, in));
</p>
54 <p class=
"p4">}, [
<span class=
"s3">\ir
</span>,
<span class=
"s3">\ir
</span>,
0.1,
0.1,
0]).add;
</p>
55 <p class=
"p3"><br></p>
56 <p class=
"p4"><span class=
"s2">SynthDef
</span>(
<span class=
"s3">\distort
</span>, {
<span class=
"s2">arg
</span> out=
0, pregain=
40, amp=
0.2, gate=
1;
</p>
57 <p class=
"p4"><span class=
"Apple-tab-span"> </span><span class=
"s2">var
</span> env;
</p>
58 <p class=
"p4"><span class=
"Apple-tab-span"> </span>env =
<span class=
"s2">Linen
</span>.kr(gate,
0.05,
1,
0.1,
2);
</p>
59 <p class=
"p4"><span class=
"Apple-tab-span"> </span><span class=
"s2">XOut
</span>.ar(out, env, (
<span class=
"s2">In
</span>.ar(out,
2) * pregain).distort * amp);
</p>
60 <p class=
"p4">}, [
<span class=
"s3">\ir
</span>,
0.1,
0.1,
0]).add;
</p>
61 <p class=
"p3"><br></p>
62 <p class=
"p4"><span class=
"s2">SynthDef
</span>(
<span class=
"s3">\wah
</span>, {
<span class=
"s2">arg
</span> out=
0, gate=
1;
</p>
63 <p class=
"p4"><span class=
"Apple-tab-span"> </span><span class=
"s2">var
</span> env, in;
</p>
64 <p class=
"p4"><span class=
"Apple-tab-span"> </span>env =
<span class=
"s2">Linen
</span>.kr(gate,
0.05,
1,
0.4,
2);
</p>
65 <p class=
"p4"><span class=
"Apple-tab-span"> </span>in =
<span class=
"s2">In
</span>.ar(out,
2);
</p>
66 <p class=
"p4"><span class=
"Apple-tab-span"> </span><span class=
"s2">XOut
</span>.ar(out, env,
<span class=
"s2">RLPF
</span>.ar(in,
<span class=
"s2">LinExp
</span>.kr(
<span class=
"s2">LFNoise1
</span>.kr(
0.3), -
1,
1,
200,
8000),
0.1).softclip *
0.8);
</p>
67 <p class=
"p4">}, [
<span class=
"s3">\ir
</span>,
0]).add;
</p>
69 <p class=
"p3"><br></p>
71 <p class=
"p4"><span class=
"s2">var
</span> p, q, r, o;
</p>
72 <p class=
"p4">p =
<span class=
"s2">Pbind
</span>(
<span class=
"s3">\degree
</span>,
<span class=
"s2">Prand
</span>((
0.
.7),
12),
<span class=
"s3">\dur
</span>,
0.3,
<span class=
"s3">\legato
</span>,
0.2);
</p>
73 <p class=
"p3"><br></p>
74 <p class=
"p4">q =
<span class=
"s2">Pfx
</span>(p,
<span class=
"s3">\echo
</span>,
<span class=
"s3">\dtime
</span>,
0.2,
<span class=
"s3">\decay
</span>,
3);
</p>
75 <p class=
"p3"><br></p>
76 <p class=
"p4">r =
<span class=
"s2">Pfx
</span>(q,
<span class=
"s3">\distort
</span>,
<span class=
"s3">\pregain
</span>,
20,
<span class=
"s3">\amp
</span>,
0.25);
</p>
77 <p class=
"p3"><br></p>
78 <p class=
"p4">o =
<span class=
"s2">Pfx
</span>(r,
<span class=
"s3">\wah
</span>);
</p>
79 <p class=
"p3"><br></p>
80 <p class=
"p5">Ppar
<span class=
"s4">(
</span></p>
81 <p class=
"p6"><span class=
"s4"><span class=
"Apple-tab-span"> </span>[p, q, r, o].collect(
</span><span class=
"s2">Pbus
</span><span class=
"s4">(
</span><span class=
"s2">_
</span><span class=
"s4">));
</span>// play each in a different bus.
</p>
82 <p class=
"p4">).play;
</p>
83 <p class=
"p4">)
<span class=
"Apple-tab-span"> </span></p>
84 <p class=
"p2"><br></p>
85 <p class=
"p2"><br></p>
86 <p class=
"p2"><br></p>
87 <p class=
"p6">// compare to playing them together on one bus.
</p>
89 <p class=
"p4"><span class=
"s2">var
</span> p, q, r, o;
</p>
90 <p class=
"p4">p =
<span class=
"s2">Pbind
</span>(
<span class=
"s3">\degree
</span>,
<span class=
"s2">Prand
</span>((
0.
.7),
12),
<span class=
"s3">\dur
</span>,
0.3,
<span class=
"s3">\legato
</span>,
0.2);
</p>
91 <p class=
"p3"><br></p>
92 <p class=
"p4">q =
<span class=
"s2">Pfx
</span>(p,
<span class=
"s3">\echo
</span>,
<span class=
"s3">\dtime
</span>,
0.2,
<span class=
"s3">\decay
</span>,
3);
</p>
93 <p class=
"p3"><br></p>
94 <p class=
"p4">r =
<span class=
"s2">Pfx
</span>(q,
<span class=
"s3">\distort
</span>,
<span class=
"s3">\pregain
</span>,
20,
<span class=
"s3">\amp
</span>,
0.25);
</p>
95 <p class=
"p3"><br></p>
96 <p class=
"p4">o =
<span class=
"s2">Pfx
</span>(r,
<span class=
"s3">\wah
</span>);
</p>
97 <p class=
"p3"><br></p>
98 <p class=
"p4"><span class=
"s2">Ppar
</span>([p, q, r, o]).play;
</p>
100 <p class=
"p3"><br></p>