cyross-ruby-miyako 2.0.0

data/lib/Miyako/API/movie.rb

@@ -0,0 +1,151 @@
+# -*- 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
+  #==動画管理クラス
+  #動画ファイル(MPEGファイル限定)をロード・再生するクラス
+  class Movie
+    include SpriteBase
+    include Layout
+    extend Forwardable
+
+    @@movie_list = []
+    
+    #===動画のインスタンスを作成する
+    #(但し、現在の所、loopパラメータは利用できない)
+    #_fname_:: 動画ファイル名
+    #_loops_:: ループ再生の可否。ループ再生させるときは true を渡す
+    #返却値:: 生成したインスタンス
+    def initialize(fname, loops = true)
+      init_layout
+
+      @x = 0
+      @y = 0
+      
+      @movie = SDL::MPEG.load(fname)
+      @size = Size.new(@movie.info.width, @movie.info.height)
+      set_layout_size(*(@size.to_a))
+
+      @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]
+    end
+    
+    #===動画再生時の音量を指定する
+    #_v_:: 指定する音量。(0～100までの整数)
+    def set_volume(v)
+      return if v < 0 || v > 100 || $not_use_audio
+      @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 play(vol = nil)
+      set_volume(vol) if vol
+      @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
+
+    #===画面に描画を指示する
+    #現在表示できる選択肢を、現在の状態で描画するよう指示する
+    #--
+    #(但し、実際に描画されるのはScreen.renderメソッドが呼び出された時)
+    #++
+    #返却値:: 自分自身を返す
+    def render
+      @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,154 @@
+# -*- 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
+  #==パーツ構成クラス
+  #複数のスプライト・アニメーションをまとめて一つの部品として構成できるクラス
+  #
+  #最初に、基準となる「レイアウト空間(LayoutSpaceクラスのインスタンス)」を登録し、その上にパーツを加える
+  #
+  #すべてのパーツは、すべてレイアウト空間にスナップされる
+  #(登録したパーツのレイアウト情報が変わることに注意)
+  class Parts
+    include Enumerable
+    include Layout
+    extend Forwardable
+
+    #===Partsクラスインスタンスを生成
+    #_size_:: パーツ全体の大きさ。Size構造体のインスタンスもしくは要素数が2の配列
+    def initialize(size)
+      init_layout
+      set_layout_size(size[0], size[1])
+
+      @parts = {}
+      @parts_list = []
+    end
+
+    #===nameで示した補助パーツを返す
+    #_name_:: 補助パーツに与えた名前(シンボル)
+    #返却値:: 自分自身
+    def [](name)
+      return @parts[name]
+    end
+
+    #===補助パーツvalueをnameに割り当てる
+    #_name_:: 補助パーツに与える名前(シンボル)
+    #_value_:: 補助パーツのインスタンス(スプライト、テキストボックス、アニメーション、レイアウトボックスなど)
+    #返却値:: 自分自身
+    def []=(name, value)
+      @parts_list.push(name)
+      @parts[name] = value
+      @parts[name].snap(self)
+      return self
+    end
+
+    #===すべての補助パーツの一覧を配列で返す
+    #返却値:: パーツ名の配列(登録順)
+    def parts
+      return @parts_list
+    end
+
+    #===指定の補助パーツを除外する
+    #_name_:: 除外するパーツ名(シンボル)
+    #返却値:: 自分自身
+    def remove(name)
+      self.delete_snap_child(@parts[name])
+      @parts.delete(name)
+      return self
+    end
+
+    #===メインパーツと補助パーツに対してブロックを評価する
+    #返却値:: 自分自身
+    def each
+      @parts_list.each{|k| yield @parts[k] }
+      return self
+    end
+
+    #===メインパーツと補助パーツのすべてのアニメーションを開始する
+    #返却値:: 自分自身
+    def start
+      self.each{|parts| parts.start }
+      return self
+    end
+
+    #===メインパーツと補助パーツのすべてのアニメーションを停止する
+    #返却値:: 自分自身
+    def stop
+      self.each{|parts| parts.stop }
+      return self
+    end
+
+    #===メインパーツと補助パーツのすべてのアニメーションを更新する(自動実行)
+    #返却値:: 自分自身
+    def update_animation
+      self.each{|parts| parts.update_animation }
+    end
+
+    #===メインパーツと補助パーツのすべてのアニメーションを、最初のパターンに巻き戻す
+    #返却値:: 自分自身
+    def reset
+      self.each{|parts| parts.reset }
+      return self
+    end
+
+    #===メインパーツと補助パーツのすべてのアニメーションを更新する(自動実行)
+    #返却値:: 自分自身
+    def update
+      self.update_animation
+      return self
+    end
+
+    #===スプライトに変換した画像を表示する
+    #すべてのパーツを貼り付けた、１枚のスプライトを返す
+    #返却値:: 描画したスプライト
+    def to_sprite
+      rect = self.broad_rect
+      sprite = Sprite.new(:size=>rect.to_a[2,2], :type=>:ac)
+      self.render_to(sprite){|sunit, dunit| sunit.x -= rect.x; sunit.y -= rect.y }
+      return sprite
+    end
+
+    #===現在の画面の最大の大きさを矩形で取得する
+    #各パーツの位置により、取得できる矩形の大きさが変わる
+    #但し、パーツ未登録の時は、インスタンス生成時の大きさから矩形を生成する
+    #返却値:: 生成された矩形(Rect構造体のインスタンス)
+    def broad_rect
+      rect = self.rect.to_a
+      return self.rect if @parts_list.length == 0
+      rect_list = rect.zip(*(self.map{|parts| parts.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
+      @parts_list.clear
+      @parts_list = nil
+      @parts.clear
+      @parts = nil
+    end
+  end
+end

data/lib/Miyako/API/plane.rb

@@ -0,0 +1,131 @@
+# -*- 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
+  #==プレーン(画面いっぱいにタイル表示される画像)を表現するクラス
+  class Plane
+    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)
+    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
+
+    #===画像の表示矩形を取得する
+    #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.screen.w && u.y + u.oh <= Screen.screen.h
+        }
+      }
+      return self
+    end
+    
+    def Plane::resize #:nodoc:
+      @@planes.each{|p| p.resize }
+      return nil
+    end
+
+    def_delegators(:sprite)
+  end
+end

