cyross-ruby-miyako 2.0.0 → 2.0.5.1.0

data/sample/Room3/room3.rb

@@ -1,3 +1,4 @@
+# -*- encoding: utf-8 -*-
 #! /usr/bin/ruby
 # Sample Adventure "Room 3"
 

data/sample/Room3/title.rb

@@ -1,3 +1,4 @@
+# -*- encoding: utf-8 -*-
 class Title
   include Story::Scene
 
@@ -37,7 +38,7 @@ class Title
   end
 
   def waiting
-    if Input.pushed_any?
+    if Input.pushed_any? || Input.click?(:left)
       @exec = self.method(:view_out)
       @visible = false
     end
@@ -71,17 +72,21 @@ class TitleCall
   include MainComponent
 
   def init
-    @yuki = Yuki.new
-    @yuki.select_textbox(message_box[:box])
+    @yuki = Yuki.new(message_box[:box]){|box|
+      select_textbox(box)
+    }
     @man = Sprite.new(:file=>"image/start.png", :type=>:ck)
     @man.center.bottom
+    @alpha = 0.0
     @wait = WaitCounter.new(0.2)
     @exec = self.method(:view_in)
   end
 
   def setup
-    @yuki.setup
-    @man.alpha = 0
+    @yuki.setup(plot){|plot|
+      select_plot(plot)
+    }
+    @yuki.vars[:next] = MainScene
     @wait.start
   end
 
@@ -90,14 +95,20 @@ class TitleCall
     return @exec.call
   end
   
+  def final
+    message_box.stop
+  end
+  
   def view_in
     if @wait.finish?
-      if @man.alpha == 255
-        @yuki.start_plot(self.method(:plot))
+      if @alpha == 1.0
+        @yuki.start_plot
         @exec = self.method(:exec_yuki)
+        message_box.start
         return @now
       end
-      @man.alpha += 15
+      @alpha += 0.15
+      @alpha = 1.0 if @alpha >= 1.0
       @wait.start
     end
     return @now
@@ -109,63 +120,65 @@ class TitleCall
     return @yuki.result ? @yuki.result : @now
   end
   
