因为总被吐槽回合制落伍所以一嘚劲把回合制做成这样

guoxiaomi · 发表于 2018-2-25 21:44:07

本帖最后由 guoxiaomi 于 2018-2-25 21:49 编辑

仅供参考，不一定正确。你可以搜索 change 看看

如果你的 status_window.refresh 方法中，调用了 draw_text 方法，那应该是主要被这个东西限制了效率。如果可能的话，使用图片来绘制数字。

RUBY 代码复制

e0 = $game_troop.enemies[0]
5.times do
  Sprite_Siyecao.new(e0, 12)
end
 
class Sprite_Siyecao < Sprite
  # character ：发射者
  # times     ：发射子弹数
  def initialize(character,times)
    @viewport = $scene.spriteset.viewport3 #视野为战斗场面viewport3
    super(@viewport)
    @character = character
    @ch = @character
    @times = times
    self.visible = true
    reset
  end
  #--------------------------------------------------------------------------
  # 设置炮弹
  #--------------------------------------------------------------------------
  def reset
    return if $bullet.size >= 4096
    for i in 0...@times
    #检查指针上界
      break if $bullet.size >= 4096 #子弹总数限制4096
      angle = Math::PI / @times * i * 2 #角度为子弹数平分
      sprite = Sprite_Small1.new(@viewport,@ch,angle) #建立小玉
      s1 = Sprite_Heart1.new(@viewport, @ch, 0, sprite) #建立心弹
      s2 = Sprite_Heart1.new(@viewport, @ch, 1, sprite)
      s3 = Sprite_Heart1.new(@viewport, @ch, 2, sprite)
      s4 = Sprite_Heart1.new(@viewport, @ch, 3, sprite)
      $bullet.push(s1)
      s1.z = 100 + $bullet.size
      $bullet.push(s2)
      s2.z = 100 + $bullet.size
      $bullet.push(s3)
      s3.z = 100 + $bullet.size
      $bullet.push(s4)
      s4.z = 100 + $bullet.size
      $bullet.push(sprite)
      sprite.z = 100 + $bullet.size
    end
    Audio.thndj_se_play("Audio/SE/bullet_2",80,100)
    dispose
  end
  #--------------------------------------------------------------------------
  # ● 释放
  #--------------------------------------------------------------------------
  def dispose
    if self.bitmap != nil
      self.bitmap.dispose
      self.visible = false
    end
    super
  end
  #--------------------------------------------------------------------------
  # ● 更新画面
  #--------------------------------------------------------------------------
  def update
    super
    dispose
  end
end
 
