cyross-ruby-miyako-mswin32 2.0.5.1.1 → 2.1.0

data/sample/blit_rop.rb

@@ -1,70 +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
+# 画像ビット操作サンプル
+# 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

data/sample/cairo_sample.rb

@@ -1,25 +1,25 @@
-# encoding: utf-8
-# MiyakoCairoサンプル
-# 2009.4.12 Cyross Makoto
-
-require 'Miyako/miyako'
-require 'Miyako/EXT/miyako_cairo'
-
-sprite = Miyako::Sprite.new(:file=>"Animation2/lex_body.png", :type=>:ck)
-sprite.bitmap.saveBMP("./sample.bmp")
-
-surface = Miyako::MiyakoCairo.to_cairo_surface(sprite)
-surface.write_to_png("./sample.png")
-
-surface = Cairo::ImageSurface.new(Cairo::Format::ARGB32, 320, 240)
-context = Cairo::Context.new(surface)
-
-context.set_source_rgb(1.0, 0.5, 0.8)
-context.fill{
-  context.rectangle(50, 50, 150, 100)
-}
-
-surface.write_to_png("./sample2.png")
-
-sprite = Miyako::MiyakoCairo.to_sprite(surface)
-sprite.bitmap.saveBMP("./sample2.bmp")
+# encoding: utf-8
+# MiyakoCairoサンプル
+# 2009.4.12 Cyross Makoto
+
+require 'Miyako/miyako'
+require 'Miyako/EXT/miyako_cairo'
+
+sprite = Miyako::Sprite.new(:file=>"Animation2/lex_body.png", :type=>:ck)
+sprite.bitmap.saveBMP("./sample.bmp")
+
+surface = Miyako::MiyakoCairo.to_cairo_surface(sprite)
+surface.write_to_png("./sample.png")
+
+surface = Cairo::ImageSurface.new(Cairo::Format::ARGB32, 320, 240)
+context = Cairo::Context.new(surface)
+
+context.set_source_rgb(1.0, 0.5, 0.8)
+context.fill{
+  context.rectangle(50, 50, 150, 100)
+}
+
+surface.write_to_png("./sample2.png")
+
+sprite = Miyako::MiyakoCairo.to_sprite(surface)
+sprite.bitmap.saveBMP("./sample2.bmp")

data/sample/circle_collision_test.rb

