Convert mid file to a text music note.?
[email protected] ("amjad salameh") Wed, 19 Sep 2001 09:16:48 +0300
| Newsgroups | perl.midi |
|---|---|
| Message-ID | <[email protected]> |
ýHi ý
ýI'm trying to read the mid file and rewrite it in readable text mode
(readable for musician)ý
ýI got the standard music note.ý
ýBut how can I convert this numbers to this music note.ý
ýPlz advice ý
ýIf there is a complete example it will be fine ý
this is the code to read the mid file
#!/usr/bin/perl
# use strict;
use MIDI;
foreach my $file ( @ARGV ) {
my $song = MIDI::Opus->new(
from_file => $file,
) || die "Non riesco a leggere il file - $!\n";
print "$file\n";
print $song->dump({flat => 1});
}
_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp