cyross-ruby-miyako 2.0.0 → 2.0.5.1.0

data/lib/Miyako/API/diagram.rb

@@ -2,7 +2,7 @@
 =begin
 --
 Miyako v2.0
-Copyright (C) 2007-2008  Cyross Makoto
+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
@@ -20,8 +20,6 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 ++
 =end
 
-require 'thread'
-
 module Miyako
   #==遷移図モジュール群
   module Diagram
@@ -67,12 +65,14 @@ module Miyako
       #===ノードでの入力デバイス処理を実装する
       #入力デバイス処理が必要ないときは、本メソッドを実装する必要はない
       #Processor#update_input メソッドが呼ばれたときの処理を実装する
-      def update_input
+      #_params_:: Processor::update_inputメソッドが呼ばれた時のパラメータ群。オーバーライドするときに省略可能
+      def update_input(*params)
       end
     
       #===ノードでの更新処理を実装する
       #Processor#update メソッドが呼ばれたときの処理を実装する
-      def update
+      #_params_:: Processor::updateメソッドが呼ばれた時のパラメータ群。オーバーライドするときに省略可能
+      def update(*params)
       end
 
       #===ノードでの入力デバイス処理の後始末を実装する
@@ -188,9 +188,9 @@ module Miyako
     end
 
     #==遷移図クラス本体
-    #但し、実質的にメソッドを呼び出すのはDiagramFacadeクラスから呼び出す
+    #但し、実質的にメソッドを呼び出すのはManagerクラスから呼び出す
     class DiagramBody
-      attr_reader :name #:nodoc:
+      attr_reader :name, :node #:nodoc:
       TRIGGER_TYPES=[:immediate, :next]
 
       def initialize(name, body, trigger = nil) #:nodoc:
@@ -223,13 +223,13 @@ module Miyako
         @node.resume
       end
 
-      def update_input #:nodoc:
-        @node.update_input
+      def update_input(*params) #:nodoc:
+        @node.update_input(*params)
       end
     
-      def update #:nodoc:
+      def update(*params) #:nodoc:
         if @trigger.update?
-          @node.update
+          @node.update(*params)
           @trigger.post_update
           @node.reset_input
           if @next_trigger
@@ -301,6 +301,8 @@ module Miyako
       end
 
       #===遷移図にノードを追加する
+      #状態遷移図のノードに対応するオブジェクト(NodeBaseモジュールをmixinしたクラス)を登録する
+      #名前が重複している場合は、後に登録したノードが採用される。
       #_name_:: ノード名。文字列かシンボルを使用
       #_body_:: ノード本体。DiagramNodeBase モジュールを mixin したクラスのインスタンス
       #_trigger_:: NodeTriggerBase モジュールを mixin したクラスのインスタンス。デフォルトは NpdeTrogger クラスのインスタンス
@@ -312,8 +314,15 @@ module Miyako
       end
 
       #===ノード間移動のアローを追加する
-      #trigger のブロックを実行した結果、true のときは、to_name で示したノードへ移動する。
-      #false のときは、ノード間移動をせずに直前に実行したノードを再実行する
+      #移動元ノードと移動先ノードの名前を指定し、条件にかなえばノードを移動する矢印を設定する。
+      #Processor#updateメソッドを呼び出した時、移動条件を確認して移動するかどうかを判断する。
+      #デフォルトでは、ノードのfinish?メソッドがtrueのときにto_nameで示したノードへ移動する。
+      #結果がfalse のときは、from_nameで示したノードを継続して使用する(stopメソッドは呼ばれない)。
+      #また、引数が一つのブロックを渡すことができる。
+      #引数には、現在評価中のノード(from_nameで示したノードのインスタンス)が渡される。
+      #評価の結果、true のときは、to_name で示したノードへ移動する。
+      #結果がfalse のときは、from_nameで示したノードを継続して使用する(stopメソッドは呼ばれない)。
+      #同じ移動元のアローが複数登録されているときは、先に登録したノードの移動条件を確認する。
       #_from_name_:: 移動元ノード名。文字列かシンボルを使用
       #_to_name_:: 移動先ノード名。文字列かシンボルを使用
       #_trigger_:: ノード間移動するかどうかを返すブロック。ブロックは引数を一つ取る(from_name で示したノードのインスタンス)