@@ -1,62 +1,66 @@
-# encoding: utf-8
-# 円コリジョン(CircleCollision)サンプル
-# 2009.4.25 Cyross Makoto
-
-require 'Miyako/miyako'
-
-include Miyako
-
-Screen.fps = 60
-
-# Utility.in_bounds?引数生成
-def segments(sprite, amounts, idx)
-  [
-   [sprite.pos[idx], sprite.pos[idx] + sprite.size[idx] - 1],
-   [0, Screen.size[idx]],
-   amounts[idx]
-  ]
-end
-
-radius = 16
-size = [32, 32]
-pos = [16, 16]
-sprite1 = Sprite.new({:size=>size, :type=>:as})
-Drawing.circle(sprite1, pos, radius, [255,0,0], true)
-collision1 = CircleCollision.new(pos, radius)
-sprite2 = Sprite.new({:size=>size, :type=>:as})
-Drawing.circle(sprite2, pos, radius, [0,255,0], true)
-collision2 = CircleCollision.new(pos, radius)
-caution = Shape.text({:font => Font.serif }){ text "collision!" }
-
-sprite1.center.move(0, 128)
-sprite2.move_to(176, 0)
-
-amounts = [8, -8]
-
-amount1 = [amounts.sample, amounts.sample]
-amount2 = [amounts.sample, amounts.sample]
-
-Miyako.main_loop do
-  break if Input.quit_or_escape?
-  if collision1.collision?(sprite1.pos, collision2, sprite2.pos)
-    amount1 = [amounts.sample, amounts.sample]
-    amount2 = [amounts.sample, amounts.sample]
-    caution.render
-  end
-  amount1[0] = -amount1[0] unless Utility.in_bounds?(*segments(sprite1, amount1, 0))
-  amount1[1] = -amount1[1] unless Utility.in_bounds?(*segments(sprite1, amount1, 1))
-  amount2[0] = -amount2[0] unless Utility.in_bounds?(*segments(sprite2, amount2, 0))
-  amount2[1] = -amount2[1] unless Utility.in_bounds?(*segments(sprite2, amount2, 1))
-
-  sprite1.move(*amount1)
-  sprite2.move(*amount2)
-
-  sprite1.render
-  sprite2.render
-
-  Font.serif.draw_text(Screen,
-                       "distance = #{collision1.interval(sprite1.pos, collision2, sprite2.pos)}",
-                       0,
-                       Screen.h - Font.serif.line_height
-                      )
-end
+# encoding: utf-8
+# 円コリジョン(CircleCollision)サンプル
+# 2009.4.26 Cyross Makoto
+
+require 'Miyako/miyako'
+
+include Miyako
+
+Screen.fps = 60
+
+AMOUNT_MIN = -8
+AMOUNT_MAX = 8
+
+# Utility.in_bounds?引数生成
+def segments(sprite, amounts, idx)
+  [sprite.segment[idx], Screen.segment[idx], amounts[idx]]
+end
+
+# 移動量の決定
+def get_amount
+  range = AMOUNT_MAX - AMOUNT_MIN
+  [[rand(range)+AMOUNT_MIN,
+    rand(range)+AMOUNT_MIN],
+   [rand(range)+AMOUNT_MIN,
+    rand(range)+AMOUNT_MIN]]
+end
+
+radius = 32
+size = [radius*2, radius*2]
+pos = [radius, radius]
+sprite1 = Sprite.new({:size=>size, :type=>:as})
+Drawing.circle(sprite1, pos, radius, [255,0,0], true)
+collision1 = CircleCollision.new(pos, radius)
+sprite2 = Sprite.new({:size=>size, :type=>:as})
+Drawing.circle(sprite2, pos, radius, [0,255,0], true)
+collision2 = CircleCollision.new(pos, radius)
+caution = Shape.text({:font => Font.serif }){ text "collision!" }
+
+sprite1.move_to!(rand(Screen.w-size[0]), rand(Screen.h-size[1]))
+sprite2.move_to!(rand(Screen.w-size[0]), rand(Screen.h-size[1]))
+
+amount1, amount2 = get_amount
+
+Miyako.main_loop do
+  break if Input.quit_or_escape?
+  if collision1.collision?(sprite1.pos, collision2, sprite2.pos)
+    amount1, amount2 = get_amount
+    caution.render
+  end
+  amount1[0] = -amount1[0] unless Utility.in_bounds?(*segments(sprite1, amount1, 0))
+  amount1[1] = -amount1[1] unless Utility.in_bounds?(*segments(sprite1, amount1, 1))
+  amount2[0] = -amount2[0] unless Utility.in_bounds?(*segments(sprite2, amount2, 0))
+  amount2[1] = -amount2[1] unless Utility.in_bounds?(*segments(sprite2, amount2, 1))
+
+  sprite1.move!(*amount1)
+  sprite2.move!(*amount2)
+
+  sprite1.render
+  sprite2.render
+
+  Font.serif.draw_text(Screen,
+                       "distance = #{collision1.interval(sprite1.pos, collision2, sprite2.pos)}",
+                       0,
+                       Screen.h - Font.serif.line_height
+                      )
+end

data/sample/collision_test.rb

