|
|
|
@ -124,7 +124,7 @@ s.waitForBoot({
|
|
|
|
|
bergerCreatePatternsForLive = {arg seqs, group;
|
|
|
|
|
var pBinds, cleanSeqs;
|
|
|
|
|
cleanSeqs = [seqs[5], seqs[6], seqs[7], seqs[0], seqs[1], seqs[2]];
|
|
|
|
|
pBinds = seqs.collect({arg r, i;
|
|
|
|
|
pBinds = cleanSeqs.collect({arg r, i;
|
|
|
|
|
Pbind(\instrument, \berger,
|
|
|
|
|
//\buf, Pseq((i - ((0..(r.slice(nil, 2).flat.size - 1)) / 10).trunc.asInteger) % 8),
|
|
|
|
|
\group, group,
|
|
|
|
@ -219,12 +219,12 @@ s.waitForBoot({
|
|
|
|
|
[
|
|
|
|
|
Pbind(\instrument, \kariNoise,
|
|
|
|
|
\group, group,
|
|
|
|
|
\out, 0,
|
|
|
|
|
\out, hdpBusArray[0],
|
|
|
|
|
\dur, Pseq(dirs[0].slice(nil, 1) /* * 1.2*/),
|
|
|
|
|
\snd, Pseq(dirs[0].slice(nil, 0))),
|
|
|
|
|
Pbind(\instrument, \kariBass,
|
|
|
|
|
\group, group,
|
|
|
|
|
\out, 1,
|
|
|
|
|
\out, hdpBusArray[1],
|
|
|
|
|
\dur, Pseq(dirs[1].slice(nil, 1) /* * 1.2*/),
|
|
|
|
|
\freq, Pseq((dirs[1].slice(nil, 0).collect({arg elem; [Rest(0), 36.midicps, 43.midicps][elem]})))),
|
|
|
|
|
] ++
|
|
|
|
@ -232,7 +232,7 @@ s.waitForBoot({
|
|
|
|
|
dirs.drop(2).reverse.collect({arg row, i;
|
|
|
|
|
Pbind(\instrument, \kariEnsemble,
|
|
|
|
|
\group, group,
|
|
|
|
|
\out, i + 2,
|
|
|
|
|
\out, hdpBusArray[i + 2],
|
|
|
|
|
\dur, Pseq(row.slice(nil, 1) /* * 1.2*/),
|
|
|
|
|
//\sustain, Pseq(row.slice(nil, 1) * 1.2),
|
|
|
|
|
\freq, Pseq(row.slice(nil, 0).collect({arg val; if(val == 5, {Rest(0)}, {(60 + (val.trunc * 7)).midicps})})),
|
|
|
|
@ -280,21 +280,6 @@ s.waitForBoot({
|
|
|
|
|
);
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
SynthDef(\mixer_old, {arg freq, gate = 1, sustain, amp, dur, out;
|
|
|
|
|
var nameSpaces, sigs;
|
|
|
|
|
|
|
|
|
|
sigs = [hdpBusArray].collect({arg busArray, i;
|
|
|
|
|
var nameSpace, sig;
|
|
|
|
|
nameSpace = ['hdp'][i];
|
|
|
|
|
sig = busArray.collect({arg bus, c; In.ar(bus, 1) * NamedControl.kr(\ ++ nameSpace ++ '_volume_' ++ c, 1, 0.1)});
|
|
|
|
|
sig = sig.collect({arg channel, c; Pan2.ar(channel, NamedControl.kr(\ ++ nameSpace ++ '_pan_' ++ c, i / (busArray.size - 1), 0.1) * 2 - 1)});
|
|
|
|
|
sig = sig.collect({arg channel, c; channel * NamedControl.kr(\ ++ nameSpace ++ '_mute_' ++ c, 1, 0.1)});
|
|
|
|
|
sig = Mix.ar(sig) * pow(NamedControl.kr(\ ++ nameSpace ++ '_volume_master', 1, 0.5), 2);
|
|
|
|
|
});
|
|
|
|
|
|
|
|
|
|
sigs = Mix.ar(sigs / 6);
|
|
|
|
|
Out.ar(0, sigs)
|
|
|
|
|
}).add;
|
|
|
|
|
|
|
|
|
|
SynthDef(\mixer, {
|
|
|
|
|
var sig, click;
|
|
|
|
@ -304,10 +289,10 @@ s.waitForBoot({
|
|
|
|
|
sig = sig.collect({arg channel, index; channel * NamedControl.kr(\mute_ ++ index, 1, 0.1)});
|
|
|
|
|
sig = Mix.ar(sig) * pow(NamedControl.kr(\volume_master, 0.75, 0.5), 2);
|
|
|
|
|
|
|
|
|
|
click = In.ar(clickBus, 1);// * NamedControl.kr(\volume_click, 0.75, 0.1);
|
|
|
|
|
click = In.ar(clickBus, 1) * NamedControl.kr(\volume_click, 0.75, 0.1);
|
|
|
|
|
|
|
|
|
|
Out.ar(0, sig);
|
|
|
|
|
Out.ar(2, click);
|
|
|
|
|
Out.ar(NamedControl.kr(\out_audio, 0, 0), sig);
|
|
|
|
|
Out.ar(NamedControl.kr(\out_click, 0, 0), click);
|
|
|
|
|
}).add;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
@ -389,11 +374,13 @@ s.waitForBoot({
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
OSCdef(\mixer, {arg msg, time, addr, port;
|
|
|
|
|
[msg, time, addr, port];
|
|
|
|
|
if(msg[1].asString != "volume_master", {
|
|
|
|
|
mixer.set((msg[1] ++ '_' ++ msg[2]), msg[3]);
|
|
|
|
|
[msg, time, addr, port].postln;
|
|
|
|
|
if((msg[1].asString == "volume_master") || (msg[1].asString == "volume_click") || (msg[1].asString[..2] == "out"), {
|
|
|
|
|
var val = msg[2];
|
|
|
|
|
if(msg[1].asString[..2] == "out", {val = val.round - 1});
|
|
|
|
|
mixer.set(msg[1], val)
|
|
|
|
|
}, {
|
|
|
|
|
mixer.set(msg[1], msg[2])
|
|
|
|
|
mixer.set((msg[1] ++ '_' ++ msg[2]), msg[3]);
|
|
|
|
|
});
|
|
|
|
|
}, \mixer);
|
|
|
|
|
|
|
|
|
|