-  def plot(yuki)
-    yuki.text("「レディ〜ス　エ〜ン　ジェントルメ〜ン！」").pause.cr
-    yuki.text("「本日も、視聴者参加バラエティー").cr
-    yuki.text("　『ルーム３』の時間がは〜じまりま〜した〜！」").pause.clear
-    yuki.text("「司会はわたくし、").cr
-    yuki.wait 0.3
-    yuki.text("　サミュエル・ボチボチデンナーが").cr
-    yuki.text("　お送りしま〜す！」").pause.clear
-    yuki.text("「本日も、難関を乗り越え、").cr
-    yuki.text("　豪華賞品をゲットするだけ！").cr
-    yuki.wait 0.5
-    yuki.text("　カンタン！」").pause.clear
-    yuki.text("「ルールもカンタン！").cr
-    yuki.text("　３つの部屋にいる住人からヒントを得て、").pause.cr
-    yuki.text("　合言葉を見つけるだけ！").cr
-    yuki.wait 0.5
-    yuki.text("　ほら、カンタンでしょ？」").pause.clear
-    yuki.text("「でも、これらの部屋にいる住人、").cr
-    yuki.text("　一筋縄じゃ合い言葉を教えてくれない。").cr
-    yuki.wait 0.5
-    yuki.text("　いろいろ話して、").cr
-    yuki.text("　合い言葉をゲットしてくれ！」").pause.clear
-    yuki.text "「さぁ、最初の挑戦者だ。"
-    yuki.wait 0.5
-    yuki.text "お名前は？"
-    yuki.wait 1.5
-    yuki.cr
-    yuki.text "　・・・おおー、元気いいねー！"
-    yuki.wait 0.5
-    yuki.cr
-    yuki.text "　じゃあ、どっから来たの？"
-    yuki.wait 1.0
-    yuki.cr
-    yuki.text("　・・・オーケイ、よくできました！」").pause.clear
-    yuki.text "「じゃ、ルールは分かるよね？"
-    yuki.wait 0.5
-    yuki.cr
-    yuki.text "　・・・よし」"
-    yuki.pause.clear
-    yuki.text "「ドキドキするねぇ、"
-    yuki.wait 0.5
-    yuki.cr
-    yuki.text "　ワクワクするねぇ"
-    yuki.pause.cr
-    yuki.text "　それじゃ、元気よく、"
-    yuki.cr
-    yuki.text "　目の前のドアから入ってみよう。」"
-    yuki.pause.clear
-    yuki.text "「よーい、"
-    yuki.wait 0.5
-    yuki.text "スタート！」"
-    yuki.pause.clear
-    return MainScene
+  def plot
+    yuki_plot do
+      text("「レディ〜ス　エ〜ン　ジェントルメ〜ン！」").pause.cr
+      text("「本日も、視聴者参加バラエティー").cr
+      text("　『ルーム３』の時間がは〜じまりま〜した〜！」").pause.clear
+      text("「司会はわたくし、").cr
+      wait 0.3
+      text("　サミュエル・ボチボチデンナーが").cr
+      text("　お送りしま〜す！」").pause.clear
+      text("「本日も、難関を乗り越え、").cr
+      text("　豪華賞品をゲットするだけ！").cr
+      wait 0.5
+      text("　カンタン！」").pause.clear
+      text("「ルールもカンタン！").cr
+      text("　３つの部屋にいる住人からヒントを得て、").pause.cr
+      text("　合言葉を見つけるだけ！").cr
+      wait 0.5
+      text("　ほら、カンタンでしょ？」").pause.clear
+      text("「でも、これらの部屋にいる住人、").cr
+      text("　一筋縄じゃ合い言葉を教えてくれない。").cr
+      wait 0.5
+      text("　いろいろ話して、").cr
+      text("　合い言葉をゲットしてくれ！」").pause.clear
+      text "「さぁ、最初の挑戦者だ。"
+      wait 0.5
+      text "お名前は？"
+      wait 1.5
+      cr
+      text "　・・・おおー、元気いいねー！"
+      wait 0.5
+      cr
+      text "　じゃあ、どっから来たの？"
+      wait 1.0
+      cr
+      text("　・・・オーケイ、よくできました！」").pause.clear
+      text "「じゃ、ルールは分かるよね？"
+      wait 0.5
+      cr
+      text "　・・・よし」"
+      pause.clear
+      text "「ドキドキするねぇ、"
+      wait 0.5
+      cr
+      text "　ワクワクするねぇ"
+      pause.cr
+      text "　それじゃ、元気よく、"
+      cr
+      text "　目の前のドアから入ってみよう。」"
+      pause.clear
+      text "「よーい、"
+      wait 0.5
+      text "スタート！」"
+      pause.clear
+      vars[:next]
+    end
   end
 
   def render
-    @man.render
+    Bitmap.dec_alpha(@man, Screen, @alpha)
     message_box.render if @exec == self.method(:exec_yuki)
   end
 end

data/sample/ball_action_sample.rb

