pedalboard 0.0.1

data/du/du.ino

@@ -0,0 +1,19 @@
+#include "Dino.h"
+#include <Servo.h>
+Dino dino;
+
+// Dino.h doesn't handle TXRX. Setup a function to tell it to write to Serial.
+void writeResponse(char *response) { Serial.print(response); Serial.print("\n"); }
+void (*writeCallback)(char *str) = writeResponse;
+
+void setup() {
+  Serial.begin(115200);
+  dino.setupWrite(writeCallback);
+}
+
+void loop() {
+  while(Serial.available() > 0) dino.parse(Serial.read());
+  dino.updateListeners();
+  Serial.flush();
+}
+

data/examples/main_stage.rb

@@ -0,0 +1,57 @@
+led1 = nil
+led2 = nil
+led3 = nil
+led4 = nil
+
+altled1 = nil
+altled2 = nil
+altled3 = nil
+altled4 = nil
+
+pot pin: 'A0',
+  change: ->(value) { set_volume(value) }
+
+pedal pin: 2,
+  press: ->{ patch 1 },
+  long_press: ->{ patch 4 }
+
+pedal pin: 3,
+  press: ->{ patch 2 },
+  long_press: ->{ patch 5 }
+
+pedal pin: 4,
+  press: ->{ patch 3 },
+  long_press: ->{ patch 6 }
+
+pedal pin: 5,
+  press: ->{ next_set },
+  long_press: ->{ previous_set }
+
+led1 = led pin: 6
+led2 = led pin: 11
+led3 = led pin: 8
+led4 = led pin: 9
+
+altled1 = led pin: 10
+altled2 = led pin: 7
+altled3 = led pin: 12
+altled4 = led pin: 13
+
+MIDI.using(pedalboard.midi_input, pedalboard.midi_output) do
+  receive do |message|
+    if message.index == 22
+      begin
+        led1.light_if message.value == 1
+        led2.light_if message.value == 2
+        led3.light_if message.value == 3
+
+        altled1.light_if message.value == 4
+        altled2.light_if message.value == 5
+        altled3.light_if message.value == 6
+      rescue Exception => e
+        puts e.message
+      end
+    end
+  end
+end
+

data/lib/pedalboard.rb

@@ -0,0 +1,22 @@
+require_relative 'pedalboard/cli'
+require_relative 'pedalboard/dsl_parser'
+require_relative 'pedalboard/device'
+
+require_relative 'pedalboard/components/led'
+require_relative 'pedalboard/components/pedal'
+require_relative 'pedalboard/components/pot'
+
+module Pedalboard
+  def self.create opts={}, &block
+    device_class = opts.delete(:device_class) { Device }
+    dsl_parser = opts.delete(:dsl_parser) { DSLParser }
+
+    parser = dsl_parser.new(
+      device_class.new(opts)
+    )
+
+    parser.instance_exec(&block) if block_given?
+
+    return parser.pedalboard
+  end
+end

data/lib/pedalboard/cli.rb

@@ -0,0 +1,21 @@
+require 'mixlib/cli'
+
+require_relative '../pedalboard'
+
+module Pedalboard
+  class CLI
+    include Mixlib::CLI
+
+    def create_device filename
+      contents = File.open(filename).read
+      Pedalboard.create do
+        eval contents
+      end
+    end
+
+    def run args
+      options = parse_options(args)
+      options.each { |file| create_device file }
+    end
+  end
+end

data/lib/pedalboard/commands.rb

@@ -0,0 +1,44 @@
+module Pedalboard
+  class Commands
+    NOTES = [
+      'c1', 'd1', 'e1',
+      'f1', 'g1', 'a1'
+    ]
+
+    attr_reader :pedalboard
+
+    def initialize opts={}
+      @pedalboard = opts.fetch(:pedalboard) { }
+    end
+
+    def patch number
+      midi do
+        note NOTES[number - 1]
+      end
+    end
+
+    def next_set
+      midi do
+        note 'b1'
+      end
+    end
+
+    def previous_set
+      midi do
+        note 'c2'
+      end
+    end
+
+    def set_volume value
+      midi do
+        cc 7, value
+      end
+    end
+
+    def midi &block
+      MIDI.using(pedalboard.midi_input, pedalboard.midi_output) do
+        instance_exec &block
+      end
+    end
+  end
+end