@@ -1,33 +1,33 @@
-# encoding: utf-8
-# コリジョン(Collision)サンプル
-# 2009.4.12 Cyross Makoto
-
-require 'Miyako/miyako'
-
-include Miyako
-
-size = [32, 32]
-rect = [0, 0] + size
-sprite1 = Sprite.new({:size=>size, :type=>:as})
-sprite1.fill([255,0,0])
-collision1 = Collision.new(rect)
-sprite2 = Sprite.new({:size=>size, :type=>:as})
-sprite2.fill([0,255,0])
-collision2 = Collision.new(rect)
-caution = Shape.text({:font => Font.serif }){ text "collision!" }
-
-sprite1.center.move(0, 128)
-sprite2.center
-
-amount = 8
-
-Miyako.main_loop do
-  break if Input.quit_or_escape?
-  if Collision.collision?(collision1, sprite1.pos, collision2, sprite2.pos)
-    caution.render
-  else
-    sprite2.move(0, amount)
-  end
-  sprite1.render
-  sprite2.render
-end
+# encoding: utf-8
+# コリジョン(Collision)サンプル
+# 2009.4.12 Cyross Makoto
+
+require 'Miyako/miyako'
+
+include Miyako
+
+size = [32, 32]
+rect = [0, 0] + size
+sprite1 = Sprite.new({:size=>size, :type=>:as})
+sprite1.fill([255,0,0])
+collision1 = Collision.new(rect)
+sprite2 = Sprite.new({:size=>size, :type=>:as})
+sprite2.fill([0,255,0])
+collision2 = Collision.new(rect)
+caution = Shape.text({:font => Font.serif }){ text "collision!" }
+
+sprite1.center!.move!(0, 128)
+sprite2.center!
+
+amount = 8
+
+Miyako.main_loop do
+  break if Input.quit_or_escape?
+  if Collision.collision?(collision1, sprite1.pos, collision2, sprite2.pos)
+    caution.render
+  else
+    sprite2.move!(0, amount)
+  end
+  sprite1.render
+  sprite2.render
+end

data/sample/collision_test2.rb

