|
|
|
@ -41,7 +41,7 @@ m = MIDIOut(0)
|
|
|
|
|
m.connect
|
|
|
|
|
|
|
|
|
|
// test
|
|
|
|
|
Pbindef(\testmidi, \type, \midi, \midicmd, \noteOn, \midiout, m, \chan, 1, \amp, 0.5).play
|
|
|
|
|
Pbindef(\testmidi, \type, \midi, \midicmd, \noteOn, \midiout, m, \chan, 0, \amp, 0.5).play
|
|
|
|
|
Pbindef(\testmidi).stop
|
|
|
|
|
|
|
|
|
|
// processing input from piano
|
|
|
|
@ -67,7 +67,7 @@ Ndef(\inDSPout).stop
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
(
|
|
|
|
|
Pbindef(\p220105b, \type, \midi, \midicmd, \noteOn, \midiout, m, \chan, 1,
|
|
|
|
|
Pbindef(\p220105b, \type, \midi, \midicmd, \noteOn, \midiout, m, \chan, 0,
|
|
|
|
|
\dur, Pseq([
|
|
|
|
|
Pn(1/2, 50),
|
|
|
|
|
Pseq([1, 1/2, Pn(1/4,4), 2], 20), // 7*20
|
|
|
|
|