|
|
|
@ -149,7 +149,7 @@ Event.addEventType(\osc, {
|
|
|
|
|
|
|
|
|
|
~ammannCreatePatternsForLive = {arg seqs, group;
|
|
|
|
|
var finSeqs;
|
|
|
|
|
finSeqs = seqs.collect({arg r, i;
|
|
|
|
|
finSeqs = seqs.reverse.collect({arg r, i;
|
|
|
|
|
Pbind(\instrument, \ammann,
|
|
|
|
|
//\buf, Pseq((i - ((0..(r.slice(nil, 2).flat.size - 1)) / 10).trunc.asInteger) % 8),
|
|
|
|
|
\group, group,
|
|
|
|
@ -180,21 +180,21 @@ Event.addEventType(\osc, {
|
|
|
|
|
[
|
|
|
|
|
Pbind(\instrument, \kariNoise,
|
|
|
|
|
\group, group,
|
|
|
|
|
\out, 5,
|
|
|
|
|
\dur, Pseq(dirs[0].slice(nil, 1) * 1.2),
|
|
|
|
|
\out, 0,
|
|
|
|
|
\dur, Pseq(dirs[0].slice(nil, 1) /* * 1.2*/),
|
|
|
|
|
\snd, Pseq(dirs[0].slice(nil, 0))),
|
|
|
|
|
Pbind(\instrument, \kariBass,
|
|
|
|
|
\group, group,
|
|
|
|
|
\out, 6,
|
|
|
|
|
\dur, Pseq(dirs[1].slice(nil, 1) * 1.2),
|
|
|
|
|
\out, 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]})))),
|
|
|
|
|
] ++
|
|
|
|
|
|
|
|
|
|
dirs.drop(2).collect({arg row, i;
|
|
|
|
|
dirs.drop(2).reverse.collect({arg row, i;
|
|
|
|
|
Pbind(\instrument, \kariEnsemble,
|
|
|
|
|
\group, group,
|
|
|
|
|
\out, i,
|
|
|
|
|
\dur, Pseq(row.slice(nil, 1) * 1.2),
|
|
|
|
|
\out, 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})})),
|
|
|
|
|
\amp, 1)})
|
|
|
|
@ -309,15 +309,16 @@ measureLengths = seqs[1].sum.collect({4});
|
|
|
|
|
playbackData.add(\robinson -> [~robinsonCreatePatternsForLive.value(seqs, group), createTransportData.value(measureLengths), measureLengths]);
|
|
|
|
|
|
|
|
|
|
seqs = File.readAllString((~dir +/+ "music_data" +/+ "penrose.txt").standardizePath).interpret;
|
|
|
|
|
~seqs = seqs;
|
|
|
|
|
measureLengths = seqs[1].sum.collect({4});
|
|
|
|
|
playbackData.add(\penrose -> [~penroseCreatePatternsForLive.value(seqs, group), createTransportData.value(measureLengths), measureLengths]);
|
|
|
|
|
|
|
|
|
|
seqs = File.readAllString((~dir +/+ "music_data" +/+ "ammann.txt").standardizePath).interpret;
|
|
|
|
|
~seqs = seqs;
|
|
|
|
|
measureLengths = seqs[0].collect({arg item; item[0].sum});
|
|
|
|
|
playbackData.add(\ammann -> [~ammannCreatePatternsForLive.value(seqs, group), createTransportData.value(measureLengths), measureLengths]);
|
|
|
|
|
|
|
|
|
|
seqs = File.readAllString((~dir +/+ "music_data" +/+ "kari.txt").standardizePath).interpret;
|
|
|
|
|
~seqs = seqs;
|
|
|
|
|
measureLengths = seqs[0].collect({arg item; item.last}).flatten;
|
|
|
|
|
playbackData.add(\kari -> [~kariCreatePatternsForLive.value(seqs, group), createTransportData.value(measureLengths), measureLengths]);
|
|
|
|
|
|
|
|
|
@ -373,7 +374,7 @@ TODOs:
|
|
|
|
|
~bergerMusic[0][6].collect({arg beats, measure; beats.asInteger.collect({arg beat; [measure + 1, beat + 1]})}).flatten;
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
~seqs[0][1][0]
|
|
|
|
|
~seqs[7]
|
|
|
|
|
[seqs[5], seqs[6], seqs[7], seqs[0], seqs[1], seqs[2]]
|
|
|
|
|
|
|
|
|
|
0.25 * (3/4) * 16
|
|
|
|
|