ruby-miyako 2.1.0

data/sample/Diagram_sample/diagram_sample_yuki2.rb

@@ -0,0 +1,329 @@
+# -*- encoding: utf-8 -*-
+#! /usr/bin/ruby
+# Diagram sample for Miyako v2.0
+# 2009.1.16 Cyross Makoto
+
+require 'Miyako/miyako'
+
+include Miyako
+
+# 移動が遅いスクロール
+class MoveSlower
+  include Diagram::NodeBase
+  
+  def initialize(spr)
+    @spr = spr
+    @finish = false # 終了フラグ
+  end
+  
+  def start
+    @spr.move_to!(640, @spr.y) # 画面を出たところまで移動
+  end
+
+  def update
+    @finish = (@spr.x <= 320) # 所定の位置までスクロールさせたら終了
+    return if @finish
+    @spr.move!(-2,0)
+  end
+
+  def render
+    @spr.render
+  end
+  
+  def finish?
+    return @finish
+  end
+end
+
+# 移動が速いスクロール
+class MoveFaster
+  include Diagram::NodeBase
+  
+  def initialize(spr)
+    @spr = spr
+    @finish = false # 終了フラグ
+  end
+  
+  def start
+    @spr.move_to!(640, @spr.y) # 画面を出たところまで移動
+  end
+
+  def update
+    @finish = (@spr.x <= 40) # 所定の位置までスクロールさせたら終了
+    return if @finish
+    @spr.move!(-4,0)
+  end
+
+  def render
+    @spr.render
+  end
+  
+  def finish?
+    return @finish
+  end
+end
+
+class WaitTrigger
+  include Diagram::TriggerBase
+
+  def initialize(wait=0.1)
+    @timer = WaitCounter.new(wait)
+  end
+  
+  def pre_process
+    @timer.start
+  end
+  
+  def update?
+    @timer.finish?
+  end
+  
+  def post_update
+    @timer.start
+  end
+  
+  def post_process
+    @timer.stop
+  end
+end
+
+# 移動アニメーションノード
+class Moving
+  include Diagram::NodeBase
+  
+  def initialize(parts, wait)
+    @parts = parts
+    @pr = {}
+    @pr[:fast] = Diagram::Processor.new{|dia|
+      dia.add :scroll, MoveFaster.new(@parts[:c1]), WaitTrigger.new(wait)
+      dia.add_arrow(:scroll, nil)
+    }
+    
+    @pr[:slow] = Diagram::Processor.new{|dia|
+      dia.add :scroll, MoveSlower.new(@parts[:c2]), WaitTrigger.new(wait)
+      dia.add_arrow(:scroll, nil)
+    }
+
+    @finished = false
+  end
+
+  def start
+    @pr.keys.each{|k| @pr[k].start }
+  end
+
+  def update
+    @finished = @pr.keys.inject(true){|r, k|
+      @pr[k].update
+      r &= @pr[k].finish?
+    } # アニメーション処理が終了するまで繰り返し    
+  end
+
+  def stop
+    @pr.keys.each{|k| @pr[k].stop }
+  end
+  
+  def render
+    @parts[:bk].render
+    # 通常なら。@pr[:fast].render,@pr[:slow].renderが筋だが、
+    # @pr[:fast]が終了すると、renderを呼んでも描画されないため、元の画像を表示する
+    @parts[:c1].render
+    @parts[:c2].render
+  end
+  
+  def finish?
+    return @finished
+  end
+end
+
+# Yukiプロット開始
+class StartPlot
+  include Diagram::NodeBase
+  
+  def initialize(manager, parts, imgs)
+    @manager = manager
+    @parts = parts
+    @imgs = imgs
+    @finished = false
+  end
+
+  def start
+  end
+
+  def update
+    @manager.start_plot
+    @parts.start
+    @finished = true
+  end
+
+  def stop
+  end
+  
+  def render
+    @imgs[:bk].render
+    @imgs[:c1].render
+    @imgs[:c2].render
+  end
+  
+  def finish?
+    return @finished
+  end
+end
+
+# Yukiプロット実行
+class Plotting
+  include Diagram::NodeBase
+  
+  def initialize(manager, parts, imgs, set_wait)
+    @manager = manager
+    @parts = parts
+    @imgs = imgs
+    @set = set_wait
+    @finished = false
+  end
+
+  def start
+  end
+
+  def update
+    @manager.update
+    @parts.update
+    @parts.update_animation
+    @finished = !(@manager.executing?)
+  end
+
+  def update_input
+    @set.call(0.0) if (Input.pushed_any?(:btn1) || Input.click?(:left)) # １ボタンを押すor左クリックしたら、表示途中のメッセージをすべて表示
+  end
+
+  def render
+    @imgs[:bk].render
+    @imgs[:c1].render
+    @imgs[:c2].render
+    @manager.render
+    @parts.render
+  end
+  
+  def stop
+  end
+  
+  def finish?
+    return @finished
+  end
+end
+
+class MainScene
+  include Story::Scene
+
+  TEXTBOX_MARGIN = 16
+  TEXTBOX_BOTTOM = 24
+
+  def init
+    ws = Sprite.new(:file=>"wait_cursor.png", :type=>:ac)
+    ws.oh = ws.ow
+    ws = SpriteAnimation.new(:sprite=>ws, :wait=>0.2, :pattern_list=>[0,1,2,3,2,1])
+		@ws = ws
+    cs = Sprite.new(:file=>"cursor.png", :type=>:ac)
+    cs.oh = cs.ow
+    cs = SpriteAnimation.new(:sprite=>cs, :wait=>0.2, :pattern_list=>[0,1,2,3,2,1])
+    font = Font.sans_serif
+    font.color = Color[:white]
+    font.size = 24
+    @box = TextBox.new(:size=>[20,5], :wait_cursor => ws, :select_cursor => cs, :font => font)
+    @box_bg = Sprite.new(:size => @box.size.to_a.map{|v| v + TEXTBOX_MARGIN}, :type => :ac)
+    @box_bg.fill([0,0,255,128])
+    @parts = Parts.new(@box.size)
+    @parts[:box_bg] = @box_bg
+    @parts[:box] = @box
+    @parts[:box_bg].centering!
+    @parts[:box].centering!
+    @parts.center!.bottom!{ TEXTBOX_BOTTOM }
+
+    @yuki = Yuki.new
+    @yuki.update_text = self.method(:update_text)
+    
+    @imgs = {}
+    @imgs[:c1] = Sprite.new(:file=>"chr01.png", :type=>:ac).bottom!
+    @imgs[:c2] = Sprite.new(:file=>"chr02.png", :type=>:ac).bottom!
+    @imgs[:bk] = Sprite.new(:file=>"back.png", :type=>:as).centering!
+
+    
+    @pr = Diagram::Processor.new{|dia|
+      dia.add :move,  Moving.new(@imgs, 0.01)
+      dia.add :start, StartPlot.new(@yuki, @parts, @imgs)
+      dia.add :plot,  Plotting.new(@yuki, @parts, @imgs, lambda{|w| set_wait(w) })
+      dia.add_arrow(:move, :start){|from| from.finish? }
+      dia.add_arrow(:start, :plot){|from| from.finish? }
+      dia.add_arrow(:plot, nil){|from| from.finish? }
+    }
+
+    @base_wait = 0.1 # ウェイト基本値
+    @wait = @base_wait # ウェイト
+  end
+
+  def setup
+    @pr.start
+    @yuki.setup(@box, plot){|box, pl|
+      select_textbox box
+      select_plot pl
+      select_first_page nil # nil, :page1, :page2が選択可能
+    }
+  end
+  
+  def update
+    return nil if Input.quit_or_escape?
+    @pr.update_input
+    @pr.update
+    return nil if @pr.finish?
+    return @now
+  end
+  
+  def render
+    @pr.render
+  end
+  
+  def plot
+    yuki_plot{
+      text_method :string do
+        page :page1 do
+          text "「ねえ、あんたの担当のセリフ、ちゃんと覚えてるわよねぇ？"
+          cr
+          pause
+          text "　まさか、忘れてたなんて言わないわよねぇ？」"
+        end
+        clear
+        page :page2 do
+          color :red do
+            size 32 do
+              size(24){ "「そんなこと" }
+              text "ない"
+              size(24){ "よぉ～" }
+            end
+            cr
+            pause
+            text "　ちゃんと覚えてるよぉ～」"
+            cr
+          end
+        end
+      end
+    }
+  end
+  
+  def update_text(yuki, ch)
+    yuki.wait @wait # １文字ずつ表示させる
+  end
+
+  def set_wait(wait)
+    @wait = wait
+  end
+
+  def reset_wait
+    @wait = @base_wait
+  end
+  
+  def final
+    @pr.stop
+  end
+end
+
+ds = Story.new
+ds.run(MainScene)

