cyross-ruby-miyako 2.0.0

data/lib/Miyako/API/sprite_animation.rb

@@ -0,0 +1,461 @@
+# -*- encoding: utf-8 -*-
+=begin
+--
+Miyako v1.5
+Copyright (C) 2007-2008  Cyross Makoto
+
+This library is free software; you can redistribute it and/or
+modify it under the terms of the GNU Lesser General Public
+License as published by the Free Software Foundation; either
+version 2.1 of the License, or (at your option) any later version.
+
+This library is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+Lesser General Public License for more details.
+
+You should have received a copy of the GNU Lesser General Public
+License along with this library; if not, write to the Free Software
+Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+++
+=end
+
+module Miyako
+  #==アニメーション管理クラス
+  #スプライトのアニメーションの構築・実行を管理するクラス
+  class SpriteAnimation
+    include SpriteBase
+    include Animation
+    include Layout
+    include SingleEnumerable
+
+    #===インスタンスの作成
+    #アニメーションを行うための初期設定を行う。
+    #アニメーションは２種類の方法があり、
+    #
+    #「一つのスプライトをow,ohプロパティで分割して、表示開始位置をずらすことでアニメーションを行う」方法と、
+    #
+    #(RPGのキャラチップを想定。　以降、「単体アニメーション」と呼ぶ)
+    #
+    #「複数枚のスプライトの配列を渡し、要素順に表示させることでアニメーションを行う」方法がある。
+    #
+    #(いわゆる「ぱらぱら漫画」方式。　以降、「配列アニメーション」と呼ぶ)
+    #
+    #「パターン番号」は、キャラクタパターン(画像を一定の大きさ(ow,oh)で切り分けた単位)の番号を意味する。
+    #
+    #単体アニメーションのときは、画像の左上から0,1,2,...と数える。
+    #
+    #配列アニメーションのときは、配列のインデックスがパターン番号となる。
+    #
+    #
+    #
+    #利用できるパラメータは以下の通り
+    #
+    #:sprite => sprite|spriteの配列　アニメーションさせるスプライト(インスタンス単体もしくはインスタンスの配列)。必須パラメータ
+    #
+    #:dir => :h|:v　単体アニメーションのとき、縦方向に位置をずらして表示させる(:h指定時)か、横方向か(:v指定時)を決定する。デフォルトは:h
+    #
+    #:pattern_list => 表示させるパターン番号を指定するための配列。配列の要素の順にパターンが表示される
+    #
+    #:loop => アニメーションを繰り返し更新するかどうかを示すフラグ。falseのときは、1回パターンを実行した後、アニメーションを終了する(true/false)
+    #
+    #_hash_:: パラメータ名とパラメータとのハッシュ
+    #返却値:: 生成されたインスタンス
+    def initialize(hash)
+      init_layout
+      @units = Array.new
+      @slist = nil
+
+      hash[:dir] ||= :h
+      @dir   = hash[:dir]
+      s = hash[:sprite]
+      hash[:pattern_list] ||= nil
+      @plist = hash[:pattern_list]
+      hash[:wait] ||= 0
+      wait = hash[:wait]
+      hash[:move_offset] ||= nil
+      @move_offset = hash[:move_offset]
+      hash[:position_offset] ||= nil
+      @pos_offset = hash[:position_offset]
+      hash[:align] ||= :max
+      @align = hash[:align]
+      hash[:loop] ||= true
+      @loop = hash[:loop]
+
+      @pat_len  = 1
+      @pat_olen = 1
+      @chr_len  = 1
+      @chr_olen = 1
+
+      @slist = Array.new
+      if s.kind_of?(Sprite)
+        set_layout_size(s.ow, s.oh)
+        move_to(s.x, s.y)
+        s.snap(self)
+        s.left
+        s.top
+        @pat_len  = @dir == :h ? s.h  : s.w
+        @pat_olen = @dir == :h ? s.oh : s.ow
+        @chr_len  = @dir == :h ? s.w  : s.h
+        @chr_olen = @dir == :h ? s.ow : s.oh
+        @pats     = @pat_len / @pat_olen
+      elsif s.kind_of?(Array)
+        first = s[0]
+        set_layout_size(first.ow, first.oh)
+        move_to(first.x, first.y)
+        @slist = s.map{|ss|
+          ss.snap(self)
+          ss.left.top
+        }
+        @pat_len  = @slist.length
+        @pats     = @slist.length
+      else
+        raise MiyakoError, "Illegal sprite list for SpriteAnimation."
+      end
+
+      if @plist
+        if @align == :min
+          @pats = @plist.length if @pats > @plist.length
+        else
+          @pats = @plist.length if @pats < @plist.length
+        end
+      else
+        @plist = Array.new unless @plist
+      end
+
+      if @move_offset
+        if @align == :min
+          @pats = @move_offset.length if @pats > @move_offset.length
+        else
+          @pats = @move_offset.length if @pats < @move_offset.length
+        end
+      else
+        @move_offset = Array.new
+      end
+
+      if @pos_offset
+        if @align == :min
+          @pats = @pos_offset.length if @pats > @pos_offset.length
+        else
+          @pats = @pos_offset.length if @pats < @pos_offset.length
+        end
+      else
+        @pos_offset = Array.new
+      end
+
+      if wait.kind_of?(Array)
+        @waits = wait.collect{|w| w.kind_of?(Float) ? WaitCounter.new(w) : w }
+        if @align == :min
+          @pats = @waits.length if @pats > @waits.length
+        else
+          @pats = @waits.length if @pats < @waits.length
+        end
+      else
+        @waits = Array.new
+      end
+
+      if @plist.length == 0
+        @pats.times{|p| @plist.push(p)}
+      elsif @plist.length < @pats
+        @plist = @plist.cycle.take(@pats)
+      end
+
+      if @slist.length == 0
+        @slist = Array.new(@pats){|pat| s }
+        @units = Array.new(@pats){|pat|
+          u = SpriteUnitFactory.create(:bitmap=>@slist[pat].bitmap,
+                                       :ox => @slist[pat].ox,
+                                       :oy => @slist[pat].oy,
+                                       :ow => @slist[pat].ow,
+                                       :oh => @slist[pat].oh)
+          px = pat % (@pat_len / @pat_olen)
+          if @dir == :h
+            u.oy = @slist[pat].oh * @plist[px]
+          else
+            u.ox = @slist[pat].ow * @plist[px]
+          end
+          u
+        }
+      elsif @slist.length < @pats
+        tmp = @slist
+        @slist = @slist.cycle.take(@pats)
+        @units = Array.new(@pats){|pat|
+          SpriteUnitFactory.create(:bitmap=>@slist[pat].bitmap,
+                                   :ox => @slist[pat].ox,
+                                   :oy => @slist[pat].oy,
+                                   :ow => @slist[pat].ow,
+                                   :oh => @slist[pat].oh)
+        }
+      else
+        @units = Array.new(@pats){|pat|
+          SpriteUnitFactory.create(:bitmap=>@slist[p].bitmap,
+                                   :ox => @slist[p].ox,
+                                   :oy => @slist[p].oy,
+                                   :ow => @slist[p].ow,
+                                   :oh => @slist[p].oh)
+        }
+      end
+
+      if @move_offset.length == 0
+        @move_offset = Array.new(@pats){|pat| Point.new(0,0) }
+      elsif @move_offset.length < @pats
+        @move_offset = @move_offset.cycle.take(@pats)
+      end
+
+      if @pos_offset.length == 0
+        @pos_offset = Array.new(@pats){|pat| 0 }
+      elsif @pos_offset.length < @pats
+        @pos_offset = @pos_offset.cycle.take(@pats)
+      end
+
+      if @waits.length == 0
+        if wait.kind_of?(Integer)
+          @waits = Array.new(@pats){|pat| wait}
+        elsif wait.kind_of?(Float)
+          @waits = Array.new(@pats){|pat| WaitCounter.new(wait)}
+        else
+          raise MiyakoError, "Illegal wait counter for SpriteAnimation."
+        end
+      elsif @waits.length < @pats
+        @waits = @waits.cycle.take(@pats)
+      end
+
+      @chrs  = @chr_len / @chr_olen
+
+      @cnum  = 0
+      @pnum  = 0
+      @cnt   = 0
+      @exec  = false
+      @visible = false
+
+      @now = @units[0]
+      @now.move_to(@slist[@plist[@pnum]].x + @move_offset[@pnum][0],
+                   @slist[@plist[@pnum]].y + @move_offset[@pnum][1])
+    end
+
+    attr_accessor :visible
+
+    def update_layout_position #:nodoc:
+      @now.move_to(*@layout.pos) if @now
+    end
+
+    #===現在表示しているスプライトのowを取得する
+    #返却値:: スプライトのow
+    def ow
+      return @now.ow
+    end
+
+    #===現在表示しているスプライトのohを取得する
+    #返却値:: スプライトのoh
+    def oh
+      return @now.oh
+    end
+
+    #===表示するパターンの番号を変更する
+    #_pnum_:: パターン番号
+    #返却値:: 自分自身
+    def pattern(pnum)
+      @pnum = pnum if pnum < @pats
+      set_pat
+      @cnt = @waits[@plist[@pnum]] if @exec
+      return self
+    end
+
+    #===現在表示しているパターンを取得する
+    #返却値:: 現在表示しているスプライトのインスタンス
+    def get_pattern
+      return @plist[@pnum]
+    end
+
+    #===あとで書く
+    #_cnum_:: あとで書く
+    #返却値:: あとで書く
+    def character(cnum)
+      return self if cnum >= @chrs
+      @cnum = cnum
+      set_chr
+      return self
+    end
+
+    #===あとで書く
+    #_d_:: あとで書く
+    #返却値:: あとで書く
+    def move_character(d)
+      @cnum = (@cnum + d) % @chrs
+      @cnum = @cnum + @chrs if @cnum < 0
+      set_chr
+      return self
+    end
+
+    def get_character #:nodoc:
+      return @cnum
+    end
+    
+    #===アニメーションを開始する
+    #パターンがリセットされていないときは、一時停止から復帰した時と同じ動作をする
+    #返却値:: 自分自身
+    def start
+      return self if @exec
+      set_pat
+      @now.move_to(@slist[@plist[@pnum]].x + @move_offset[@pnum][0],
+                   @slist[@plist[@pnum]].y + @move_offset[@pnum][1])
+      if @dir == :h
+        @now.oy += @pos_offset[@pnum]
+      else
+        @now.ox += @pos_offset[@pnum]
+      end
+      @cnt = @waits[@plist[@pnum]]
+      @cnt.start if @cnt.kind_of?(WaitCounter)
+      @exec = true
+      return self
+    end
+
+    #===アニメーションを停止する
+    #停止しても、表示していたパターンはリセットされていない
+    #返却値:: 自分自身
+    def stop
+      return self unless @exec
+      if @dir == :h
+        @now.oy -= @pos_offset[@pnum]
+      else
+        @now.ox -= @pos_offset[@pnum]
+      end
+      @cnt.stop if @cnt.kind_of?(WaitCounter)
+      @exec = false
+      return self
+    end
+
+    #===アニメーションの開始・停止を切り替える
+    #返却値:: 自分自身
+    def toggle_exec
+      if @exec
+        stop
+      else
+        start
+      end
+      return self
+    end
+
+    #===アニメーションの更新を行う
+    #アニメーションのカウントをチェックし、カウントが終了したときは新しいパターンに切り替えて、カウントを開始する
+    #すべてのパターンのアニメーションが終了すれば、最初のパターンに戻り、カウントを開始する
+    #但し、インスタンス生成時に:loop->falseを設定していれば、アニメーションを終了する
+    #返却値:: アニメーションパターンが切り替わればtrue、切り替わらないとき、アニメーションが終了したときはfalseを返す
+    def update_animation
+      is_change = false
+      return is_change unless @exec
+      if @dir == :h
+        @now.oy -= @pos_offset[@pnum]
+      else
+        @now.ox -= @pos_offset[@pnum]
+      end
+      if @cnt.kind_of?(Integer)
+        is_change = update_frame
+      else
+        is_change = update_wait_counter
+      end
+      @now.move_to(@slist[@plist[@pnum]].x + @move_offset[@pnum][0],
+                   @slist[@plist[@pnum]].y + @move_offset[@pnum][1])
+      if @dir == :h
+        @now.oy += @pos_offset[@pnum]
+      else
+        @now.ox += @pos_offset[@pnum]
+      end
+      return is_change
+    end
+
+    def update_frame #:nodoc:
+      if @cnt > 0
+        @cnt -= 1
+        return false
+      end
+      @pnum = (@pnum + 1) % @pats
+      if @loop == false && @pnum == 0
+        stop
+        return false
+      end
+      set_pat
+      @cnt = @waits[@plist[@pnum]]
+      return true
+    end
+    
+    def update_wait_counter #:nodoc:
+      return false if @cnt.waiting?
+      @pnum = (@pnum + 1) % @pats
+      if @loop == false && @pnum == 0
+        stop
+        return false
+      end
+      set_pat
+      @cnt = @waits[@plist[@pnum]]
+      @cnt.start
+      return true
+    end
+
+    def set_pat #:nodoc:
+      @now = @units[@plist[@pnum]]
+    end
+
+    def set_chr #:nodoc:
+      @units.each{|u|
+        if @dir == :h
+          u.ox = @chr_olen * @cnum
+        else
+          u.oy = @chr_olen * @cnum
+        end
+      }
+    end
+
+    #===アニメーションのパターンをリセットする
+    #返却値:: 自分自身
+    def reset
+      @pnum = 0
+      @cnt  = 0
+      return self
+    end
+
+    #===アニメーションが実行中かを返す
+    #返却値:: アニメーションが実行されていれば true
+    def exec?
+      return @exec
+    end
+
+    # 現在実行中のパターンの元になったスプライトユニットを返す
+    # 返却値:: 現在表示しているスプライトユニット
+    def to_unit
+      return @now.dup
+    end
+    
+    # 現在実行中のパターンの画像を返す
+    # 返却値:: 現在表示している画像(bitmap)
+    def bitmap
+      return @now.bitmap
+    end
+    
+    #===現在実行中のパターンの元になったインスタンスを返す
+    #取得するパターンは、元になったインスタンスのto_spriteメソッドを呼び出した時の値となる
+    # 返却値:: 現在表示しているスプライト
+    def to_sprite
+      return @slist[@plist[@pnum]].to_sprite
+    end
+
+    #===現在の画面の最大の大きさを矩形で取得する
+    #現在のパターンの大きさと同じため、rectメソッドの値と同一となる
+    #返却値:: 生成された矩形(Rect構造体のインスタンス)
+    def broad_rect
+      return self.rect
+    end
+
+    #===インスタンスに束縛されているオブジェクトを解放する
+    def dispose
+      @slist.clear
+      @units.each{|u| u.bitmap = nil}
+      @units.clear
+      @waits.clear
+      @plist.clear
+      @move_offset.clear
+      @pos_offset.clear
+    end
+  end
+end
+

