dxruby_sdl 0.0.1 → 0.0.2

data/samples/tutorial-2-06.rb

@@ -0,0 +1,24 @@
+# -*- coding: utf-8 -*-
+# http://dxruby.sourceforge.jp/DXRubyReference/200953123211781.htm
+require 'dxruby'
+
+image = Image.load('data.png')  # data.pngを読み込む
+x = 0
+y = 0
+dx = 0
+dy = 0
+
+Window.loop do
+  dx = Input.x  # x座標の移動量
+  dy = Input.y  # y座標の移動量
+
+  if Input.padDown?(P_BUTTON0) # Zキーかパッドのボタン０を押しているか判定
+    dx = dx * 2
+    dy = dy * 2
+  end
+
+  x = x + dx
+  y = y + dy
+
+  Window.draw(x, y, image)  # data.pngを描画する
+end

data/samples/tutorial-2-07.rb

@@ -0,0 +1,12 @@
+# -*- coding: utf-8 -*-
+# http://dxruby.sourceforge.jp/DXRubyReference/2009531233720546.htm
+require 'dxruby'
+
+image = Image.load('data.png')  # data.pngを読み込む
+
+Window.loop do
+  x = Input.mousePosX  # マウスカーソルのx座標
+  y = Input.mousePosY  # マウスカーソルのy座標
+
+  Window.draw(x, y, image)  # data.pngを描画する
+end

data/samples/tutorial-2-08.rb

@@ -0,0 +1,12 @@
+# -*- coding: utf-8 -*-
+# http://dxruby.sourceforge.jp/DXRubyReference/2009610612281.htm
+require 'dxruby'
+
+image = Image.load('data.png')  # data.pngを読み込む
+
+Window.loop do
+  Window.draw(100, 100, image)  # data.pngを描画する
+  if Input.keyPush?(K_ESCAPE)   # Escキーで終了
+    break
+  end
+end

data/samples/tutorial-2-09.rb

@@ -0,0 +1,9 @@
+# -*- coding: utf-8 -*-
+# http://dxruby.sourceforge.jp/DXRubyReference/2009610505893.htm
+require 'dxruby'
+
+font = Font.new(32)  # 第２引数を省略するとＭＳ Pゴシックになります
+
+Window.loop do
+  Window.drawFont(100, 100, 'ふぉんと', font)  # "ふぉんと"を描画する
+end

data/samples/tutorial-2-10.rb

@@ -0,0 +1,14 @@
+# -*- coding: utf-8 -*-
+# http://dxruby.sourceforge.jp/DXRubyReference/2009610590500.htm
+require 'dxruby'
+
+sound = Sound.new('sound.wav')  # sound.wav読み込み
+bgm = Sound.new('bgm.mid')      # bgm.mid読み込み
+
+bgm.play
+
+Window.loop do
+  if Input.keyPush?(K_Z)        # Zキーで再生
+    sound.play
+  end
+end

data/spec/dxruby_sdl/image_spec.rb

@@ -34,21 +34,124 @@ describe DXRubySDL::Image, '画像を表すクラス' do
     end
   end
 
-  describe '#line' do
-    it '呼び出すことができる' do
-      image.line(0, 0, 100, 100, [255, 255, 255])
+  shared_context '.load_tiles' do
+    context '画像の幅と高さが割り切れる(518x232、xcountが2、ycountが4)場合' do
+      let(:xcount) { 2 }
+      let(:ycount) { 4 }
+
+      its(:length) { should eq(xcount * ycount) }
+
+      it '各オブジェクトの幅はxcount(2)等分したものである' do
+        subject.each do |image|
+          expect(image.width).to eq(518 / xcount)
+        end
+      end
+
+      it '各オブジェクトの高さはycount(4)等分したものである' do
+        subject.each do |image|
+          expect(image.height).to eq(232 / ycount)
+        end
+      end
     end
   end
 
-  describe '#circle' do
-    it '呼び出すことができる' do
-      image.circle(50, 50, 25, [255, 255, 255])
+  describe '.load_tiles',
+           '画像を読み込み、横・縦がそれぞれxcount個、' \
+           'ycount個であると仮定して自動で分割し、' \
+           '左上から右に向かう順序でImageオブジェクトの配列を生成して返す' do
+    subject {
+      DXRubySDL::Image.load_tiles(fixture_path('logo.png'), xcount, ycount)
+    }
+
+    include_context '.load_tiles'
+
+    describe 'alias' do
+      describe '.loadTiles' do
+        it_behaves_like '.load_tiles' do
+          subject {
+            DXRubySDL::Image.loadTiles(fixture_path('logo.png'),
+                                       xcount, ycount)
+          }
+        end
+      end
+
+      describe '.load_to_array' do
+        it_behaves_like '.load_tiles' do
+          subject {
+            DXRubySDL::Image.load_to_array(fixture_path('logo.png'),
+                                           xcount, ycount)
+          }
+        end
+      end
+
+      describe '.loadToArray' do
+        it_behaves_like '.load_tiles' do
+          subject {
+            DXRubySDL::Image.loadToArray(fixture_path('logo.png'),
+                                         xcount, ycount)
+          }
+        end
+      end
     end
   end
 
