Help for this page

Select Code to Download


  1. or download this
    use MIDI;  # which "use"s MIDI::Event;
my @lyrics;
...
     "exclusive_event_callback" => sub{push @lyrics,  $_[2],$_[1]\n"},
     "include" => \@MIDI::Event::Text_events
   } );
  2. or download this
    "Happy,300"
"Birthday,400"
"To,80"
"You,500"