data/lib/Miyako/API/spriteunit.rb

@@ -0,0 +1,113 @@
+# -*- encoding: utf-8 -*-
+=begin
+--
+Miyako v2.0
+Copyright (C) 2007-2008  Cyross Makoto
+
+This library is free software; you can redistribute it and/or
+modify it under the terms of the GNU Lesser General Public
+License as published by the Free Software Foundation; either
+version 2.1 of the License, or (at your option) any later version.
+
+This library is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+Lesser General Public License for more details.
+
+You should have received a copy of the GNU Lesser General Public
+License along with this library; if not, write to the Free Software
+Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+++
+=end
+
+# スプライト関連クラス群
+module Miyako
+  #==SpriteUnitを生成するための構造体クラス
+  #Structクラスからの継承
+  #--
+  #SpriteUnit = Struct.new([:dp], :bitmap, :ox, :oy, :ow, :oh, :x, :y, :dx, :dy, [:effect], [:viewport], :angle, :xscale, :yscale, :px, :py, :qx, :qy)
+  #++
+  class SpriteUnitBase < Struct
+    #===位置を変更する(変化量を指定)
+    #_dx_:: 移動量(x方向)。単位はピクセル
+    #_dy_:: 移動量(y方向)。単位はピクセル
+    #返却値:: 自分自身を返す
+    def move(dx, dy)
+      self.x+=dx
+      self.y+=dy
+      return self
+    end
+
+    #===位置を変更する(位置指定)
+    #_x_:: 移動先位置(x方向)。単位はピクセル
+    #_y_:: 移動先位置(y方向)。単位はピクセル
+    #返却値:: 自分自身を返す
+    def move_to(x, y)
+      self.x=x
+      self.y=y
+      return self
+    end
+
+    #===自分自身を返す
+    #SpriteUnit対応
+    #ダックタイピング用のメソッド
+    #返却値:: 自分自身(複製して返す)
+    def to_unit
+      return self.dup
+    end
+
+    #===画像の表示矩形を取得する
+    #画像が表示されているときの矩形を取得する。矩形は、[x,y,ow,oh]で取得する。
+    #返却値:: 生成された矩形
+    def rect
+      return Rect.new(self.x, self.y, self.ow, self.oh)
+    end
+
+    #===現在の画面の最大の大きさを矩形で取得する
+    #但し、SpriteUnitの場合は最大の大きさ=画像の大きさなので、rectと同じ値が得られる
+    #返却値:: 画像の大きさ(Rect構造体のインスタンス)
+    def broad_rect
+      return self.rect
+    end
+  end
+
+  #==スプライト出力情報構造体
+  #基本的なことは、Sprite.renderで行うことが出来るが、凝った処理を行う場合は、SpriteUnitを使う
+  #--
+  #SpriteUnit = Struct.new([:dp], :bitmap, :ox, :oy, :ow, :oh, :x, :y, [:effect], [:viewport], :angle, :xscale, :yscale, :cx, :cy)
+  #++
+  #([数字])は、配列として認識したときのインデックス番号に対応(Struct#[]メソッドを呼び出した時のインデックス)
+  #:bitmap([0]) -> 画像データ(SDL::Surfaceクラスのインスタンス)
+  #:ox([1])     -> 描画開始位置(x方向)
+  #:oy([2])     -> 描画開始位置(y方向)
+  #:ow([3])     -> 描画幅
+  #:oh([4])     -> 描画高さ
+  #:x([5])     -> 描画幅
+  #:y([6])     -> 描画高さ
+  #:angle([7])  -> 回転角度(ラジアン単位)
+  #:xscale([8]) -> X方向拡大・縮小・鏡像の割合(実数。変換後の幅が32768を切る様にすること)
+  #:yscale([9]) -> Y方向拡大・縮小・鏡像の割合(実数。変換後の幅が32768を切る様にすること)
+  #:cx([10])     -> 回転・拡大・縮小・鏡像の中心座標(x方向)
+  #:cy([11])     -> 回転・拡大・縮小・鏡像の中心座標(y方向)
+  SpriteUnit = SpriteUnitBase.new(:bitmap, :ox, :oy, :ow, :oh, :x, :y, :angle, :xscale, :yscale, :cx, :cy)
+
+  #==SpriteUnit生成ファクトリクラス
+  #SpriteUnit構造体のインスタンスを生成するためのクラス
+  class SpriteUnitFactory
+    PARAMS = [:bitmap, :ox, :oy, :ow, :oh, :x, :y, :angle, :xscale, :yscale, :cx, :cy]
+    #==SpriteUnitのインスタンスを生成する
+    #params: 初期化するSpriteUnit構造体の値。ハッシュ引数。引数のキーは、SpriteUnitのアクセサ名と同一。省略可能
+    def SpriteUnitFactory.create(params = nil)
+      unit = SpriteUnit.new(nil, 0, 0, 0, 0, 0, 0, 0, 1.0, 1.0, 0, 0)
+      return SpriteUnitFactory.apply(unit, params)
+    end
+
+    #==SpriteUnitの各アクセサに対応した値を設定する
+    #unit: 設定対象のSpriteUnit構造体
+    #params: 設定するSpriteUnit構造体の値。ハッシュ引数。引数のキーは、SpriteUnitのアクセサ名と同一
+    def SpriteUnitFactory.apply(unit, params)
+      PARAMS.each{|prm| unit[prm] = params[prm] if params.has_key?(prm) } if params
+      return unit 
+    end
+  end
+end