ruby-miyako-mswin32 2.1.0 → 2.1.1

data/lib/Miyako/API/story.rb

@@ -29,7 +29,6 @@ module Miyako
   class Story
 
     @@sub_scenes = [:sub_scene, :sub_routine]
-    @@over_scenes = [:over_scene]
 
     def prev_label #:nodoc:
       return @prev_label
@@ -51,48 +50,15 @@ module Miyako
       @next_label = nil
 
       @stack = []
-      @fibers = [nil]
 
       @scene_cache = Hash.new
       @scene_cache_list = Array.new
       @scene_cache_max = 20
 
-      @fiber = Proc.new{|sc, num|
-        raise MiyakoValueError, "Illegal Script-label name! : #{sc}" unless Scene.has_scene?(sc.to_s)
-        fnum = nil
-        bk_nn = sc
-        uu = sc.new(self)
-        uu.init_inner(@prev_label, self.upper_label)
-        uu.setup
-        ret = true
-        while ret do
-          nn = uu.update
-          uu.render
-          if fnum && @fibers[fnum]
-            @fibers[fnum].resume(true)
-          elsif nn && !(nn.eql?(uu.class)) && @@over_scenes.include?(nn.scene_type)
-            @fibers << Fiber.new(&@fiber)
-            fnum = @fibers.length - 1
-            @fibers[fnum].resume(nn, fnum)
-            n = bk_nn
-          end
-          break unless nn
-          ret = Fiber.yield
-        end
-        uu.final
-        uu.dispose
-        if (fnum && @fibers[fnum])
-          @fibers[fnum].resume(nil)
-          @fibers[fnum] = nil
-          fnum = nil
-        end
-        @fibers[num] = nil
-      }
     end
-    
+
     def initialize_copy(obj) #:nodoc:
       @stack = @stack.dup
-      @fibers = @fibers.dup
       @scene_cache = @scene_cache.dup
       @scene_cache_list = @scene_cache_list.dup
     end
@@ -128,23 +94,10 @@ module Miyako
         u.init_inner(@prev_label, self.upper_label)
         u.setup
 
-        loop do
-          Audio.update
-          Input.update
-          Screen.clear
+        Miyako.main_loop do
           bk_n = on
           n = u.update
           u.render
-          if @fibers.first
-            raise MiyakoError, "Double over scene from root!" if n && @@over_scenes.include?(n.scene_type)
-            @fibers.first.resume(true, 0)
-          elsif n && @@over_scenes.include?(n.scene_type)
-            @fibers.clear
-            @fibers << Fiber.new(&@fiber)
-            @fibers.first.resume(n, 0)
-            n = bk_n
-          end
-          Screen.render
           break unless n && on.eql?(n)
         end
         u.next = n
@@ -163,18 +116,11 @@ module Miyako
           u = nil
         end
       end
-      @fibers.each{|fiber| fiber.resume(nil) if fiber } if @fibers.length > 0
       @scene_cache_list.each{|sy| @scene_cache[sy].dispose }
       @scene_cache.clear
       @scene_cache_list.clear
     end
 
-    #==="over_scene"形式のシーンが実行中かどうか判別する
-    #返却値:: "over_scene"形式のシーンが実行中の時はtrueを返す
-    def over_scene_execute?
-      return @now_fiber != nil
-    end
-
     #===内部の情報を解放する
     def dispose
       @scene_cache.keys.each{|k| @scene_cache[del_symbol].dispose }
@@ -182,7 +128,7 @@ module Miyako
 
     #==シーン情報格納のための構造体
     ScenePool = Struct.new(:story, :prev, :next, :upper)
-    
+
     #==シーンモジュール
     #本モジュールをmixinすることにより、シーンを示すインスタンスを作成することができる
     #mixinするときに気をつけなければいけないのは、本モジュールでは以下の
@@ -198,8 +144,7 @@ module Miyako
     #判別は、scene_typeクラスメソッドを呼び出すことで可能。デフォルトは、
     #通常シーンを示すシンボル":scene"が返る。
     #形式を変えるには、scene_typeクラスメソッドをオーバーライドし、返却値を変える。
-    #サブシーンの時はシンボル":sub_scene"、オーバーシーンのときは
-    #シンボル":over_scene"を返すように実装する
+    #サブシーンの時はシンボル":sub_scene"を返すように実装する
     #(注1)同じクラス名のシーンを繰り返し実行したいときは、いったん別のダミーシーンを
     #介してから元のシーンへ移動する必要がある
     #(注2)オーバーシーン内では、シーンの移動が出来ないが、入れ子形式で
@@ -312,12 +257,6 @@ module Miyako
         @@pool[self.object_id].next = label
       end
 