data/lib/pedalboard/components/base_component.rb

@@ -0,0 +1,20 @@
+require_relative '../commands'
+
+module Pedalboard; module Components
+  class BaseComponent
+    attr_reader :pin, :pedalboard
+
+    def initialize opts={}
+      @pin = opts.fetch(:pin) {}
+      @pedalboard = opts.fetch(:pedalboard) {}
+      @dino_component = opts.fetch(:dino_component) {}
+    end
+
+  private
+    def run_command command, *args
+      Commands.new(
+        pedalboard: pedalboard
+      ).instance_exec *args, &command
+    end
+  end
+end; end

data/lib/pedalboard/components/led.rb

@@ -0,0 +1,28 @@
+require 'dino/components/base_component'
+require 'dino/components/led'
+
+require_relative 'base_component'
+
+module Pedalboard; module Components
+  class Led < BaseComponent
+    def light_if condition
+      condition ? on : off
+    end
+
+    def off
+      dino_component.send :off
+    end
+
+    def on
+      dino_component.send :on
+    end
+
+  private
+    def dino_component
+      @dino_component ||= Dino::Components::Led.new(
+        pin: pin,
+        board: pedalboard.board
+      )
+    end
+  end
+end; end

data/lib/pedalboard/components/pedal.rb

@@ -0,0 +1,52 @@
+require 'dino/components/base_component'
+require 'dino/components/button'
+
+require_relative 'base_component'
+
+module Pedalboard; module Components
+  class Pedal < BaseComponent
+    LONG_TIME = 0.4
+
+    attr_reader :press, :long_press
+
+    def initialize opts={}
+      super opts
+
+      @press = opts.fetch(:press) { ->{} }
+      @long_press = opts.fetch(:long_press) { ->{} }
+
+      configure_dino_component
+    end
+
+    def configure_dino_component
+      dino_component.down do
+        begin
+          @start_time = Time.now
+        rescue Exception => e
+          puts e.message
+        end
+      end
+
+      dino_component.up do
+        begin
+          interval = Time.now - @start_time
+          if interval > LONG_TIME
+            run_command long_press
+          else
+            run_command press
+          end
+        rescue Exception => e
+          puts e.message
+        end
+      end
+    end
+
+  private
+    def dino_component
+      @dino_component ||= Dino::Components::Button.new(
+        pin: pin,
+        board: pedalboard.board
+      )
+    end
+  end
+end; end

data/lib/pedalboard/components/pot.rb

@@ -0,0 +1,78 @@
+require 'dino/components/base_component'
+require 'dino/components/sensor'
+
+require_relative 'base_component'
+
+module Pedalboard; module Components
+  class Pot < BaseComponent
+    TOLERANCE = 2
+
+    UPPER_LIMIT = 127
+    LOWER_LIMIT = 0
+
+    attr_reader :change, :inverted,
+                :lower_limit, :upper_limit,
+                :tolerance
+
+    attr_accessor :value
+
+    def initialize opts={}
+      super opts
+
+      @change = opts.fetch(:change) { ->(value) {} }
+      @lower_limit = opts.fetch(:lower_limit) { LOWER_LIMIT }
+      @upper_limit = opts.fetch(:upper_limit) { UPPER_LIMIT }
+      @tolerance = opts.fetch(:tolerance) { TOLERANCE }
+      @inverted = opts.fetch(:inverted) { false }
+      @value = lower_limit
+
+      configure_dino_component
+    end
+
+  private
+    def configure_dino_component
+      dino_component.when_data_received do |value|
+        begin
+          new_value = normalised(value)
+          if significant_change?(new_value)
+            @value = new_value
+            run_command(change, new_value)
+          end
+        rescue Exception => e
+          puts e.message
+        end
+      end
+    end
+
+    def dino_component
+      @dino_component ||= Dino::Components::Sensor.new(
+        pin: pin,
+        board: pedalboard.board
+      )
+    end
+
+    def normalised received_value
+      normalised_value = (
+        (received_value.to_i / 1024.0) *
+        (upper_limit - lower_limit)
+      ).to_i + lower_limit
+      normalised_value = upper_limit - normalised_value if inverted
+      normalised_value
+    end
+
+    def range_to_ignore
+      min = value - tolerance
+      max = value + tolerance
+      (min..max).to_a
+    end
+
+    def significant_change? new_value
+      if new_value != value
+        return true if new_value == lower_limit
+        return true if new_value == upper_limit
+      end
+
+      !range_to_ignore.include?(new_value)
+    end
+  end
+end; end

