cyross-ruby-miyako 2.0.5.1 → 2.1.0

data/sample/fixed_map_test/fixed_map_sample.rb

@@ -1,140 +1,140 @@
-#encoding: UTF-8
-# FixedMap Sample
-# 2009.4.12 Cyross Makoto
-
-require 'Miyako/miyako'
-
-include Miyako
-
-Screen::fps_view = true
-
-# Monster Class
-class Monster
-  extend Forwardable
-
-  def initialize(map, name, size, wait, pattern, x, y)
-    @spr = Sprite.new({:filename => name, :type => :color_key})
-    @spr.ow = size
-    @spr.oh = size
-    @coll = Collision.new(Rect.new(0, 0, @spr.ow, @spr.oh))
-    @cpos = Point.new(x, y)
-    ap = { }
-    ap[:sprite] = @spr
-    ap[:wait] = wait
-    ap[:pattern_list] = pattern
-    @anim = SpriteAnimation.new(ap)
-    @anim.snap(map)
-    @anim.left.top.move(x, y)
-  end
-
-  def start
-    @anim.start
-  end
-  
-  def update(map, events, param)
-    @anim.update_animation
-  end
-
-  def render
-    @anim.render
-  end
-
-  def finish
-  end
-  
-  def dispose
-    @anim.dispose
-    @spr.dispose
-  end
-
-  def_delegators(:@anim, :start, :stop)
-end
-
-class Slime < Monster
-  def initialize(map, x, y)
-    super(map, "monster.png", 32, 0.5, [0, 1, 2, 3, 2, 1], x, y)
-    @interval = 2
-    @interval_x = 0
-    @interval_y = 0
-    @cnt = 0
-    @wait0 = WaitCounter.new(0.1)
-    @wait = WaitCounter.new(0.4)
-    @types = 5
-    # 方向による移動量リスト
-    @ary = [[       0, @spr.oh,          0, @interval, @spr.oh],
-            [ @spr.ow,       0,  @interval,         0, @spr.ow],
-            [-@spr.ow,       0, -@interval,         0, @spr.ow],
-            [       0,-@spr.oh,          0,-@interval, @spr.oh]]
-  end
-
-  def update(map, events, param)
-    super
-    return if @wait.waiting? || @wait0.waiting?
-    if @cnt > 0
-      @anim.move(@interval_x, @interval_y)
-      @cpos.move(@interval_x, @interval_y)
-      @cnt -= @interval
-      @wait0.start
-      return
-    end
-    val = rand(@types)
-    if val == 0
-      @interval_x = 0
-      @interval_y = 0
-      @wait.start
-    else
-      data = @ary[val-1]
-      # スライムが当たっているマップ位置リストを取得
-      colls = Utility.product_position(
-                @cpos.dup.move(data[0], data[1]), @coll.rect, map.mapchips[0].chip_size.to_a
-              )
-      # 障害物に当たってない？
-      if colls.inject(true){|r, pos| r &= map[0].can_access?(0, :in, @cpos, data[0], data[1]) }
-        @interval_x, @interval_y = data[2..3]
-        @cnt = data[4]
-      end
-    end
-  end
-end
-
-class SlimeEvent
-  include MapEvent
-
-  def init(map, x, y)
-    @slime = Slime.new(map, x, y)
-  end
-  
-  def update(map, events, param)
-    @slime.update(map, events, param)
-  end
-  
-  def final
-    @slime.finish
-  end
-
-  def dispose
-    @slime.dispose
-  end
-  
-  def render
-    @slime.render
-  end
-end
-
-em = MapEventManager.new
-em.add(1, SlimeEvent)
-
-# main
-mp = MapChipFactory.load("./mapchip.csv")
-@fmap = FixedMap.new(mp, "./map.csv", em)
-
-Miyako.main_loop do
-  break if Input.quit_or_escape?
-  dx, dy = Input.trigger_amount.map{|v| v * 4 }
-  dx = 0 unless Utility.in_bounds?([@fmap.rect.x,@fmap.rect.x+@fmap.rect.w-1], [0,Screen.w-1], dx)
-  dy = 0 unless Utility.in_bounds?([@fmap.rect.y,@fmap.rect.y+@fmap.rect.h-1], [0,Screen.h-1], dy)
-  @fmap.move(dx, dy)
-  @fmap.events.each{|ee| ee.each{|e| e.update(@fmap, @fmap.events, nil)}}
-  @fmap.render_to(Screen)
-  @fmap.events.each{|ee| ee.each{|e| e.render}}
-end
+#encoding: UTF-8
+# FixedMap Sample
+# 2009.4.12 Cyross Makoto
+
+require 'Miyako/miyako'
+
+include Miyako
+
+Screen::fps_view = true
+
+# Monster Class
+class Monster
+  extend Forwardable
+
+  def initialize(map, name, size, wait, pattern, x, y)
+    @spr = Sprite.new({:filename => name, :type => :color_key})
+    @spr.ow = size
+    @spr.oh = size
+    @coll = Collision.new(Rect.new(0, 0, @spr.ow, @spr.oh))
+    @cpos = Point.new(x, y)
+    ap = { }
+    ap[:sprite] = @spr
+    ap[:wait] = wait
+    ap[:pattern_list] = pattern
+    @anim = SpriteAnimation.new(ap)
+    @anim.snap(map)
+    @anim.left!.top!.move!(x, y)
+  end
+
+  def start
+    @anim.start
+  end
+  
+  def update(map, events, param)
+    @anim.update_animation
+  end
+
+  def render
+    @anim.render
+  end
+
+  def finish
+  end
+  
+  def dispose
+    @anim.dispose
+    @spr.dispose
+  end
+
+  def_delegators(:@anim, :start, :stop)
+end
+
+class Slime < Monster
+  def initialize(map, x, y)
+    super(map, "monster.png", 32, 0.5, [0, 1, 2, 3, 2, 1], x, y)
+    @interval = 2
+    @interval_x = 0
+    @interval_y = 0
+    @cnt = 0
+    @wait0 = WaitCounter.new(0.1)
+    @wait = WaitCounter.new(0.4)
+    @types = 5
+    # 方向による移動量リスト
+    @ary = [[       0, @spr.oh,          0, @interval, @spr.oh],
+            [ @spr.ow,       0,  @interval,         0, @spr.ow],
+            [-@spr.ow,       0, -@interval,         0, @spr.ow],
+            [       0,-@spr.oh,          0,-@interval, @spr.oh]]
+  end
+
+  def update(map, events, param)
+    super
+    return if @wait.waiting? || @wait0.waiting?
+    if @cnt > 0
+      @anim.move!(@interval_x, @interval_y)
+      @cpos.move!(@interval_x, @interval_y)
+      @cnt -= @interval
+      @wait0.start
+      return
+    end
+    val = rand(@types)
+    if val == 0
+      @interval_x = 0
+      @interval_y = 0
+      @wait.start
+    else
+      data = @ary[val-1]
+      # スライムが当たっているマップ位置リストを取得
+      colls = Utility.product_position(
+                @cpos.dup.move!(data[0], data[1]), @coll.rect, map.mapchips[0].chip_size.to_a
+              )
+      # 障害物に当たってない？
+      if colls.inject(true){|r, pos| r &= map[0].can_access?(0, :in, @cpos, data[0], data[1]) }
+        @interval_x, @interval_y = data[2..3]
+        @cnt = data[4]
+      end
+    end
+  end
+end
+
+class SlimeEvent
+  include MapEvent
+
+  def init(map, x, y)
+    @slime = Slime.new(map, x, y)
+  end
+  
+  def update(map, events, param)
+    @slime.update(map, events, param)
+  end
+  
+  def final
+    @slime.finish
+  end
+
+  def dispose
+    @slime.dispose
+  end
+  
+  def render
+    @slime.render
+  end
+end
+
+em = MapEventManager.new
+em.add(1, SlimeEvent)
+
+# main
+mp = MapChipFactory.load("./mapchip.csv")
+@fmap = FixedMap.new(mp, "./map.csv", em)
+
+Miyako.main_loop do
+  break if Input.quit_or_escape?
+  dx, dy = Input.trigger_amount.map{|v| v * 4 }
+  dx = 0 unless Utility.in_bounds?([@fmap.rect.x,@fmap.rect.x+@fmap.rect.w-1], [0,Screen.w-1], dx)
+  dy = 0 unless Utility.in_bounds?([@fmap.rect.y,@fmap.rect.y+@fmap.rect.h-1], [0,Screen.h-1], dy)
+  @fmap.move!(dx, dy)
+  @fmap.events.each{|ee| ee.each{|e| e.update(@fmap, @fmap.events, nil)}}
+  @fmap.render_to(Screen)
+  @fmap.events.each{|ee| ee.each{|e| e.render}}
+end

