1 files changed, 0 insertions, 99 deletions
diff --git a/lib/midi.moon b/lib/midi.moon
deleted file mode 100644
index e83b05d..0000000
--- a/lib/midi.moon
+++ /dev/null
@@ -1,99 +0,0 @@
-import ValueStream, EventStream, Op, Input, val, evt from require 'alv.base'
-import input, output, inout, apply_range from require 'lib.midi.core'
-
-gate = ValueStream.meta
-  meta:
-    name: 'gate'
-    summary: "gate from note-on and note-off messages."
-    examples: { '(midi/gate [port] note [chan])' }
-
-  value: class extends Op
-    pattern = -evt['midi/port'] + val.num -val.num
-    setup: (inputs, scope) =>
-      @out or= ValueStream 'bool'
-      { port, note, chan } = pattern\match inputs
-      super
-        port: Input.hot port or scope\get '*midi*'
-        note: Input.hot note
-        chan: Input.hot chan or ValueStream.num -1
-
-    tick: =>
-      { :port, :note, :chan } = @inputs
-
-      if note\dirty! or chan\dirty!
-        @out\set false
-
-      if port\dirty!
-        for msg in *port!
-          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
-
-trig = ValueStream.meta
-  meta:
-    name: 'trig'
-    summary: "`bang`s from note-on messages."
-    examples: { '(midi/trig [port] note [chan])' }
-
-  value: class extends Op
-    pattern = -evt['midi/port'] + val.num -val.num
-    setup: (inputs, scope) =>
-      @out or= EventStream 'bang'
-      { port, note, chan } = pattern\match inputs
-      super
-        port: Input.hot port or scope\get '*midi*'
-        note: Input.cold note
-        chan: Input.cold chan or ValueStream.num -1
-
-    tick: =>
-      { :port, :note, :chan } = @inputs
-
-      for msg in *port!
-        if msg.a == note! and (chan! == -1 or msg.chan == chan!)
-          if msg.status == 'note-on'
-            @out\add true
-
-cc = ValueStream.meta
-  meta:
-    name: 'cc'
-    summary: "`num` from cc-change messages."
-    examples: { '(midi/cc [port] cc [chan [range]])' }
-    description: "
-`range` can be one of:
-- 'raw' [ 0 - 128[
-- 'uni' [ 0 - 1[ (default)
-- 'bip' [-1 - 1[
-- 'rad' [ 0 - tau[
-- 'deg' [ 0 - 360[
-- (num) [ 0 - num["
-
-  value: class extends Op
-    pattern = -evt['midi/port'] + val.num + -val.num + -val.num
-    setup: (inputs, scope) =>
-      { port, cc, chan, range } = pattern\match inputs
-      super
-        port:  Input.hot port or scope\get '*midi*'
-        cc:    Input.cold cc
-        chan:  Input.cold chan or ValueStream.num -1
-        range: Input.cold range or ValueStream.str 'uni'
-
-      @out or= ValueStream 'num', apply_range @inputs.range, 0
-
-    tick: =>
-      { :port, :cc, :chan, :range } = @inputs
-      for msg in *port!
-        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
-}