dxruby64 1.4.7

data/sample/new_sample/sprite_animation.rb

@@ -0,0 +1,133 @@
+require 'dxruby'
+
+class AnimeSprite < Sprite
+
+  def initialize(x=0, y=0, image=nil)
+    super
+    @anime_sprite_count = 0
+    @anime_sprite_frame_count = 1
+    @anime_sprite_pause = true
+    @anime_sprite_animation_pattern = nil
+    @anime_sprite_hash = {}
+    @anime_sprite_next = nil
+  end
+
+  def start_animation(v, animation_pattern=nil, nxt=nil)
+    temp = @anime_sprite_hash[v]
+    if temp
+      @anime_sprite_frame_count = temp[0]
+      @anime_sprite_animation_pattern = temp[1]
+      @anime_sprite_next = temp[2]
+    else
+      @anime_sprite_frame_count = v
+      @anime_sprite_animation_pattern = animation_pattern
+      @anime_sprite_next = nxt
+    end
+    @anime_sprite_pause = false
+    @anime_sprite_count = 0 
+  end
+
+  def change_animation(v, animation_pattern=nil, nxt=nil)
+    temp = @anime_sprite_hash[v]
+    if temp
+      @anime_sprite_frame_count = temp[0]
+      @anime_sprite_animation_pattern = temp[1]
+      @anime_sprite_next = temp[2]
+    else
+      @anime_sprite_frame_count = v
+      @anime_sprite_animation_pattern = animation_pattern
+      @anime_sprite_next = nxt
+    end
+  end
+
+  def pause_animation
+    @anime_sprite_pause = true
+  end
+
+  def resume_animation
+    @anime_sprite_pause = false
+  end
+
+  def add_animation(v, frame_count, animation_pattern=nil, nxt=nil)
+    @anime_sprite_hash[v] = [frame_count, animation_pattern, nxt]
+  end
+
+  def update
+    if @anime_sprite_animation_pattern
+      unless @anime_sprite_pause
+        @anime_sprite_count += 1
+        if @anime_sprite_count >= @anime_sprite_frame_count * @anime_sprite_animation_pattern.size
+          if @anime_sprite_next
+            temp = @anime_sprite_hash[@anime_sprite_next]
+            if temp
+              @anime_sprite_frame_count = temp[0]
+              @anime_sprite_animation_pattern = temp[1]
+              @anime_sprite_next = temp[2]
+            else
+              self.send @anime_sprite_next
+            end
+          end
+          @anime_sprite_count = 0 
+        end
+      end
+      self.image = @anime_sprite_animation_image[@anime_sprite_animation_pattern[@anime_sprite_count / @anime_sprite_frame_count]]
+    else
+      unless @anime_sprite_pause
+        @anime_sprite_count += 1
+        if @anime_sprite_count >= @anime_sprite_frame_count * @anime_sprite_animation_image.size
+          if @anime_sprite_next
+            temp = @anime_sprite_hash[@anime_sprite_next]
+            if temp
+              @anime_sprite_frame_count = temp[0]
+              @anime_sprite_animation_pattern = temp[1]
+              @anime_sprite_next = temp[2]
+            else
+              self.send @anime_sprite_next
+            end
+          end
+          @anime_sprite_count = 0
+        end
+      end
+      self.image = @anime_sprite_animation_image[@anime_sprite_count / @anime_sprite_frame_count]
+    end
+    super
+  end
+
+  def animation_image
+    @anime_sprite_animation_image
+  end
+
+  def animation_image=(v)
+    @anime_sprite_animation_image = v
+    self.image = v[0]
+  end
+end
+
+
+image = Image.load_tiles("./image/enemy1.png", 4, 1)
+
+s = AnimeSprite.new
+s.x = 0
+s.y = 0
+s.animation_image = image
+s.add_animation(:anime1, 10,[0,1,2,3], :anime1)
+s.add_animation(:anime2, 4,[0,1,0,1,0,1,0,1,0,1], :anime1)
+s.start_animation(:anime1)
+
+Window.loop do
+  if Input.key_push?(K_Z)
+    s.pause_animation
+  end
+  if Input.key_push?(K_X)
+    s.resume_animation
+  end
+  if Input.key_push?(K_C)
+    s.start_animation(:anime2)
+  end
+  s.update
+  s.draw
+  break if Input.key_push?(K_ESCAPE)
+end
+
+
+