data/sample/fixed_map_test/readme.txt

@@ -1,72 +1,72 @@
-*******************************************************************************
-【   作者名   】　サイロス誠
-【  ソフト名  】　Miyako v2.0サンプル(固定マップ)
-【 バージョン 】　2.0
-【   作成日   】　2009/04/12
-【    種別    】　フリーウェア
-【  開発言語  】　Ruby 1.8.9-p0
-【 ランタイム 】　Miyako v2.0
-【  対応機種  】　Windows 2000/XP/Vista、Linux
-【   再配布   】　修正BSDライセンスによる
-【    転載    】　修正BSDライセンスによる
-【ホームページ】　http://www.twin.ne.jp/~cyross/Miyako/
-【   連絡先   】　cyross@po.twin.ne.jp
-*******************************************************************************
-
-・概要
-
-　このプログラムは、Miyako v2.0以降に対応する、Miyakoサンプルプログラムです。
-　スクロールしないマップ上で、スライムがうねくねしながら動き回っています。
-
-・Miyakoについて
-
-　Miyakoに関しては、以下のURLを参考にしてください。
-http://www.twin.ne.jp/~cyross/Miyako/
-
-　Miyako(Ruby、Ruby/SDL含む)のインストールに関しましては、
-上記URLを辿って得られるアーカイブされたMiyakoライブラリを
-展開すると、readme.txtが得られますので、そちらをご参照下さい。
-
-　本サンプルでは、MiyakoがWindows上で動作することを前提にしています。
-（インストールしたRuby実行環境がActiveRubyであることも前提に
-　しています）
-
-・起動方法
-
-　エクスプローラーを開き、本サンプルのフォルダ内で、「m1ku.rb」を
-ダブルクリックします。
-　もしくは、コマンドライン上で動かす場合は、本サンプルのディレクトリに
-移動して、以下のコマンドを入力します。
-
-　ruby fixed_map_sample.rb
-
-・免責事項
-
-　本サンプルは無保証です。もし本サンプルを使用することによる不具合・トラブル
-が起こったとしても、いかなるトラブルに対する責任を負わないことをご了承下さい。
-
-　本サンプルは、修正BSDライセンスに基づいた転載・再配布を許可します。
-
-・BSDライセンス文
-
-Copyright (c) 2009, Cyross Makoto
-
-All rights reserved.
-
-Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met:
-
-・Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer.
-・Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution.
-・Neither the name of the Cyross Makoto nor the names of its contributors may be used to endorse or promote products derived from this software without specific prior written permission.
-
-THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
-"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
-LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
-A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
-CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
-EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
-PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
-PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
-LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
-NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
-SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+*******************************************************************************
+【   作者名   】　サイロス誠
+【  ソフト名  】　Miyako v2.0サンプル(固定マップ)
+【 バージョン 】　2.0
+【   作成日   】　2009/04/12
+【    種別    】　フリーウェア
+【  開発言語  】　Ruby 1.8.9-p0
+【 ランタイム 】　Miyako v2.0
+【  対応機種  】　Windows 2000/XP/Vista、Linux
+【   再配布   】　修正BSDライセンスによる
+【    転載    】　修正BSDライセンスによる
+【ホームページ】　http://www.twin.ne.jp/~cyross/Miyako/
+【   連絡先   】　cyross@po.twin.ne.jp
+*******************************************************************************
+
+・概要
+
+　このプログラムは、Miyako v2.0以降に対応する、Miyakoサンプルプログラムです。
+　スクロールしないマップ上で、スライムがうねくねしながら動き回っています。
+
+・Miyakoについて
+
+　Miyakoに関しては、以下のURLを参考にしてください。
+http://www.twin.ne.jp/~cyross/Miyako/
+
+　Miyako(Ruby、Ruby/SDL含む)のインストールに関しましては、
+上記URLを辿って得られるアーカイブされたMiyakoライブラリを
+展開すると、readme.txtが得られますので、そちらをご参照下さい。
+
+　本サンプルでは、MiyakoがWindows上で動作することを前提にしています。
+（インストールしたRuby実行環境がActiveRubyであることも前提に
+　しています）
+
+・起動方法
+
+　エクスプローラーを開き、本サンプルのフォルダ内で、「m1ku.rb」を
+ダブルクリックします。
+　もしくは、コマンドライン上で動かす場合は、本サンプルのディレクトリに
+移動して、以下のコマンドを入力します。
+
+　ruby fixed_map_sample.rb
+
+・免責事項
+
+　本サンプルは無保証です。もし本サンプルを使用することによる不具合・トラブル
+が起こったとしても、いかなるトラブルに対する責任を負わないことをご了承下さい。
+
+　本サンプルは、修正BSDライセンスに基づいた転載・再配布を許可します。
+
+・BSDライセンス文
+
+Copyright (c) 2009, Cyross Makoto
+
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met:
+
+・Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer.
+・Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution.
+・Neither the name of the Cyross Makoto nor the names of its contributors may be used to endorse or promote products derived from this software without specific prior written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
+LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
+A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
+CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
+PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
+LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

