56 lines
2.0 KiB
Markdown
56 lines
2.0 KiB
Markdown
// /*RUUUUUUN*/
|
|
|
|
(
|
|
|
|
// record into buffers
|
|
|
|
~r1 = Synth(\recBuf, [\micIn, 2, \buf, ~b1, \t_trig, 1, \l, 0, \overdub, 0], ~recGrp);
|
|
~r2 = Synth(\recBuf, [\micIn, 2, \buf, ~b2, \t_trig, 1, \l, 0, \overdub, 0], ~recGrp);
|
|
~r3 = Synth(\recBuf, [\micIn, 2, \buf, ~b3, \t_trig, 1, \l, 0, \overdub, 0], ~recGrp);
|
|
~r4 = Synth(\recBuf, [\micIn, 2, \buf, ~b4, \t_trig, 1, \l, 0, \overdub, 0], ~recGrp);
|
|
~r5 = Synth(\recBuf, [\micIn, 2, \buf, ~b5, \t_trig, 1, \l, 0, \overdub, 0], ~recGrp);
|
|
~r6 = Synth(\recBuf, [\micIn, 2, \buf, ~b6, \t_trig, 1, \l, 0, \overdub, 0], ~recGrp);
|
|
~r7 = Synth(\recBuf, [\micIn, 2, \buf, ~b7, \t_trig, 1, \l, 0, \overdub, 0], ~recGrp);
|
|
~r8 = Synth(\recBuf, [\micIn, 0, \buf, ~b8, \t_trig, 1, \l, 0, \overdub, 0], ~recGrp);
|
|
|
|
// granulating sample players
|
|
|
|
~s1 = Synth(\sampler, [ \pos, 0, \trate, 1, \buf, ~b1, \amp, 0 ], ~smpGrp);
|
|
~s2 = Synth(\sampler, [ \pos, 0, \trate, 1, \buf, ~b2, \amp, 0 ], ~smpGrp);
|
|
~s3 = Synth(\sampler, [ \pos, 0, \trate, 1, \buf, ~b3, \amp, 0 ], ~smpGrp);
|
|
~s4 = Synth(\sampler, [ \pos, 0, \trate, 1, \buf, ~b4, \amp, 0 ], ~smpGrp);
|
|
~s5 = Synth(\sampler, [ \pos, 0, \trate, 1, \buf, ~b5, \amp, 0 ], ~smpGrp);
|
|
~s6 = Synth(\sampler, [ \pos, 0, \trate, 1, \buf, ~b6, \amp, 0 ], ~smpGrp);
|
|
~s7 = Synth(\sampler, [ \pos, 0, \trate, 1, \buf, ~b7, \amp, 0 ], ~smpGrp);
|
|
~s8 = Synth(\sampler, [ \pos, 0, \trate, 1, \buf, ~b8, \amp, 0 ], ~smpGrp);
|
|
|
|
);
|
|
|
|
///////////////////////////////////////////////////////////////////
|
|
|
|
(
|
|
|
|
~m32_1.allNotesOff(0);
|
|
~m32_2.allNotesOff(0);
|
|
|
|
Pbindef(\m1, \type, \midi, \midicmd, \noteOn, \midiout, ~m32_1, \root, 0, \scale, Scale.minor, \degree, 0, \octave, 4, \dur, 1/4).play;
|
|
Pbindef(\m2, \type, \midi, \midicmd, \noteOn, \midiout, ~m32_2, \root, 0, \scale, Scale.minor, \degree, 0, \octave, 4, \dur, 1/4).play;
|
|
|
|
Pbindef(\m1).stop;
|
|
Pbindef(\m2).stop;
|
|
|
|
);
|
|
|
|
|
|
|
|
|
|
Pbindef(\a, \instrument, \sineSeq, \degree, Pseq([1, 2, 3, 4,5,6,7,8], inf), \gate, 1, \dur, 1/2, \sustain, 10).play;
|
|
|
|
Pbindef(\a, \instrument, \sineSeq).stop;
|
|
|
|
|
|
|
|
|
|
|
|
|