ruby-miyako-mswin32 2.1.0

data/lib/Miyako/API/movie.rb

@@ -0,0 +1,166 @@
+# -*- encoding: utf-8 -*-
+=begin
+--
+Miyako v2.1
+Copyright (C) 2007-2009  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
+  #==動画管理クラス
+  #動画ファイル(MPEGファイル限定)をロード・再生するクラス
+  class Movie
+    include SpriteBase
+    include Animation
+    include Layout
+    extend Forwardable
+
+    @@movie_list = []
+
+    attr_accessor :visible #レンダリングの可否(true->描画 false->非描画)
+    
+    #===動画のインスタンスを作成する
+    #(但し、現在の所、loopパラメータは利用できない)
+    #_fname_:: 動画ファイル名
+    #_loops_:: ループ再生の可否。ループ再生させるときは true を渡す
+    #返却値:: 生成したインスタンス
+    def initialize(fname, loops = true)
+      init_layout
+
+      @x = 0
+      @y = 0
+      
+      raise MiyakoIOError.no_file(fname) unless File.exist?(fname)
+      @movie = SDL::MPEG.load(fname)
+      @size = Size.new(@movie.info.width, @movie.info.height)
+      set_layout_size(*(@size.to_a))
+
+      @visible = true
+      @sprite = Sprite.new({:size=>@size , :type=>:movie})
+      @sprite.snap(self)
+      
+      @movie.enable_audio(true) unless $not_use_audio
+      @movie.enable_video(true)
+      @movie.set_loop(loops)
+      
+      @movie.set_display(@sprite.bitmap)
+      @movie.scale(1.0)
+      @@movie_list.push(self)
+    end
+
+    def update_layout_position #:nodoc:
+      @x = @layout.pos[0]
+      @y = @layout.pos[1]
+      @sprite.move_to!(*@layout.pos)
+    end
+    
+    def initialize_copy(obj) #:nodoc:
+      @sprite = @sprite.dup
+      @size = @size.dup
+      copy_layout
+    end
+    
+    #===動画再生時の音量を指定する
+    #_v_:: 指定する音量。(0～100までの整数)
+    def set_volume(v)
+      return $not_use_audio
+      raise MiyakoValueError.over_range(v, 0, 100) unless (0..100).cover?(v)
+      @movie.set_volume(v)
+    end
+
+    #===動画再生中かを返す
+    #返却値:: 再生中のときは true を返す
+    def playing?
+      return @movie.status == SDL::MPEG::PLAYING
+    end
+
+    #===動画データを解放する
+    def dispose
+      @movie.stop if playing?
+      @sprite.dispose
+      layout_dispose
+      @@movie_list.delete(self)
+      @movie = nil
+    end
+
+    #===再生領域の範囲を設定する
+    #元動画のうち、表示させたい箇所を Rect クラスのインスタンスか4要素の配列で指定する
+    #_rect_:: 再生領域。
+    def region(rect)
+      @movie.set_display_region(*(rect.to_a))
+    end
+
+    #===動画の再生を一時停止する
+    #再生を裁可するには、 Miyako::Movie#rewind メソッドを呼び出す必要がある
+    #_pause_by_input_:: ダミー
+    def pause(pause_by_input)
+      @movie.pause
+    end
+
+    #===動画を再生させる
+    #動画の先頭から再生する。ブロックを渡したときは、ブロックを評価している間動画を再生する
+    #_vol_:: 動画再生時の音量。0～100の整数
+    def start(vol = nil)
+      if vol
+        raise MiyakoValueError.over_range(vol, 0, 100) unless (0..100).cover?(vol)
+        set_volume(vol) if vol
+      end
+      @movie.play
+      if block_given?
+        yield self
+        @movie.stop
+      end
+    end
+
+    #===動画再生を停止する
+    def stop
+      @movie.stop
+    end
+
+    #===再生中の動画の再生位置を返す
+    #位置は秒単位で返す
+    #返却値:: 再生位置
+    def current
+      return @movie.info.current_time
+    end
+
+    #===動画の長さを返す
+    #長さは、秒単位で返す。
+    #返却値:: 動画の長さ
+    def length
+      return @movie.info.total_time
+    end
+
+    #===画面に描画を指示する
+    #現在表示できる選択肢を、現在の状態で描画するよう指示する
+    #visibleメソッドの値がfalseのときは描画されない。
+    #返却値:: 自分自身を返す
+    def render
+      return slef nless @visible
+      @sprite.render
+      return self
+    end
+    
+    #===一時停止中の動画の再生を再開する
+    #Miyako::Movie#pause メソッドを実行した後に呼び出す
+    def_delegators(:@movie, :rewind)
+    #===指定時間ぶん、スキップ再生を行う
+    #size:: スキップ長(秒単位)
+    def_delegators(:@movie, :skip)
+    def_delegators(:@sprite, :rect, :broad_rect, :ox, :oy)
+  end
+end