data/sample/new_sample/sprite_collision1.rb

@@ -0,0 +1,216 @@
+#!ruby -Ks
+require "dxruby"
+
+class CollisionObject < Sprite
+  def initialize(image)
+    super(rand(Window.width-image.width), rand(Window.height-image.height), image)
+    @hit = false
+    @dx = (rand(4)*2-3)/4.0
+    @dy = (rand(4)*2-3)/4.0
+  end
+
+  def update
+    self.x += @dx
+    self.y += @dy
+    @dx = -@dx if self.x <= 0 or self.x >= Window.width-self.image.width
+    @dy = -@dy if self.y <= 0 or self.y >= Window.height-self.image.height
+  end
+end
+
+# ������
+class Box < CollisionObject
+  @@image1 = Image.new(30, 30, [255, 200, 0, 0])
+  @@image2 = Image.new(30, 30, [255, 255, 255])
+  def initialize
+    super(@@image1)
+#    @collision = [0, 0, 29, 29]
+    self.scale_x = rand(2.0)+1
+    self.scale_y = rand(2.0)+1
+    self.center_x = rand(self.image.width)
+    self.center_y = rand(self.image.height)
+    self.angle = rand(360)
+    @rot_speed = (rand(2.0)+1)*2-3
+  end
+
+  def update
+    super
+    self.angle += @rot_speed
+    self.image = @@image1
+  end
+
+  def hit(d)
+    self.image = @@image2
+  end
+end
+
+# ������2
+class Box2 < CollisionObject
+  @@image1 = Image.new(30, 30, [255, 200, 0, 0])
+  @@image2 = Image.new(30, 30, [255, 255, 255])
+  def initialize
+    super(@@image1)
+#    @collision = [0, 0, 29, 29]
+  end
+  def update
+    super
+    self.image = @@image1
+  end
+
+  def hit(d)
+    self.image = @@image2
+  end
+end
+
+# �܂�
+class Circle < CollisionObject
+  @@image1 = Image.new(30, 30).circle_fill(15, 15, 15, [255, 200, 0])
+  @@image2 = Image.new(30, 30).circle_fill(15, 15, 15, [255, 255, 255])
+  def initialize
+    super(@@image1)
+    self.collision = [15, 15, 15]
+    self.scale_x = rand(2.0)+1
+    self.scale_y = rand(2.0)+1
+    self.center_x = rand(self.image.width)
+    self.center_y = rand(self.image.height)
+    self.angle = rand(360)
+    @rot_speed = (rand(2.0)+1)*2-3
+  end
+  def update
+    super
+    self.angle += @rot_speed
+    self.image = @@image1
+  end
+  def hit(d)
+    self.image = @@image2
+  end
+end
+
+# �܂�2
+class Circle2 < CollisionObject
+  @@image1 = Image.new(30, 30).circle_fill(15, 15, 15, [255, 200, 0])
+  @@image2 = Image.new(30, 30).circle_fill(15, 15, 15, [255, 255, 255])
+  def initialize
+    super(@@image1)
+    self.collision = [15, 15, 15]
+  end
+  def update
+    super
+    self.image = @@image1
+  end
+  def hit(d)
+    self.image = @@image2
+  end
+end
+
+# ���񂩂�
+class Triangle < CollisionObject
+  @@image1 = Image.new(30, 30).triangle_fill(15,0,29,29,0,29,C_GREEN)
+  @@image2 = Image.new(30, 30).triangle_fill(15,0,29,29,0,29,C_WHITE)
+  def initialize
+    super(@@image1)
+    self.collision = [15,0,29,29,0,29]
+    self.scale_x = rand(2.0)+1
+    self.scale_y = rand(2.0)+1
+    self.center_x = rand(self.image.width)
+    self.center_y = rand(self.image.height)
+    self.angle = rand(360)
+    @rot_speed = (rand(2.0)+1)*2-3
+  end
+
+  def update
+    super
+    self.angle += @rot_speed
+    self.image = @@image1
+  end
+  def hit(d)
+    self.image = @@image2
+  end
+end
+
+# ���񂩂�2
+class Triangle2 < CollisionObject
+  @@image1 = Image.new(30, 30).triangle_fill(15,0,29,29,0,29,C_GREEN)
+  @@image2 = Image.new(30, 30).triangle_fill(15,0,29,29,0,29,C_WHITE)
+  def initialize
+    super(@@image1)
+    self.collision = [15,0,29,29,0,29]
+  end
+  def update
+    super
+    self.image = @@image1
+  end
+  def hit(d)
+    self.image = @@image2
+  end
+end
+
+# �ق�
+class Star < CollisionObject
+  @@image1 = Image.new(100,100)
+  @@image2 = Image.new(100,100)
+
+  bx = 0
+  by = -20
+
+  x1 = []
+  y1 = []
+  (0..4).each do |i|
+    x1[i] = bx * Math.cos(Math::PI / 180 * (i * 72 - 36)) - by * Math.sin(Math::PI / 180 * (i * 72 - 36)) + @@image1.width / 2
+    y1[i] = bx * Math.sin(Math::PI / 180 * (i * 72 - 36)) + by * Math.cos(Math::PI / 180 * (i * 72 - 36)) + @@image1.height / 2
+  end
+  sx = x1[0] + (x1[1] - x1[0]) / 2 - @@image1.width / 2
+  sy = y1[0] - (x1[1] - x1[0]) / 2 * Math.tan(Math::PI / 180 * 72) - @@image1.height / 2
+  x2 = []
+  y2 = []
+  (0..4).each do |i|
+    x2[i] = sx * Math.cos(Math::PI / 180 * i * 72) - sy * Math.sin(Math::PI / 180 * i * 72) + @@image1.width / 2
+    y2[i] = sx * Math.sin(Math::PI / 180 * i * 72) + sy * Math.cos(Math::PI / 180 * i * 72) + @@image1.height / 2
+  end
+  @@cols = [[x2[0], y2[0], x1[2], y1[2], x1[4], y1[4]],
+            [x2[1], y2[1], x1[3], y1[3], x1[0], y1[0]],
+            [x2[2], y2[2], x1[4], y1[4], x1[1], y1[1]],
+            [x2[3], y2[3], x1[0], y1[0], x1[2], y1[2]],
+            [x2[4], y2[4], x1[1], y1[1], x1[3], y1[3]]]
+
+  @@cols.each do |ary|
+    @@image1.triangle_fill(ary[0], ary[1], ary[2], ary[3], ary[4], ary[5], C_CYAN)
+    @@image2.triangle_fill(ary[0], ary[1], ary[2], ary[3], ary[4], ary[5], C_WHITE)
+  end
+
+  def initialize
+    super(@@image1)
+    self.collision = @@cols
+  end
+  def update
+    super
+    self.image = @@image1
+    self.angle += 1
+  end
+  def hit(d)
+    self.image = @@image2
+  end
+end
+
+
+
+Window.width, Window.height = 800, 600
+
+font = Font.new(24)
+
+object = Array.new(20) {Box.new} + Array.new(20) {Box2.new} +
+         Array.new(20) {Triangle.new} + Array.new(20) {Triangle2.new} +
+         Array.new(20) {Circle.new} + Array.new(20) {Circle2.new} +
+         Array.new(5) {Star.new}
+
+Window.loop do
+  Sprite.update(object)
+
+  Sprite.check(object)
+
+  Sprite.draw(object)
+
+  break if Input.keyPush?(K_ESCAPE)
+
+  Window.drawFont(0, 0, Window.fps.to_s + " fps", font)
+  Window.drawFont(0, 24, Window.getLoad.to_i.to_s + " %", font)
+end

