dxruby64 1.4.7

data/sample/new_sample/laser2.rb

@@ -0,0 +1,292 @@
+#!ruby -Ks
+require 'dxruby'
+
+Window.mag_filter = TEXF_POINT
+TO_RAD = Math::PI / 180
+TO_DEG = 1 / Math::PI * 180
+
+# �x�[�X�p�[�c
+class BaseParts < Sprite
+  attr_accessor :next, :parts, :to_a
+  @@image = []
+  40.times do |i|
+    @@image.push Image.new(60, 60).circle_fill(30, 30, 30, [255, 255*i/40, 255])
+  end
+
+  def initialize(x, y)
+    super
+
+    # �G��p�[�c����
+    prev_part = nil
+    parts1 = Array.new(8) do
+      temp = Parts.new # next�Ɏ��̃p�[�c�I�u�W�F�N�g������
+      prev_part.next = temp if prev_part
+      prev_part = temp
+      temp.joint_xp = 1 # �O�̃p�[�c����̐ڑ�x
+      temp.joint_yp = 10 # �O�̃p�[�c����̐ڑ�y
+      temp.joint_xn = 19 # ���̃p�[�c�ւ̐ڑ�x
+      temp.joint_yn = 10 # ���̃p�[�c�ւ̐ڑ�y
+      temp.collision = [10, 10, 10]
+      temp.joint_angle = 15
+      temp
+    end
+    prev_part = nil
+    parts2 = Array.new(8).map do
+      temp = Parts.new # next�Ɏ��̃p�[�c�I�u�W�F�N�g������
+      prev_part.next = temp if prev_part
+      prev_part = temp
+      temp.joint_xp = 1 # �O�̃p�[�c����̐ڑ�x
+      temp.joint_yp = 10 # �O�̃p�[�c����̐ڑ�y
+      temp.joint_xn = 19 # ���̃p�[�c�ւ̐ڑ�x
+      temp.joint_yn = 10 # ���̃p�[�c�ւ̐ڑ�y
+      temp.collision = [10, 10, 10]
+      temp.joint_angle = -15
+      temp
+    end
+    parts2[0].joint_angle_base = 180
+
+    self.image = @@image[0]
+    self.x = x
+    self.y = y
+    self.collision = [30, 30, 30]
+    @parts= [parts1, parts2]
+    @next = [[58, 30, parts1[0]], [2, 30, parts2[0]]]
+    @hp = 8000
+    @to_a = [self] + parts[0] + parts[1]
+    @count = 0
+    guide
+    update
+  end
+
+  # �`��ʒu�A�p�x����
+  def update
+    self.image = @@image[0]
+    @hitcount = 0
+    if @count == 0
+      self.y += 0.4
+      self.scale_x = self.scale_y = (@hp / 8000.0) * 0.5 + 0.5
+      @next[0][0] = (58.0 - center_x) * self.scale_x + center_x
+      @next[1][0] = (2.0 - center_x) * self.scale_x + center_x
+      @next.each do |ary|
+        ary[2].update(ary[0] + self.x, ary[1] + self.y, 0)
+      end
+      vanish if self.y > 480 + 100
+    end
+  end
+
+  # �`��
+  def draw
+    super
+    if @count == 0
+      @parts[0].each do |ary|
+        ary.draw
+      end
+      @parts[1].each do |ary|
+        ary.draw
+      end
+    else
+      @count += 1
+      vanish if @count > 60
+      self.scale_x += 0.1
+      self.scale_y += 0.1
+      self.alpha -= 4
+      @parts[0].each do |ary|
+        ary.scale_x += 0.1
+        ary.scale_y += 0.1
+        ary.alpha -= 4
+        ary.draw
+      end
+      @parts[1].each do |ary|
+        ary.scale_x += 0.1
+        ary.scale_y += 0.1
+        ary.alpha -= 4
+        ary.draw
+      end
+    end
+  end
+
+  # �}�E�X�J�[�\���ɂނ����ėU��
+  def guide
+    if @count == 0
+      @parts[0][7].guide
+      @parts[1][7].guide
+    end
+  end
+
+  def hit
+    @hp -= 1
+    self.image = @@image[@hitcount]
+    @hitcount += 1
+    if @hp <= 0
+      @count = 1
+      @to_a = []
+    end
+  end
+end
+
+# �G��p�[�c
+class Parts < Sprite
+  attr_accessor :prev, :joint_xp, :joint_yp, :joint_xn, :joint_yn, :joint_angle, :joint_angle_base
+  attr_reader :next
+  @@image1 = Image.new(20,20).circle_fill(10,10,10,[255,0,0]).circle_fill(10,10,8,[255,160,160])
+  @@image2 = Image.new(20,20).circle_fill(10,10,10,[255,200,200]).circle_fill(10,10,8,[255,240,240])
+
+  def initialize
+    super
+    @next = nil
+    @joint_xp = @joint_yp = @joint_xn = @joint_yn = @joint_angle = @joint_angle_base = 0
+    @ang = 0
+    self.image = @@image1
+  end
+
+  def next=(n)
+    @next = n
+    n.prev = self
+  end
+
+  # �`��ʒu�A�p�x����
+  def update(jx = nil, jy = nil, angle = 0)
+    self.image = @@image1
+    a = @ang * TO_RAD
+    sina = Math.sin(a)
+    cosa = Math.cos(a)
+    tempx = -@joint_xp + center_x
+    tempy = -@joint_yp + center_y
+    @joint_angle += rand() * 1.2 - 0.6
+    @ang = @joint_angle + angle + @joint_angle_base
+    self.x = tempx * cosa - tempy * sina + jx - center_x
+    self.y = tempx * sina + tempy * cosa + jy - center_y
+    if @next
+      x = -@joint_xp + @joint_xn
+      y = -@joint_yp + @joint_yn
+      jnx = x * cosa - y * sina + jx
+      jny = x * sina + y * cosa + jy
+      @next.update(jnx, jny, @ang)
+    end
+  end
+
+  # �}�E�X�J�[�\���ɂނ����ėU��
+  def guide
+    mx = Input.mouse_pos_x
+    my = Input.mouse_pos_y
+    a = @ang * TO_RAD
+    sina = Math.sin(a)
+    cosa = Math.cos(a)
+    tempx = @joint_xn - center_x
+    tempy = @joint_yn - center_y
+    x = tempx * cosa - tempy * sina + self.x + center_x
+    y = tempx * sina + tempy * cosa + self.y + center_y
+    mangle = Math.atan2(my - y, mx - x) * TO_DEG
+    angle = (mangle + (180 - (@ang % 360))) % 360
+
+    if 180 < angle
+      @joint_angle = @joint_angle + 1
+      if @joint_angle > 30
+        @joint_angle = 30
+        @prev.guide if @prev
+      end
+    elsif 180 > angle
+      @joint_angle = @joint_angle - 1
+      if @joint_angle < -30
+        @joint_angle = -30
+        @prev.guide if @prev
+      end
+    end
+  end
+
+  def hit
+    self.image = @@image2
+  end
+end
+
+class Laser
+  @@image_houdai = Image.new(10,10,[0,255,0])
+
+  def initialize(x, y)
+    @s = []
+    20.times do |i|
+      t = Sprite.new(x, y, Image.new(20, 1)) # �c1�s�N�Z���̉����̉摜
+      t.image[i, 0] = [128, 255, 255, 255] # �Y���ӏ��ɓ_������
+      t.scale_y = 800 # ����
+      t.center_x = 10  # �摜�̐^��
+      t.center_y = 1  # �摜�̉��̒[
+      t.collision = [i, 0, i, 0] # ��`��1�s�N�Z���̔���͈�
+      @s.push t
+    end
+    @s_collision = Sprite.new(x, y, Image.new(20, 1, [128, 255, 255, 255]))
+    @s_collision.collision = [0, 0, 19, 0]
+    @s_collision.scale_y = 800
+    @s_collision.center_x = 10  # �摜�̐^��
+    @s_collision.center_y = 1  # �摜�̉��̒[
+  end
+
+  # ���[�U�[���ˁA�G�Ƃ̏Փ˔��肨��ѕ`��
+  def update
+    if Input.mouse_down?(M_LBUTTON)
+      mx = Input.mouse_pos_x
+      my = Input.mouse_pos_y
+      es = []
+      Enemy.each do |e|
+        es += e.to_a
+      end
+      @s_collision.angle = angle = Math.atan2(mx - @s_collision.x, @s_collision.y - my) * TO_DEG
+      collision_ary = @s_collision.check(es)
+      if collision_ary.size > 0
+        @s.each do |i|
+          i.angle = angle
+          i.scale_y = 640000 #800**2
+          temp = i.check(collision_ary)
+          if temp.size > 0
+            min_length = 640000 #800**2
+            min_obj = nil
+            temp.each do |e|
+              length = ((e.x + e.center_x) - (i.x+10))**2 + ((e.y + e.center_y) - (i.y+10))**2
+              if min_length > length
+                min_obj = e
+                min_length = length
+              end
+            end
+            i.scale_y = min_length
+            min_obj.hit
+          end
+          i.scale_y = Math::sqrt(i.scale_y)
+          i.draw
+        end
+      else
+        @s_collision.draw
+      end
+    end
+    Window.draw(150,470,@@image_houdai)
+    Window.draw(510,470,@@image_houdai)
+  end
+end
+
+Enemy = [BaseParts.new(rand()*400+120, -100)]
+laser = [Laser.new(145, 474), Laser.new(505, 474)]
+
+x = 145
+y = 474
+count = 0
+font = Font.new(32)
+
+Window.loop do
+  count += 1
+  if count > 280
+    Enemy.push BaseParts.new(rand()*400+120, -100)
+    count = 0
+  end
+
+  Enemy.each do |e|
+    e.guide
+    e.update
+  end
+  Sprite.clean(Enemy)
+
+  Sprite.update(laser)
+  Sprite.draw(Enemy)
+
+  Window.drawFont(0,0,Window.getLoad.to_i.to_s + " %", font, :z=>3)
+
+  break if Input.key_push?(K_ESCAPE)
+end
+

