- int clocks_per_4_i = 384;
-
- midi_stream << Midi_header (1, tracks_i, clocks_per_4_i);
- output_header_track (midi_stream);
- progress_indication ("\n");
- progress_indication (_ ("Track ... "));
- int channel = 1;
- for (int i =0; i < audio_staff_l_arr_.size (); i++)
- {
- Audio_staff *s = audio_staff_l_arr_[i];
- progress_indication ("[" + to_str (i)) ;
-
- /*
- Aargh, let's hear it for the MIDI standard.
- MIDI players tend to ignore instrument settings on
- channel 10, the percussion channel by default.
- */
- if (channel == 9)
- channel++;
- s->output (midi_stream, channel++);
- progress_indication ("]");
- }
-}