-  describe '#box' do
+  describe '#slice' do
+    let(:image) { DXRubySDL::Image.load(fixture_path('logo.png')) }
+
+    subject { image.slice(100, 100, 20, 40) }
+
+    before do
+      SDL::Surface.auto_lock_on
+    end
+
+    after do
+      SDL::Surface.auto_lock_off
+    end
+
+    its(:width) { should eq(20) }
+    its(:height) { should eq(40) }
+    it { should be_instance_of(DXRubySDL::Image) }
+    it '各ピクセルデータが正しい' do
+      expect(subject._surface.pixels)
+        .to eq(image._surface.copy_rect(100, 100, 20, 40).pixels)
+    end
+  end
+
+  shared_context 'draw methods' do
     it '呼び出すことができる' do
-      image.box(0, 0, 100, 100, [255, 255, 255])
+      subject
+    end
+
+    context 'auto_lockを有効にした場合' do
+      before do
+        SDL::Surface.auto_lock_on
+      end
+
+      after do
+        SDL::Surface.auto_lock_off
+      end
+
+      it '呼び出すことができる' do
+        subject
+      end
     end
   end
+
+  describe '#line' do
+    subject { image.line(0, 0, 100, 100, [255, 255, 255]) }
+
+    include_context 'draw methods'
+  end
+
+  describe '#circle' do
+    subject { image.circle(50, 50, 25, [255, 255, 255]) }
+
+    include_context 'draw methods'
+  end
+
+  describe '#box' do
+    subject { image.box(0, 0, 100, 100, [255, 255, 255]) }
+
+    include_context 'draw methods'
+  end
 end

data/spec/dxruby_sdl/input_spec.rb