@@ -347,14 +356,18 @@ module Miyako
         @ptr = @first
       end
 
-      def now #:nodoc
+      def now #:nodoc:
         return @ptr ? @ptr.name : nil
       end
 
-      def now_node #:nodoc
-        return @ptr
+      def now_node #:nodoc:
+        return @ptr ? @ptr.node : nil
       end
 
+      def nodes
+        return @name2idx.keys
+      end
+      
       def start #:nodoc:
         @ptr = @first unless @ptr
         return unless @ptr
@@ -376,13 +389,13 @@ module Miyako
         @ptr.resume if @ptr
       end
 
-      def update_input #:nodoc:
-        @ptr.update_input if @ptr
+      def update_input(*params) #:nodoc:
+        @ptr.update_input(*params) if @ptr
       end
     
-      def update #:nodoc:
+      def update(*params) #:nodoc:
         return unless @ptr
-        @ptr.update
+        @ptr.update(*params)
         nxt = @ptr.go_next
         unless @ptr.equal?(nxt)
           @ptr.stop
@@ -411,13 +424,18 @@ module Miyako
     #Processor#render メソッドのみを呼び出せる
     #インスタンス生成は、Processor#renderer メソッドを呼び出して行う
     class Renderer
+      attr_accessor :visible #レンダリングの可否(true->描画 false->非描画)
+
       def initialize(obj) #:nodoc:
         @renderer = obj
+        @visible = true
       end
 
       #===レンダリングを行う
       #Processor#render メソッドを呼び出す
+      #visibleメソッドの値がfalseのときは描画されない。
       def render
+        return unless @visible
         @renderer.call
       end
     end
@@ -427,94 +445,72 @@ module Miyako
     class Processor
       #遷移図本体。Manager クラスのインスタンス
       attr_reader :diagram
+      attr_accessor :visible #レンダリングの可否(true->描画 false->非描画)
 
       #===インスタンスを生成する
       #遷移図形式のインスタンス群を生成する
       #ブロックを必ず取り(取らないとエラー)、ブロック内では、遷移図の構成を実装する
       #(Manager#add, Manager#add_arrow の各メソッドを参照)
-			#_sync_:: 同期実行かどうかを示すフラグ。同期実行(明示的にupdateメソッドを呼び出す)のときは true 、非同期実行の場合は false を渡す(デフォルトは false )
       #返却値:: 生成されたインスタンス
-      def initialize(sync=false)
+      def initialize
         @loop = self.method(:main_loop)
         @states = {:execute => false, :pause => false, :type1 => false }
-        @thread = nil
-        @mutex = Mutex.new
         @diagram = Miyako::Diagram::Manager.new
-				@sync = sync
+        @visible = true
         yield @diagram if block_given?
       end
 
-      #===同期実行かどうかの問い合わせメソッド
-      #返却値: 同期実行のときはtrue
-      def sync?
-        return @sync
-      end
-
       #===遷移図形式の処理を開始する
       def start
         return if @states[:execute]
-        @mutex.lock unless @sync
+        @diagram.start
         @states[:execute] = true
-				unless @sync
-        	@mutex.unlock
-        	@thread = Thread.new{ @loop.call }
-				end
       end
 
       #===実行中の処理を中断させる
       def stop
         return unless @states[:execute]
-        @mutex.lock unless @sync
+        @diagram.stop
         @states[:execute] = false
-				unless @sync
-        	@mutex.unlock
-        	@thread.join
-        	@thread = nil
-				end
       end
 
       #===実行中の処理を停止させる
       #resume メソッドが呼び出されるまで停止は復帰されない
       def pause
         return unless @states[:execute]
-        @mutex.lock unless @sync
         @states[:pause] = true
