smalruby 0.0.6-x86-mingw32 → 0.0.7-x86-mingw32

data/lib/smalruby/hardware/rgb_led_anode.rb

@@ -0,0 +1,58 @@
+# -*- coding: utf-8 -*-
+require 'smalruby/hardware'
+
+module Smalruby
+  module Hardware
+    # RGB LED(アノード)を表現するクラス
+    class RgbLedAnode < Dino::Components::BaseComponent
+      def initialize(options)
+        pin = Pin.smalruby_to_dino(options[:pin])
+        case pin
+        when 3..6
+          super(board: world.board, pin: [3, 5, 6, 4])
+        when 9..12
+          super(board: world.board, pin: [9, 10, 11, 12])
+        else
+          fail "RGB LED(anode)のピン番号が間違っています: {options[:pin]}"
+        end
+      end
+
+      # RGB LEDをオンにする
+      def on(options = {})
+        defaults = {
+          color: 'white'
+        }
+        opts = Util.process_options(options, defaults)
+
+        color = Color.smalruby_to_dxruby(opts[:color])
+        analog_write(pins[0], calc_value(color[0]))
+        analog_write(pins[1], calc_value(color[1]))
+        analog_write(pins[2], calc_value(color[2]))
+        digital_write(pins[3], Dino::Board::HIGH)
+      end
+
+      # RGB LEDをオフにする
+      def off
+        digital_write(pins[3], Dino::Board::LOW)
+      end
+
+      private
+
+      def after_initialize(options = {})
+        set_pin_mode(pins[3], :out)
+        off
+      end
+
+      def calc_value(value)
+        v = Dino::Board::HIGH - value
+        if v < Dino::Board::LOW
+          Dino::Board::LOW
+        elsif v > Dino::Board::HIGH
+          Dino::Board::HIGH
+        else
+          v
+        end
+      end
+    end
+  end
+end

data/lib/smalruby/hardware/rgb_led_cathode.rb

@@ -0,0 +1,58 @@
+# -*- coding: utf-8 -*-
+require 'smalruby/hardware'
+
+module Smalruby
+  module Hardware
+    # RGB LED(カソード)を表現するクラス
+    class RgbLedCathode < Dino::Components::BaseComponent
+      def initialize(options)
+        pin = Pin.smalruby_to_dino(options[:pin])
+        case pin
+        when 3, 5, 6
+          super(board: world.board, pin: [3, 5, 6])
+        when 9..11
+          super(board: world.board, pin: [9, 10, 11])
+        else
+          fail "RGB LED(anode)のピン番号が間違っています: {options[:pin]}"
+        end
+      end
+
+      # RGB LEDをオンにする
+      def on(options = {})
+        defaults = {
+          color: 'white'
+        }
+        opts = Util.process_options(options, defaults)
+
+        color = Color.smalruby_to_dxruby(opts[:color])
+        analog_write(pins[0], calc_value(color[0]))
+        analog_write(pins[1], calc_value(color[1]))
+        analog_write(pins[2], calc_value(color[2]))
+      end
+
+      # RGB LEDをオフにする
+      def off
+        color = Color.smalruby_to_dxruby('black')
+        analog_write(pins[0], calc_value(color[0]))
+        analog_write(pins[1], calc_value(color[1]))
+        analog_write(pins[2], calc_value(color[2]))
+      end
+
+      private
+
+      def after_initialize(options = {})
+        off
+      end
+
+      def calc_value(value)
+        if value < Dino::Board::LOW
+          Dino::Board::LOW
+        elsif value > Dino::Board::HIGH
+          Dino::Board::HIGH
+        else
+          value
+        end
+      end
+    end
+  end
+end

data/lib/smalruby/hardware/sensor.rb

@@ -0,0 +1,46 @@
+# -*- coding: utf-8 -*-
+require 'smalruby/hardware'
+
+module Smalruby
+  module Hardware
+    # 汎用的なセンサーを表現するクラス
+    class Sensor < Dino::Components::Sensor
+      # デフォルトのセンサーの値に変化があったかどうかをチェックする閾値
+      DEFAULT_THRESHOLD = 32
+
+      attr_reader :value
+      attr_accessor :threshold
+
+      def initialize(options)
+        super(board: world.board, pin: Pin.smalruby_to_dino(options[:pin]))
+      end
+
+      private
+
+      def after_initialize(options = {})
+        super(options)
+
+        @value = 0
+        @threshold = options[:threshold] || DEFAULT_THRESHOLD
+
+        start_receiving_data
+      end
+
+      def start_receiving_data
+        prev_data = 0
+        when_data_received { |data|
+          begin
+            @value = data = data.to_i
+            if (data - prev_data).abs >= @threshold ||
+                (prev_data != data && (data == 0 || data >= 1023))
+              world.sensor_changed(pin, data)
+              prev_data = data
+            end
+          rescue
+            Util.print_exception($ERROR_INFO)
+          end
+        }
+      end
+    end
+  end
+end

