make lib/midi documentable

1 files changed, 0 insertions, 98 deletions

diff --git a/lib/midi/init.moon b/lib/midi/init.moon
deleted file mode 100644
index 01af84f..0000000
--- a/lib/midi/init.moon
+++ /dev/null
@@ -1,98 +0,0 @@
-import Value, Op, ValueInput, IOInput, match from require 'core.base'
-import input, output, inout, apply_range from require 'lib.midi.core'
-
-class gate extends Op
-  @doc: "(midi/gate port note [chan]) - gate from note-on and note-off messages"
-
-  new: =>
-    super 'bool', false
-
-  setup: (inputs) =>
-    { port, note, chan } = match 'midi/port num num?', inputs
-    super
-      port: IOInput port
-      note: ValueInput note
-      chan: ValueInput chan or Value.num -1
-
-  tick: =>
-    { :port, :note, :chan } = @inputs
-
-    if note\dirty! or chan\dirty!
-      @out\set false
-
-    if port\dirty!
-      for msg in port!\receive!
-        if msg.a == note! and (chan! == -1 or msg.chan == chan!)
-          if msg.status == 'note-on'
-            @out\set true
-          elseif msg.status == 'note-off'
-            @out\set false
-
-class trig extends Op
-  @doc: "(midi/trig port note [chan]) - gate from note-on and note-off messages"
-
-  new: =>
-    super 'bang', false
-
-  setup: (inputs) =>
-    { port, note, chan } = match 'midi/port num num?', inputs
-    super
-      port: IOInput port
-      note: ValueInput note
-      chan: ValueInput chan or Value.num -1
-
-  tick: =>
-    { :port, :note, :chan } = @inputs
-
-    if note\dirty! or chan\dirty!
-      @out\set false
-
-    if port\dirty!
-      for msg in port!\receive!
-        if msg.a == note! and (chan! == -1 or msg.chan == chan!)
-          if msg.status == 'note-on'
-            @out\set true
-
-
-class cc extends Op
-  @doc: "(midi/cc port cc [chan [range]]) - MIDI CC to number
-
-range can be one of:
-- 'raw' [ 0 - 128[
-- 'uni' [ 0 - 1[ (default)
-- 'bip' [-1 - 1[
-- 'rad' [ 0 - tau[
-- 'deg' [ 0 - 360[
-- (num) [ 0 - num["
-
-  new: =>
-    super 'num'
-
-  setup: (inputs) =>
-    { port, cc, chan, range } = match 'midi/port num num? any?', inputs
-    super
-      port:  IOInput port
-      cc:    ValueInput cc
-      chan:  ValueInput chan or Value.num -1
-      range: ValueInput range or Value.str 'uni'
-
-    if not @out\unwrap!
-      @out\set apply_range @inputs.range, 0
-
-  tick: =>
-    { :port, :cc, :chan, :range } = @inputs
-    if port\dirty!
-      for msg in port!\receive!
-        if msg.status == 'control-change' and
-           (chan! == -1 or msg.chan == chan!) and
-           msg.a == cc!
-          @out\set apply_range range, msg.b
-
-{
-  :input
-  :output
-  :inout
-  :gate
-  :trig
-  :cc
-}