-        @mutex.unlock unless @sync
       end
 
       #===停止状態から復帰する
       #このメソッドを呼び出すまで停止状態を保つ
       def resume
         return unless @states[:execute]
-        @mutex.lock unless @sync
         @states[:pause] = false
-        @mutex.unlock unless @sync
       end
 
       #===入力デバイスに関わる処理を行う
-      #(注)必ずメインスレッドから呼び出すこと！
-      def update_input
+      #現在処理中のノードのupdate_inputメソッドを呼び出す。
+      #_params_:: パラメータ群。省略可能
+      def update_input(*params)
         return if @states[:pause]
-        @diagram.update_input
+        @diagram.update_input(*params)
       end
     
       #===処理の更新を行う
-      #(注)このメソッドを使う際は、同期モード(インスタンス生成時に引数として true を渡す)にする必要がある
-      def update
+      #現在処理中のノードupdateメソッドを呼び出す。
+      #_params_:: パラメータ群。省略可能
+      def update(*params)
         return if @states[:pause]
-        @diagram.update
+        @diagram.update(*params)
         @states[:execute] = false if @diagram.finish?
       end
     
       #===レンダリング処理を行う
-      #Screen.update メソッドを使用している場合は使う必要はない
+      #現在処理中のノードのrenderメソッドを呼び出す。
+      #visibleメソッドの値がfalseのときは描画されない。
       def render
-        @mutex.lock unless @sync
+        return unless @visible
         @diagram.render
-				unless @sync
-        	@mutex.unlock
-        	Thread.pass
-				end
       end
 
       #===遷移図形式の処理が終了しているかどうかを取得する
@@ -555,18 +551,10 @@ module Miyako
         return @diagram.now_node
       end
 
-      def main_loop #:nodoc:
-        @diagram.start
-        while @states[:execute] do
-          unless @states[:pause]
-            @mutex.lock
-            @diagram.update
-            @mutex.unlock
-          end
-          Thread.pass
-          @states[:execute] = false if @diagram.finish?
-        end
-        @diagram.stop
+      #===登録しているノード名のリストを取得する
+      #返却値:: ノード名リスト
+      def nodes
+        return @diagram.nodes
       end
     end
   end

data/lib/Miyako/API/drawing.rb

@@ -2,7 +2,7 @@
 =begin
 --
 Miyako v2.0
-Copyright (C) 2007-2008  Cyross Makoto
+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
@@ -24,87 +24,128 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 module Miyako
   #==線形描画モジュール
   module Drawing
-      @@draw_list = {:line    => {:normal => {:solid         => lambda{|b, l| b.draw_line(*l)},
-                                             :anti_aliasing => lambda{|b, l| b.draw_aa_line(*l)}},
-                                 :fill   => {:solid         => lambda{|b, l| b.draw_line(*l)},
-                                             :anti_aliasing => lambda{|b, l| b.draw_aa_line(*l)}}},
-                    :rect    => {:normal => {:solid         => lambda{|b, l| b.draw_rect(*l)},
-                                             :anti_aliasing => lambda{|b, l| b.draw_rect(*l)}},
-                                 :fill   => {:solid         => lambda{|b, l| b.fill_rect(*l)},
-                                             :anti_aliasing => lambda{|b, l| b.fill_rect(*l)}}},
-                    :circle  => {:normal => {:solid         => lambda{|b, l| b.draw_circle(*l)},
-                                             :anti_aliasing => lambda{|b, l| b.draw_aa_circle(*l)}},
-                                 :fill   => {:solid         => lambda{|b, l| b.draw_filled_circle(*l)},
-                                             :anti_aliasing => lambda{|b, l| b.draw_aa_filled_circle(*l)}}},
-                    :ellipse => {:normal => {:solid         => lambda{|b, l| b.draw_ellipse(*l)},
-                                             :anti_aliasing => lambda{|b, l| b.draw_aa_ellipse(*l)}},
-                                 :fill   => {:solid         => lambda{|b, l| b.draw_filled_ellipse(*l)},
-                                             :anti_aliasing => lambda{|b, l| b.drawAAFilledEllipse(*l)}}}}
-
-	#===画像全体を指定の色で塗りつぶす
-    #_bitmap_:: 描画対象のビットマップ(Sprite.bitmapやSpriteUnit#bitmapの返り値など)
+    #===画像全体を指定の色で塗りつぶす
+    #引数spriteにto_unitもしくはbitmapメソッドが定義されていない場合は例外が発生する。
+    #_sprite_:: 描画対象のスプライト(to_unitもしくはbitmapメソッドを持つインスタンス)
     #_color_:: 塗りつぶす色。Color.to_rgbメソッドのパラメータでの指定が可能
     #返却値:: 自分自身を返す