#--------------------------------------------------------------------------
# Small
#--------------------------------------------------------------------------
class Sprite_Small1 < Sprite
  attr_accessor :available
  attr_accessor :vx #x 速度
  attr_accessor :vy #y 速度
  attr_accessor :ax #x 加速度
  attr_accessor :ay #y 加速度
  attr_accessor :vx0 #x 初速度
  attr_accessor :vy0 #y 初速度
  attr_accessor :an #角度
  attr_accessor :an0 #初速度角度
  attr_accessor :omiga #角速度
  attr_accessor :aomiga #角速度加速度
  attr_accessor :rr #向心运动半径
 
  attr_accessor :lifespan # 存活时间
  attr_accessor :lifetime # 已存活时间
  #attr_accessor :event_list # change behaviors according to time
  # [eventtime,new_vx,new_vy,new_ax,new_ay,sound_effect]
  # e.g. eventlist.push([300,5,5,1,1,""])
  attr_accessor :actor_or_enemy #敌我识别，0为我，1为敌
  attr_accessor :row_flag #旋转标志
  #--------------------------------------------------------------------------
  # ● 初始化对像
  #     viewport : 显示端口
  #     character: 发射者
  #     angle    : 弧度
  #--------------------------------------------------------------------------
 
  def initialize(viewport,character,angle)
    super(viewport)
    @character = character
    if @character.is_a?(Game_Actor)
      @actor_or_enemy = 0
    else
      @actor_or_enemy = 1
    end
    self.blend_type = 0
    @chox = @character.screen_x + 10
    @choy = @character.screen_y - 100
    @x = @chox #发射点X
    @y = @choy #发射点Y
    @an = angle #角度
    @an0 = angle #初速度角度
    @mathx = (Math.cos(@an))*18
    @mathy = (Math.sin(@an))*18
    reset
    self.bitmap = RPG::Cache.picture("bullet/小玉-黄")
    self.available = true
    self.visible = true
    update
  end
  #--------------------------------------------------------------------------
  # ● 设置对像
  #--------------------------------------------------------------------------
  def reset
    return if self.disposed?
    self.ox = 8 #图片半径8
    self.oy = 8
    self.x = @x
    self.y = @y
    @vx0 = @mathx #初速x
    @vy0 = @mathy #初速y
    self.vx = @vx0 #速度x
    self.vy = @vy0 #速度y
    self.omiga = 0 #角速度 应该是 'omega'
    self.aomiga = 0 #角速度加速度
    @an = self.get_angle #角度
    self.rr = 130 #旋转半径
    self.ax = 0 #@rv**2/rr*(Math.cos(@an))
    self.ay = 0 #@rv**2/rr*(Math.sin(@an))
 
    self.lifespan = 1024 #存活时间
    self.lifetime = 0
 
    self.available = false
    self.visible = false
  end
 
  # def can_be_seen?(recal = true)
  #   if self.x>-640 and self.x<$width+640 and self.y>-480 and self.y<$height+480
  #     return true
  #   else
  #     return false
  #   end
  # end
 
  # change 1, use && instead and
  def can_be_seen?(recal = true)
    return self.x > -640 && self.x < $width + 640 && self.y > -480 && self.y < $height + 480
  end
 
  # def get_angle #角度获取：以发射点为圆心，极坐标判定角度
  #   sign = (self.x - @chox) > 0 ? 0 : Math::PI
  #   return Math.atan((self.y - @choy) / ((self.x - @chox) == 0 ? 1 : (self.x - @chox))) + sign
  # end
 
  # change 2 * 重要 *
  # 如果是获取角度，这个函数才是正确的，返回值在 -PI ~ +PI 之间
  def get_angle
    dx = self.x - @chox
    dy = self.y - @choy
    return Math.atan2(dy, dx)
  end
  #--------------------------------------------------------------------------
  # ● 释放
  #--------------------------------------------------------------------------
  def dispose
    if self.bitmap != nil
      self.visible = false
    end
    super
  end
 
  # change 3
  def move
    # return false if self.visible == false
    return false if !self.visible # 3.1
 
    if self.available
      if self.lifetime < self.lifespan
 
        case self.lifetime
        when 1..26 #减速运动，每t速度衰减1.13
          # if @vx0.abs > 0
          if @vx0 != 0 # 3.2
            if @vx.abs <= 1
              @vx0 = 0
              self.vx = 0
            else
              @vx0 /= 1.13
              self.vx /= 1.13
            end
          end
 
          # if @vy0.abs > 0 # 3.3
          if @vy0 != 0
            if @vy.abs <= 1
              @vy0 = 0
              self.vy = 0
            else
              @vy0 /= 1.13
              self.vy /= 1.13
            end
          end #速度为0时开始旋转
 
          if @vx0 == 0 and @vy0 == 0 and @row_flag != true
            self.x = @chox + @rr * Math.cos(@an0) #X定点为初方向对应的圆周
            self.y = @choy + @rr * Math.sin(@an0) #Y定点为初方向对应的圆周
            @row_flag = true
          end
 
        when 27 #旋转的角速度加速度为0.3
          if @row_flag != true
            self.x = @chox + @rr * Math.cos(@an0)
            self.y = @choy + @rr * Math.sin(@an0)
            @row_flag = true
          end
          self.aomiga = 0.3
        when 28..37 #转动半径-1
          @rr -= 1
        when 38..48 #转动半径-3
          @rr -= 3
        when 49..50 #转动半径-2
          @rr -= 2
        when 51..60 #转动半径-1
          @rr -= 1
        when 70..79 #转动半径+1
          @rr += 1
        when 80..89 #转动半径+2
          @rr += 2
        when 90 #加速63t，角速度达到18.9
          # self.aomiga = -1+0.01*rand(100) #角速度代入随机负值
          self.aomiga = -1 + rand # 3.4
          @randr = rand(11) #转动半径增加值代入随机值
        when 91..102 #转动半径+4*0.1*随机值
          @rr += 4 + 0.1 * @randr
        when 103..113 #转动半径+随机值
          @rr += @randr
        when 114 #关闭转动，将当前的速度变为X速度和Y速度，置一初速度VX0，
          @row_flag = false #将四叶草甩出去
          # v = self.omiga * Math::PI/180 * ((self.y-@choy) * (self.y-@choy) + (self.x-@chox) * (self.x-@chox)) ** 0.5
          # an = self.get_angle
          # self.vx = v * Math.cos(an)
          # self.vy = v * Math.sin(an)
          # @vx0 = self.vx
 
          # 3.5
          _x, _y = self.x - @chox, self.y - @choy
          _r = Math.sqrt(_x * _x + _y * _y)
          v = self.omiga * Math::PI / 180 * _r
          self.vx = v * _x / _r
          self.vy = v * _y / _r
          @vx0 = self.vx
          # -- 3.5 不知道这样算对不对，因为 get_angle 和普通的 arctan 还是有区别
 
        when 114..139 #减速运动，速度衰减1.11
          if @vx0.abs > 1
            @vx0 /= 1.11
            self.vx /= 1.11
            self.vy /= 1.11
            if @vx0.abs <= 1
              @vx0 = 0
              self.vx = 0
              self.vy = 0
            end
          end
        when 140 #速度归零
          self.vx = 0
          self.vy = 0
        when 240 #小玉代入随机加速度，匀加速离开场景
          # an = rand(360) * Math::PI/180
          # v = rand(5)
          # self.ax = (0.1 + 0.05 * v) * Math.cos(an)
          # self.ay = (0.1 + 0.05 * v) * Math.sin(an)
          # 3.6
          self.ax = (0.2 + rand * 0.4) * (rand(2) - 0.5)
          self.ay = (0.2 + rand * 0.4) * (rand(2) - 0.5)
          # -- 3.6 这里不一定必须使速度均匀分布在一个环面内
        end
 
        if @row_flag #转动模式，x和y直接由角速度和转动半径决定
          @an = self.get_angle
          @an += self.omiga * Math::PI / 180
          self.omiga += self.aomiga
          self.x = @chox + @rr * Math.cos(@an)
          self.y = @choy + @rr * Math.sin(@an)
        else #加速模式，x和y由正常的加速减速运动
          self.x += self.vx
          self.y += self.vy
          self.vx += self.ax
          self.vy += self.ay
        end
 
        if self.can_be_seen?(false)
          self.visible = true unless self.visible
        else
          self.visible = false if self.visible
        end
        self.lifetime += 1
      else
        self.visible = false if self.visible
        self.available = false if self.available
      end
    else
      # if self.visible
      #   self.visible = false
      # end
      self.visible &&= false # 3.7 上面也可以这样改，未必能提升效率但是很酷
    end
    check
  end
 
  #--------------------------------------------------------------------------
  # ● 更新画面
  #--------------------------------------------------------------------------
  def update
    super
    #p self.visible
    return if self.visible == false
    if move == false
      return "delete"
    end
  end
 
  # change 4
  def check
    return unless $scene.is_a?(Scene_Battle)
    dx = self.x#+self.bitmap.width*0.5*0.75
    dy = self.y#+self.bitmap.height*0.5*0.75
    ra = 64 #子弹判定半径7，判定点半径1，合计8
    # 4.1
    ra_sq = 8 * 1.42
    # -- 4.1
    if self.actor_or_enemy == 1 #敌军
      for i in 0...$game_party.actors.size
        actor = $game_party.actors[i]
        sprite = $scene.spriteset.actor_sprites[$game_party.actors.size-1-i]
        tx = actor.screen_x - sprite.cw*0.05 #根据位图大小取判定点位置X
        ty = actor.screen_y - sprite.ch*0.445 #根据位图大小取判定点位置Y
        # if (dx-tx)*(dx-tx) + (dy-ty)*(dy-ty) <= ra #圆函数判定
        # 4.2
        _x, _y = (dx - tx).abs, (dy - ty).abs
        if _x + _y < ra_sq && (_x*_x + _y*_y) <= ra
        # -- 4.2 先做一个粗略的判断
          value = 1 + rand(5)
          value /= 2 if actor.guarding?
          actor.hp -= value
          actor.damage["event"] = value
          actor.damage_pop["event"] = true
          actor.animation.push([807+rand(3),true]) #击中动画
          # 4.3 *重要*
          # $scene.status_window.refresh
          $battle_status_need_refresh = true
          # --4.3 阻止多次刷新窗口，请在 Scene_Battle 的 update 方法中判断 $battle_status_need_refresh 再刷新窗口
          # 因为通常在 status_window.refresh 中调用了 draw_text 方法，这是耗时极高的方法
          # see change 5
          self.visible = false
        end
 
        if $game_party.all_dead?
            # 切换到游戏结束画面
            $scene = Scene_Gameover.new
            return
        end
      end#for
    else #我军弹幕
      for i in 0...$game_troop.enemies.size
        actor = $game_troop.enemies[i]
        sprite = $scene.spriteset.enemy_sprites[$game_troop.enemies.size-1-i]
        tx = actor.screen_x+sprite.cw*0.1 #根据位图大小取判定点位置X
        ty = actor.screen_y-sprite.ch*0.445 #根据位图大小取判定点位置Y
        # see change 4.2 and 4.3
        if (dx-tx)*(dx-tx) + (dy-ty)*(dy-ty) <= ra #圆函数判定
          value = 1 + rand(5)
          value /= 2 if actor.guarding?
          actor.hp -= value
          actor.damage["event"] = value
          actor.damage_pop["event"] = true
          actor.animation.push([807+rand(3),true]) #击中动画
          $scene.status_window.refresh
          self.visible = false
        end
      end #for
    end #if
  end #def
