28 lines
710 B
Elixir
28 lines
710 B
Elixir
|
defmodule MIDITools.Event do
|
||
|
|
defmodule Note do
|
||
|
|
defstruct channel: 0, tone: 0, start_time: 0, end_time: 0, velocity: 0
|
||
|
|
|
||
|
|
def new(channel, tone, start_time, end_time, velocity) do
|
||
|
|
%__MODULE__{
|
||
|
|
channel: channel,
|
||
|
|
tone: tone,
|
||
|
|
start_time: start_time,
|
||
|
|
end_time: end_time,
|
||
|
|
velocity: velocity
|
||
|
|
}
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
def convert(%Note{
|
||
|
|
channel: channel,
|
||
|
|
tone: tone,
|
||
|
|
start_time: start_time,
|
||
|
|
end_time: end_time,
|
||
|
|
velocity: velocity
|
||
|
|
}) do
|
||
|
|
note_on = MIDISynth.Command.note_on(channel, tone, velocity)
|
||
|
|
note_off = MIDISynth.Command.note_off(channel, tone)
|
||
|
|
[{start_time, note_on}, {end_time, note_off}]
|
||
|
|
end
|
||
|
|
end
|