diff --git a/algoforte01.scd b/algoforte01.scd index 3790181..602baa2 100644 --- a/algoforte01.scd +++ b/algoforte01.scd @@ -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