@@ -0,0 +1,204 @@
+# encoding: utf-8
+# 自由落下運動サンプル
+# 2009.4.19 Cyross Makoto
+
+require 'Miyako/miyako'
+
+include Miyako
+
+# 基本オブジェクト
+class Obj
+  include Layout
+
+  attr_reader :collision, :position
+
+  def initialize(size)
+    init_layout
+    set_layout_size(*size.to_a)
+  
+    # スプライトの生成
+    @sprite = Sprite.new(size: size, type: :ac)
+    
+    # コリジョンの生成
+    @collision = Collision.new(Rect.new(0, 0, *size.to_a))
+    
+    # 位置情報の生成
+    @position = Point.new(0, 0)
+  end
+
+  def update_layout_position
+    # 画像はマージンが掛かっている可能性があるため、
+    # 補正を掛けておく
+    @sprite.move(@layout.pos[0]-@position[0],
+                 @layout.pos[1]-@position[1])
+    @position.move_to(*@layout.pos.to_a)
+  end
+  
+  # スプライトとコリジョン間でマージンを設定
+  def margin(dx, dy)
+    @sprite.move(dx, dy)
+    return self
+  end
+
+  # 衝突判定
+  def collision?(col, pos)
+    return @collision.collision?(@position, col, pos)
+  end
+
+  # 画面へ描画
+  def render
+    @sprite.render
+  end
+end
+
+# ボール
+class Ball < Obj
+  V0 = [4.0, 6.0, 8.0, 12.0].cycle
+  VX = [1, -1].cycle
+  G = 9.8
+
+  # 初速度の取得
+  attr_reader :v0
+  
+  def initialize
+    size = Size.new(32, 32)
+    super(size)
+    Drawing.circle(@sprite,
+                   [size.w/2,size.h/2],
+                   size.w/2,
+                   [255,255,255],
+                   true)
+
+    # ジャンプ中？
+    @jumping = false
+    # y基準位置
+    @by  = 0.0
+    # 元y
+    @oy  = 0.0
+    # 速度
+    @v = 0.0
+    # 初速度
+    @v0 = 0.0
+    # 時間
+    @t = 0.0
+    # 時間刻み
+    @dt = 0.01
+    # 床の跳ね返り係数
+    # 0.9や0.8にすると永遠に跳ねる
+    @e = 0.5
+    # 拡大率
+    @zoom = 1.0 / @dt
+    # ウェイト
+    @wait  = WaitCounter.new(@dt)
+  end
+
+  # ボールの更新
+  # 床(floor)を引数に取る
+  def update(floor)
+    if @jumping
+      # 放物運動の公式より。
+      # 当たり判定のテストも兼ねていることから、
+      # 整数単位の値が必要だったため、時間刻みを元に値を拡大している
+      y = (@v0 * @t - G * (@t ** 2) / 2) * @zoom
+      # 移動量の算出
+      dy = y - @oy
+      # 床とぶつかる？
+      # 移動範囲を作成
+      rect = Rect.new(@position.x,
+                      @position.y,
+                      1, -dy)
+      # 所定の間隔で床と衝突判定
+      if Utility.product_liner_f(rect, floor.h).any?{|pos|
+        @collision.collision?(pos,
+                              floor.collision,
+                              floor.position)
+      }
+        # 床にぶつかれば跳ね返る
+        self.move_to(self.x, @by)
+        # 跳ね返り時の速度を求める。
+        # 実数にすると何故か永遠にはねるため、整数化して強制的に値を少なくしている
+        @v0 = -((@v0 - G * @t) * @e).to_i
+        @t = @dt
+        @oy = 0.0
+        @wait.start
+      elsif @wait.finish?
+        # ぶつからなければ移動
+        self.move_to(self.x, @by - y.to_i)
+        @t = @t + @dt
+        @oy = y
+        @wait.start
+      end
+      # 初速度がゼロ？（止まった？）
+      if @v0 == 0.0
+        # ジャンプの終了
+        @wait.stop
+        @jumping = false
+      end
+    end
+  end
+
+  # 飛び上がれ！
+  def jumpup
+    return if @jumping
+    # y基準位置の決定
+    @by  = self.y.to_f
+    # 初速度の決定
+    @v0 = V0.next
+    @jumping = true
+    @t = @dt
+    @wait.start
+  end
+
+  # ジャンプ中？
+  def jumping?
+    return @jumping
+  end
+end
+
+# 床
+class Floor < Obj
+  def initialize
+    size = Size.new(640, 16)
+    super(size)
+    Drawing.fill(@sprite, [255,64,64])
+  end
+end
+
+# ボールの用意
+@ball = Ball.new
+
+# 床の用意
+@floor = Floor.new
+
+# 床の初期位置設定
+@floor.center.bottom
+
+# ボールの初期位置設定
+@ball.center.bottom{|b| @floor.size.h }
+
+# フォントの用意
+@font = Font.serif
+@font.size = 16
+
+# 情報表示用スプライトの用意
+@speed = Sprite.new(size: Size.new(640, 16), type: :ac)
+@info = Shape.text(font: @font, text: "１ボタンを押せばボールが跳ね上がります")
+@info.snap(@speed).left.outside_bottom
+
+Miyako.main_loop do
+  break if Input.quit_or_escape?
+  @ball.update(@floor)
+  # １ボタンを押した時、ボールのジャンプを始める
+  @ball.jumpup if Input.pushed_any?(:btn1)
+
+  # 初速度表示スプライトの更新
+  @speed.clear!
+  @font.draw_text(@speed, "初速度：#{@ball.v0}", 0, 0)
+
+  # 画面への描画
+  @floor.render
+  @ball.render
+  @speed.render
+  # ジャンプ中でなければ説明を表示
+  @info.render unless @ball.jumping?
+end