end
 
# change 5
class Scene_Battle
  alias _balabala_update update
  def update
    if $battle_status_need_refresh
      @status_window.refresh
    end
    _balabala_update
  end
end
 
#--------------------------------------------------------------------------
# Heart
#--------------------------------------------------------------------------
class Sprite_Heart1 < Sprite
  attr_accessor :available
  attr_accessor :vx #x 速度
  attr_accessor :vy #y 速度
  attr_accessor :ax #x 加速度
  attr_accessor :ay #y 加速度
  attr_accessor :an0 #最初的角度
  attr_accessor :lifespan # 存活时间
  attr_accessor :lifetime # 已存活时间
  #attr_accessor :event_list # change behaviors according to time
  # [eventtime,new_vx,new_vy,new_ax,new_ay,sound_effect]
  # e.g. eventlist.push([300,5,5,1,1,""])
  attr_accessor :actor_or_enemy #敌我识别，0为我，1为敌
  attr_accessor :relese_flag #释放标志
 
  #--------------------------------------------------------------------------
  # ● 初始化对像
  #     viewport : 显示端口
  #     angle    : 弧度 0=0 1=90 2=180 3=270
  #--------------------------------------------------------------------------
 
  def initialize(viewport,character,angle,target)
    super(viewport)
    @character = character
    if @character.is_a?(Game_Actor)
      @actor_or_enemy = 0
    else
      @actor_or_enemy = 1
    end
    self.blend_type = 0
    self.lifetime = 0
    @target = target
    @chox = @target.x
    @choy = @target.y
    @an = angle * Math::PI/2
    @an0 = angle * 90
 
    @x = @chox + 16*Math.cos(@an)
    @y = @choy + 16*Math.sin(@an)
 
    reset
 
    self.bitmap = RPG::Cache.picture("bullet/心弹-绿")
    self.available = true
    self.visible = true
    @release_flag = false
 
    update
  end
  #--------------------------------------------------------------------------
  # ● 设置对像
  #--------------------------------------------------------------------------
  def reset
    return if self.disposed?
    self.ox = 16 #子弹半径16
    self.oy = 16
    self.x = @x
    self.y = @y
    self.vx = 0 #速度X
    self.vy = 0 #速度Y
    @an = self.get_angle #角度
    self.ax = 0#@rv**2/rr*(Math.cos(@an))
    self.ay = 0#@rv**2/rr*(Math.sin(@an))
 
    self.lifespan = 1024
    self.lifetime = 0
 
    self.available = false
    self.visible = false
  end
 
  def can_be_seen?(recal = true)
    if self.x >-640 and self.x< $width + 640 and self.y > -480 and self.y < $height + 480
      return true
    else
      return false
    end
  end  # see change 1
 
  def get_angle #角度获取：以小玉为圆心，初位置+转动相位作为角度
    @chox = @target.x #小玉X
    @choy = @target.y #小玉Y
    an = (self.lifetime % 360 * 8 + @an0) * Math::PI / 180 #每t转动8度
    #心弹自身的角度为相位负值+90度+初相位方向修正
    self.angle = -self.lifetime % 360 * 8 + 90 + (@an0 % 180 == 0 ? @an0 : @an0 + 180)
    return an
  end  # see change 2
  #--------------------------------------------------------------------------
  # ● 释放
  #--------------------------------------------------------------------------
  def dispose
    if self.bitmap != nil
      self.visible = false
    end
    super
  end
 
  # change 6
  def move
    return false if self.visible == false
    ########################
    if self.available
      if self.lifetime < self.lifespan
        if self.lifetime == 140 #第140t时释放
          get_angle #获取角度，置对应角度加速度
          ang = (self.angle+(@an0%180 == 0 ? 180 : 0))*Math::PI/180
          self.vx = 0
          self.vy = 0
          self.ax = Math.cos(ang)*0.2
          self.ay = Math.sin(ang)*0.2
          @release_flag = true
        end
 
        if @release_flag == true #释放后
          self.x += self.vx
          self.y += self.vy
          self.vx += self.ax
          self.vy += self.ay
 
          # if (self.vx*self.vx+self.vy*self.vy)**0.5 >= 20 #速度大于20变为匀速
          if self.vx.abs + self.vy.abs > 20 && (self.vx*self.vx+self.vy*self.vy) >= 400 # 6.1
            self.ay = 0
            self.ax = 0
          end
        else #释放前
          @an = self.get_angle #获取角度
          self.x = @chox + 16 * Math.cos(@an) #X定位为小玉圆周
          self.y = @choy + 16 * Math.sin(@an) #Y定位为小玉圆周
        end
        if self.can_be_seen?(false)
          self.visible = true unless self.visible
        else
          self.visible = false if self.visible
        end
        self.lifetime += 1
      else
        self.visible = false if self.visible
        self.available = false if self.available
      end
    else
      if self.visible
        self.visible = false
      end
    end
 
    check
  end
 
  #--------------------------------------------------------------------------
  # ● 更新画面
  #--------------------------------------------------------------------------
  def update
    super
    #p self.visible
    return if self.visible == false
    if move == false
      return "delete"
    end
  end
 
  # see change 4
  def check
    return unless $scene.is_a?(Scene_Battle)
    dx = self.x#+self.bitmap.width*0.5*0.75
    dy = self.y#+self.bitmap.height*0.5*0.75
    ra = 256 #图形判定区15，判定点1，合计16
    if self.actor_or_enemy == 1 #敌军
      for i in 0...$game_party.actors.size
        actor = $game_party.actors[i]
        sprite = $scene.spriteset.actor_sprites[$game_party.actors.size-1-i]
        tx = actor.screen_x-sprite.cw*0.05 #根据位图尺寸决定判定点
        ty = actor.screen_y-sprite.ch*0.445
        if (dx-tx)*(dx-tx) + (dy-ty)*(dy-ty) <= ra
          value = 1 + rand(5)
          value /= 2 if actor.guarding?
          actor.hp -= value
          actor.damage["event"] = value
          actor.damage_pop["event"] = true
          actor.animation.push([807+rand(3),true]) #命中动画
          $scene.status_window.refresh
          self.visible = false
        end
        if $game_party.all_dead?
            # 切换到游戏结束画面
            $scene = Scene_Gameover.new
            return
        end
      end#for
    else #我军弹幕
      for i in 0...$game_troop.enemies.size
        actor = $game_troop.enemies[i]
        sprite = $scene.spriteset.enemy_sprites[$game_troop.enemies.size-1-i]
        tx = actor.screen_x+sprite.cw*0.1 #根据位图尺寸决定判定点
        ty = actor.screen_y-sprite.ch*0.445
        if (dx-tx)*(dx-tx) + (dy-ty)*(dy-ty) <= ra
          value = 1 + rand(5)
          value /= 2 if actor.guarding?
          actor.hp -= value
          actor.damage["event"] = value
          actor.damage_pop["event"] = true
          actor.animation.push([807+rand(3),true]) #命中动画
          $scene.status_window.refresh
          self.visible = false
        end
      end #for
    end #if
  end #def