-      #==="over_scene"形式のシーンが実行中かどうか判別する
-      #返却値:: "over_scene"形式のシーンが実行中の時はtrueを返す
-      def over_scene_execute?
-        return @story.over_scene_execute?
-      end
-
       #===シーンの解説を返す(テンプレートメソッド)
       #Sceneモジュールをmixinしたとき、解説文を返す実装をしておくと、
       #Scene.#lisutupメソッドを呼び出したときに、noticeメソッドの結果を取得できる

data/lib/Miyako/API/struct_point.rb

@@ -0,0 +1,157 @@
+# -*- 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 PointStruct < Struct
+    #===位置を変更する(変化量を指定)
+    #ブロックを渡したとき、ブロックの評価した結果、偽になったときは移動させた値を元に戻す
+    #_dx_:: 移動量(x方向)。単位はピクセル
+    #_dy_:: 移動量(y方向)。単位はピクセル
+    #返却値:: 自分自身を返す
+    def move!(dx, dy)
+    end
+
+    #===位置を変更する(位置指定)
+    #ブロックを渡したとき、ブロックの評価した結果、偽になったときは移動させた値を元に戻す
+    #_x_:: 移動先位置(x方向)。単位はピクセル
+    #_y_:: 移動先位置(y方向)。単位はピクセル
+    #返却値:: 自分自身を返す
+    def move_to!(x, y)
+    end
+
+    #===位置を変更したインスタンスを返す(変化量を指定)
+    #引数で指定したぶん移動させたときの位置を新しくインスタンスを生成して返す
+    #自分自身の値は変わらない
+    #_dx_:: 移動量(x方向)。単位はピクセル
+    #_dy_:: 移動量(y方向)。単位はピクセル
+    #返却値:: 自分自身の複製を更新したインスタンス
+    def move(dx, dy)
+      self.dup.move!(dx, dy)
+    end
+
+    #===位置を変更したインスタンスを返す(位置指定)
+    #引数で指定したぶん移動させたときの位置を新しくインスタンスを生成して返す
+    #自分自身の値は変わらない
+    #_x_:: 移動先位置(x方向)。単位はピクセル
+    #_y_:: 移動先位置(y方向)。単位はピクセル
+    #返却値:: 自分自身の複製を更新したインスタンス
+    def move_to(x, y)
+      self.dup.move_to!(x, y)
+    end
+
+    #===インスタンスの足し算
+    #もう一方が整数のとき、x,yにotherを足したものを返す
+    #Point構造体や配列など、[]メソッドがつかえるもののとき、x,y同士を足したものを返す
+    #それ以外の時は例外が発生する
+    #自分自身の値は変わらない
+    #_other_:: 整数もしくはPoint構造体
+    #返却値:: Point構造体
+    def +(other)
+      ret = self.dup
+      if other.kind_of?(Numeric)
+        ret[0] += other
+        ret[1] += other
+      elsif other.methods.include?(:[])
+        ret[0] += other[0]
+        ret[1] += other[1]
+      else
+        raise MiyakoError, "this parameter cannot access!"
+      end
+      ret
+    end
+
+    #===インスタンスの引き算
+    #もう一方が整数のとき、x,yからotherを引いたものを返す
+    #Point構造体や配列など、[]メソッドがつかえるもののとき、x,y同士を引いたものを返す
+    #それ以外の時は例外が発生する
+    #自分自身の値は変わらない
+    #_other_:: 整数もしくはPoint構造体
+    #返却値:: Point構造体
+    def -(other)
+      ret = self.dup
+      if other.kind_of?(Numeric)
+        ret[0] -= other
+        ret[1] -= other
+      elsif other.methods.include?(:[])
+        ret[0] -= other[0]
+        ret[1] -= other[1]
+      else
+        raise MiyakoError, "this parameter cannot access!"
+      end
+      ret
+    end
+
+    #===インスタンスのかけ算
+    #もう一方が整数のとき、x,yにotherを掛けたものを返す
+    #Point構造体や配列など、[]メソッドがつかえるもののとき、x,y同士を掛けたものを返す
+    #それ以外の時は例外が発生する
+    #自分自身の値は変わらない
+    #_other_:: 整数もしくはPoint構造体
+    #返却値:: Point構造体
+    def *(other)
+      ret = self.dup
+      if other.kind_of?(Numeric)
+        ret[0] *= other
+        ret[1] *= other
+      elsif other.methods.include?(:[])
+        ret[0] *= other[0]
+        ret[1] *= other[1]
+      else
+        raise MiyakoError, "this parameter cannot access!"
+      end
+      ret
+    end
+
+    #===インスタンスの割り算
+    #もう一方が整数のとき、x,yからotherを割ったものを返す
+    #Point構造体や配列など、[]メソッドがつかえるもののとき、x,y同士を割ったものを返す
+    #それ以外の時は例外が発生する
+    #自分自身の値は変わらない
+    #_other_:: 整数もしくはPoint構造体
+    #返却値:: Point構造体
+    def /(other)
+      ret = self.dup
+      if other.kind_of?(Numeric)
+        raise MiyakoValueError, "0 div!" if other == 0
+        ret[0] /= other
+        ret[1] /= other
+      elsif other.methods.include?(:[])
+        ret[0] /= other[0]
+        ret[1] /= other[1]
+      else
+        raise MiyakoError, "this parameter cannot access!"
+      end
+      ret
+    end
+
+    def to_ary #:nodoc:
+      [self[0], self[1]]
+    end
+  end
+
+  #==座標などを構成するために使用する構造体
+  #_x_:: X座標の値
+  #_y_:: Y座標の値
+  Point = PointStruct.new(:x, :y)
+end

