ruby-miyako-mswin32 2.1.0

data/sample/Animation1/readme.txt

@@ -0,0 +1,72 @@
+*******************************************************************************
+�y   ��Җ�   �z�@�T�C���X��
+�y  �\�t�g��  �z�@Miyako v2.0�T���v��(�A�j���[�V�����P)
+�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 v2.0�ȍ~�ɑΉ�����AMiyako�T���v���v���O�����ł��B
+�@�ǂ����Ō������Ƃ���悤�Ȗ����悤�ȃL�����N�^�[���A����l�M��U���Ă��܂��B
+
+�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�um1ku.rb�v��
+�_�u���N���b�N���܂��B
+�@�������́A�R�}���h���C����œ������ꍇ�́A�{�T���v���̃f�B���N�g����
+�ړ����āA�ȉ��̃R�}���h����͂��܂��B
+
+�@ruby m1ku.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
+
+�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/Animation2/lex.rb

@@ -0,0 +1,96 @@
+# -*- encoding: utf-8 -*-
+#! /usr/bin/ruby
+# Lex sample for Miyako v2.0
+# 2008.11.24 Cyross Makoto
+
+require 'Miyako/miyako'
+
+include Miyako
+
+def create_wheel(num)
+  spr = Sprite.new({:file=>sprintf("lex_wheel_#{num}.png"), :type=>:ck})
+  spr.move_to!(317, 331)
+  return spr
+end
+
+
+back = Plane.new({:file=>sprintf("lex_back.png"), :type=>:as})
+back_timer = WaitCounter.new(0.1)
+
+title = Sprite.new({:file=>sprintf("song_title.png"), :type=>:ck})
+pos = Screen.h
+upper = 24
+x = 24
+title.move_to!(x, pos)
+title_timer = WaitCounter.new(2)
+interval = 8
+mode = 0
+
+len_body = Sprite.new({:file=>sprintf("lex_body.png"), :type=>:ck})
+len_body.move_to!(425, 219)
+
+len_anim_param = { 
+  :sprite => len_body,
+  :wait => 0.1,
+  :move_offset => [[0,0], [0,-1], [0,0], [0,1]]
+}
+len_anim = SpriteAnimation.new(len_anim_param)
+len_anim.start
+
+road_roller = Sprite.new({:file=>sprintf("lex_roadroller.png"), :type=>:ck})
+road_roller.move_to!(310, 180)
+
+rr_anim_param = { 
+  :sprite => road_roller,
+  :wait => 0.1,
+  :move_offset => [[0,0], [0,1], [0,0], [0,-1]]
+}
+rr_anim = SpriteAnimation.new(rr_anim_param)
+rr_anim.start
+
+wheels = Array.new
+(0..2).each{|n| wheels.push(create_wheel(n)) }
+wheel_anim_param = {
+  :sprite => wheels,
+  :wait => 0.1,
+  :pattern_list => [0, 1, 2, 1]
+}
+wheel_anim = SpriteAnimation.new(wheel_anim_param)
+wheel_anim.start
+
+back_timer.start
+title_timer.start
+Miyako.main_loop do
+  break if Input.quit_or_escape?
+  len_anim.update_animation
+  rr_anim.update_animation
+  wheel_anim.update_animation
+  if back_timer.finish?
+    back.move!(-2, 0)
+    back_timer.start
+  end
+  if title_timer.finish?
+    case mode
+    when 0
+      mode = 1
+      title_timer = WaitCounter.new(0.1)
+      title_timer.start
+    when 1
+      pos -= interval
+      if pos <= upper
+        pos = upper
+        mode = 2
+      else
+        title_timer.start
+      end
+      title.move_to!(x, pos)
+    when 2
+      # no operation
+    end
+  end
+  back.render
+  wheel_anim.render
+  len_anim.render
+  rr_anim.render
+  title.render if mode > 0
+end

data/sample/Animation2/readme.txt

@@ -0,0 +1,72 @@
+*******************************************************************************
+�y   ��Җ�   �z�@�T�C���X��
+�y  �\�t�g��  �z�@Miyako v2.0�T���v��(�A�j���[�V�����Q)
+�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 v2.0�ȍ~�ɑΉ�����AMiyako�T���v���v���O�����ł��B
+�@�ǂ����Ō������Ƃ���悤�Ȗ����悤�ȃL�����N�^�[���A���[�h���[���[���^�]���Ă��܂��B
+
+�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�um1ku.rb�v��
+�_�u���N���b�N���܂��B
+�@�������́A�R�}���h���C����œ������ꍇ�́A�{�T���v���̃f�B���N�g����
+�ړ����āA�ȉ��̃R�}���h����͂��܂��B
+
+�@ruby lex.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
+
+�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/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)