Better CC support.

erlsci · Oct 20, 2024 · 0ea1c8e · 0ea1c8e
1 parent 1309cfc
commit 0ea1c8e
Showing 1 changed file with 8 additions and 3 deletions.
diff --git a/src/midimsg.erl b/src/midimsg.erl
@@ -54,7 +54,7 @@
     rt_tick/0
 ]).
 -export([
-    cc/2,
+    cc/2, cc/3,
     program_change/1, program_change/2
 ]).
 -export([
@@ -252,8 +252,13 @@ poly_aftertouch(Channel, Pitch, Pressure) ->
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 -spec cc (integer(), integer()) -> tuple().
-cc(Controller, Value) ->
-    {midi, {cc, [{controller, Controller},
+cc(Control, Value) ->
+    {midi, {cc, [{control, Control},
+                 {value, Value}]}}.
+
+cc(Channel, Control, Value) ->
+    {midi, {cc, [{channel, Channel},
+                 {control, Control},
                  {value, Value}]}}.
 
 -spec program_change (integer()) -> tuple().