data/sample/new_sample/sprite_collision2.rb

@@ -0,0 +1,93 @@
+#!ruby -Ks
+require "dxruby"
+
+# ������
+class Box < Sprite
+  def initialize(size)
+    self.x = rand(639-size)
+    self.y = rand(439-size)
+    self.collision = [0, 0, size - 1, size - 1]
+    self.image = Image.new(size, size, [255, 200, 0, 0])
+  end
+end
+
+# �܂�
+class Circle < Sprite
+  def initialize(size)
+    self.x = rand(639-size*2)
+    self.y = rand(439-size*2)
+    self.collision = [size, size, size]
+    self.image = Image.new(size*2, size*2).circle_fill(size, size, size, [255, 0, 0, 200])
+  end
+end
+
+# ���񂩂�
+class Triangle < Sprite
+  def initialize(size)
+    self.x = rand(639-size)
+    self.y = rand(439-size)
+    self.collision = [size/2,0,0,size-1,size-1,size-1]
+    self.image = Image.new(size, size).triangle_fill(size/2,0,0,size-1,size-1,size-1, [255,0,200,0])
+  end
+end
+
+font = Font.new(24)
+
+# ���܃}�E�X�Œ͂�ł�I�u�W�F�N�g
+item = nil
+
+# �I�u�W�F�N�g�z��
+arr = [Circle.new(20), Circle.new(40),
+       Triangle.new(60), Triangle.new(100),
+       Box.new(40), Box.new(80)]
+
+# �}�E�X�J�[�\���̏Փ˔���pSprite
+mouse = Sprite.new
+mouse.collision = [0,0]
+
+# ���C�����[�v
+Window.loop do
+  oldx, oldy = mouse.x, mouse.y
+  mouse.x, mouse.y = Input.mouse_pos_x, Input.mouse_pos_y
+
+  # �{�^�����������画��
+  if Input.mouse_push?(M_LBUTTON) or Input.mouse_push?(M_RBUTTON)
+    arr.each_with_index do |obj, i|
+      if mouse === obj
+        # �I�u�W�F�N�g���N���b�N�ł�������בւ���item�ݒ�
+        arr.delete_at(i)
+        arr.unshift(obj)
+        item = obj
+        break
+      end
+    end
+  end
+
+  # �{�^���������Ă���Ԃ̏���
+  if Input.mouse_down?(M_RBUTTON) or Input.mouse_down?(M_LBUTTON)
+    if item then
+      if Input.mouse_down?(M_RBUTTON)
+        item.angle += 5
+      end
+      if Input.mouse_down?(M_LBUTTON)
+        item.x += mouse.x - oldx
+        item.y += mouse.y - oldy
+      end
+    end
+  else
+    # �{�^���������ꂽ��I�u�W�F�N�g�����
+    item = nil
+  end
+
+  # �I�u�W�F�N�g���m�̔���
+  if Sprite.check(arr) then
+    Window.draw_font(0, 0, "hit!", font)
+  end
+
+  # �`��
+  arr.reverse.each do |obj|
+    obj.draw
+  end
+
+  break if Input.key_push?(K_ESCAPE)
+end

