- push @allmidievents, ['note_on', $tick * $scale + $shift, $sequence++, -1, -1, $file];
- push @allmidievents, ['note_off', $tick * $scale + $shift, $sequence++, -1, -1, $file];
+ push @allmidievents, ['text_event', $tick * $scale + $shift, $sequence++, -1, "vocals:$file"];