- midi_stream << Midi_header (1, tracks_i, clocks_per_4_i);
- output_header_track (midi_stream);
- int n = 1;
- for (int i =0; i < audio_staff_l_arr_.size (); i++)
- {
- Audio_staff *s = audio_staff_l_arr_[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 (n == 10)
- n++;
- s->output (midi_stream, n++);
- }
-}
-
-void
-Performance::output_header_track (Midi_stream& midi_stream)
-{
- Midi_track midi_track;
-
- // perhaps multiple text events?
- String str = String (_("Creator: "));
- if (no_timestamps_global_b)
- str += gnu_lilypond_str ();
- else
- str += gnu_lilypond_version_str();
- str += "\n";
-
- Midi_text creator (Midi_text::TEXT, str);
- midi_track.add (Moment (0), &creator);
-
- str = _("Automatically generated");
- if (no_timestamps_global_b)
- str += ".\n";
- else
+ midi_stream.write (Midi_header (1, tracks_, 384));
+ if (be_verbose_global)
+ progress_indication (_ ("Track...") + " ");
+
+ int channel = 0;
+ for (vsize i = 0; i < audio_staffs_.size (); i++)