end

e0 = $game_troop.enemies[0]


5.times do


  Sprite_Siyecao.new(e0, 12)


end


 


class Sprite_Siyecao < Sprite


  # character ：发射者


  # times     ：发射子弹数


  def initialize(character,times)


    @viewport = $scene.spriteset.viewport3 #视野为战斗场面viewport3


    super(@viewport)


    @character = character


    @ch = @character


    @times = times


    self.visible = true


    reset


  end


  #--------------------------------------------------------------------------


  # 设置炮弹


  #--------------------------------------------------------------------------


  def reset


    return if $bullet.size >= 4096


    for i in 0...@times


    #检查指针上界


      break if $bullet.size >= 4096 #子弹总数限制4096


      angle = Math::PI / @times * i * 2 #角度为子弹数平分


      sprite = Sprite_Small1.new(@viewport,@ch,angle) #建立小玉


      s1 = Sprite_Heart1.new(@viewport, @ch, 0, sprite) #建立心弹


      s2 = Sprite_Heart1.new(@viewport, @ch, 1, sprite)


      s3 = Sprite_Heart1.new(@viewport, @ch, 2, sprite)


      s4 = Sprite_Heart1.new(@viewport, @ch, 3, sprite)


      $bullet.push(s1)


      s1.z = 100 + $bullet.size


      $bullet.push(s2)


      s2.z = 100 + $bullet.size


      $bullet.push(s3)


      s3.z = 100 + $bullet.size


      $bullet.push(s4)


      s4.z = 100 + $bullet.size


      $bullet.push(sprite)


      sprite.z = 100 + $bullet.size


    end


    Audio.thndj_se_play("Audio/SE/bullet_2",80,100)


    dispose


  end


  #--------------------------------------------------------------------------


  # ● 释放


  #--------------------------------------------------------------------------


  def dispose


    if self.bitmap != nil


      self.bitmap.dispose


      self.visible = false


    end


    super


  end


  #--------------------------------------------------------------------------


  # ● 更新画面


  #--------------------------------------------------------------------------


  def update


    super


    dispose


  end


