Advertisement
Guest User

MIDI

a guest
Jan 4th, 2015
288
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.99 KB | None | 0 0
  1. Sound`MIDISequenceToBytes[
  2. Sound`MIDISequence[{Sound`MIDITrack[{Sound`MIDIEvent[0, "SetTempo",
  3. "Tempo" -> 1000000],
  4. Sound`MIDIEvent[0, "ProgramCommand", "Channel" -> 0,
  5. "Value" -> 11],
  6. Sound`MIDIEvent[0, "NoteOn", "Note" -> 60, "Channel" -> 0,
  7. "Velocity" -> 127],
  8. Sound`MIDIEvent[0, "NoteOn", "Note" -> 64, "Channel" -> 0,
  9. "Velocity" -> 127],
  10. Sound`MIDIEvent[0, "NoteOn", "Note" -> 67, "Channel" -> 0,
  11. "Velocity" -> 127],
  12. Sound`MIDIEvent[0, "NoteOn", "Note" -> 72, "Channel" -> 0,
  13. "Velocity" -> 127],
  14. Sound`MIDIEvent[480, "NoteOff", "Note" -> 60, "Channel" -> 0,
  15. "Velocity" -> 0],
  16. Sound`MIDIEvent[480, "NoteOff", "Note" -> 64, "Channel" -> 0,
  17. "Velocity" -> 0],
  18. Sound`MIDIEvent[480, "NoteOff", "Note" -> 67, "Channel" -> 0,
  19. "Velocity" -> 0],
  20. Sound`MIDIEvent[480, "NoteOff", "Note" -> 72, "Channel" -> 0,
  21. "Velocity" -> 0]}]}, "DivisionType" -> "PPQ",
  22. "Resolution" -> 48]]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement