1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
class:: Pnsym
summary:: use a pattern of symbols to embed Pdefns
categories:: JITLib>Patterns, Live Coding
related:: Classes/Pdefn
description::
for event patterns see link::Classes/Psym::. Overview: link::Overviews/JITLib::.
ClassMethods::
method::new
argument::pattern
a pattern that returns symbols or characters. Arrays are converted to parallel patterns ( link::Classes/Ptuple:: ).
argument::dict
the dictionary to be used for lookup. By default, this is code::Pdefn.all::, so one can embed Pdefns by name.
InstanceMethods::
method::dict
set the dictionary to be used.
Examples::
code::
(
// load a synthdef
s.boot;
SynthDef("gpdef",
{ arg out=0, freq=440, sustain=0.05, amp=0.1, pan;
var env;
env = EnvGen.kr(Env.perc(0.01, sustain), doneAction: Done.freeSelf) * amp;
Out.ar(out, Pan2.ar(SinOsc.ar(freq, 0, env), pan))
}).add;
)
Pdefn(\x, Pn(1, 3));
Pdefn(\y, Prand([5, 9, 1], 2));
Pdefn(\z, Pdefn(\y) * 2);
(
Pdef(\play,
Pbind(
\instrument, \gpdef,
\harmonic, Pnsym(Pseq([\x, \x, Prand([\x, \y]), [\z, \y], \y], inf)).trace,
\dur, 0.2, \note, 10
)
).play;
)
// change root pattern:
Pdefn(\x, Pn(2, 3));
Pdefn(\x, Pseq([1, 3, 1, 2, 1, 4, 5]));
Pdefn(\x, Pseq([1, 3, 1, 2, [1, 3], 4, 5]));
::
|