data/sample/map_test/chara.rb

@@ -1,58 +1,58 @@
-# -*- encoding: utf-8 -*-
-#キャラクタ管理クラス
-class PChara # Player Character
-  extend Forwardable
-  attr_accessor :dir
-  attr_reader :collision, :position
-  @@dir2dir = {[0,1]=>0,[-1,0]=>1,[1,0]=>2,[0,-1]=>3}
-  @@dir2dir.default = -1
-
-  def initialize(fname, pw = 0.2)
-    # キャラクタスプライトを作成
-    @spr = Sprite.new({:filename => fname, :type => :color_key})
-    @spr.ow = 32
-    @spr.oh = 32
-    param = Hash.new
-    param[:sprite] = @spr
-    param[:wait] = pw
-    # コリジョン設定
-    @collision = Collision.new(@spr.rect)
-    # キャラクタ位置設定
-    @position = Point.new(0, 0)
-    # キャラパターンを表示
-    @anim = SpriteAnimation.new(param)
-    @anim.centering
-    @dir = :down
-  end
-
-  # マップの表示座標と実座標とのマージンを設定
-  def margin
-    return Size.new(-@spr.x, -@spr.y)
-  end
-
-  def turn(d)
-    @anim.character = @@dir2dir[d]
-  end
-
-  def start
-    @anim.start
-  end
-  
-  def stop
-    @anim.stop
-  end
-
-  def update
-    @anim.update_animation
-  end
-  
-  def render
-    @anim.render
-  end
-  
-  def size
-    return Size.new(@spr.ow, @spr.oh)
-  end
-  
-  def_delegators(:@spr, :dispose, :rect, :ow, :oh, :x, :y)
-end
+# -*- encoding: utf-8 -*-
+#キャラクタ管理クラス
+class PChara # Player Character
+  extend Forwardable
+  attr_accessor :dir
+  attr_reader :collision, :position
+  @@dir2dir = {[0,1]=>0,[-1,0]=>1,[1,0]=>2,[0,-1]=>3}
+  @@dir2dir.default = -1
+
+  def initialize(fname, pw = 0.2)
+    # キャラクタスプライトを作成
+    @spr = Sprite.new({:filename => fname, :type => :color_key})
+    @spr.ow = 32
+    @spr.oh = 32
+    param = Hash.new
+    param[:sprite] = @spr
+    param[:wait] = pw
+    # コリジョン設定
+    @collision = Collision.new(@spr.rect)
+    # キャラクタ位置設定
+    @position = Point.new(0, 0)
+    # キャラパターンを表示
+    @anim = SpriteAnimation.new(param)
+    @anim.centering!
+    @dir = :down
+  end
+
+  # マップの表示座標と実座標とのマージンを設定
+  def margin
+    return Size.new(-@spr.x, -@spr.y)
+  end
+
+  def turn(d)
+    @anim.character = @@dir2dir[d]
+  end
+
+  def start
+    @anim.start
+  end
+  
+  def stop
+    @anim.stop
+  end
+
+  def update
+    @anim.update_animation
+  end
+  
+  def render
+    @anim.render
+  end
+  
+  def size
+    return Size.new(@spr.ow, @spr.oh)
+  end
+  
+  def_delegators(:@spr, :dispose, :rect, :ow, :oh, :x, :y)
+end