Midiout - first test

so today for the first time i started experimenting with sc midiout and some randomness. even though im still a newbie in the world of SC it amazes me how quickly it does inspire you.

and this is what i came up to:

MIDIClient.init;
MIDIClient.destinations;

m = MIDIOut.new(0);

(
~nord1 = Pbind(
    \type, \midi,
    \midicmd, \noteOn,
    \midiout, m,
    \chan, 1,
    \midinote, Pwrand(
        [48, 52, 56, 59, 63, 66],
        [0.1, 0.1, 0.1, 0.1, 0.1, 0.1],
        inf
    ),
    \amp, Pexprand(5, 100, inf) / 127,
    \sustain, Pexprand(1.0, 8.0, inf),
    \dur, Pwhite(0.01, 3.0, inf),
    \stretch, 4 * 60 / 108
).play(quant: 4 * 60 / 108);

(
~oba1 = Pbind(
    \type, \midi,
    \midicmd, \noteOn,
    \midiout, m,
    \chan, 0,
    \midinote, Pseq([48, 52, 56], inf) + Pxrand([0, 4, 12], inf),
    \amp, Pexprand(10, 50, inf) / 127,
    \sustain, Pexprand(2.0, 10.0, inf),
    \dur, Pxrand([0.1, 1, 2, 3], inf),
    \stretch, 4 * 60 / 108
).play(quant: 4 * 60 / 108);
)
)

~nord1.stop;
~oba1.stop
1 Like