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
63
64
65
66
67
68
69
70
71
72
73
74
|
class:: FreeVerb2
summary:: A two-channel reverb
categories:: UGens>Reverbs
related:: Classes/FreeVerb, Classes/GVerb
description::
Coded from experiments with faust.
classmethods::
method:: ar
argument:: in
input signal channel 1.
argument:: in2
input signal channel 2.
argument:: mix
dry/wet balance. range 0..1.
argument:: room
room size. rage 0..1.
argument:: damp
Reverb HF damp. range 0..1.
argument::mul
argument::add
discussion::
Valid parameter range from 0 to 1. Values outside this range are clipped by the UGen.
examples::
code::
s.boot;
// FreeVerb2 - demo synthdef
(
SynthDef(\FreeVerb2x2, { |out, mix = 0.25, room = 0.15, damp = 0.5, amp = 1.0|
var signal;
signal = In.ar(out, 2);
ReplaceOut.ar(out,
FreeVerb2.ar( // FreeVerb2 - true stereo UGen
signal[0], // Left channel
signal[1], // Right Channel
mix, room, damp, amp
)
); // same params as FreeVerb 1 chn version
}).add;
)
// 2ch source
(
a = SynthDef(\src2x2, { |out|
Out.ar(out,
Decay.ar(Impulse.ar(1), 0.25, LFCub.ar(1200, 0, 0.1)) ! 2
+
Pan2.ar(
Decay.ar(Impulse.ar(1, pi), 0.1, WhiteNoise.ar(0.1)),
LFNoise1.kr(0.5).range(-1, 1)
)
)
}).play
)
// kick it in
z = Synth(\FreeVerb2x2, [\outbus, 0], addAction:\addToTail)
// experiment with some settings
z.set(\room, 0.7)
z.set(\mix, 0.33)
z.set(\damp, 0.9)
// silence
[a, z].do(_.free)
::
|
