- Audio_text generate_a (Audio_text::TEXT, str);
- Midi_text generate (&generate_a);
- midi_track.add (Moment (0), &generate);
-
- str = _f ("from musical definition: %s", origin_str_);
-
- Audio_text from_a (Audio_text::TEXT, str);
- Midi_text from (&from_a);
- midi_track.add (Moment (0), &from);
-
- Audio_text track_name_a (Audio_text::TRACK_NAME, "Track "
- + String_convert::i2dec_str (0, 0, '0'));
- Midi_text track_name (&track_name_a);
-
- midi_track.add (Moment (0), &track_name);
-
- // Some sequencers read track 0 last.
- // Audio_tempo tempo_a (midi_l_->get_tempo_i (Moment (1, 4)));
- // Midi_tempo tempo (&tempo_a);
- // midi_track.add (Moment (0), &tempo);
-
- midi_stream << midi_track;