data/lib/pedalboard/device.rb

@@ -0,0 +1,32 @@
+require 'dino'
+require 'micromidi'
+
+module Pedalboard
+  class Device
+
+    attr_reader :components, :board, :midi_output, :midi_input
+
+    def initialize opts={}
+      @components = []
+      @connection = opts.fetch(:connection) { Dino::TxRx::Serial.new }
+      @board = opts.fetch(:board) { Dino::Board.new(connection) }
+      @midi_output = opts.fetch(:midi_output) { UniMIDI::Output.gets }
+      @midi_input = opts.fetch(:midi_input) { UniMIDI::Input.gets }
+    end
+
+    def add_component type, opts={}
+      opts[:pedalboard] = self
+      component =  eval(component_class(type))
+        .new(opts)
+      components << component
+      component
+    end
+
+  private
+    attr_reader :connection
+
+    def component_class type
+      "Pedalboard::Components::#{type.capitalize}"
+    end
+  end
+end

data/lib/pedalboard/dsl_parser.rb

@@ -0,0 +1,25 @@
+module Pedalboard
+ class DSLParser
+    attr_reader :pedalboard
+
+    def initialize pedalboard
+      @pedalboard = pedalboard
+    end
+
+    def led *args
+      @pedalboard.add_component :led, *args
+    end
+
+    def pedal *args
+      @pedalboard.add_component :pedal, *args
+    end
+
+    def pot *args
+      @pedalboard.add_component :pot, *args
+    end
+
+    def board
+      self.pedalboard.board
+    end
+  end
+end

data/lib/pedalboard/version.rb

@@ -0,0 +1,11 @@
+module Pedalboard
+  module Version
+    MAJOR    = 0
+    MINOR    = 0
+    REVISION = 1
+  end
+
+  def self.version
+    "#{Version::MAJOR}.#{Version::MINOR}.#{Version::REVISION}"
+  end
+end

data/pedalboard.gemspec

@@ -0,0 +1,27 @@
+$:.push File.expand_path('../lib', __FILE__)
+require 'pedalboard/version'
+
+Gem::Specification.new do |s|
+  s.name          = 'pedalboard'
+  s.version       = Pedalboard.version
+  s.platform      = Gem::Platform::RUBY
+  s.date          = '2014-05-04'
+  s.summary       = 'Easy Arduino MIDI pedalboard'
+  s.description   = 'Quick and easy prototyping for Arduino-based MIDI pedalboards'
+  s.authors       = ['Adam Phillips']
+  s.email         = 'adam@29ways.co.uk'
+  s.homepage      = 'https://github.com/adamphillips/pedalboard'
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+
+  s.add_runtime_dependency 'dino'
+  s.add_runtime_dependency 'micromidi'
+  s.add_runtime_dependency 'mixlib-cli'
+
+  s.add_development_dependency 'rspec'
+  s.add_development_dependency 'pry'
+  s.add_development_dependency 'codeclimate-test-reporter'
+end