From ee34d9013b699c3e39b3972173c29e8699669945 Mon Sep 17 00:00:00 2001
From: Eugene Petkevich <nasedil.genio.code@gmail.com>
Date: Wed, 1 Jun 2022 18:38:36 +0300
Subject: [PATCH] Add pedal adapter

---
 extensions/classes/midipedals.sc | 37 ++++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)
 create mode 100644 extensions/classes/midipedals.sc

diff --git a/extensions/classes/midipedals.sc b/extensions/classes/midipedals.sc
new file mode 100644
index 0000000..8c39e19
--- /dev/null
+++ b/extensions/classes/midipedals.sc
@@ -0,0 +1,37 @@
+MidiPedals : MidiHandler {
+  var <>sustain;
+  var <>express;
+
+  *new {|name='Pedals', midiNames=#["ReMOTE SL", "ReMOTE SL MIDI 1", "ReMOTE SL MIDI 1"], reveal=true|
+    ^super.newCopyArgs(name, midiNames, reveal).midiInit.controlInit;
+  }
+
+  controlInit {
+    // Sustain pedal
+    MIDIdef.cc((\sustain++name).asSymbol, {|...args|
+      sustain.value((args[0]!=0), *args);
+    }, 65, srcID: idin);
+    // Expression pedal
+    MIDIdef.cc((\expression++name).asSymbol, {|...args|
+      express.value(args[0].linlin(0, 118, 0, 1), *args);
+    }, 64, srcID: idin);
+
+    // initialize handlers with revealing code
+    [
+      \sustain, \express
+    ].do{|handlerName|
+      this.perform((handlerName++\_).asSymbol, {|...args|
+        this.noCallback(handlerName, *args);
+      });
+    };
+    "Нычосё и Щюҙуԉы готов к использованию 😊".postln;
+  }
+
+}
+
+// test
+/*
+
+~p = MidiPedals();
+
+*/
\ No newline at end of file
-- 
2.17.1