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
57
58
59
60
61
62
|
class:: FreeSelf
summary:: When triggered, free enclosing synth.
related:: Classes/PauseSelf, Classes/Free
categories:: UGens>Synth control
Description::
Free enclosing synth when input signal crosses from non-positive to
positive.
classmethods::
method::kr
argument::in
The input signal.
Examples::
code::
(
SynthDef("freeSelf-help", { arg out, t_trig;
FreeSelf.kr(t_trig);
Out.ar(out, SinOsc.ar(400,0,0.2));
}).add;
)
s.sendMsg("/s_new", "freeSelf-help", 1731);
s.sendMsg("/n_set", 1731, \t_trig, 1);
// a single impulse SynthDef:
(
SynthDef("dirac", { arg out, amp=0.1;
var u;
u = Impulse.ar(1);
FreeSelf.kr(u);
Out.ar(out, u * amp);
// multiply by amp after using for release, so amp = 0
// doesn't cause synth buildup.
}).add;
)
(
Task {
loop({
fork {
exprand(34, 156).do {|i|
i = i + 1;
s.sendMsg("/s_new", "dirac", -1,0,0, \amp, 1 / i);
(0.006 * i).wait;
};
};
1.wait;
})
} .play;
)
::
|