@@ -0,0 +1,230 @@
+# -*- coding: utf-8 -*-
+require 'spec_helper'
+
+describe DXRubySDL::Input,
+         'キーボード・ゲームパッド・マウスの入力を扱うモジュール' do
+  after do
+    DXRubySDL::Input.instance_variable_set('@joysticks', [])
+  end
+
+  shared_context 'push_key' do
+    let(:_keys) { [] }
+
+    before do
+      allow(SDL::Key).to receive(:scan)
+      allow(SDL::Key).to receive(:press?) { |key|
+                           [_keys].flatten.include?(key) ? true : false
+                         }
+    end
+  end
+
+  describe '.x' do
+    include_context 'push_key'
+
+    subject { described_class.x }
+
+    context '左カーソルが押されている場合' do
+      let(:_keys) { SDL::Key::LEFT }
+
+      it { should eq(-1) }
+    end
+
+    context '右カーソルが押されている場合' do
+      let(:_keys) { SDL::Key::RIGHT }
+
+      it { should eq(1) }
+    end
+
+    context '左・右カーソルが両方とも押されている場合' do
+      let(:_keys) { [SDL::Key::LEFT, SDL::Key::RIGHT] }
+
+      it { should eq(0) }
+    end
+
+    context '左・右カーソルのどちらも押されていない場合' do
+      it { should eq(0) }
+    end
+  end
+
+  describe '.y' do
+    include_context 'push_key'
+
+    subject { described_class.y }
+
+    context '上カーソルが押されている場合' do
+      let(:_keys) { SDL::Key::UP }
+
+      it { should eq(-1) }
+    end
+
+    context '下カーソルが押されている場合' do
+      let(:_keys) { SDL::Key::DOWN }
+
+      it { should eq(1) }
+    end
+
+    context '上・下カーソルが両方とも押されている場合' do
+      let(:_keys) { [SDL::Key::UP, SDL::Key::DOWN] }
+
+      it { should eq(0) }
+    end
+
+    context '上・下カーソルのどちらも押されていない場合' do
+      it { should eq(0) }
+    end
+  end
+
+  shared_context '.pad_down?' do
+    include_context 'push_key'
+
+    context 'Joystickが接続されている場合' do
+      let(:joystick) {
+        j = double('Joystick')
+        allow(j).to receive(:button).with(anything).and_return(false)
+        j
+      }
+
+      before do
+        allow(SDL::Joystick).to receive(:num).and_return(1)
+        allow(SDL::Joystick).to receive(:open).with(0).and_return(joystick)
+      end
+
+      [
+       # rubocop:disable SymbolName
+       [:P_BUTTON0, :Z],
+       [:P_BUTTON1, :X],
+       [:P_BUTTON2, :C],
+       # rubocop:enable SymbolName
+      ].each.with_index do |(_button, _key), i|
+        describe "#{i}番目(#{_button})のボタン" do
+          let(:button_code) { DXRubySDL.const_get(_button) }
+
+          context "#{i}番目のボタンが押されている場合" do
+            let(:joystick) {
+              j = double('Joystick')
+              allow(j).to receive(:button) { |button_index|
+                            button_index == DXRubySDL.const_get(_button)
+                          }
+              j
+            }
+
+            it { should be_true }
+          end
+
+          context "#{_key}キーが押されている場合" do
+            let(:_keys) { SDL::Key.const_get(_key) }
+
+            it { should be_true }
+          end
+
+          context 'ボタンやキーが押されていない場合' do
+            it { should be_false }
+          end
+        end
+      end
+    end
+
+    context 'Joystickが接続されていない場合' do
+      before do
+        allow(SDL::Joystick).to receive(:num).and_return(0)
+      end
+
+      [
+       # rubocop:disable SymbolName
+       [:P_BUTTON0, :Z],
+       [:P_BUTTON1, :X],
+       [:P_BUTTON2, :C],
+       # rubocop:enable SymbolName
+      ].each.with_index do |(_button, _key), i|
+        describe "#{i}番目(#{_button})のボタン" do
+          let(:button_code) { DXRubySDL.const_get(_button) }
+
+          context "#{_key}キーが押されている場合" do
+            let(:_keys) { SDL::Key.const_get(_key) }
+
+            it { should be_true }
+          end
+
+          context 'ボタンやキーが押されていない場合' do
+            it { should be_false }
+          end
+        end
+      end
+    end
+  end
+
+  describe '.pad_down?', 'パッドのボタン状態を返す' do
+    subject { described_class.pad_down?(button_code) }
+
+    include_context '.pad_down?'
+
+    describe 'alias' do
+      describe '.padDown?' do
+        it_behaves_like '.pad_down?' do
+          subject { described_class.padDown?(button_code) }
+        end
+      end
+    end
+  end
+
+  shared_context '.mouse_pos_x' do
+    it { should be_kind_of(Integer) }
+  end
+
+  describe '.mouse_pos_x' do
+    subject { described_class.mouse_pos_x }
+
+    include_context '.mouse_pos_x'
+
+    describe 'alias' do
+      describe '.mousePosX' do
+        it_behaves_like '.mouse_pos_x' do
+          subject { described_class.mousePosX }
+        end
+      end
+    end
+  end
+
+  shared_context '.mouse_pos_y' do
+    it { should be_kind_of(Integer) }
+  end
+
+  describe '.mouse_pos_y' do
+    subject { described_class.mouse_pos_y }
+
+    include_context '.mouse_pos_y'
+
+    describe 'alias' do
+      describe '.mousePosY' do
+        it_behaves_like '.mouse_pos_y' do
+          subject { described_class.mousePosY }
+        end
+      end
+    end
+  end
+
+  shared_context '.key_push?' do
+    include_context 'push_key'
+
+    context 'ESCAPEキーが押されている場合' do
+      let(:_keys) { SDL::Key::ESCAPE }
+      let(:key_code) { DXRubySDL::K_ESCAPE }
+
+      it { should be_true }
+    end
+  end
+
+  describe '.key_push?' do
+    subject { described_class.key_push?(key_code) }
+
+    include_context '.key_push?'
+
+    describe 'alias' do
+      describe '.keyPush?' do
+        it_behaves_like '.key_push?' do
+          subject { described_class.keyPush?(key_code) }
+        end
+      end
+    end
+  end
+end

data/spec/dxruby_sdl/sound_spec.rb

