cyross-ruby-miyako 2.0.0

data/sample/Animation1/m1ku.rb

@@ -0,0 +1,89 @@
+#! /usr/bin/ruby
+# M1ku sample for Miyako v2.0
+# 2008.11.30 Cyross Makoto
+
+require 'Miyako/miyako'
+include Miyako
+
+#Screen.fps_view = true
+
+def create_arm(num)
+  spr = Sprite.new({:file=>sprintf("m1ku_arm_#{num}.png"), :type=>:ck})
+  spr.move_to(30, 70)
+  return spr
+end
+
+def create_eye(num)
+  spr = Sprite.new({:file=>sprintf("m1ku_eye_#{num}.png"), :type=>:ck})
+  spr.move_to(356, 114)
+  return spr
+end
+
+bk = Sprite.new({:file=>"m1ku_back.jpg", :type=>:as})
+back = bk.to_sprite
+back.fill([0,0,0])
+
+body = Sprite.new({:file=>"m1ku_body.png", :type=>:ck})
+body.move_to(200, 64)
+
+hair_f = Sprite.new({:file=>"m1ku_hair_front.png", :type=>:ck})
+hair_f.move_to(200, 24)
+
+hair_r = Sprite.new({:file=>"m1ku_hair_rear.png", :type=>:ck})
+hair_r.move_to(200, 24)
+
+arms = Array.new
+(0..3).each{|n| arms.push(create_arm(n)) }
+arm_anim_param = { 
+  :sprite=> arms,
+  :wait => 0.1,
+  :pattern_list => [0, 1, 2, 3, 2, 1]
+}
+arm_anim = SpriteAnimation.new(arm_anim_param)
+arm_anim.start
+
+eyes = Array.new
+(0..3).each{|n| eyes.push(create_eye(n)) }
+eye_anim_param = { 
+  :sprite => eyes,
+  :wait => [4.5, 0.1, 0.1, 0.1, 0.1, 0.1],
+  :pattern_list => [0, 1, 2, 3, 2, 1]
+}
+eye_anim = SpriteAnimation.new(eye_anim_param)
+eye_anim.start
+
+rate = 1.0
+amt = -0.1
+degree = 0
+damt = 10
+pos  = 0
+rate = 10
+
+
+# Main Routine
+Miyako.main_loop do
+  break if Input.quit_or_escape?
+  back.render
+#  back.render{|src|
+#    src.x = pos
+#    pos += rate
+#    rate = -10 if pos == 50
+#    rate = 10 if pos == 0
+#  }
+  hair_r.render
+  arm_anim.update_animation
+  arm_anim.render
+  body.render
+  eye_anim.update_animation
+  eye_anim.render
+  hair_f.render
+  back.fill([0,0,0])
+  Bitmap.hue!(bk.to_unit, back.to_unit, degree)
+  degree = (degree + damt) % 360
+#  Bitmap.dec_alpha!(bk.to_unit, back.to_unit, rate, 0, 0)
+#  rate += amt
+#  rate = 0.0 if rate < 0.01
+#  amt = 0.1 if rate == 0.0
+#  rate = 1.0 if rate > 0.99
+#  amt = -0.1 if rate == 1.0
+end

data/sample/Animation1/readme.txt

