From 45f885110d63c8bc38b68ed3fac8a5069ce6ee83 Mon Sep 17 00:00:00 2001
From: Naomi Seyfer <naomi@seyfer.org>
Date: Fri, 3 Dec 2021 00:10:26 -0800
Subject: [PATCH] Add the ability to select your midi device
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

I have my 16n as midi device 1, and my linnstrument as device 2 — which means that I end up really wanting to be able to select the linnstrument in the params menu. This helps with that.
---
 orgn.lua | 24 ++++++++++++++++++++++--
 1 file changed, 22 insertions(+), 2 deletions(-)

diff --git a/orgn.lua b/orgn.lua
index 7f30689..c20e808 100644
--- a/orgn.lua
+++ b/orgn.lua
@@ -92,9 +92,28 @@ params:add {
 }
 
 --midi keyboard
+midi_device = {} -- container for connected midi devices
+midi_device_names = {}
+midi_target = 1
+
+function init_midi()
+  for i = 1,#midi.vports do -- query all ports
+    midi_device[i] = midi.connect(i) -- connect each device
+    local full_name = 
+    table.insert(midi_device_names,"port "..i..": "..util.trim_string_to_width(midi_device[i].name,40)) -- register its name
+  end
+  params:add_option("midi target", "midi target",midi_device_names,1)
+  params:set_action("midi target", midi_target_fn)
+end
+
+function midi_target_fn(x)
+  midi_device[midi_target].event = nil
+  midi_target = x
+  midi_device[midi_target].event = process_midi
+end
+
 
-m = midi.connect()
-m.event = function(data)
+function process_midi(data)
     local msg = midi.to_msg(data)
 
     if msg.type == "note_on" then
@@ -314,6 +333,7 @@ orgn_ = nest_ {
 
 function init()
     orgn.init()
+    init_midi()
     params:read()
     params:set('demo start/stop', 0)
     params:bang()