[SOLVED] MIDI pattern to send multiple control values

[dkmayer]

You can simplify your code by using control “chords” and Pchain. Both save multiple typing.

(
Pdef(\m, Ppar([
	Pbind(\type, \midi, \midiout, m, \midicmd, \noteOn,
		\scale, Scale.harmonicMinor,
		\degree, [0, 2, 4],
		\octave, Pn(Pshuf((2..8),4)),
		\amp, Pwhite(0.1, 0.9) * 0.2,
	),
	Pbind(\type, \midi, \midiout, m, \midicmd, \control,
		\ctlNum, [41, 42, 45],
		\control, Ptuple([60, Pdefn(\ctlModulatorAttack), Pdefn(\ctlCarrierDecay)])
	)
])).play;
)


// in addition use Pchain

(
p = Pbind(\type, \midi, \midiout, m, \midicmd, \noteOn,
	\scale, Scale.harmonicMinor,
	\degree, [0, 2, 4],
	\octave, Pn(Pshuf((2..8),4)),
	\amp, Pwhite(0.1, 0.9) * 0.2,
);

q = Pbind(
	\midicmd, \control,
	\ctlNum, [41, 42, 45],
	\control, Ptuple([60, Pdefn(\ctlModulatorAttack), Pdefn(\ctlCarrierDecay)])
) <> p;

Ppar([p, q]).play;
)

Accidentially (or not) there have been 3 related threads recently.

Control hardware and server synth with one Pbind?

I’m trying to sync an external hardware synth and an internal synth using the same note events. Here’s a boiled down example of what I’m trying to do: MIDIClient.init; m = MIDIOut(1).latency = 0.01; ( SynthDef(\tone, {|out=0, gate=1, freq=440| var env = EnvGen.ar(Env.adsr(releaseTime:0.1 ), gate, doneAction:2); Out.ar(out, SinOsc.ar(freq!2, mul: env, mul:0.3)); }).add; ) a = Pbind(\degree, Prand([1, 2, 3], inf), \dur, Pwhite(1/4, 1, inf)); ( (a <> (instrument: \tone)).play; (a <> (type:…

One Pattern Playing Multiple Synths

Hi Everyone, My questions is simple enough but I’ve had a tough time finding a suitable solution. I’m working on a piece right now that uses synthDefs designed around organ stops. Like organ stops, I want to be able to play the same music with multiple stops, or synthDefs, engaged. In other words, I would like to have one pattern play multiple synths. The patterns in question generates a good amount of random data, which means if I Pchain the note/dur producing pattern to different instruments…

Other than Pseq(Array.rand(), inf) [MIDIOut]

I’ve been trying to figure out how to yield sequences of repeating patterns that repeat an arbitrary (pseudo-random, or whatever pattern might be applied) number of times and change—in real-time (or, ‘generatively’)—not only pitch content but also length, tempo, legato, etc. values of sequence without having to re-evaluate the line of code. For now, I’ve been writing parameters like this, e.g: Pdefn(\notes, Pseq(Array.rand(rand(12), 25, 81), inf)) and a Pdefn for tempo might be written like th…

If you like to have all in one I’d take James’ recommendation of a dedicated Event type. It can always do what you want and define.

Event.addEventType(\midiOnCtl, { |server|
	var original = currentEnvironment.copy.put(\type, \midi);
	~midicmd.do { |cmd|
		original.copy.put(\midicmd, cmd).play;
	};
});

(
p = Pbind(\type, \midiOnCtl, 
	\midiout, m, 
	\midicmd, [\noteOn, \control],
	\scale, Scale.harmonicMinor,
	\degree, [0, 2, 4],
	\octave, Pn(Pshuf((2..8),4)),
	\amp, Pwhite(0.1, 0.9) * 0.2,
	\ctlNum, [41, 42, 45],
	\control, Ptuple([60, Pdefn(\ctlModulatorAttack), Pdefn(\ctlCarrierDecay)])
);

p.play;
)