data/lib/Miyako/API/struct_rect.rb

@@ -0,0 +1,233 @@
+# -*- 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 RectStruct < Struct
+    #===位置を変更する(変化量を指定)
+    # ブロックを渡したとき、ブロックの評価した結果、偽になったときは移動させた値を元に戻す
+    #_dx_:: 移動量(x方向)。単位はピクセル
+    #_dy_:: 移動量(y方向)。単位はピクセル
+    #返却値:: 自分自身を返す
+    def move!(dx, dy)
+    end
+
+    #===位置を変更する(位置指定)
+    # ブロックを渡したとき、ブロックの評価した結果、偽になったときは移動させた値を元に戻す
+    #_x_:: 移動先位置(x方向)。単位はピクセル
+    #_y_:: 移動先位置(y方向)。単位はピクセル
+    #返却値:: 自分自身を返す
+    def move_to!(x, y)
+    end
+
+    #===位置を変更したインスタンスを返す(変化量を指定)
+    #引数で指定したぶん移動させたときの位置を新しくインスタンスを生成して返す
+    #自分自身の値は変わらない
+    #_dx_:: 移動量(x方向)。単位はピクセル
+    #_dy_:: 移動量(y方向)。単位はピクセル
+    #返却値:: 自分自身の複製を更新したインスタンス
+    def move(dx, dy)
+      self.dup.move!(dx, dy)
+    end
+
+    #===位置を変更したインスタンスを返す(位置指定)
+    #引数で指定したぶん移動させたときの位置を新しくインスタンスを生成して返す
+    #自分自身の値は変わらない
+    #_x_:: 移動先位置(x方向)。単位はピクセル
+    #_y_:: 移動先位置(y方向)。単位はピクセル
+    #返却値:: 自分自身の複製を更新したインスタンス
+    def move_to(x, y)
+      self.dup.move_to!(x, y)
+    end
+
+    #===サイズを変更する(変化量を指定)
+    # ブロックを渡したとき、ブロックの評価した結果、偽になったときは移動させた値を元に戻す
+    #_dw_:: 幅変更。単位はピクセル
+    #_dh_:: 高さ変更。単位はピクセル
+    #返却値:: 自分自身を返す
+    def resize!(dw, dh)
+    end
+
+    #===サイズを変更する
+    # ブロックを渡したとき、ブロックの評価した結果、偽になったときは移動させた値を元に戻す
+    #_w_:: 幅変更。単位はピクセル
+    #_h_:: 高さ変更。単位はピクセル
+    #返却値:: 自分自身を返す
+    def resize_to!(w, h)
+    end
+
+    #===サイズを変更したインスタンスを返す(変化量を指定)
+    #引数で指定したぶん変えたときの大きさを新しくインスタンスを生成して返す
+    #自分自身の値は変わらない
+    #_dw_:: 幅変更。単位はピクセル
+    #_dh_:: 高さ変更。単位はピクセル
+    #返却値:: 自分自身の複製を更新したインスタンス
+    def resize(dw, dh)
+      self.dup.resize!(dw,dh)
+    end
+
+    #===サイズを変更したインスタンスを返す
+    #引数で指定したぶん変えたときの大きさを新しくインスタンスを生成して返す
+    #自分自身の値は変わらない
+    #_w_:: 幅変更。単位はピクセル
+    #_h_:: 高さ変更。単位はピクセル
+    #返却値:: 自分自身の複製を更新したインスタンス
+    def resize_to(w, h)
+      self.dup.resize_to!(w,h)
+    end
+
+    #===インスタンスの足し算
+    #もう一方が整数のとき、x,yにotherを足したものを返す
+    #Point構造体や配列など、[]メソッドがつかえるもののとき、x,y同士を足したものを返す
+    #それ以外の時は例外が発生する
+    #自分自身の値は変わらない
+    #_other_:: 整数もしくはPoint構造体
+    #返却値:: Point構造体
+    def +(other)
+      ret = self.dup
+      if other.kind_of?(Numeric)
+        ret[0] += other
+        ret[1] += other
+      elsif other.methods.include?(:[])
+        ret[0] += other[0]
+        ret[1] += other[1]
+      else
+        raise MiyakoError, "this parameter cannot access!"
+      end
+      ret
+    end
+
+    #===インスタンスの引き算
+    #もう一方が整数のとき、x,yからotherを引いたものを返す
+    #Point構造体や配列など、[]メソッドがつかえるもののとき、x,y同士を引いたものを返す
+    #それ以外の時は例外が発生する
+    #自分自身の値は変わらない
+    #_other_:: 整数もしくはPoint構造体
+    #返却値:: Point構造体
+    def -(other)
+      ret = self.dup
+      if other.kind_of?(Numeric)
+        ret[0] -= other
+        ret[1] -= other
+      elsif other.methods.include?(:[])
+        ret[0] -= other[0]
+        ret[1] -= other[1]
+      else
+        raise MiyakoError, "this parameter cannot access!"
+      end
+      ret
+    end
+
+    #===インスタンスのかけ算
+    #もう一方が整数のとき、x,yにotherを掛けたものを返す
+    #Point構造体や配列など、[]メソッドがつかえるもののとき、x,y同士を掛けたものを返す
+    #それ以外の時は例外が発生する
+    #自分自身の値は変わらない
+    #_other_:: 整数もしくはPoint構造体
+    #返却値:: Point構造体
+    def *(other)
+      ret = self.dup
+      if other.kind_of?(Numeric)
+        ret[0] *= other
+        ret[1] *= other
+      elsif other.methods.include?(:[])
+        ret[0] *= other[0]
+        ret[1] *= other[1]
+      else
+        raise MiyakoError, "this parameter cannot access!"
+      end
+      ret
+    end
+
+    #===インスタンスの割り算
+    #もう一方が整数のとき、x,yからotherを割ったものを返す
+    #Point構造体や配列など、[]メソッドがつかえるもののとき、x,y同士を割ったものを返す
+    #それ以外の時は例外が発生する
+    #自分自身の値は変わらない
+    #_other_:: 整数もしくはPoint構造体
+    #返却値:: Point構造体
+    def /(other)
+      ret = self.dup
+      if other.kind_of?(Numeric)
+        raise MiyakoValueError, "0 div!" if other == 0
+        ret[0] /= other
+        ret[1] /= other
+      elsif other.methods.include?(:[])
+        raise MiyakoValueError, "0 div!" if (other[0] == 0 || other[1] == 0)
+        ret[0] /= other[0]
+        ret[1] /= other[1]
+      else
+        raise MiyakoError, "this parameter cannot access!"
+      end
+      ret
+    end
+
+    #===指定の座標が矩形の範囲内かを問い合わせる
+    #_x_:: 指定のx座標
+    #_y_:: 指定のy座標
+    #返却値:: 座標が矩形の範囲内ならtrueを返す
+    def in_range?(x, y)
+      return (x >= self[0] && y >= self[1] && x < self[0] + self[2] && y < self[1] + self[3])
+    end
+
+    #===指定の座標が矩形の範囲内かを問い合わせる
+    #_x_:: 指定のx座標
+    #_y_:: 指定のy座標
+    #返却値:: 座標が矩形の範囲内ならtrueを返す
+    def between?(x, y)
+      return in_range?(x, y)
+    end
+
+    #===矩形の左上位置部分のみ返す
+    #返却値:: Position構造体のインスタンス
+    def pos
+      return Point.new(self[0], self[1])
+    end
+
+    #===矩形の大きさのみ返す
+    #返却値:: Size構造体のインスタンス
+    def size
+      return Size.new(self[2], self[3])
+    end
+
+    #===矩形情報を配列に変換する
+    #[left, top, width, height]の配列を生成して返す。
+    #返却値:: 生成した配列
+    def to_ary
+      [self[0], self[1], self[2], self[3]]
+    end
+
+    #===矩形情報をSquare構造体に変換する
+    #返却値:: 生成したSquare構造体
+    def to_square
+      Square.new(self[0], self[1], self[2]+self[0]-1, self[3]+self[1]-1)
+    end
+  end
+
+  #==矩形などを構成するために使用する構造体
+  #_x_:: X座標の値
+  #_y_:: Y座標の値
+  #_w_:: 横幅
+  #_h_:: 高さ
+  Rect = RectStruct.new(:x, :y, :w, :h)
+end