end


 


#--------------------------------------------------------------------------


# Small


#--------------------------------------------------------------------------


class Sprite_Small1 < Sprite


  attr_accessor :available


  attr_accessor :vx #x 速度


  attr_accessor :vy #y 速度


  attr_accessor :ax #x 加速度


  attr_accessor :ay #y 加速度


  attr_accessor :vx0 #x 初速度


  attr_accessor :vy0 #y 初速度


  attr_accessor :an #角度


  attr_accessor :an0 #初速度角度


  attr_accessor :omiga #角速度


  attr_accessor :aomiga #角速度加速度


  attr_accessor :rr #向心运动半径


 


  attr_accessor :lifespan # 存活时间


  attr_accessor :lifetime # 已存活时间


  #attr_accessor :event_list # change behaviors according to time


  # [eventtime,new_vx,new_vy,new_ax,new_ay,sound_effect]


  # e.g. eventlist.push([300,5,5,1,1,""])


  attr_accessor :actor_or_enemy #敌我识别，0为我，1为敌


  attr_accessor :row_flag #旋转标志


  #--------------------------------------------------------------------------


  # ● 初始化对像


  #     viewport : 显示端口


  #     character: 发射者


  #     angle    : 弧度


  #--------------------------------------------------------------------------


 


  def initialize(viewport,character,angle)


    super(viewport)


    @character = character


    if @character.is_a?(Game_Actor)


      @actor_or_enemy = 0


    else


      @actor_or_enemy = 1


    end


    self.blend_type = 0


    @chox = @character.screen_x + 10


    @choy = @character.screen_y - 100


    @x = @chox #发射点X


    @y = @choy #发射点Y


    @an = angle #角度


    @an0 = angle #初速度角度


    @mathx = (Math.cos(@an))*18


    @mathy = (Math.sin(@an))*18


    reset


    self.bitmap = RPG::Cache.picture("bullet/小玉-黄")


    self.available = true


    self.visible = true


    update


  end


  #--------------------------------------------------------------------------


  # ● 设置对像


  #--------------------------------------------------------------------------


  def reset


    return if self.disposed?


    self.ox = 8 #图片半径8


    self.oy = 8


    self.x = @x


    self.y = @y


    @vx0 = @mathx #初速x


    @vy0 = @mathy #初速y


    self.vx = @vx0 #速度x


    self.vy = @vy0 #速度y


    self.omiga = 0 #角速度 应该是 'omega'


    self.aomiga = 0 #角速度加速度


    @an = self.get_angle #角度


    self.rr = 130 #旋转半径


    self.ax = 0 #@rv**2/rr*(Math.cos(@an))


    self.ay = 0 #@rv**2/rr*(Math.sin(@an))


 


    self.lifespan = 1024 #存活时间


    self.lifetime = 0


 


    self.available = false


    self.visible = false


  end


 


  # def can_be_seen?(recal = true)


  #   if self.x>-640 and self.x<$width+640 and self.y>-480 and self.y<$height+480


  #     return true


  #   else


  #     return false


  #   end


  # end


 


  # change 1, use && instead and


  def can_be_seen?(recal = true)


    return self.x > -640 && self.x < $width + 640 && self.y > -480 && self.y < $height + 480


  end


 


  # def get_angle #角度获取：以发射点为圆心，极坐标判定角度


  #   sign = (self.x - @chox) > 0 ? 0 : Math::PI


  #   return Math.atan((self.y - @choy) / ((self.x - @chox) == 0 ? 1 : (self.x - @chox))) + sign


  # end


 


  # change 2 * 重要 *


  # 如果是获取角度，这个函数才是正确的，返回值在 -PI ~ +PI 之间


  def get_angle


    dx = self.x - @chox


    dy = self.y - @choy


    return Math.atan2(dy, dx)


  end


  #--------------------------------------------------------------------------


  # ● 释放


  #--------------------------------------------------------------------------


  def dispose


    if self.bitmap != nil


      self.visible = false


    end


    super


  end


 


  # change 3


  def move


    # return false if self.visible == false


    return false if !self.visible # 3.1


 


    if self.available


      if self.lifetime < self.lifespan


 


        case self.lifetime


        when 1..26 #减速运动，每t速度衰减1.13


          # if @vx0.abs > 0


          if @vx0 != 0 # 3.2


            if @vx.abs <= 1


              @vx0 = 0


              self.vx = 0


            else


              @vx0 /= 1.13


              self.vx /= 1.13


            end


          end


 


          # if @vy0.abs > 0 # 3.3


          if @vy0 != 0


            if @vy.abs <= 1


              @vy0 = 0


              self.vy = 0


            else


              @vy0 /= 1.13


              self.vy /= 1.13


            end


          end #速度为0时开始旋转


 


          if @vx0 == 0 and @vy0 == 0 and @row_flag != true


            self.x = @chox + @rr * Math.cos(@an0) #X定点为初方向对应的圆周


            self.y = @choy + @rr * Math.sin(@an0) #Y定点为初方向对应的圆周


            @row_flag = true


          end


 


        when 27 #旋转的角速度加速度为0.3


          if @row_flag != true


            self.x = @chox + @rr * Math.cos(@an0)


            self.y = @choy + @rr * Math.sin(@an0)


            @row_flag = true


          end


          self.aomiga = 0.3


        when 28..37 #转动半径-1


          @rr -= 1


        when 38..48 #转动半径-3


          @rr -= 3


        when 49..50 #转动半径-2


          @rr -= 2


        when 51..60 #转动半径-1


          @rr -= 1


        when 70..79 #转动半径+1


          @rr += 1


        when 80..89 #转动半径+2


          @rr += 2


        when 90 #加速63t，角速度达到18.9


          # self.aomiga = -1+0.01*rand(100) #角速度代入随机负值


          self.aomiga = -1 + rand # 3.4


          @randr = rand(11) #转动半径增加值代入随机值


        when 91..102 #转动半径+4*0.1*随机值


          @rr += 4 + 0.1 * @randr


        when 103..113 #转动半径+随机值


          @rr += @randr


        when 114 #关闭转动，将当前的速度变为X速度和Y速度，置一初速度VX0，


          @row_flag = false #将四叶草甩出去


          # v = self.omiga * Math::PI/180 * ((self.y-@choy) * (self.y-@choy) + (self.x-@chox) * (self.x-@chox)) ** 0.5


          # an = self.get_angle


          # self.vx = v * Math.cos(an)


          # self.vy = v * Math.sin(an)


          # @vx0 = self.vx


 


          # 3.5


          _x, _y = self.x - @chox, self.y - @choy


          _r = Math.sqrt(_x * _x + _y * _y)


          v = self.omiga * Math::PI / 180 * _r


          self.vx = v * _x / _r


          self.vy = v * _y / _r


          @vx0 = self.vx


          # -- 3.5 不知道这样算对不对，因为 get_angle 和普通的 arctan 还是有区别


 


        when 114..139 #减速运动，速度衰减1.11


          if @vx0.abs > 1


            @vx0 /= 1.11


            self.vx /= 1.11


            self.vy /= 1.11


            if @vx0.abs <= 1


              @vx0 = 0


              self.vx = 0


              self.vy = 0


            end


          end


        when 140 #速度归零


          self.vx = 0


          self.vy = 0


        when 240 #小玉代入随机加速度，匀加速离开场景


          # an = rand(360) * Math::PI/180


          # v = rand(5)


          # self.ax = (0.1 + 0.05 * v) * Math.cos(an)


          # self.ay = (0.1 + 0.05 * v) * Math.sin(an)


          # 3.6


          self.ax = (0.2 + rand * 0.4) * (rand(2) - 0.5)


          self.ay = (0.2 + rand * 0.4) * (rand(2) - 0.5)


          # -- 3.6 这里不一定必须使速度均匀分布在一个环面内


        end


 


        if @row_flag #转动模式，x和y直接由角速度和转动半径决定


          @an = self.get_angle


          @an += self.omiga * Math::PI / 180


          self.omiga += self.aomiga


          self.x = @chox + @rr * Math.cos(@an)


          self.y = @choy + @rr * Math.sin(@an)


        else #加速模式，x和y由正常的加速减速运动


          self.x += self.vx


          self.y += self.vy


          self.vx += self.ax


          self.vy += self.ay


        end


 


        if self.can_be_seen?(false)


          self.visible = true unless self.visible


        else


          self.visible = false if self.visible


        end


        self.lifetime += 1


      else


        self.visible = false if self.visible


        self.available = false if self.available


      end


    else


      # if self.visible


      #   self.visible = false


      # end


      self.visible &&= false # 3.7 上面也可以这样改，未必能提升效率但是很酷


    end


    check


  end


 


  #--------------------------------------------------------------------------


  # ● 更新画面


  #--------------------------------------------------------------------------


  def update


    super


    #p self.visible


    return if self.visible == false


    if move == false


      return "delete"


    end


  end


 


  # change 4


  def check


    return unless $scene.is_a?(Scene_Battle)


    dx = self.x#+self.bitmap.width*0.5*0.75


    dy = self.y#+self.bitmap.height*0.5*0.75


    ra = 64 #子弹判定半径7，判定点半径1，合计8


    # 4.1


    ra_sq = 8 * 1.42


    # -- 4.1


    if self.actor_or_enemy == 1 #敌军


      for i in 0...$game_party.actors.size


        actor = $game_party.actors[i]


        sprite = $scene.spriteset.actor_sprites[$game_party.actors.size-1-i]


        tx = actor.screen_x - sprite.cw*0.05 #根据位图大小取判定点位置X


        ty = actor.screen_y - sprite.ch*0.445 #根据位图大小取判定点位置Y


        # if (dx-tx)*(dx-tx) + (dy-ty)*(dy-ty) <= ra #圆函数判定


        # 4.2


        _x, _y = (dx - tx).abs, (dy - ty).abs


        if _x + _y < ra_sq && (_x*_x + _y*_y) <= ra


        # -- 4.2 先做一个粗略的判断


          value = 1 + rand(5)


          value /= 2 if actor.guarding?


          actor.hp -= value


          actor.damage["event"] = value


          actor.damage_pop["event"] = true


          actor.animation.push([807+rand(3),true]) #击中动画


          # 4.3 *重要*


          # $scene.status_window.refresh


          $battle_status_need_refresh = true


          # --4.3 阻止多次刷新窗口，请在 Scene_Battle 的 update 方法中判断 $battle_status_need_refresh 再刷新窗口


          # 因为通常在 status_window.refresh 中调用了 draw_text 方法，这是耗时极高的方法


          # see change 5


          self.visible = false


        end


 


        if $game_party.all_dead?


            # 切换到游戏结束画面


            $scene = Scene_Gameover.new


            return


        end


      end#for


    else #我军弹幕


      for i in 0...$game_troop.enemies.size


        actor = $game_troop.enemies[i]


        sprite = $scene.spriteset.enemy_sprites[$game_troop.enemies.size-1-i]


        tx = actor.screen_x+sprite.cw*0.1 #根据位图大小取判定点位置X


        ty = actor.screen_y-sprite.ch*0.445 #根据位图大小取判定点位置Y


        # see change 4.2 and 4.3


        if (dx-tx)*(dx-tx) + (dy-ty)*(dy-ty) <= ra #圆函数判定


          value = 1 + rand(5)


          value /= 2 if actor.guarding?


          actor.hp -= value


          actor.damage["event"] = value


          actor.damage_pop["event"] = true


          actor.animation.push([807+rand(3),true]) #击中动画


          $scene.status_window.refresh


          self.visible = false


        end


      end #for


    end #if


  end #def