data/sample/new_sample/sprite_simple.rb

@@ -0,0 +1,65 @@
+#!ruby -Ks
+require "dxruby"
+
+class Ruby < Sprite
+  RT = RenderTarget.new(640,480)
+  MAX_X = 639 - 32
+  MAX_Y = 479 - 32
+
+  # Image�I�u�W�F�N�g���쐬
+  @@image = Image.load("ruby.png")
+
+  # ���������\�b�h
+  def initialize
+    super
+    self.x = rand(MAX_X)+1 # x���W
+    self.y = rand(MAX_Y)+1 # y���W
+    self.image = @@image  # �摜
+    self.target = RT      # �`���
+
+    @dx = rand(2) * 2 - 1 # x����
+    @dy = rand(2) * 2 - 1 # y����
+  end
+
+  # �X�V
+  def update
+    self.x += @dx
+    self.y += @dy
+    if self.x <= 0 or MAX_X <= self.x
+      @dx = -@dx
+    end
+    if self.y <= 0 or MAX_Y <= self.y
+      @dy = -@dy
+    end
+  end
+end
+
+# Sprite �I�u�W�F�N�g�̔z��𐶐�����B
+sprites = Array.new(6000){ Ruby.new }
+
+font = Font.new(32)
+
+# �E�B���h�E�̃L���v�V������ݒ肷��B 
+Window.caption = "Sprites"
+
+# fps��ݒ肷��B
+Window.fps = 60
+
+# ���C�����[�v�B
+# �E�B���h�E���‚���ꂽ�ꍇ�͎����I�ɏI������B
+# ��ʂ͖��t���[�����Z�b�g�����B
+Window.loop do
+  # ESC �L�[�������ꂽ�ꍇ�I������B
+  break if Input.keyPush?(K_ESCAPE)
+
+  Sprite.update(sprites)
+  Sprite.draw(sprites)
+
+  Ruby::RT.update
+  Window.draw(0,0,Ruby::RT)
+
+  Window.drawFont(0,0,Window.fps.to_s + " fps", font)
+  Window.drawFont(0,40,sprites.size.to_s + " objects", font)
+  Window.drawFont(0,80,Window.getLoad.to_i.to_s + " %", font)
+end
+