data/sample/new_sample/raycast.rb

@@ -0,0 +1,249 @@
+#!ruby -Ks
+require 'dxruby'
+
+class Vector
+  def initialize(*v)
+    @vec = v
+  end
+
+  def rotate(angle)
+    x = @vec[0] * Math.cos(Math::PI / 180 * angle) - @vec[1] * Math.sin(Math::PI / 180 * angle)
+    y = @vec[0] * Math.sin(Math::PI / 180 * angle) + @vec[1] * Math.cos(Math::PI / 180 * angle)
+    temp = @vec.dup
+    temp[0] = x
+    temp[1] = y
+    Vector.new(*temp)
+  end
+
+  def +(v)
+    case v
+    when Vector
+      Vector.new(*@vec.map.with_index{|s,i|s+v[i]})
+    when Array
+      Vector.new(*@vec.map.with_index{|s,i|s+v[i]})
+    when Numeric
+      Vector.new(*@vec.map{|s|s+v})
+    else
+      nil
+    end
+  end
+
+  def *(matrix)
+    result = []
+    for i in 0..(matrix.size-1)
+      data = 0
+      for j in 0..(@vec.size-1)
+        data += @vec[j] * matrix[j][i]
+      end
+      result.push(data)
+    end
+    return Vector.new(*result)
+  end
+
+  def [](i)
+    @vec[i]
+  end
+
+  def size
+    @vec.size
+  end
+
+  def to_a
+    @vec
+  end
+
+  def x
+    @vec[0]
+  end
+  def y
+    @vec[1]
+  end
+  def z
+    @vec[2]
+  end
+  def w
+    @vec[3]
+  end
+end
+
+class Matrix
+  def initialize(*arr)
+    @arr = Array.new(4) {|i| Vector.new(*arr[i])}
+  end
+
+  def *(a)
+    result = []
+    for i in 0..(a.size-1)
+      result.push(@arr[i] * a)
+    end
+    return Matrix.new(*result)
+  end
+
+  def [](i)
+    @arr[i]
+  end
+
+  def size
+    @arr.size
+  end
+
+  def self.create_rotation_z(angle)
+    cos = Math.cos(Math::PI/180 * angle)
+    sin = Math.sin(Math::PI/180 * angle)
+    return Matrix.new(
+     [ cos, sin, 0, 0],
+     [-sin, cos, 0, 0],
+     [   0,   0, 1, 0],
+     [   0,   0, 0, 1]
+    )
+  end
+
+  def self.create_rotation_x(angle)
+    cos = Math.cos(Math::PI/180 * angle)
+    sin = Math.sin(Math::PI/180 * angle)
+    return Matrix.new(
+     [   1,   0,   0, 0],
+     [   0, cos, sin, 0],
+     [   0,-sin, cos, 0],
+     [   0,   0,   0, 1]
+    )
+  end
+
+  def self.create_rotation_y(angle)
+    cos = Math.cos(Math::PI/180 * angle)
+    sin = Math.sin(Math::PI/180 * angle)
+    return Matrix.new(
+     [ cos,   0,-sin, 0],
+     [   0,   1,   0, 0],
+     [ sin,   0, cos, 0],
+     [   0,   0,   0, 1]
+    )
+  end
+
+  def self.create_transration(x, y, z)
+    return Matrix.new(
+     [   1,   0,   0,   0],
+     [   0,   1,   0,   0],
+     [   0,   0,   1,   0],
+     [   x,   y,   z,   1]
+    )
+  end
+
+  def to_a
+    @arr.map {|v|v.to_a}.flatten
+  end
+end
+
+
+line1 = [568, 438, 568, 438, 607, 261, 607, 261, 520, 200, 520, 200, 531, 151,
+ 531, 151, 602, 115, 602, 115, 562, 19, 562, 19, 113, 21, 113, 21, 34, 83,
+ 34, 83, 81, 180, 81, 180, 221, 207, 221, 207, 251, 274, 251, 274, 204, 299,
+ 204, 299, 61, 262, 61, 262, 26, 358, 26, 358, 53, 430]
+line2 = [88, 380, 88, 380, 479, 392, 479, 392, 536, 302, 536, 302, 534, 267,
+ 534, 267, 461, 210, 461, 210, 459, 151, 459, 151, 518, 91, 518, 91, 487, 53,
+ 487, 53, 156, 77, 156, 77, 125, 110, 125, 110, 292, 197, 292, 197, 311, 268,
+ 311, 268, 227, 342, 227, 342, 93, 330]
+
+$walls = []
+
+class Wall < Sprite
+  attr_reader :height
+  def initialize(x1, y1, x2, y2, height)
+    super(0,0)
+    self.collision = [x1, y1, x2, y2, x2, y2]
+    @height = height
+  end
+end
+
+
+tx = 53
+ty = 430
+line1.each_slice(2) do |x, y|
+  $walls << Wall.new(tx, ty, x, y, 1)
+  tx = x
+  ty = y
+end
+tx = 93
+ty = 330
+line2.each_slice(2) do |x, y|
+  $walls << Wall.new(tx, ty, x, y, 1)
+  tx = x
+  ty = y
+end
+
+
+$ray = []
+(0..639).each do |x|
+  s = Sprite.new(0,0)
+  temp = Vector.new(400,0).rotate((x / 639.0 * 2 - 1) * 30)
+  s.collision = [0, 0, temp.x, temp.y, temp.x, temp.y]
+  s.center_x = s.center_y = 0
+  $ray << s
+end
+
+
+x = 300 
+y = 400
+angle = 0
+
+image = Image.new(1,1,C_RED)
+
+Window.loop do
+
+  angle += Input.x*5
+  if Input.key_down?(K_UP)
+    x += Math.cos(Math::PI / 180 * angle) * 3
+    y += Math.sin(Math::PI / 180 * angle) * 3
+  end
+  if Input.key_down?(K_DOWN)
+    x -= Math.cos(Math::PI / 180 * angle) * 3
+    y -= Math.sin(Math::PI / 180 * angle) * 3
+  end
+
+  $ray.each_with_index do |r, i|
+    r.x = x
+    r.y = y
+    r.angle = angle
+    ary = r.check($walls)
+    z = 250000
+    ax, ay = Vector.new(r.collision[0], r.collision[1]).rotate(angle).to_a
+    ax += r.x + 0.5
+    ay += r.y + 0.5
+    bx, by = Vector.new(r.collision[2], r.collision[3]).rotate(angle).to_a
+    bx += r.x + 0.5
+    by += r.y + 0.5
+    px = 0
+    py = 0
+    height = 0
+    if ary.size > 0 then
+      ary.each do |w|
+        cx = w.collision[0] + w.x + 0.5
+        cy = w.collision[1] + w.y + 0.5
+        dx = w.collision[2] + w.x + 0.5
+        dy = w.collision[3] + w.y + 0.5
+        tempx = dx-cx
+        tempy = dy-cy
+
+        dR = (tempy * (cx - ax) - tempx * (cy - ay) ) / ((bx - ax) * tempy - (by - ay) * tempx)
+
+        ix = ax + dR * (bx - ax)
+        iy = ay + dR * (by - ay)
+
+        length = (ix - r.x)**2 + (iy - r.y)**2
+
+        if length < z
+          z = length
+          px = ix
+          py = iy
+          height = w.height
+        end
+      end
+      z = Math::sqrt(z)
+      c = 255 - z / 400 * 255
+      Window.draw_line(i, 240 + 400.0 / z * 10, i, 240 - 400.0 / z * 10 * height, [c, c, c])
+      Window.draw(px, py, image)
+    end
+  end
+  break if Input.key_push?(K_ESCAPE)
+end
+