data/lib/Miyako/API/parts.rb

@@ -0,0 +1,188 @@
+# -*- encoding: utf-8 -*-
+=begin
+--
+Miyako v2.1
+Copyright (C) 2007-2009  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
+
+  require 'delegate'
+
+  #==パーツ構成クラス
+  #複数のスプライト・アニメーションをまとめて一つの部品として構成できるクラス
+  #
+  #最初に、基準となる「レイアウト空間(LayoutSpaceクラスのインスタンス)」を登録し、その上にパーツを加える
+  #
+  #すべてのパーツは、すべてレイアウト空間にスナップされる
+  #(登録したパーツのレイアウト情報が変わることに注意)
+  class Parts < Delegator
+    include SpriteBase
+    include Animation
+    include Enumerable
+    include Layout
+    extend Forwardable
+
+    #===Partsクラスインスタンスを生成
+    #_size_:: パーツ全体の大きさ。Size構造体のインスタンスもしくは要素数が2の配列
+    def initialize(size)
+      @list = SpriteList.new
+
+      init_layout
+      set_layout_size(size[0], size[1])
+    end
+
+    def __getobj__
+      @list
+    end
+
+    def __setobj__(obj)
+    end
+    
+    def initialize_copy(obj) #:nodoc:
+      copy_layout
+      @list = SpriteList.new
+      obj.sprite_list.each{|pair|
+        @list[pair.name] = pair.body.deep_dup
+        @list[pair.name].snap(self)
+      }
+      self
+    end
+    
+    #===補助パーツvalueをnameに割り当てる
+    #_name_:: 補助パーツに与える名前(シンボル)
+    #_value_:: 補助パーツのインスタンス(スプライト、テキストボックス、アニメーション、レイアウトボックスなど)
+    #返却値:: 自分自身
+    def []=(name, value)
+      @list[name] = value
+      @list[name].snap(self)
+      self
+    end
+
+    #===名前・スプライトの対を登録する
+    #リストに名前・スプライトをリストの後ろに追加する
+    #効果はSpriteList#addと同じだが、複数の対を登録できることが特徴
+    #(例)push([name1,sprite1])
+    #    push([name1,sprite1],[name2,sprite2])
+    #_pairs_:: 名前とスプライトの対を配列にしたもの。対は、[name,sprite]として渡す。
+    #返却値:: 追加した自分自身を渡す
+    def push(*pairs)
+      pairs.each{|pair|
+        @list.push(pair)
+        @list[pair[0]].snap(self)
+      }
+      return self
+    end
+
+    #===指定した数の要素を先頭から取り除く
+    #SpriteListの先頭からn個の要素を取り除いて、新しいSpriteListとする。
+    #nがマイナスの時は、後ろからn個の要素を取り除く。
+    #nが0の時は、空のSpriteListを返す。
+    #自分自身に何も登録されていなければnilを返す
+    #(例)a=SpriteList(pair(:a),pair(:b),pair(:c))
+    #    b=a.delete(:b)
+    #      =>a=SpriteList(pair(:a),pair(:c))
+    #        b=SpriteList(pair(:b))
+    #    b=a.delete(:d)
+    #      =>a=SpriteList(pair(:a),pair(:b),pair(:c))
+    #        b=nil
+    #_n_:: 取り除く要素数。省略時は1
+    #返却値:: 取り除いたスプライト
+    def delete(name)
+      ret = @list.delete
+      ret.body.reset_snap
+      ret.body
+    end
+
+    def sprite_list #:nodoc:
+      return @list
+    end
+
+    #===すべての補助パーツの一覧を配列で返す
+    #返却値:: パーツ名の配列(登録順)
+    def parts
+      return @list.names
+    end
+
+    #===指定の補助パーツを除外する
+    #_name_:: 除外するパーツ名(シンボル)
+    #返却値:: 自分自身
+    def remove(name)
+      @list.delete(name)
+      return self
+    end
+
+    #===スプライトに変換した画像を表示する
+    #すべてのパーツを貼り付けた、１枚のスプライトを返す
+    #引数1個のブロックを渡せば、スプライトに補正をかけることが出来る
+    #返却値:: 描画したスプライト
+    def to_sprite
+      rect = self.broad_rect
+      sprite = Sprite.new(:size=>rect.to_a[2,2], :type=>:ac)
+      Drawing.fill(sprite, [0,0,0])
+      Bitmap.ck_to_ac!(sprite, [0,0,0])
+      self.render_to(sprite){|sunit, dunit| sunit.x -= rect.x; sunit.y -= rect.y }
+      yield sprite if block_given?
+      return sprite
+    end
+
+    #===SpriteUnit構造体を生成する
+    #いったんSpriteインスタンスを作成し、それをもとにSpriteUnit構造体を生成する。
+    #返却値:: 生成したSpriteUnit構造体
+    def to_unit
+      return self.to_sprite.to_unit
+    end
+
+    #===現在の画面の最大の大きさを矩形で取得する
+    #各パーツの位置により、取得できる矩形の大きさが変わる
+    #但し、パーツ未登録の時は、インスタンス生成時の大きさから矩形を生成する
+    #返却値:: 生成された矩形(Rect構造体のインスタンス)
+    def broad_rect
+      rect = self.rect.to_a
+      return self.rect if @list.length == 0
+      rect_list = rect.zip(*(self.map{|pair| pair[1].broad_rect.to_a}))
+      # width -> right
+      rect_list[2] = rect_list[2].zip(rect_list[0]).map{|xw| xw[0] + xw[1]}
+      # height -> bottom
+      rect_list[3] = rect_list[3].zip(rect_list[1]).map{|xw| xw[0] + xw[1]}
+      x, y = rect_list[0].min, rect_list[1].min
+      return Rect.new(x, y, rect_list[2].max - x, rect_list[3].max - y)
+    end
+
+    #===パーツに登録しているインスタンスを解放する
+    def dispose
+      @list.dispose
+    end
+    
+    # mixinしたモジュールが優先して呼ばれるメソッドを再び移譲
+    def_delegators(:@list, :render, :render_to, :visible, :visible=, :show, :hide)
+    def_delegators(:@list, :start, :stop, :reset, :update_animation, :each)
+
+    #===各部品を移動させる
+    #Parts#move!はすでに予約されているため、
+    #SpriteList#move!はParts#parts_move!に改名。
+    #詳細は、SpriteList#move!を参照。
+    def_delegator(:@list, :move!, :parts_move!)
+
+    #===各部品を移動させる
+    #Parts#move_to!はすでに予約されているため、
+    #SpriteList#move_to!はParts#parts_move_to!に改名。
+    #詳細は、SpriteList#move_to!を参照。
+    def_delegator(:@list, :move_to!, :parts_move_to!)
+  end
+end