data/sample/new_sample2/autocall.rb

@@ -0,0 +1,24 @@
+require 'dxruby'
+
+x1 = 0
+x2 = 0
+image = Image.new(100,100,C_WHITE)
+
+proc1 = Proc.new do 
+  x1 += 2
+  Window.draw(x1, 100, image)
+end
+
+proc2 = Proc.new do 
+  x2 += 2
+  Window.draw(x2, 201, image)
+end
+
+Window.before_call[:test] = proc1
+Window.after_call[:test] = proc2
+
+Window.loop do
+  break if Input.key_push?(K_ESCAPE)
+end
+
+

data/sample/new_sample2/effecttest.rb

@@ -0,0 +1,136 @@
+#!ruby -Ks
+require 'dxruby'
+
+# �����_�����O�ς݃t�H���g�����N���X
+class ImageFontMaker
+  ImageFontData = Struct.new(:x, :y, :width, :ox)
+  ImageFontSaveData = Struct.new(:data_hash, :image, :height)
+
+  def initialize(size, fontname = nil)
+    @font = Font.new(size, fontname)
+    @hash = {}
+  end
+
+  def add_data(str)
+    str.each_char do |c|
+      @hash[c] = @font.info(c)
+    end
+  end
+
+  def output(filename)
+    # �K�v�ȉ摜�T�C�Y�𒲂ׂ�
+    # �v�Z����₱�������ƂɂȂ��Ă�̂�f��j�ȂǍ��E�ɂ͂ݏo������ȕ����̑Ή�
+    width = 0
+    height = 0
+    keys = @hash.keys.shuffle
+    keys.each do |k|
+      v = @hash[k]
+      ox = v.gmpt_glyphorigin_x < 0 ? -v.gmpt_glyphorigin_x : 0
+      cx = (v.gm_blackbox_x + v.gmpt_glyphorigin_x) > v.gm_cellinc_x + ox ? (v.gm_blackbox_x + v.gmpt_glyphorigin_x) : v.gm_cellinc_x + ox
+      width += cx
+      if width > 640
+        height += @font.size
+        width = cx
+      end
+    end
+    height += @font.size
+
+    # �摜����
+    image = Image.new(640, height, C_BLACK)
+
+    # �����`������
+    x = 0
+    y = 0
+    data_hash = {}
+    keys.each do |k|
+      v = @hash[k]
+      ox = v.gmpt_glyphorigin_x < 0 ? -v.gmpt_glyphorigin_x : 0
+      cx = (v.gm_blackbox_x + v.gmpt_glyphorigin_x) > v.gm_cellinc_x + ox ? (v.gm_blackbox_x + v.gmpt_glyphorigin_x) : v.gm_cellinc_x + ox
+      if x + cx > 640
+        x = 0
+        y += @font.size
+      end
+      image.draw_font(x + ox, y, k, @font)
+      data_hash[k] = ImageFontData.new(x, y, cx, ox)
+      x += cx
+    end
+
+    # ��������ۑ�
+    image.save(filename + ".png")
+
+    # �o�C�i���œǂݍ���
+    image_binary = nil
+    open(filename + ".png", "rb") do |fh|
+      image_binary = fh.read
+    end
+
+    # �}�[�V�������ăt�@�C����
+    imagefont = ImageFontSaveData.new(data_hash, image_binary, @font.size)
+
+    open(filename, "wb") do |fh|
+      fh.write(Marshal.dump(imagefont))
+    end
+  end
+end
+
+# �����_�����O�ς݃t�H���g���g���N���X
+class ImageFont
+  attr_accessor :target
+
+  # �������̃p�����[�^��draw_font_ex�̃n�b�V�������Ɠ���
+  def initialize(filename)
+    open(filename, "rb") do |fh|
+      temp = Marshal.load(fh.read)
+      @data_hash = temp.data_hash
+      @image = Image.load_from_file_in_memory(temp.image)
+      @height = temp.height
+    end
+    @cache = {}
+  end
+
+  # ������`��
+  def draw(x, y, s, hash)
+    rt = @target == nil ? Window : @target
+    edge_width = hash[:edge_width] == nil ? 2 : hash[:edge_width]
+
+    image_hash = nil
+    if !@cache.has_key?(hash)
+      image_hash = @cache[hash] = {}
+    else
+      image_hash = @cache[hash]
+    end
+
+    s.each_char do |c|
+      temp = @data_hash[c]
+
+      if !image_hash.has_key?(c)
+        image = @image.slice(temp.x, temp.y, temp.width, @height)
+        image_hash[c] = image.effect_image_font(hash)
+        image.delayed_dispose
+      end
+      rt.draw(x - temp.ox - edge_width, y - edge_width, image_hash[c])
+      x += temp.width - temp.ox
+    end
+  end
+end
+
+Window.bgcolor = [100,100,100]
+
+# �����_�����O�ς݃t�H���g�쐬
+imagefontmaker = ImageFontMaker.new(48, "�l�r �o�S�V�b�N")
+imagefontmaker.add_data(" ABCDEFGHIJKLMNOPQRSTUVWXYZabcdef��ghijklmnopqrstuvwxyz�����������������������������������������������������‚ĂƂ����ÂłǂȂɂʂ˂̂͂Ђӂւق΂тԂׂڂς҂Ղ؂ۂ܂݂ނ߂�����������������������������A�B")
+imagefontmaker.output("ImageFont.dat")
+
+# �����_�����O�ς݃t�H���g�ǂݍ���
+imagefont = ImageFont.new("ImageFont.dat")
+
+Window.loop do
+  imagefont.draw(50, 60, "���傤�͂��������邾�����B", :shadow=>true, :edge=>true, :edge_color=>C_CYAN)
+  imagefont.draw(50, 108, "f��������������������", :shadow=>false, :edge=>true, :edge_color=>C_CYAN)
+  imagefont.draw(50, 156, "j���������������‚Ă�", :shadow=>true, :edge=>false, :edge_color=>C_CYAN)
+  imagefont.draw(50, 204, "k�Ȃɂʂ˂̂͂Ђӂւ�", :shadow=>true, :edge=>true, :edge_color=>C_RED)
+end
+
+
+
+