data/sample/new_sample/readme_sample.txt

@@ -0,0 +1,27 @@
+DXRuby �T���v���v���O����
+
+�܂��ŏ��ɁA�\�[�X�������Ă��߂�Ȃ����B
+�e�L�g�[�ɍ�������̂������Q�l�ɂȂ�΂��Ċ����ŋl�ߍ���ł���܂��B
+
+biyo.rb
+    �E�E�EWindow.draw_morph�̃T���v���ł��B�X�y�[�X�ŐL�΂��āA�����Ƃт��т�񂵂܂��B
+
+laser2.rb
+    �E�E�Eclassic_sample��laser.rb�̋����łł��B�}�E�X�̃{�^���Ń��[�U�[�����Ă܂��B
+          �G��͑��֐ߏ������Ă���A���[�U�[��1�s�N�Z�����P�ʂŏՓ˔�������Ă��܂��B
+
+rubima.rb
+    �E�E�E��т܂Ɋ�e�����T���v���V���[�e�B���O�ł��BRenderTarget��Sprite�𗘗p�����`�ɏC�����܂����B
+
+sprite_animation.rb
+    �E�E�ESprite�ɃA�j���[�V�����@�\��lj�����T���v���ł��B
+
+sprite_collision.rb
+    �E�E�E�e��Փ˔���̃T���v���ł��B
+
+sprite_collision2.rb
+    �E�E�E�摜����]/�ړ������ē������Ă��邩�ǂ����𔻒肷��T���v���ł��B
+
+sprite_simple.rb
+    �E�E�E�P����Sprite�̃T���v���ł��B
+