end


 


# change 5


class Scene_Battle


  alias _balabala_update update


  def update


    if $battle_status_need_refresh


      @status_window.refresh


    end


    _balabala_update


  end


end


 


#--------------------------------------------------------------------------


# Heart


#--------------------------------------------------------------------------


class Sprite_Heart1 < Sprite


  attr_accessor :available


  attr_accessor :vx #x 速度


  attr_accessor :vy #y 速度


  attr_accessor :ax #x 加速度


  attr_accessor :ay #y 加速度


  attr_accessor :an0 #最初的角度


  attr_accessor :lifespan # 存活时间


  attr_accessor :lifetime # 已存活时间


  #attr_accessor :event_list # change behaviors according to time


  # [eventtime,new_vx,new_vy,new_ax,new_ay,sound_effect]


  # e.g. eventlist.push([300,5,5,1,1,""])


  attr_accessor :actor_or_enemy #敌我识别，0为我，1为敌


  attr_accessor :relese_flag #释放标志


 


  #--------------------------------------------------------------------------


  # ● 初始化对像


  #     viewport : 显示端口


  #     angle    : 弧度 0=0 1=90 2=180 3=270


  #--------------------------------------------------------------------------


 


  def initialize(viewport,character,angle,target)


    super(viewport)


    @character = character


    if @character.is_a?(Game_Actor)


      @actor_or_enemy = 0


    else


      @actor_or_enemy = 1


    end


    self.blend_type = 0


    self.lifetime = 0


    @target = target


    @chox = @target.x


    @choy = @target.y


    @an = angle * Math::PI/2


    @an0 = angle * 90


 


    @x = @chox + 16*Math.cos(@an)


    @y = @choy + 16*Math.sin(@an)


 


    reset


 


    self.bitmap = RPG::Cache.picture("bullet/心弹-绿")


    self.available = true


    self.visible = true


    @release_flag = false


 


    update


  end


  #--------------------------------------------------------------------------


  # ● 设置对像


  #--------------------------------------------------------------------------


  def reset


    return if self.disposed?


    self.ox = 16 #子弹半径16


    self.oy = 16


    self.x = @x


    self.y = @y


    self.vx = 0 #速度X


    self.vy = 0 #速度Y


    @an = self.get_angle #角度


    self.ax = 0#@rv**2/rr*(Math.cos(@an))


    self.ay = 0#@rv**2/rr*(Math.sin(@an))


 


    self.lifespan = 1024


    self.lifetime = 0


 


    self.available = false


    self.visible = false


  end


 


  def can_be_seen?(recal = true)


    if self.x >-640 and self.x< $width + 640 and self.y > -480 and self.y < $height + 480


      return true


    else


      return false


    end


  end  # see change 1


 


  def get_angle #角度获取：以小玉为圆心，初位置+转动相位作为角度


    @chox = @target.x #小玉X


    @choy = @target.y #小玉Y


    an = (self.lifetime % 360 * 8 + @an0) * Math::PI / 180 #每t转动8度


    #心弹自身的角度为相位负值+90度+初相位方向修正


    self.angle = -self.lifetime % 360 * 8 + 90 + (@an0 % 180 == 0 ? @an0 : @an0 + 180)


    return an


  end  # see change 2


  #--------------------------------------------------------------------------


  # ● 释放


  #--------------------------------------------------------------------------


  def dispose


    if self.bitmap != nil


      self.visible = false


    end


    super


  end


 


  # change 6


  def move


    return false if self.visible == false


    ########################


    if self.available


      if self.lifetime < self.lifespan


        if self.lifetime == 140 #第140t时释放


          get_angle #获取角度，置对应角度加速度


          ang = (self.angle+(@an0%180 == 0 ? 180 : 0))*Math::PI/180


          self.vx = 0


          self.vy = 0


          self.ax = Math.cos(ang)*0.2


          self.ay = Math.sin(ang)*0.2


          @release_flag = true


        end


 


        if @release_flag == true #释放后


          self.x += self.vx


          self.y += self.vy


          self.vx += self.ax


          self.vy += self.ay


 


          # if (self.vx*self.vx+self.vy*self.vy)**0.5 >= 20 #速度大于20变为匀速


          if self.vx.abs + self.vy.abs > 20 && (self.vx*self.vx+self.vy*self.vy) >= 400 # 6.1


            self.ay = 0


            self.ax = 0


          end


        else #释放前


          @an = self.get_angle #获取角度


          self.x = @chox + 16 * Math.cos(@an) #X定位为小玉圆周


          self.y = @choy + 16 * Math.sin(@an) #Y定位为小玉圆周


        end


        if self.can_be_seen?(false)


          self.visible = true unless self.visible


        else


          self.visible = false if self.visible


        end


        self.lifetime += 1


      else


        self.visible = false if self.visible


        self.available = false if self.available


      end


    else


      if self.visible


        self.visible = false


      end


    end


 


    check


  end


 


  #--------------------------------------------------------------------------


  # ● 更新画面


  #--------------------------------------------------------------------------


  def update


    super


    #p self.visible


    return if self.visible == false


    if move == false


      return "delete"


    end


  end


 


  # see change 4


  def check


    return unless $scene.is_a?(Scene_Battle)


    dx = self.x#+self.bitmap.width*0.5*0.75


    dy = self.y#+self.bitmap.height*0.5*0.75


    ra = 256 #图形判定区15，判定点1，合计16


    if self.actor_or_enemy == 1 #敌军


      for i in 0...$game_party.actors.size


        actor = $game_party.actors[i]


        sprite = $scene.spriteset.actor_sprites[$game_party.actors.size-1-i]


        tx = actor.screen_x-sprite.cw*0.05 #根据位图尺寸决定判定点


        ty = actor.screen_y-sprite.ch*0.445


        if (dx-tx)*(dx-tx) + (dy-ty)*(dy-ty) <= ra


          value = 1 + rand(5)


          value /= 2 if actor.guarding?


          actor.hp -= value


          actor.damage["event"] = value


          actor.damage_pop["event"] = true


          actor.animation.push([807+rand(3),true]) #命中动画


          $scene.status_window.refresh


          self.visible = false


        end


        if $game_party.all_dead?


            # 切换到游戏结束画面


            $scene = Scene_Gameover.new


            return


        end


      end#for


    else #我军弹幕


      for i in 0...$game_troop.enemies.size


        actor = $game_troop.enemies[i]


        sprite = $scene.spriteset.enemy_sprites[$game_troop.enemies.size-1-i]


        tx = actor.screen_x+sprite.cw*0.1 #根据位图尺寸决定判定点


        ty = actor.screen_y-sprite.ch*0.445


        if (dx-tx)*(dx-tx) + (dy-ty)*(dy-ty) <= ra


          value = 1 + rand(5)


          value /= 2 if actor.guarding?


          actor.hp -= value


          actor.damage["event"] = value


          actor.damage_pop["event"] = true


          actor.animation.push([807+rand(3),true]) #命中动画


          $scene.status_window.refresh


          self.visible = false


        end


      end #for


    end #if


  end #def


end

大魔术师 · 发表于 2018-2-28 23:22:48

余音·魔眼发表于 2018-2-24 10:46
说回合制落后的人都是因为他根本就不知道回合制是什么，回合制千万不能用默认的那种（因为那才是真正的落后 ...

这确实回合制被诟病的原因！
但是回合制不仅仅可以讲策略，还可以结合剧情道具事件起到增强游戏的可玩性！
比如说结合剧情可以选择剧情多线发展，创造多结局！
结合道具可以让敌人变强或变弱增加乐趣！
结合事件可以多收人，多捡道具，增加额外剧情都是可以的！

woshibingfajia · 发表于 2022-5-10 11:49:15

没看到脚本呀

帐号		自动登录	找回密码
密码			注册会员

[胡扯] 因为总被吐槽回合制落伍所以一嘚劲把回合制做成这样

点评

评分

开拓者