@@ -0,0 +1,79 @@
+# -*- coding: utf-8 -*-
+require 'spec_helper'
+
+describe DXRubySDL::Sound, '音を表すクラス' do
+  describe '.new' do
+    shared_context '.new' do
+      subject { DXRubySDL::Sound.new(fixture_path(filename)) }
+
+      it '呼び出すことができる' do
+        subject
+      end
+    end
+
+    context 'WAVE形式のファイルの場合' do
+      let(:filename) { 'sound.wav' }
+
+      include_context '.new'
+    end
+
+    context 'MIDI形式のファイルの場合' do
+      let(:filename) { 'bgm.mid' }
+
+      include_context '.new'
+    end
+  end
+
+  describe '#play' do
+    context 'WAVE形式のファイルの場合' do
+      let(:path) { fixture_path('sound.wav') }
+      let(:sound) { DXRubySDL::Sound.new(path) }
+
+      subject { sound.play }
+
+      it 'SDL::Mixer.play_channelを呼び出す' do
+        wave =
+          sound.instance_variable_get('@sound').instance_variable_get('@wave')
+        expect(SDL::Mixer).to receive(:play_channel).with(-1, wave, 0)
+        subject
+      end
+
+      context '3回連続で呼び出した場合' do
+        before do
+          wave = sound.instance_variable_get('@sound')
+            .instance_variable_get('@wave')
+          count = 0
+          expect(SDL::Mixer)
+            .to receive(:play_channel).with(-1, wave, 0).exactly(4).times {
+                  count += 1
+                  if count == 3
+                    count = 0
+                    raise SDL::Error.new('couldn\'t play wave:' \
+                                         ' No free channels available')
+                  end
+                  (count - 1) % 2
+                }
+          expect(SDL::Mixer).to receive(:halt).with(0)
+        end
+
+        it '最初のものを停止する' do
+          3.times { sound.play }
+        end
+      end
+    end
+
+    context 'MIDI形式のファイルの場合' do
+      let(:path) { fixture_path('bgm.mid') }
+      let(:sound) { DXRubySDL::Sound.new(path) }
+
+      subject { sound.play }
+
+      it 'SDL::Mixer.play_musicを呼び出す' do
+        music =
+          sound.instance_variable_get('@sound').instance_variable_get('@music')
+        expect(SDL::Mixer).to receive(:play_music).with(music, -1)
+        subject
+      end
+    end
+  end
+end

data/spec/dxruby_sdl/window__draw_spec.rb

@@ -0,0 +1,85 @@
+# -*- coding: utf-8 -*-
+require 'spec_helper'
+
+describe DXRubySDL::Window do
+  describe '.draw', 'Imageオブジェクトを描画する' do
+    subject do
+      expect {
+        DXRubySDL::Window.loop do
+          DXRubySDL::Window.draw(0, 0, image)
+          SDL::Event.push(SDL::Event::Quit.new)
+        end
+      }.to raise_error(SystemExit)
+    end
+
+    context '(0, 0)-(100,100)の白い線を描いたImageオブジェクトを指定した場合' do
+      let!(:image) {
+        i = DXRubySDL::Image.new(640, 480)
+        i.line(0, 0, 100, 100, [255, 255, 255])
+        i
+      }
+
+      it '白い線を描画する' do
+        subject
+      end
+    end
+
+    context '(0, 0)-(100,100)の矩形を描いたImageオブジェクトを指定した場合' do
+      let!(:image) {
+        i = DXRubySDL::Image.new(640, 480)
+        i.box(0, 0, 100, 100, [255, 255, 255])
+        i
+      }
+
+      it '矩形を描画する' do
+        subject
+      end
+    end
+
+    context '(50, 50)、半径25の円を描いたImageオブジェクトを指定した場合' do
+      let!(:image) {
+        i = DXRubySDL::Image.new(640, 480)
+        i.circle(50, 50, 25, [255, 255, 255])
+        i
+      }
+
+      it '円を描画する' do
+        subject
+      end
+    end
+
+    context '画像を読み込んだImageオブジェクトを指定した場合' do
+      let!(:image) {
+        DXRubySDL::Image.load(fixture_path('logo.png'))
+      }
+
+      it '画像を描画する' do
+        subject
+      end
+    end
+
+    context '画像を分割して読み込んだImageオブジェクトを指定した場合' do
+      let!(:images) {
+        DXRubySDL::Image.load_tiles(fixture_path('logo.png'), 2, 4)
+      }
+
+      specify '画像を描画する' do
+        expect {
+          DXRubySDL::Window.loop do
+            margin = 64
+            i = 0
+            4.times do |y|
+              2.times do |x|
+                DXRubySDL::Window.draw(x * (images[i].width + margin),
+                                       y * (images[i].height + margin),
+                                       images[i])
+                i += 1
+              end
+            end
+            SDL::Event.push(SDL::Event::Quit.new)
+          end
+        }.to raise_error(SystemExit)
+      end
+    end
+  end
+end