data/lib/Miyako/API/plane.rb

@@ -0,0 +1,205 @@
+# -*- encoding: utf-8 -*-
+=begin
+--
+Miyako v2.1
+Copyright (C) 2007-2009  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 Plane
+    include SpriteBase
+    include Animation
+    extend Forwardable
+
+    def resize #:nodoc:
+      @size = Size.new(((Screen.w + @sprite.ow - 1) / @sprite.ow + 2),
+                       ((Screen.h + @sprite.oh - 1) / @sprite.oh + 2))
+    end
+
+    #===インスタンスの作成
+    #パラメータは、Sprite.newのパラメータと同じ。但し、追加のパラメータがある。
+    #
+    #:sprite => (インスタンス)　：　表示対象のスプライト（アニメーション）のインスタンス
+    #
+    #_param_:: プレーンの情報(:sprite(=>Sprite・SpriteAnimationクラスのインスタンス))
+    #返却値:: 生成したインスタンス
+    def initialize(param)
+      if param.has_key?(:sprite)
+        @sprite = param[:sprite]
+      else
+        @sprite = Sprite.new(param)
+      end
+      resize
+      @pos = Point.new(0, 0)
+      @visible = true
+    end
+    
+    def initialize_copy(obj) #:nodoc:
+      @sprite = @sprite.dup
+      @pos = @pos.dup
+    end
+
+    #===プレーン画像左上の x 座標の値を取得する
+    #元画像の左上の位置がどこにあるのかを示す
+    #返却値:: x 座標の値
+    def x
+      return @pos.x
+    end
+
+    #===プレーン画像左上の y 座標の値を取得する
+    #元画像の左上の位置がどこにあるのかを示す
+    #返却値:: y 座標の値
+    def y
+      return @pos.y
+    end
+
+    #===プレーンの表示位置を移動させる
+    #画像スクロールと同じ効果を得る
+    #_dx_:: 移動量(x 座標)
+    #_dy_:: 移動量(y 座標)
+    #返却値:: 自分自身を返す
+    def move!(dx, dy)
+      @pos.move!(dx, dy)
+      @pos.x %= @sprite.ow if @pos.x >= @sprite.ow || @pos.x <= -@sprite.ow
+      @pos.y %= @sprite.oh if @pos.y >= @sprite.oh || @pos.y <= -@sprite.oh
+      return self
+    end
+
+    #===プレーンの表示位置を移動させる(移動位置指定)
+    #画像スクロールと同じ効果を得る
+    #_x_:: 移動先の位置(x 座標)
+    #_y_:: 移動先の位置(y 座標)
+    #返却値:: 自分自身を返す
+    def move_to!(x, y)
+      @pos.move_to!(x, y)
+      @pos.x %= @screen.ow if @pos.x >= @sprite.ow || @pos.x <= -@sprite.ow
+      @pos.y %= @screen.oh if @pos.y >= @sprite.oh || @pos.y <= -@sprite.oh
+      return self
+    end
+
+    #===プレーンの表示位置を移動させたときの位置を求める
+    #画像スクロールと同じ効果を得る
+    #ただし、自分自身の位置は変わらない
+    #_dx_:: 移動量(x 座標)
+    #_dy_:: 移動量(y 座標)
+    #返却値:: 変更したPosition構造体を返す
+    def move!(dx, dy)
+      @pos.move!(dx, dy)
+      @pos.x %= @sprite.ow if @pos.x >= @sprite.ow || @pos.x <= -@sprite.ow
+      @pos.y %= @sprite.oh if @pos.y >= @sprite.oh || @pos.y <= -@sprite.oh
+      return self
+    end
+
+    #===プレーンの表示位置を移動させたときの位置を求める(移動位置指定)
+    #画像スクロールと同じ効果を得る
+    #ただし、自分自身の位置は変わらない
+    #_x_:: 移動先の位置(x 座標)
+    #_y_:: 移動先の位置(y 座標)
+    #返却値:: 変更したPosition構造体を返す
+    def move_to!(x, y)
+      @pos.move_to!(x, y)
+      @pos.x %= @screen.ow if @pos.x >= @sprite.ow || @pos.x <= -@sprite.ow
+      @pos.y %= @screen.oh if @pos.y >= @sprite.oh || @pos.y <= -@sprite.oh
+      return self
+    end
+
+    #===画像の表示矩形を取得する
+    #Planeの大きさを矩形で取得する。値は、Screen.rectメソッドの値と同じ。
+    #返却値:: 生成された矩形(Rect構造体のインスタンス)
+    def rect
+      return Screen.rect
+    end
+
+    #===現在の画面の最大の大きさを矩形で取得する
+    #但し、Planeの場合は最大の大きさ=画面の大きさなので、rectと同じ値が得られる
+    #返却値:: 生成された矩形(Rect構造体のインスタンス)
+    def broad_rect
+      return self.rect
+    end
+
+    #===プレーンのデータを解放する
+    def dispose
+      @sprite.dispose
+    end
+    
+    #===画面に描画を指示する
+    #現在表示できるプレーンを、現在の状態で描画するよう指示する
+    #--
+    #(但し、実際に描画されるのはScreen.renderメソッドが呼び出された時)
+    #++
+    #返却値:: 自分自身を返す
+    def render
+      @size.h.times{|y|
+        @size.w.times{|x|
+          u = @sprite.to_unit
+          u.move_to(x * @sprite.ow + @pos.x, y * @sprite.oh + @pos.y)
+          Screen.render_screen(u) if u.x >= 0 && u.y >= 0 && u.x + u.ow <= Screen.bitmap.w && u.y + u.oh <= Screen.bitmap.h
+        }
+      }
+      return self
+    end
+    
+    #===描画の素になるスプライトのアニメーションを更新する
+    #返却値:: 更新した結果、パターンが変わった・アニメーションが終了したときはtrue、それ以外はfalseを返す
+    def update_animation
+      return @sprite.update_animation
+    end
+
+    #===現在表示されているプレーンをSpriteクラスのインスタンスとして取得
+    #引数1個のブロックを渡せば、スプライトに補正をかけることが出来る
+    #返却値:: 取り込んだ画像を含むSpriteクラスのインスタンス
+    def to_sprite
+      sprite = Sprite.new(:size=>self.rect.to_a[2..3], :type=>:ac)
+      Drawing.fill(sprite, [0,0,0])
+      Bitmap.ck_to_ac!(sprite, [0,0,0])
+      self.render_to(sprite)
+      yield sprite if block_given?
+      return sprite
+    end
+
+    #===SpriteUnit構造体を生成する
+    #いったんSpriteインスタンスを作成し、それをもとにSpriteUnit構造体を生成する。
+    #返却値:: 生成したSpriteUnit構造体
+    def to_unit
+      return self.to_sprite.to_unit
+    end
+
+    def Plane::resize #:nodoc:
+      @@planes.each{|p| p.resize }
+      return nil
+    end
+
+    #===プレーンを画面に描画する
+    #転送元の描画範囲は、src側SpriteUnitの(ox,oy)を起点にする。
+    #画面の描画範囲は、src側SpriteUnitの(x,y)を起点に、タイリングを行いながら貼り付ける。
+    #visibleメソッドの値がfalseのときは描画されない。
+    def render
+    end
+
+    #===プレーンを画像に描画する
+    #転送元の描画範囲は、src側SpriteUnitの(ox,oy)を起点にする。
+    #転送先の描画範囲は、src側SpriteUnitの(x,y)を起点に、タイリングを行いながら貼り付ける。
+    #visibleメソッドの値がfalseのときは描画されない。
+    #_dst_:: 転送先ビットマップ(to_unitメソッドを呼び出すことが出来る/値がnilではないインスタンス)
+    def render_to(dst)
+    end
+
+    def_delegators(:sprite)
+  end
+end