@@ -0,0 +1,72 @@
+*******************************************************************************
+�y   ��Җ�   �z�@�T�C���X��
+�y  �\�t�g��  �z�@Miyako v1.4.4�T���v��(�A�j���[�V�����P)
+�y �o�[�W���� �z�@1.0
+�y   �쐬��   �z�@2008/01/14
+�y    ���    �z�@�t���[�E�F�A
+�y  �J������  �z�@Ruby 1.8.6-p111
+�y �����^�C�� �z�@Miyako v1.4.4
+�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 v1.4.4�ȍ~�ɑΉ�����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,95 @@
+#! /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 v1.4.4�T���v��(�A�j���[�V�����Q)
+�y �o�[�W���� �z�@1.0
+�y   �쐬��   �z�@2008/01/14
+�y    ���    �z�@�t���[�E�F�A
+�y  �J������  �z�@Ruby 1.8.6-p111
+�y �����^�C�� �z�@Miyako v1.4.4
+�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 v1.4.4�ȍ~�ɑΉ�����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,283 @@
+#! /usr/bin/ruby
+# Diagram sample for Miyako v2.0
+# 2008.11.23 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 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 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(chr1, chr2, wait)
+    @pr = {}
+    @pr[:fast] = Diagram::Processor.new{|dia|
+      dia.add :scroll, MoveFaster.new(chr1), WaitTrigger.new(wait)
+      dia.add_arrow(:scroll, nil)
+    }
+    
+    @pr[:slow] = Diagram::Processor.new{|dia|
+      dia.add :scroll, MoveSlower.new(chr2), 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| r &= @pr[k].finish? } # アニメーション処理が終了するまで繰り返し    
+  end
+
+  def stop
+    @pr.keys.each{|k| @pr[k].stop }
+  end
+  
+  def finish?
+    return @finished
+  end
+end
+
+# Yukiプロット実行
+class StartPlot
+  include Diagram::NodeBase
+  
+  def initialize(manager)
+    @manager = manager
+    @finished = false
+  end
+
+  def start
+  end
+
+  def update
+    @manager.start
+    @finished = true
+  end
+
+  def stop
+  end
+  
+  def finish?
+    return @finished
+  end
+end
+
+# Yukiプロット実行
+class Plotting
+  include Diagram::NodeBase
+  
+  def initialize(manager, set_wait)
+    @manager = manager
+    @set = set_wait
+    @finished = false
+  end
+
+  def start
+  end
+
+  def update
+    @finished = !(@manager.executing?)
+  end
+
+  def update_input
+    @set.call(0.0) if Input.pushed_any?(:btn1) # １ボタンを押したら、表示途中のメッセージをすべて表示
+    @manager.update_input
+  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])
+    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)
+    @y_manager = @yuki.manager(@yuki.to_plot(self, :plot), false, true)
+    
+    @c1 = Sprite.new(:file=>"chr01.png", :type=>:ac).bottom
+    @c2 = Sprite.new(:file=>"chr02.png", :type=>:ac).bottom
+    @bk = Sprite.new(:file=>"back.png", :type=>:as).centering
+
+    
+    @pr = Diagram::Processor.new{|dia|
+      dia.add :move,  Moving.new(@c1, @c2, 0.01)
+      dia.add :start, StartPlot.new(@y_manager)
+      dia.add :plot,  Plotting.new(@y_manager, 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
+    @yuki.select_textbox(@box)
+  end
+  
+  def update
+    return nil if Input.quit_or_escape?
+    @pr.update_input
+    @parts.update_animation
+    return nil if @pr.finish?
+    return @now
+  end
+  
+  def render
+    @bk.render
+    @c1.render
+    @c2.render
+    @parts.render if @y_manager.executing?
+  end
+  
+  def plot(yuki)
+    yuki.text "「ねえ、あんたの担当のセリフ、ちゃんと覚えてるわよねぇ？"
+    yuki.cr
+    unless @wait == 0
+      yuki.pause
+      reset_wait 
+    end
+    yuki.text "　まさか、忘れてたなんて言わないわよねぇ？」"
+    yuki.cr
+    yuki.pause
+    reset_wait
+    yuki.clear
+    yuki.color(:red){
+      yuki.text "「そんなことないよぉ～"
+      yuki.cr
+      yuki.pause
+      reset_wait
+      yuki.text "　ちゃんと覚えてるよぉ～」"
+      yuki.cr
+    }
+    yuki.pause
+    reset_wait
+  end
+  
+  def update_text(yuki)
+    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)