@@ -1,104 +1,108 @@
-# encoding: utf-8
-# コリジョン(Collision・CircleCollision混合)サンプル
-# 2009.4.24 Cyross Makoto
-
-require 'Miyako/miyako'
-
-include Miyako
-
-Screen.fps = 60
-
-# Utility.in_bounds?引数生成
-def segments(sprite, amounts, idx)
-  [
-   [sprite.pos[idx], sprite.pos[idx] + sprite.size[idx] - 1],
-   [0, Screen.size[idx]],
-   amounts[idx]
-  ]
-end
-
-# 矩形衝突判定と円形衝突判定との切り替え
-collision_list = [Collision, CircleCollision].cycle
-
-# 同時表示スプライト数
-Sprites = 20
-
-# スプライトサイズ
-size = [64, 64]
-# スプライト矩形(当たり判定生成用)
-rect = [0, 0] + size
-# 移動量切り替え
-amount = [4, -4]
-
-sprites = Array.new(Sprites){|n|
-  # スプライトの生成
-  sprite = Sprite.new({:size=>size, :type=>:as})
-  Drawing.circle(sprite, [size[0]/2, size[1]/2], size[0]/2, [rand(256),rand(256),rand(256)], true)
-  sprite.move_to(rand(Screen.w-size[0]), rand(Screen.h-size[1]))
-
-  # コリジョンの生成
-  collision = Collision.new(rect)
-
-  # :collisioned => 当たり判定した？
-  {
-   :sprite => sprite,
-   :collision => collision,
-   :amount => [amount.sample, amount.sample]
-  }
-}
-
-# 衝突判定用の組み合わせ行列を作成
-matrix = sprites.combination(2)
-
-cautions = {
-  Collision => Shape.text({:font => Font.serif }){ text "矩形衝突判定中" },
-  CircleCollision => Shape.text({:font => Font.serif }){ text "円形衝突判定中" }
-}
-
-# 初期の衝突判定方法を設定
-collision_type = collision_list.next
-
-# 一気にレンダリング
-Screen.pre_render_array << sprites.map{|m| m[:sprite]}
-
-# 判定を切り替えるタイミングを決めるタイマー
-wait = WaitCounter.new(1.0)
-wait.start
-
-Miyako.main_loop do
-  break if Input.quit_or_escape?
-  
-  # 一定時間ごとに衝突判定方法を切り替え
-  if wait.finish?
-    collision_type = collision_list.next
-    wait.start
-  end
-
-  # 衝突判定
-  # 衝突していたら方向を反転
-  matrix.each{|pair|
-    p0 = pair[0]
-    p1 = pair[1]
-    if collision_type.collision?(p0[:collision],
-                                 p0[:sprite].pos,
-                                 p1[:collision],
-                                 p1[:sprite].pos)
-      p0[:amount][0] = -p0[:amount][0]
-      p0[:amount][1] = -p0[:amount][1]
-      p1[:amount][0] = -p1[:amount][0]
-      p1[:amount][1] = -p1[:amount][1]
-    end
-  }
-
-  # 移動
-  sprites.each{|s|
-    # 画面の端に来たら方向転換
-    s[:amount][0] = -s[:amount][0] unless Utility.in_bounds?(*segments(s[:sprite], s[:amount], 0))
-    s[:amount][1] = -s[:amount][1] unless Utility.in_bounds?(*segments(s[:sprite], s[:amount], 1))
-    s[:sprite].move(*s[:amount])
-  }
-
-  # 画面への描画
-  Screen.pre_render
-  cautions[collision_type].render
-end
+# encoding: utf-8
+# コリジョン(Collision・CircleCollision混合)サンプル
+# 2009.4.26 Cyross Makoto
+
+require 'Miyako/miyako'
+
+include Miyako
+
+AMOUNT_MIN = -8
+AMOUNT_MAX = 8
+
+Screen.fps = 60
+
+# Utility.in_bounds?引数生成
+def segments(sprite, amounts, idx)
+  [sprite.segment[idx], Screen.segment[idx], amounts[idx]]
+end
+
+# 移動量の決定
+def get_amount_one
+  range = AMOUNT_MAX - AMOUNT_MIN
+  [rand(range)+AMOUNT_MIN, rand(range)+AMOUNT_MIN]
+end
+def get_amount
+  range = AMOUNT_MAX - AMOUNT_MIN
+  [get_amount_one, get_amount_one]
+end
+
+# 矩形衝突判定と円形衝突判定との切り替え
+collision_list = [Collision, CircleCollision].cycle
+
+# 同時表示スプライト数
+Sprites = 20
+
+# スプライトサイズ
+size = [64, 64]
+# スプライト矩形(当たり判定生成用)
+rect = [0, 0] + size
+
+sprites = Array.new(Sprites){|n|
+  # スプライトの生成
+  sprite = Sprite.new({:size=>size, :type=>:as})
+  Drawing.circle(sprite, [size[0]/2, size[1]/2], size[0]/2, [rand(256),rand(256),rand(256)], true)
+  sprite.move_to(rand(Screen.w-size[0]), rand(Screen.h-size[1]))
+
+  # コリジョンの生成
+  collision = Collision.new(rect)
+
+  # :collisioned => 当たり判定した？
+  {
+   :sprite => sprite,
+   :collision => collision,
+   :amount => get_amount_one
+  }
+}
+
+# 衝突判定用の組み合わせ行列を作成
+matrix = sprites.combination(2)
+
+cautions = {
+  Collision => Shape.text({:font => Font.serif }){ text "矩形衝突判定中" },
+  CircleCollision => Shape.text({:font => Font.serif }){ text "円形衝突判定中" }
+}
+
+# 初期の衝突判定方法を設定
+collision_type = collision_list.next
+
+# 一気にレンダリング
+Screen.pre_render_array << sprites.map{|m| m[:sprite]}
+
+# 判定を切り替えるタイミングを決めるタイマー
+wait = WaitCounter.new(1.0)
+wait.start
+
+Miyako.main_loop do
+  break if Input.quit_or_escape?
+  
+  # 一定時間ごとに衝突判定方法を切り替え
+  if wait.finish?
+    collision_type = collision_list.next
+    wait.start
+  end
+
+  # 衝突判定
+  # 衝突していたら方向を反転
+  matrix.each{|pair|
+    p0 = pair[0]
+    p1 = pair[1]
+    if collision_type.collision?(p0[:collision],
+                                 p0[:sprite].pos,
+                                 p1[:collision],
+                                 p1[:sprite].pos)
+      p0[:amount], p1[:amount] = get_amount
+    end
+  }
+
+  # 移動
+  sprites.each{|s|
+    # 画面の端に来たら方向転換
+    s[:amount][0] = -s[:amount][0] unless Utility.in_bounds?(*segments(s[:sprite], s[:amount], 0))
+    s[:amount][1] = -s[:amount][1] unless Utility.in_bounds?(*segments(s[:sprite], s[:amount], 1))
+    s[:sprite].move!(*s[:amount])
+  }
+
+  # 画面への描画
+  Screen.pre_render
+  cautions[collision_type].render
+end