in reply to Dump MIDI as Perl Code
#put a "use MIDI;" at the top of the dump #and assign a variable $opus use MIDI; $opus=MIDI::Opus->new({ 'format' => 1, 'ticks' => 96, 'tracks' => [ # 3 tracks... ...... ...... ...... #then as the last line $opus->write_to_file('mynew.mid');
|
|---|