data/lib/smalruby/hardware.rb

@@ -0,0 +1,61 @@
+# -*- coding: utf-8 -*-
+require 'dino'
+require 'mutex_m'
+require_relative 'hardware/dino/fix_gets'
+
+module Smalruby
+  # ハードウェアの名前空間
+  module Hardware
+    extend ActiveSupport::Autoload
+
+    autoload :Pin
+    autoload :Led
+    autoload :RgbLedAnode
+    autoload :RgbLedCathode
+    autoload :Sensor
+
+    module_function
+
+    # ハードウェアを準備する
+    #
+    # @param [Hash] options オプション
+    # @option options [String] :device シリアルポートのデバイス名。
+    #   WindowsだとCOM1など
+    def init(options = {})
+      return if @initialized_hardware
+      fail 'already started.' if @started
+
+      defaults = {
+        device: nil
+      }
+      opt = Util.process_options(options, defaults)
+
+      txrx = Dino::TxRx.new
+      txrx.io = opt[:device] if opt[:device]
+      world.board = Dino::Board.new(txrx)
+
+      @initialized_hardware = true
+    end
+
+    # ハードウェアのインスタンスを生成する
+    #
+    # 作成したハードウェアのインスタンスはキャッシュする
+    #
+    # @param [Class] klass ハードウェアのクラス
+    # @param [String|Numeric] pin ピン番号
+    # @return [Object] ハードウェアのインスタンス
+    def create_hardware(klass, pin)
+      key = [klass, pin]
+      @hardware_cache.synchronize do
+        @hardware_cache[key] ||= klass.new(pin: pin)
+      end
+      @hardware_cache[key]
+    end
+
+    private
+
+    @initialized_hardware = false
+    @hardware_cache = {}
+    @hardware_cache.extend(Mutex_m)
+  end
+end

data/lib/smalruby/scene.rb

@@ -0,0 +1,17 @@
+# -*- coding: utf-8 -*-
+
+module Smalruby
+  # シーンを表現するクラス
+  class Scene < Canvas
+    def initialize(options = {})
+      defaults = {
+        color: 'black'
+      }
+      opts = Util.process_options(options, defaults)
+
+      super(opts.reject { |k, v| defaults.keys.include?(k) })
+
+      fill(color: opts[:color])
+    end
+  end
+end

data/lib/smalruby/util.rb

@@ -0,0 +1,27 @@
+# -*- coding: utf-8 -*-
+module Smalruby
+  module Util
+    module_function
+
+    def process_options(options, defaults)
+      unknown_keys = options.keys - defaults.keys
+      if unknown_keys.length > 0
+        s = unknown_keys.map { |k| "#{k}: #{options[k].inspect}" }.join(', ')
+        fail ArgumentError, "Unknown options: #{s}"
+      end
+      defaults.merge(options)
+    end
+
+    def print_exception(exception)
+      $stderr.puts("#{exception.class}: #{exception.message}")
+      $stderr.puts("        #{exception.backtrace.join("\n        ")}")
+    end
+
+    # プラットフォームがWindowsかどうかを返す
+    #
+    # @return [Boolean] Windowsの場合はtrue、そうでない場合はfalseを返す
+    def windows?
+      /windows|mingw|cygwin/i =~ RbConfig::CONFIG['arch']
+    end
+  end
+end

data/lib/smalruby/version.rb

@@ -1,5 +1,5 @@
 # -*- coding: utf-8 -*-
 
 module Smalruby
-  VERSION = '0.0.6'
+  VERSION = '0.0.7'
 end

data/lib/smalruby/world.rb

@@ -7,9 +7,20 @@ module Smalruby
     include Singleton
 
     attr_accessor :objects
+    attr_accessor :board
+    attr_reader :sensor_change_queue
 
     def initialize
       @objects = []
+      @board = nil
+      @sensor_change_queue = []
+      @sensor_change_queue.extend(Mutex_m)
+    end
+
+    def sensor_changed(pin, value)
+      @sensor_change_queue.synchronize do
+        @sensor_change_queue.push([pin, value])
+      end
     end
   end
 end

data/lib/smalruby.rb

@@ -5,6 +5,7 @@ require 'dxruby'
 require 'English'
 require 'pathname'
 
+require 'smalruby/util'
 require 'smalruby/world'
 require 'smalruby/color'
 require 'smalruby/character'
@@ -15,6 +16,8 @@ module Smalruby
 
   autoload :Console
   autoload :Canvas
