Removing scratch files
This commit is contained in:
171
test.scd
171
test.scd
@ -1,171 +0,0 @@
|
||||
Boot()
|
||||
|
||||
c.tempo = 1.5
|
||||
|
||||
// Gestion manuelle avec une sorte de console virtuelle
|
||||
|
||||
(
|
||||
~kick => [i: "splayer", nb: 0, sp: "kick", db:0];
|
||||
~snare => [i: "splayer", nb: 0, sp: "snare", db:0, dur: 2];
|
||||
~hat => [i: "splayer",
|
||||
nb: 0,
|
||||
sp: "hat",
|
||||
release: 0.1, db:0,
|
||||
dur: [0.25, 0.25, 0.25, 0.125, 0.125].pseq(inf)
|
||||
];
|
||||
)
|
||||
|
||||
(
|
||||
~master = {
|
||||
var snare = MiVerb.ar(CombC.ar(~snare.ar(2), 2, c.dur / 3, 1.5), time: 0.5);
|
||||
var hat = ~hat.ar(2);
|
||||
var kick = MiVerb.ar(~kick.ar(2), time: 0.2);
|
||||
[snare, kick, hat].sum
|
||||
};
|
||||
~master.fadeTime = 4
|
||||
)
|
||||
~master.play;
|
||||
|
||||
~master.clear(8)
|
||||
|
||||
// L'idée ici doit être de pouvoir jouer avec un step sequencer
|
||||
// Le son d'une routine dans un autre proxy et traitement (comment ?)
|
||||
|
||||
// ... ProxySpace.push(s.boot)
|
||||
(
|
||||
~step = r {
|
||||
/*
|
||||
* How can I output these events on the NodeProxy Output?
|
||||
*/
|
||||
loop {
|
||||
(instrument: "Pwaveshape",
|
||||
scale: Scale.minorPentatonic,
|
||||
release: 1, harm: 0.25,
|
||||
degree: 8.rand);
|
||||
(1/4).wait;
|
||||
(instrument: "Panalog",
|
||||
scale: Scale.minorPentatonic,
|
||||
release: 1, harm: 1.rand,
|
||||
degree: 8.rand + 12);
|
||||
(instrument: "Panalog",
|
||||
scale: Scale.minorPentatonic,
|
||||
release: 1, harm: 1.rand,
|
||||
degree: 8.rand - 24);
|
||||
(1/4).wait;
|
||||
}
|
||||
};
|
||||
)
|
||||
|
||||
(
|
||||
~master = {
|
||||
/*
|
||||
* I would like to add reverb to ~step here.
|
||||
*/
|
||||
MiVerb.ar(~step.ar(2), time: 0.9)
|
||||
}
|
||||
)
|
||||
|
||||
~master.play;
|
||||
|
||||
|
||||
Tdef.help
|
||||
|
||||
Boot()
|
||||
|
||||
|
||||
(
|
||||
SynthDef(\lplay,
|
||||
{arg out, buf = 0, amp = 0.5, pan = 0, rel=15, dur = 8;
|
||||
var sig,env ;
|
||||
sig = Mix.ar(PlayBuf.ar(2,buf,BufRateScale.ir(buf) * ((BufFrames.ir(buf)/s.sampleRate)*c.tempo/dur),1,0,doneAction:2));
|
||||
env = EnvGen.ar(Env.linen(0.0,rel,0),doneAction:2);
|
||||
sig = sig * env;
|
||||
sig = sig * amp;
|
||||
Out.ar(out,Pan2.ar(sig,pan));
|
||||
}).add;
|
||||
)
|
||||
|
||||
|
||||
(
|
||||
~test2 => [
|
||||
i: "lplay", nb: [0,10].pwhite,
|
||||
sp: "amen1", dur: 1, rel: 32];
|
||||
~test2.play;
|
||||
)
|
||||
|
||||
(
|
||||
~test => [i: "splayer",
|
||||
nb: 0,
|
||||
sp: "amen1",
|
||||
dur: 16];
|
||||
~test.play;
|
||||
)
|
||||
|
||||
// Debugging stuff
|
||||
|
||||
Boot()
|
||||
|
||||
(
|
||||
~step = r {
|
||||
loop {
|
||||
(out: ~step.bus,
|
||||
instrument: "Panalog",
|
||||
release: 1, harm: [0, 1].pwhite,
|
||||
degree: 8.rand).play;
|
||||
(1/4).wait;
|
||||
(out: ~step.bus,
|
||||
instrument: "Panalog",
|
||||
harm: [0, 1.0].pwhite,
|
||||
release: 1, degree: 8.rand + 12).play;
|
||||
(1/4).wait;
|
||||
}
|
||||
};
|
||||
~step.mold(2);
|
||||
)
|
||||
|
||||
~step.scope // WARNING: Can't scope unintitialized bus
|
||||
|
||||
"awake".help
|
||||
|
||||
// J'étudie comment fonctionne spawn et awake
|
||||
|
||||
Boot()
|
||||
|
||||
(
|
||||
~bleep = {
|
||||
var sig = MiPlaits.ar(
|
||||
\freq.kr(300).cpsmidi,
|
||||
engine: LFNoise0.kr(c.dur * 2).range(0,8),
|
||||
harm: 0.5, morph: 0.5, timbre: 0.5
|
||||
) * Env.perc(
|
||||
\attack.kr(0.01),
|
||||
\release.kr(0.5)
|
||||
).kr(doneAction: 2);
|
||||
sig = RLPF.ar(sig, LFNoise2.kr(c.dur).range(200,1200), 0.3);
|
||||
Safe.ar(sig ! 2 * 0.5)
|
||||
};
|
||||
~bleep.awake_(false);
|
||||
~bleep.play;
|
||||
)
|
||||
|
||||
(
|
||||
~bleepverb = {
|
||||
Limiter.ar(MiVerb.ar(~bleep.ar, time: 0.5))
|
||||
};
|
||||
~bleepverb.play;
|
||||
)
|
||||
|
||||
|
||||
~d = Tdef(\d, {
|
||||
loop {
|
||||
~bleep.spawn([
|
||||
freq: [50, 100, 200, 400].choose / [2, 1].choose,
|
||||
fb: 1.rand, release: [1, 2, 0.25][c.beats % 4]]);
|
||||
[0.5, 1/4, 1/2].choose.wait;
|
||||
~bleep.spawn([
|
||||
freq: 2 / [50, 100, 200, 400].choose / [2, 1].choose,
|
||||
fb: 1.rand, release: 2]);
|
||||
[0.5, 1/4, 1/2].choose.wait;
|
||||
}
|
||||
});
|
||||
|
||||
@ -1,33 +0,0 @@
|
||||
~a => [sp: ["kick", \].pseq(inf), nb: 0, db: 0];
|
||||
|
||||
~a.play;
|
||||
|
||||
~a.clear;
|
||||
|
||||
Scope()
|
||||
|
||||
(
|
||||
var sampleStr = "kick:2(1) snare:4(1/4) . hihat:1(1/8) .";
|
||||
a = { |sampleStr, defaultRestDuration = 1.0|
|
||||
var pattern = "(\\w+):(\\d+)\\(([\\d/]+)\\)|\\.";
|
||||
var matches = sampleStr.findAllRegexp(pattern);
|
||||
matches.collect { |match|
|
||||
if(match.size == 1) {
|
||||
[ 'sp': 'rest', 'nb': 0, 'dur': defaultRestDuration ]
|
||||
} {
|
||||
var sampleName = match[0];
|
||||
var sampleNumber = match[1].asInteger;
|
||||
var duration = match[2];
|
||||
var durationValue;
|
||||
if(duration.contains("/")) {
|
||||
var nums = duration.split("/");
|
||||
durationValue = nums[0].asInteger / nums[1].asInteger;
|
||||
} {
|
||||
durationValue = duration.asFloat;
|
||||
};
|
||||
[ 'sp': sampleName, 'nb': sampleNumber, 'dur': durationValue ]
|
||||
}
|
||||
}
|
||||
};
|
||||
a.value(sampleStr);
|
||||
)
|
||||
Reference in New Issue
Block a user