You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
31 lines
463 B
Plaintext
31 lines
463 B
Plaintext
// bleh
|
|
|
|
(
|
|
SynthDef(\simple, {
|
|
arg amp, tuningRatio, outBus;
|
|
|
|
var tuning = [
|
|
113.20755,
|
|
271.69811,
|
|
384.90566,
|
|
543.39623,
|
|
656.60377,
|
|
815.09434,
|
|
928.30189,
|
|
1086.79245,
|
|
2/1
|
|
]; // 53 edo
|
|
var tunedFreq = \freq.ar(440) * tuning * tuningRatio;
|
|
|
|
var sig = SinOsc.ar(tunedFreq);
|
|
var env = EnvGen.kr(Env.perc(0.01, 0.2), gate: 1);
|
|
|
|
Out.ar(0, sig * env * amp);
|
|
}).play;
|
|
)
|
|
|
|
(
|
|
Pbind(\instrument, \simple,
|
|
\freq, Pseq([60, 61].midicps),
|
|
).play
|
|
) |