data/sample/Diagram_sample/readme.txt

@@ -0,0 +1,90 @@
+*******************************************************************************
+�y   ��Җ�   �z�@�T�C���X��
+�y  �\�t�g��  �z�@Miyako v2.0�T���v��(�J�ڐ}�`��)
+�y �o�[�W���� �z�@2.0
+�y   �쐬��   �z�@2009/04/13
+�y    ���    �z�@�t���[�E�F�A
+�y  �J������  �z�@Ruby 1.9.1-p0
+�y �����^�C�� �z�@Miyako v2.0
+�y  �Ή��@��  �z�@Windows 2000/XP/Vista�ALinux
+�y   �Ĕz�z   �z�@�C��BSD���C�Z���X�ɂ��
+�y    �]��    �z�@�C��BSD���C�Z���X�ɂ��
+�y�z�[���y�[�W�z�@http://www.twin.ne.jp/~cyross/Miyako/
+�y   �A����   �z�@cyross@po.twin.ne.jp
+*******************************************************************************
+
+�E�T�v
+
+�@���̃v���O�����́AMiyako 2.0�ȍ~�ɑΉ�����AMiyako�T���v���v���O�����ł��B
+�@�L�����N�^�̑��d�X�N���[�����s���܂�(���ꂾ���ł����E�E�E)
+
+�EMiyako�ɂ‚���
+
+�@Miyako�Ɋւ��ẮA�ȉ���URL���Q�l�ɂ��Ă��������B
+http://www.twin.ne.jp/~cyross/Miyako/
+
+�@Miyako(Ruby�ARuby/SDL�܂�)�̃C���X�g�[���Ɋւ��܂��ẮA
+��LURL��H���ē�����A�[�J�C�u���ꂽMiyako���C�u������
+�W�J����ƁAreadme.txt�������܂��̂ŁA����������Q�Ɖ������B
+
+�@�{�T���v���ł́AMiyako��Windows��œ��삷�邱�Ƃ�O��ɂ��Ă��܂��B
+�i�C���X�g�[������Ruby���s�‹���ActiveRuby�ł��邱�Ƃ��O���
+�@���Ă��܂��j
+
+�E�N�����@
+
+�@�G�N�X�v���[���[���J���A�{�T���v���̃t�H���_���ŁA�udiagram_sample.rb�v��
+�_�u���N���b�N���܂��B
+�@�������́A�R�}���h���C����œ������ꍇ�́A�{�T���v���̃f�B���N�g����
+�ړ����āA�ȉ��̃R�}���h����͂��܂��B
+
+�@ruby diagram_sample.rb
+
+�E�Ɛӎ���
+
+�@�{�T���v���͖��ۏ؂ł��B�����{�T���v�����g�p���邱�Ƃɂ��s��E�g���u��
+���N�������Ƃ��Ă��A�����Ȃ�g���u���ɑ΂���ӔC�𕉂�Ȃ����Ƃ��������������B
+
+�@�{�T���v���́A�C��BSD���C�Z���X�Ɋ�Â����]�ځE�Ĕz�z�����‚��܂��B
+
+�@�܂��A�{�T���v���ł́A�w�i�摜�ɁA�w�i�摜�f�ޏW�u�}�E�ʌi�v�̋����摜���g�p���Ă��܂��B
+�@http://naox.cool.ne.jp/bonkai1/
+
+�E�X�V����
+
+�@(1.1)
+�@�E�����S�̂���‚̑J�ڐ}�`���ɂ܂Ƃ߂�(����q�̑J�ڐ}���ł���T���v��)
+�@�EYuki�ɂ�郁�b�Z�[�W�\����lj�
+
+�@(1.2)
+�@�E�J�ڐ}�`���N���X���̏C��
+
+�@(1.2.1)
+�@�ERC3�Œlj�����Yuki::Yuki2�N���X�Ή���diagram_sample_yuki2.rb��lj�
+
+�@(2.0)
+�@�EMiyako2.0�ɑΉ�
+
+�EBSD���C�Z���X��
+
+Copyright (c) 2008, Cyross Makoto
+
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met:
+
+�ERedistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer.
+�ERedistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution.
+�ENeither the name of the Cyross Makoto nor the names of its contributors may be used to endorse or promote products derived from this software without specific prior written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
+LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
+A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
+CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
+PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
+LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

data/sample/Room3/blue.rb

@@ -0,0 +1,297 @@
+# -*- encoding: utf-8 -*-
+class Blue
+  include Story::Scene
+  include MainComponent
+
+  def init
+    @yuki = Yuki.new
+    @yuki.select_textbox(message_box[:box])
+    @yuki.select_commandbox(command_box[:box])
+    @aoyama = Sprite.new(:file => "image/aoyama.png", :type => :ck)
+    @aoyama.center!.bottom!
+    @yuki.regist_parts(:aoyama, @aoyama)
+
+    @room = Sprite.new(:file => "image/room_blue.png", :type => :as)
+    @room.center!.bottom!
+
+    var[:aoyama_aisatsu]        = false if var[:aoyama_aisatsu]        == nil
+    var[:release_aoyama_book]   = false if var[:release_aoyama_book]   == nil
+    var[:search_bookmark]       = false if var[:search_bookmark]       == nil
+    var[:look_video_base]       = false if var[:look_video_base]       == nil
+    var[:get_bookmark]          = false if var[:get_bookmark]          == nil
+    var[:release_akamatsu_book] = false if var[:release_akamatsu_book] == nil
+
+    @yuki.vars[:var] = var
+    @yuki.vars[:main_command] = main_command
+    @yuki.vars[:search_command] = search_command
+    @yuki.vars[:command] = get_command
+    @yuki.vars[:search]  = get_search
+    @yuki.vars[:video2]  = video2
+  end
+
+  def setup
+    @yuki.setup
+    message_box.start
+    command_box.start
+    @yuki.start_plot(plot)
+  end
+
+  def update
+    return nil if Input.quit_or_escape?
+    message_box.update_animation
+    command_box.update_animation
+    @yuki.update
+    r = @yuki.executing? ? @now : @yuki.result
+    if @yuki.is_scenario?(r)
+      @yuki.start_plot(r)
+      r = @now
+    end
+    return r
+  end
+  
+  def render
+    @room.render
+    @yuki.render
+    message_box.render
+    command_box.render if @yuki.selecting?
+  end
+  
+  def get_command
+    return [Yuki::Command.new("挨拶する", nil, lambda{var[:aoyama_aisatsu]==false}, blue2),
+             Yuki::Command.new("辺りを見る", nil, lambda{var[:aoyama_aisatsu]==true}, look_blue),
+             Yuki::Command.new("話す", nil, lambda{var[:aoyama_aisatsu]==true}, talk),
+             Yuki::Command.new("渡す", nil, lambda{var[:aoyama_aisatsu]==true && var[:release_aoyama_book]==true && var[:release_akamatsu_book]==false}, send1),
+             Yuki::Command.new("探す", nil, lambda{var[:search_bookmark]==true && var[:get_bookmark]==false}, search),
+             Yuki::Command.new("戻る", nil, lambda{var[:aoyama_aisatsu]==true}, MainScene)]
+  end
+  
+  def get_search
+    return [Yuki::Command.new("壁", nil, nil, wall),
+             Yuki::Command.new("テレビ", nil, nil, tv),
+             Yuki::Command.new("テレビ台", nil, nil, tv_base),
+             Yuki::Command.new("ビデオデッキ", nil, lambda{var[:look_video_base] == true}, video),
+             Yuki::Command.new("テレビゲーム機", nil, lambda{var[:look_video_base] == true}, tv_game),
+             Yuki::Command.new("ソファー", nil, nil, sofar),
+             Yuki::Command.new("ベッド", nil, nil, bed),
+             Yuki::Command.new("戻る", nil, nil, "ret")]
+  end
+  
+  def plot
+    yuki_plot do
+      text "青の扉から中に入った。"
+      pause.clear
+      show :aoyama
+      text "目の前には"
+      color(:cyan){vars[:var][:aoyama_aisatsu]==true ? "青山くん" : "男の子"}
+      text "が居る。"
+      cr
+      vars[:main_command]
+    end
+  end
+  
+  def main_command
+    yuki_plot do
+      loop do
+        show :aoyama
+        text "どうする？"
+        command vars[:command]
+        clear
+        break select_result if is_scene?(select_result)
+        call_plot(select_result) if is_scenario?(select_result)
+      end
+    end
+  end
+
+  def blue2
+    yuki_plot do
+      text "「オレの名前は"
+      color(:cyan){"青山"}
+      text "。よろしくな」"
+      pause.clear
+      vars[:var][:aoyama_aisatsu]=true
+    end
+  end
+
+  def look_blue
+    yuki_plot do
+      text "部屋の中は整然としている。"
+      pause.cr
+      text "中にはテレビとソファーがあり、"
+      cr
+      text "ゆったりとくつろげるようになっている。"
+      pause.clear
+    end
+  end
+
+  def talk
+    yuki_plot do
+      text "「まぁ、オレはこうやってのんびりするのが"
+      cr
+      text "　好きなんだな。"
+      pause.cr
+      text "　とはいえども、いわゆるニートってやつじゃない。"
+      pause.clear
+      text "　ここには無いが、パソコン使って"
+      cr
+      text "　株の取引やってるわけさ。」"
+      pause.clear
+    end
+  end
+
+  def send1
+    yuki_plot do
+      text "あなたは、みどりさんから受け取っていた本を返した。"
+      pause.clear
+      text "「おお、サンキュ。"
+      pause.cr
+      text "　みどりから受け取ったのか。"
+      pause.cr
+      text "　じゃああんたも、"
+      color(:red){"ブチギレみどり"}
+      text "を見たってわけか。」"
+      pause.clear
+      text "そのとき、どこからともなく声が聞こえた。"
+      wait 0.5
+      cr
+      color(:red){
+        text "『なあぁぁぁんですってぇぇぇぇ"
+        wait 0.5
+        cr
+        text "私のどこがブチ切れてるってぇぇぇ！？』"
+      }
+      pause.cr
+      text "「・・・ほらね。」"
+      pause.clear
+      text "「じゃあ、ついでにオレからも、"
+      pause.cr
+      text "　隣りの赤松さんところへ行って、"
+      pause.cr
+      text "　この本を返してきてくれないかなぁ？"
+      pause.cr
+      text "　頼むよ。」"
+      pause.clear
+      text "　赤松さんの本を受け取った。"
+      pause.clear
+      vars[:var][:release_akamatsu_book] = true
+    end
+  end
+
+  def search
+    yuki_plot do
+      text "「どうぞ」"
+      cr
+      hide :aoyama
+      call_plot(vars[:search_command])
+    end
+  end
+
+  def search_command
+    yuki_plot do
+      loop do
+        text "どこを？"
+        command vars[:search], "ret"
+        clear
+        break if select_result.kind_of?(String) && select_result == "ret"
+        call_plot(select_result) if is_scenario?(select_result)
+      end
+    end
+  end
+
+  def wall
+    yuki_plot do
+      text "壁を調べてみた。"
+      pause.cr
+      text "何もないようだ。"
+      pause.clear
+    end
+  end
+
+  def tv
+    yuki_plot do
+      text "テレビを調べてみた。"
+      pause.cr
+      text "テレビを点けてみた。"
+      pause.cr
+      text "・・・つまらんなぁ、この番組。"
+      pause.clear
+    end
+  end
+
+  def tv_base
+    yuki_plot do
+      text "テレビ台を調べてみた。"
+      pause.cr
+      text "中にはビデオデッキとテレビゲーム機があるようだ。"
+      pause.clear
+      vars[:var][:look_video_base] = true
+    end
+  end
+
+  def video
+    yuki_plot do
+      text "ビデオデッキを調べてみた。"
+      pause.cr
+      text "いわゆるHDDビデオデッキだ。"
+      pause.clear
+      call_plot(vars[:video2]) if vars[:var][:get_bookmark]==false
+    end
+  end
+
+  def video2
+    yuki_plot do
+      text "・・・"
+      wait 0.3
+      text "ン！？　何か挟まってる。"
+      pause.cr
+      text "引っ張り出してみると、"
+      color(:red){"真っ赤な栞"}
+      text "だ。"
+      pause.cr
+      color(:red){"栞"}
+      text "を見つけ出した！"
+      pause.cr
+      text "「良かったなぁ、見つかって。」"
+      pause.clear
+      vars[:var][:get_bookmark] = true
+    end
+  end
+
+  def tv_game
+    yuki_plot do
+      text "テレビゲーム機を調べてみた。"
+      pause.cr
+      text "・・・このゲーム機、対応ゲーム出てる？"
+      pause.clear
+    end
+  end
+
+  def sofar
+    yuki_plot do
+      text "ソファーを調べてみた。"
+      pause.cr
+      text "ふかふかだ。"
+      wait 0.5
+      text "ここで寝そべりたい・・・。"
+      pause.clear
+    end
+  end
+
+  def bed
+    yuki_plot do
+      text "ベッドを調べてみた。"
+      pause.cr
+      text "ソファーより固そうだ。"
+      pause.clear
+    end
+  end
+
+  def final
+    message_box.stop
+    command_box.stop
+  end
+
+  def dispose
+    @aoyama.dispose
+    @room.dispose
+  end
+end