|
|
|
@ -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 |
|
|
|
|