data/lib/Miyako/API/screen.rb

@@ -0,0 +1,257 @@
+# -*- 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
+
+require 'singleton'
+
+module Miyako
+  #プログラムで使用する色深度を示す。デフォルトは現在システムが使用している色深度
+  $miyako_bpp ||= SDL.video_info.bpp
+  #色深度が32ビット以外の時はエラーを返す
+  raise MiyakoError, "Unsupported Color bits! : #{$miyako_bpp}" unless [32].include?($miyako_bpp)
+
+  #==画面管理モジュール
+  module Screen
+    #デフォルトの画面解像度(幅)
+    DefaultWidth = 640
+    #デフォルトの画面解像度(高さ)
+    DefaultHeight = 480
+    #Miyakoで使用する色深度
+    BPP = $miyako_bpp
+    #fpsの最大値(1000fps)
+    FpsMax = 1000
+    #画面モードの数(ウインドウモード、フルスクリーンモード)
+    WINMODES = 2
+    #ウインドウモードを示す値
+    WINDOW_MODE = 0
+    #フルスクリーンモードを示す値
+    FULLSCREEN_MODE = 1
+
+    #ウインドウモード・フルスクリーンモードを切り替える際のフラグを示す配列
+    ScreenFlag = Array.new
+    ScreenFlag.push(SDL::HWSURFACE | SDL::DOUBLEBUF | SDL::ANYFORMAT)
+    ScreenFlag.push(SDL::ANYFORMAT | SDL::FULLSCREEN)
+    
+    def Screen::get_fps_count
+      return @@fps == 0 ? 0 : FpsMax / @@fps
+    end
+
+    @@fps = 0 # fps=0 : no-limit
+    @@fpsView = false
+    @@fpscnt = Screen::get_fps_count
+    @@interval = 0
+    @@min_interval = 3
+    @@min_interval_r = @@min_interval / 1000
+    @@t = 0
+    @@freezing  = false
+    @@mode      = WINDOW_MODE
+    @@unit      = SpriteUnitFactory.create
+
+    @@size      = Size.new(DefaultWidth, DefaultHeight)
+    @@in_the_scene = false
+
+    @@screen = nil
+    @@viewport = nil
+    
+    #===画面の状態(ウインドウモードとフルスクリーンモード)を設定する
+    #_v_:: ウィンドウモードのときは、Screen::WINDOW_MODE、 フルスクリーンモードのときはScreen::FULLSCREEN_MODE
+    def Screen::set_mode(v)
+      if v.to_i == WINDOW_MODE || v.to_i == FULLSCREEN_MODE
+        @@mode = v.to_i
+        Screen::check_mode_error
+      end
+    end
+
+    #===ウインドウモードとフルスクリーンモードを切り替える
+    def Screen::toggle_mode
+      @@mode = (@@mode + 1) % WINMODES
+      Screen::check_mode_error
+    end
+
+    def Screen::fps # :nodoc:
+      return @@fps
+    end
+
+    def Screen::fps=(val) # :nodoc:
+      @@fps = val
+      @@fpscnt = @@fps == 0 ? 0 : Screen::get_fps_count
+    end
+
+    def Screen::fps_view # :nodoc:
+      return @@fpsView
+    end
+
+    def Screen::fps_view=(val) # :nodoc:
+      @@fpsView = val
+    end
+
+    #===画面を管理するインスタンスを取得する
+    #返却値:: 画面インスタンス(SDL::Screenクラスのインスタンス)
+    def Screen::screen
+      return @@screen
+    end
+
+    #===画面の幅を取得する
+    #返却値:: 画面の幅(ピクセル)
+    def Screen::w
+      return @@size[0]
+    end
+
+    #===画面の高さを取得する
+    #返却値:: 画面の高さ(ピクセル)
+    def Screen::h
+      return @@size[1]
+    end
+
+    #===画面を管理するSpriteUnitを取得する
+    #返却値:: SpriteUnitインスタンス
+    def Screen::to_unit
+      return @@unit.dup
+    end
+
+    #===画像の回転・拡大・縮小の中心座標を取得する
+    #x方向の中心座標を取得する
+    #返却値:: 中心座標。
+    def Screen::center_x
+      return @@unit.cx
+    end
+
+    #===画像の回転・拡大・縮小の中心座標を取得する
+    #x方向の中心座標を取得する
+    #_pos_:: 中心座標
+    def Screen::center_x=(pos)
+      @@unit.cx = pos
+    end
+
+    #===画像の回転・拡大・縮小の中心座標を取得する
+    #y方向の中心座標を取得する
+    #返却値:: 中心座標。
+    def Screen::center_y
+      return @@unit.cy
+    end
+
+    #===画像の回転・拡大・縮小の中心座標を取得する
+    #y方向の中心座標を取得する
+    #_pos_:: 中心座標
+    def Screen::center_y=(pos)
+      @@unit.cy = pos
+    end
+
+    #===現在の画面の大きさを矩形で取得する
+    #返却値:: 画像の大きさ(Rect構造体のインスタンス)
+    def Screen::rect
+      return Rect.new(*([0, 0]+@@size.to_a))
+    end
+
+    #===現在の画面の最大の大きさを矩形で取得する
+    #但し、Screenの場合は最大の大きさ=画面の大きさなので、rectと同じ値が得られる
+    #返却値:: 画像の大きさ(Rect構造体のインスタンス)
+    def Screen::broad_rect
+      return Screen.rect
+    end
+
+    #===現在のビューポート(表示区画)を取得する
+    #ビューポートの設定は、Viewport#renderで行う
+    #返却値:: ビューポート(Viewportクラスのインスタンス)
+    def Screen::viewport
+      return @@viewport
+    end
+
+    #===現在の画面の大きさを取得する
+    #返却値:: 画像の大きさ(Size構造体のインスタンス)
+    def Screen::size
+      return @@size.dup
+    end
+
+    def Screen::set_screen(f) #:nodoc:
+      return false unless SDL.checkVideoMode(*(@@size.to_a << BPP << f))
+      @@screen = SDL.setVideoMode(*(@@size.to_a << BPP << f))
+      SpriteUnitFactory.apply(@@unit, {:bitmap=>@@screen, :ow=>@@screen.w, :oh=>@@screen.h})
+      @@viewport = Viewport.new(0, 0, @@screen.w, @@screen.h)
+      return true
+    end
+
+    #===画面の大きさを変更する
+    #単位はピクセル単位
+    #_w_:: 画面の幅
+    #_h_:: 画面の高さ
+    #返却値:: 変更に成功したときは trueを返す
+    def Screen::set_size(w, h)
+      return false unless SDL.checkVideoMode(w, h, BPP, ScreenFlag[@@mode])
+      @@size = Size.new(w, h)
+      @@screen = SDL.setVideoMode(*(@@size.to_a << BPP << ScreenFlag[@@mode]))
+      SpriteUnitFactory.apply(@@unit, {:bitmap=>@@screen, :ow=>@@screen.w, :oh=>@@screen.h})
+      @@viewport = Viewport.new(0, 0, @@screen.w, @@screen.h)
+      return true
+    end
+
+    def Screen::check_mode_error #:nodoc:
+      unless Screen::set_screen(ScreenFlag[@@mode])
+        print "Sorry, this system not supported display...\n";
+        exit(1)
+      end
+    end
+
+    Screen::check_mode_error
+
+    #===現在表示されている画面を画像(Spriteクラスのインスタンス)として取り込む
+    #_param_:: Spriteインスタンスを生成するときに渡すパラメータ(但し、:sizeと:typeのみ使用する)
+    #_rect_:: 取り込む画像の矩形(4要素の配列もしくはRect構造体のインスタンス)
+    #デフォルトは画面の大きさ
+    #返却値:: 取り込んだ画像を含むSpriteクラスのインスタンス
+    def Screen::capture(param, rect = ([0, 0] + @@size.to_a))
+      param = param.dup
+      param[:size] = Size.new(*(rect[2..3]))
+      dst = Sprite.new(param)
+      SDL.blit_surface(*([@@screen] + rect.to_a << dst.bitmap << 0 << 0))
+      return dst
+    end
+
+    #===現在表示されている画面を複製し、Spriteクラスのインスタンスとして取得
+    #Screen.captureとの違いは、パラメータ・サイズは不変(画面の大きさで複製)で取り扱う。
+    #
+    #_param_:: Spriteインスタンスを生成するときに渡すパラメータ(但し、:sizeと:typeのみ使用する)
+    #_rect_:: 取り込む画像の矩形(4要素の配列もしくはRect構造体のインスタンス)
+    #デフォルトは画面の大きさ
+    #返却値:: 取り込んだ画像を含むSpriteクラスのインスタンス
+    def Screen::to_sprite
+      param[:size] = Size.new(*(rect[2..3]))
+      dst = Sprite.new(param)
+      Bitmap.screen_to_ac!(Screen, dst)
+      return dst
+    end
+
+    #===画像を消去する
+    #画像を黒色([0,0,0,0])で塗りつぶす
+    def Screen::clear
+      @@screen.fillRect(0, 0, @@screen.w, @@screen.h, [0, 0, 0, 0])
+    end
+    
+    #===画面を更新する
+    #描画した画面を、実際にミニ見える形に反映させる
+    #呼び出し時に画面の消去は行われないため、明示的にScreen.clearメソッドを呼び出す必要がある
+    def Screen::render
+      Shape.text({:text => (FpsMax/(@@interval == 0 ? 1 : @@interval)).to_s() + " fps", :font => Font.sans_serif}).render  if @@fpsView
+      Screen::update_tick
+      @@screen.flip
+    end
+  end
+end