-    def Drawing.fill(bitmap, color)
-      bitmap.fill_rect(0,0,self.w,self.h, Color.to_rgb(color))
+    def Drawing.fill(sprite, color)
+      color = Color.to_rgb(color)
+      methods = sprite.methods
+      raise MiyakoError, 
+            "this method needs sprite have to_method or bitmap method!" if !methods.include?(:to_unit) && !methods.include?(:bitmap)
+      bitmap = methods.include?(:to_unit) ? sprite.to_unit.bitmap : methods.include?(:bitmap) ? sprite.bitmap : sprite
+      bitmap.draw_rect(0,0, bitmap.w, bitmap.h, color, true, color[3]==255 ? nil : color[3])
+      return self
+    end
+
+    #===画像内に点を描画する
+    #引数spriteにto_unitもしくはbitmapメソッドが定義されていない場合は例外が発生する。
+    #_sprite_:: 描画対象のスプライト(to_unitもしくはbitmapメソッドを持つインスタンス)
+    #_rect_:: 描画する矩形。画像の左上を[0,0]とする。4要素の整数の配列かRect構造体を使用
+    #_color_:: 描画色。Color.to_rgbメソッドのパラメータでの指定が可能
+    #_aa_:: アンチエイリアスの指定。trueでオン。デフォルトはfalse
+    #返却値:: 自分自身を返す
+    def Drawing.pset(sprite, point, color)
+      methods = sprite.methods
+      raise MiyakoError, 
+            "this method needs sprite have to_method or bitmap method!" if !methods.include?(:to_unit) && !methods.include?(:bitmap)
+      bitmap = sprite.methods.include?(:to_unit) ? sprite.to_unit.bitmap : sprite.bitmap
+      bitmap[point[0], point[1]] = Color.to_rgb(color)
       return self
     end
 
     #===画像内に直線を引く
-    #_bitmap_:: 描画対象のビットマップ(Sprite.bitmapやSpriteUnit#bitmapの返り値など)
+    #引数spriteにto_unitもしくはbitmapメソッドが定義されていない場合は例外が発生する。
+    #_sprite_:: 描画対象のスプライト(to_unitもしくはbitmapメソッドを持つインスタンス)
     #_rect_:: 描画する矩形。画像の左上を[0,0]とする。4要素の整数の配列かRect構造体を使用
     #_color_:: 描画色。Color.to_rgbメソッドのパラメータでの指定が可能
-    #_attribute_:: 描画の属性。:normal固定。
-    #_aa_:: アンチエイリアスの指定。:solidでオフ、:anti_aliasingでオン
+    #_aa_:: アンチエイリアスの指定。trueでオン。デフォルトはfalse
     #返却値:: 自分自身を返す
-    def Drawing.line(bitmap, rect, color, attribute = :normal, aa = :solid)
-      raise MiyakoError, "not have Drawing attribute! #{attribute}" unless @@draw_list[:line].has_key?(attribute)
-      raise MiyakoError, "not have Drawing aaa! #{aa}" unless @@draw_list[:line][:attribute].has_key?(aa)
-      color = 
-      @@draw_list[:line][attribute][aa].call(bitmap, rect.to_a << Color.to_rgb(color))
+    def Drawing.line(sprite, rect, color, aa = false)
+      color = Color.to_rgb(color)
+      methods = sprite.methods
+      raise MiyakoError, 
+            "this method needs sprite have to_method or bitmap method!" if !methods.include?(:to_unit) && !methods.include?(:bitmap)
+      bitmap = sprite.methods.include?(:to_unit) ? sprite.to_unit.bitmap : sprite.bitmap
+      bitmap.draw_line(
+        rect[0], rect[1], rect[0]+rect[2]-1, rect[1]+rect[3]-1,
+        color, aa, color[3]==255 ? nil : color[3]
+      )
       return self
     end
 
     #===画像内に矩形を描画する