data/sample/blit_rop.rb

@@ -0,0 +1,70 @@
+# 画像ビット操作サンプル
+# 2009.4.17 Cyross Makoto
+
+require 'Miyako/miyako'
+
+include Miyako
+
+# 画像が画面をはみ出そうになったら移動量を+-反転
+# spr:: 移動対象のスプライト
+# amt:: 移動量配列
+# 返却値:: 変更した移動量配列
+def turn(spr, amt)
+  amt[0] = -amt[0] if (spr.x + spr.ow) >= Screen.w
+  amt[0] = -amt[0] if spr.x <= 0
+  amt[1] = -amt[1] if (spr.y + spr.oh) >= Screen.h
+  amt[1] = -amt[1] if spr.y <= 0
+  return amt
+end
+
+# マスク画像を作成
+bmask = Sprite.new(:size=>Size.new(100,100), :type=>:ac)
+Drawing.circle(bmask, [50,50], 50, [255,255,255], :fill)
+
+# 描画用スプライトを作成
+spr1 = Sprite.new(:size=>Size.new(100,100), :type=>:ac)
+spr2 = Sprite.new(:size=>Size.new(100,100), :type=>:ac)
+spr3 = Sprite.new(:size=>Size.new(100,100), :type=>:ac)
+
+# 転送元背景を準備
+bk = Sprite.new(:file=>"Animation1/m1ku_back.jpg", :type=>:as)
+text = Sprite.new(:file=>"text.png", :type=>:ac)
+# 表示用背景を準備(元画像を反転)
+bk2 = bk.inverse
+
+spr2.centering
+spr3.right.bottom
+
+# 移動量配列を設定
+@amt1 = [ 4, 4]
+@amt2 = [ 4,-4]
+@amt3 = [-4,-4]
+
+# Main Routine
+Miyako.main_loop do
+  break if Input.quit_or_escape?
+  # マスク画像の転送
+  bmask.render_to(spr1)
+  bk.render_to(spr2){|src, dst| src.ox = spr2.x; src.oy = spr2.y}
+  bk2.render_to(spr3){|src, dst| src.ox = spr3.x; src.oy = spr3.y}
+  # 元画像をandして描画用スプライトへ転送
+  spr1.and!(bk){|src, dst| src.ox = spr1.x; src.oy = spr1.y}
+  # 元画像をorして描画用スプライトへ転送
+  spr2.or!(text)
+  # 元画像をxorして描画用スプライトへ転送
+  spr3.xor!(text)
+  
+  # 画像を画面に描画
+  bk2.render
+  spr1.render
+  spr2.render
+  spr3.render
+  # スプライトの移動
+  spr1.move(*@amt1)
+  spr2.move(*@amt2)
+  spr3.move(*@amt3)
+  # 画像が画面をはみ出そうになったら移動量を+-反転
+  @amt1 = turn(spr1, @amt1)
+  @amt2 = turn(spr2, @amt2)
+  @amt3 = turn(spr3, @amt3)
+end