+  autoload :Scene
+  autoload :Hardware
 
   module_function
 
@@ -44,6 +47,10 @@ module Smalruby
     end
   end
 
+  def init_hardware(options = {})
+    Hardware.init(options)
+  end
+
   private
 
   @started = false
@@ -88,6 +95,8 @@ module Smalruby
 
           hit
 
+          sensor_change
+
           world.objects.delete_if do |o|
             if !o.alive?
               o.join
@@ -123,7 +132,7 @@ module Smalruby
         {
           left: M_LBUTTON,
           right: M_RBUTTON,
-          center: M_MBUTTON,
+          center: M_MBUTTON
         }.each do |sym, const|
           if Input.mouse_down?(const)
             buttons << sym
@@ -162,6 +171,24 @@ module Smalruby
         end
       end
     end
+
+    def sensor_change
+      if world.sensor_change_queue.length > 0
+        sensor_change_queue = nil
+        world.sensor_change_queue.synchronize do
+          sensor_change_queue = world.sensor_change_queue.dup
+          world.sensor_change_queue.clear
+        end
+
+        world.objects.each do |o|
+          if o.respond_to?(:sensor_change)
+            sensor_change_queue.each do |pin, value|
+              o.sensor_change(pin, value)
+            end
+          end
+        end
+      end
+    end
   end
 end
 

data/samples/hardware_led.rb

@@ -0,0 +1,24 @@
+# -*- coding: utf-8 -*-
+
+DESCRIPTION = <<EOS
+LEDを1秒間隔で点滅させます
+EOS
+
+# デジタルの13番ピンに接続してください。
+
+require 'smalruby'
+
+init_hardware
+
+scene1 = Scene.new(color: 'white')
+
+scene1.on(:start) do
+  draw_font(string: DESCRIPTION, color: 'black')
+
+  loop do
+    led('D13').on
+    sleep(1)
+    led('D13').off
+    sleep(1)
+  end
+end

data/samples/hardware_rgb_led_anode.rb

@@ -0,0 +1,29 @@
+# -*- coding: utf-8 -*-
+
+DESCRIPTION = <<EOS
+RGB LED(アノードコモン)の色を変化させます
+EOS
+
+# デジタルの3番、4番、5番、6番ピンにそれぞれR、コモン、G、Bを接続してく
+# ださい。
+
+require 'smalruby'
+
+init_hardware
+
+scene1 = Scene.new(color: 'white')
+
+scene1.on(:start) do
+  draw_font(string: DESCRIPTION, color: 'black')
+
+  loop do
+    rgb_led_anode('D3').on(color: 'red')
+    sleep(1)
+    rgb_led_anode('D3').on(color: 'green')
+    sleep(1)
+    rgb_led_anode('D3').on(color: 'blue')
+    sleep(1)
+    rgb_led_anode('D3').off
+    sleep(1)
+  end
+end

data/samples/hardware_rgb_led_cathode.rb

@@ -0,0 +1,29 @@
+# -*- coding: utf-8 -*-
+
+DESCRIPTION = <<EOS
+RGB LED(カソードコモン)の色を変化させます
+EOS
+
+# デジタルの3番、4番、6番ピンにそれぞれR、G、Bを接続してく
+# ださい。
+
+require 'smalruby'
+
+init_hardware
+
+scene1 = Scene.new(color: 'white')
+
+scene1.on(:start) do
+  draw_font(string: DESCRIPTION, color: 'black')
+
+  loop do
+    rgb_led_cathode('D3').on(color: 'red')
+    sleep(1)
+    rgb_led_cathode('D3').on(color: 'green')
+    sleep(1)
+    rgb_led_cathode('D3').on(color: 'blue')
+    sleep(1)
+    rgb_led_cathode('D3').off
+    sleep(1)
+  end
+end

data/samples/hardware_sensor.rb

@@ -0,0 +1,24 @@
+# -*- coding: utf-8 -*-
+
+require 'smalruby'
+
+init_hardware
+
+scene1 = Scene.new(color: 'white')
+
+scene1.on(:sensor_change, 'A0') do |value|
+  v = sensor('A0').value
+  if 0 <= v && v <= 255
+    fill(color: 'red')
+  end
+
+  if 256 <= v && v <= 511
+    fill(color: 'yellow')
+  end
+
+  if 512 <= v
+    fill(color: 'blue')
+  end
+
+  draw_font(string: "センサーの情報：#{v}",  color: 'black')
+end

data/smalruby.gemspec

@@ -42,4 +42,5 @@ Gem::Specification.new do |spec|
   else
     spec.add_runtime_dependency 'dxruby_sdl'
   end
+  spec.add_runtime_dependency 'dino'
 end