-    #_bitmap_:: 描画対象のビットマップ(Sprite.bitmapやSpriteUnit#bitmapの返り値など)
+    #引数spriteにto_unitもしくはbitmapメソッドが定義されていない場合は例外が発生する。
+    #_sprite_:: 描画対象のスプライト(to_unitもしくはbitmapメソッドを持つインスタンス)
     #_rect_:: 描画する矩形。画像の左上を[0,0]とする。4要素の整数の配列かRect構造体を使用
     #_color_:: 描画色。Color.to_rgbメソッドのパラメータでの指定が可能
-    #_attribute_:: 描画の属性。:normalで縁のみ描画、:fillで内部も塗りつぶす
-    #_aa_:: アンチエイリアスの指定。:solidでオフ、:anti_aliasingでオン
+    #_fill_:: 描画の属性。falseで縁のみ描画、trueで内部も塗りつぶす。デフォルトはfalse
     #返却値:: 自分自身を返す
-    def Drawing.rect(bitmap, rect, color, attribute = :normal, aa = :solid)
-      raise MiyakoError, "not have Drawing attribute! #{attribute}" unless @@draw_list[:line].has_key?(attribute)
-      raise MiyakoError, "not have Drawing aaa! #{aa}" unless @@draw_list[:line][:attribute].has_key?(aa)
-      @@draw_list[:rect][attribute][aa].call(bitmap, rect.to_a << Color.to_rgb(color))
+    def Drawing.rect(sprite, rect, color, fill = false)
+      color = Color.to_rgb(color)
+      methods = sprite.methods
+      raise MiyakoError, 
+            "this method needs sprite have to_method or bitmap method!" if !methods.include?(:to_unit) && !methods.include?(:bitmap)
+      bitmap = sprite.methods.include?(:to_unit) ? sprite.to_unit.bitmap : sprite.bitmap
+      bitmap.draw_rect(
+        rect[0], rect[1], rect[2]-1, rect[3]-1,
+        color, fill, color[3]==255 ? nil : color[3]
+      )
       return self
     end
 
     #===画像内に円を描画する
-    #_bitmap_:: 描画対象のビットマップ(Sprite.bitmapやSpriteUnit#bitmapの返り値など)
+    #引数spriteにto_unitもしくはbitmapメソッドが定義されていない場合は例外が発生する。
+    #_sprite_:: 描画対象のスプライト(to_unitもしくはbitmapメソッドを持つインスタンス)
     #_point_:: 中心の位置。2要素の整数の配列、もしくはPoint構造体を使用可能
     #_r_:: 円の半径。整数を使用可能。
     #_color_:: 描画色。Color.to_rgbメソッドのパラメータでの指定が可能
-    #_attribute_:: 描画の属性。:normalで縁のみ描画、:fillで内部も塗りつぶす
-    #_aa_:: アンチエイリアスの指定。:solidでオフ、:anti_aliasingでオン
+    #_fill_:: 描画の属性。falseで縁のみ描画、trueで内部も塗りつぶす。デフォルトはfalse
+    #_aa_:: アンチエイリアスの指定。trueでオン。デフォルトはfalse
     #返却値:: 自分自身を返す
-    def Drawing.circle(bitmap, point, r, color, attribute = :normal, aa = :solid)
-      raise MiyakoError, "not have Drawing attribute! #{attribute}" unless @@draw_list[:line].has_key?(attribute)
-      raise MiyakoError, "not have Drawing aaa! #{aa}" unless @@draw_list[:line][:attribute].has_key?(aa)
-      @@draw_list[:circle][attribute][aa].call(bitmap, point.to_a << r << Color.to_rgb(color))
+    def Drawing.circle(sprite, point, r, color, fill = false, aa = false)
+      color = Color.to_rgb(color)
+      methods = sprite.methods
+      raise MiyakoError, 
+            "this method needs sprite have to_method or bitmap method!" if !methods.include?(:to_unit) && !methods.include?(:bitmap)
+      bitmap = sprite.methods.include?(:to_unit) ? sprite.to_unit.bitmap : sprite.bitmap
+      bitmap.draw_circle(*point.to_a[0..1], r, color, fill, aa, color[3]==255 ? nil : color[3])
       return self
     end
 
     #===画像内に楕円を描画する
-    #_bitmap_:: 描画対象のビットマップ(Sprite.bitmapやSpriteUnit#bitmapの返り値など)
-    #_rect_:: 描画する矩形。画像の左上を[0,0]とする。4要素の整数の配列かRect構造体を使用
+    #引数spriteにto_unitもしくはbitmapメソッドが定義されていない場合は例外が発生する。
+    #_sprite_:: 描画対象のスプライト(to_unitもしくはbitmapメソッドを持つインスタンス)
+    #_point_:: 楕円の中心位置。2要素の整数の配列かPoint構造体を使用
+    #_rx_:: x方向半径。1以上の整数
+    #_ry_:: y方向半径。1以上の整数
+    #_color_:: 描画色。Color.to_rgbメソッドのパラメータでの指定が可能
+    #_fill_:: 描画の属性。falseで縁のみ描画、trueで内部も塗りつぶす。デフォルトはfalse
+    #_aa_:: アンチエイリアスの指定。trueでオン。デフォルトはfalse
+    #返却値:: 自分自身を返す
+    def Drawing.ellipse(sprite, point, rx, ry, color, fill = false, aa = false)
+      color = Color.to_rgb(color)
+      methods = sprite.methods
+      raise MiyakoError, 
+            "this method needs sprite have to_method or bitmap method!" if !methods.include?(:to_unit) && !methods.include?(:bitmap)
+      bitmap = sprite.methods.include?(:to_unit) ? sprite.to_unit.bitmap : sprite.bitmap
+      bitmap.draw_ellipse(
+        point[0], point[1], rx, ry,
+        color, fill, aa, color[3]==255 ? nil : color[3]
+      )
+    end
+
+    #===画像内に多角形を描画する
+    #多角形を描画するとき、頂点のリストは、[x,y]で示した配列のリスト(配列)を渡す。
+    #引数spriteにto_unitもしくはbitmapメソッドが定義されていない場合は例外が発生する。
+    #_sprite_:: 描画対象のスプライト(to_unitもしくはbitmapメソッドを持つインスタンス)
+    #_points_:: 座標の配列。2要素の整数の配列かPoint構造体を使用
     #_color_:: 描画色。Color.to_rgbメソッドのパラメータでの指定が可能
-    #_attribute_:: 描画の属性。:normalで縁のみ描画、:fillで内部も塗りつぶす
-    #_aa_:: アンチエイリアスの指定。:solidでオフ、:anti_aliasingでオン
+    #_fill_:: 描画の属性。falseで縁のみ描画、trueで内部も塗りつぶす。デフォルトはfalse
+    #_aa_:: アンチエイリアスの指定。trueでオン。デフォルトはfalse
     #返却値:: 自分自身を返す
-    def Drawing.ellipse(bitmap, rect, color, attribute = :normal, aa = :solid)
-      raise MiyakoError, "not have Drawing attribute! #{attribute}" unless @@draw_list[:line].has_key?(attribute)
-      raise MiyakoError, "not have Drawing aaa! #{aa}" unless @@draw_list[:line][:attribute].has_key?(aa)
-      @@draw_list[:ellipse][attribute][aa].call(bitmap, rect.to_a << Color.to_rgb(color))
+    def Drawing.polygon(sprite, points, color, fill = false, aa = false)
     end
   end
 end