Project1

标题: 写相关的吸收伤害反弹伤害的脚本出了很多问题 [打印本页]

---

作者: chen12311    时间: 2024-9-7 01:20
标题: 写相关的吸收伤害反弹伤害的脚本出了很多问题


比如开开关时自己对自己没有造成伤害，还有取消敌人相关的buff然后开关关不掉了，就会一直没有伤害等等，所以求帮助
以下为代码（注：是给敌人使用的技能，我知道我写的代码很抽象，所以见谅 ）

RUBY 代码复制

module Absorb_text
  TEXT_TE=""
  TEXT_TEXT="%s吸收了%d点伤害。"
end
class Game_Battler < Game_BattlerBase
  alias make_damage_value_absorb make_damage_value
  def make_damage_value(user, item)
    if $game_switches[122]==true
      @value_absorb=0
      value = item.damage.eval(user, self, $game_variables)
      value *= item_element_rate(user, item)
      value *= pdr if item.physical?
      value *= mdr if item.magical?
      value *= rec if item.damage.recover?
      value = apply_critical(value) if @result.critical
      value = apply_variance(value, item.damage.variance)
      value = apply_guard(value)
      @value_absorb=value
      $game_variables[92]+=@value_absorb
      @result.make_damage(value.to_i, item)
    elsif $game_switches[122]==false
      make_damage_value_absorb(user,item)
    end
  end
end
class Game_ActionResult
  alias make_damage_absorb make_damage
  def make_damage(value, item)
    if $game_switches[121]==true
      @value_absorb_1=value
      value=0
      @critical = false if value == 0
      @hp_damage = value if item.damage.to_hp?
      @mp_damage = value if item.damage.to_mp?
      @mp_damage = [@battler.mp, @mp_damage].min
      @hp_drain = @hp_damage if item.damage.drain?
      @mp_drain = @mp_damage if item.damage.drain?
      @hp_drain = [@battler.hp, @hp_drain].min
      @success = true if item.damage.to_hp? || @mp_damage != 0
    elsif $game_switches[121]==false
      make_damage_absorb(value, item)
    end
  end
  def enemy_absorb_text
    if $game_switches[121]==true
      fmt = @battler.actor? ? Absorb_text::TEXT_TE : Absorb_text::TEXT_TEXT
      sprintf(fmt,@battler.name, @value_absorb_1)
    end
  end
  alias hp_damage_text_absorb hp_damage_text
  def hp_damage_text
    if $game_switches[121]==true
      if @hp_drain > 0
        fmt = @battler.actor? ? Vocab::ActorDrain : Absorb_text::TEXT_TE
        sprintf(fmt, @battler.name, Vocab::hp, @hp_drain)
      elsif @hp_damage > 0
        fmt = @battler.actor? ? Vocab::ActorDamage : Absorb_text::TEXT_TE
        sprintf(fmt, @battler.name, @hp_damage)
      elsif @hp_damage < 0
        fmt = @battler.actor? ? Vocab::ActorRecovery : Absorb_text::TEXT_TE
        sprintf(fmt, @battler.name, Vocab::hp, -hp_damage)
      else
        fmt = @battler.actor? ? Vocab::ActorNoDamage : Absorb_text::TEXT_TE
        sprintf(fmt, @battler.name)
      end
    elsif $game_switches[121]==false
      hp_damage_text_absorb
    end
  end
end
class Window_BattleLog
  alias display_damage_enemy_absorb display_damage
  def display_damage(target, item)
    display_hp_absorb(target, item)# if target.result.barrier?#
    display_damage_enemy_absorb(target, item)
  end
  def display_hp_absorb(target, item)
    add_text(target.result.enemy_absorb_text)
    wait
  end
end

module Absorb_text


  TEXT_TE=""


  TEXT_TEXT="%s吸收了%d点伤害。"


end


class Game_Battler < Game_BattlerBase


  alias make_damage_value_absorb make_damage_value


  def make_damage_value(user, item)


    if $game_switches[122]==true


      @value_absorb=0


      value = item.damage.eval(user, self, $game_variables)


      value *= item_element_rate(user, item)


      value *= pdr if item.physical?


      value *= mdr if item.magical?


      value *= rec if item.damage.recover?


      value = apply_critical(value) if @result.critical


      value = apply_variance(value, item.damage.variance)


      value = apply_guard(value)


      @value_absorb=value


      $game_variables[92]+=@value_absorb


      @result.make_damage(value.to_i, item)


    elsif $game_switches[122]==false


      make_damage_value_absorb(user,item)


    end


  end


end


class Game_ActionResult


  alias make_damage_absorb make_damage


  def make_damage(value, item)


    if $game_switches[121]==true


      @value_absorb_1=value


      value=0


      @critical = false if value == 0


      @hp_damage = value if item.damage.to_hp?


      @mp_damage = value if item.damage.to_mp?


      @mp_damage = [@battler.mp, @mp_damage].min


      @hp_drain = @hp_damage if item.damage.drain?


      @mp_drain = @mp_damage if item.damage.drain?


      @hp_drain = [@battler.hp, @hp_drain].min


      @success = true if item.damage.to_hp? || @mp_damage != 0


    elsif $game_switches[121]==false


      make_damage_absorb(value, item)


    end


  end


  def enemy_absorb_text


    if $game_switches[121]==true


      fmt = @battler.actor? ? Absorb_text::TEXT_TE : Absorb_text::TEXT_TEXT


      sprintf(fmt,@battler.name, @value_absorb_1)


    end


  end


  alias hp_damage_text_absorb hp_damage_text


  def hp_damage_text


    if $game_switches[121]==true


      if @hp_drain > 0


        fmt = @battler.actor? ? Vocab::ActorDrain : Absorb_text::TEXT_TE


        sprintf(fmt, @battler.name, Vocab::hp, @hp_drain)


      elsif @hp_damage > 0


        fmt = @battler.actor? ? Vocab::ActorDamage : Absorb_text::TEXT_TE


        sprintf(fmt, @battler.name, @hp_damage)


      elsif @hp_damage < 0


        fmt = @battler.actor? ? Vocab::ActorRecovery : Absorb_text::TEXT_TE


        sprintf(fmt, @battler.name, Vocab::hp, -hp_damage)


      else


        fmt = @battler.actor? ? Vocab::ActorNoDamage : Absorb_text::TEXT_TE


        sprintf(fmt, @battler.name)


      end


    elsif $game_switches[121]==false


      hp_damage_text_absorb


    end


  end


end


class Window_BattleLog


  alias display_damage_enemy_absorb display_damage


  def display_damage(target, item)


    display_hp_absorb(target, item)# if target.result.barrier?#


    display_damage_enemy_absorb(target, item)


  end


  def display_hp_absorb(target, item)


    add_text(target.result.enemy_absorb_text)


    wait


  end


end

---

作者: 百里_飞柳    时间: 2024-9-7 09:15
额每个战斗角色都会走这一套流程，居然用全局开关共用吗？
建议在 game battler 里面增加各个角色自己的实例变量
然后在受到伤害前判断，之后在别的地方调用这个角色的实例变量，在伤害处理结束后关闭该实例变量

---

作者: chen12311    时间: 2024-9-7 10:16

百里_飞柳 发表于 2024-9-7 09:15
额每个战斗角色都会走这一套流程，居然用全局开关共用吗？
建议在 game battler 里面增加各个角色自己的实 ...

但我这个是要给敌人用的技能，那应该怎么做

---

作者: chen12311    时间: 2024-9-7 22:17


还是有个问题，就是给敌人附加效果依旧没法关闭开关，我想要的效果是给敌人附加无法行动的状态时开关关闭，我知道问题但不知道怎么解决，求解答

RUBY 代码复制

module Absorb_text
  TEXT_TE=""
  TEXT_TEXT="%s吸收了%d点伤害。"
end
class Game_Battler < Game_BattlerBase
  alias make_damage_value_absorb make_damage_value
  def make_damage_value(user, item)
    if $game_switches[122]==true
      @value_absorb=0
      value = item.damage.eval(user, self, $game_variables)
      value *= item_element_rate(user, item)
      value *= pdr if item.physical?
      value *= mdr if item.magical?
      value *= rec if item.damage.recover?
      value = apply_critical(value) if @result.critical
      value = apply_variance(value, item.damage.variance)
      value = apply_guard(value)
      @result.make_damage(value.to_i, item)
      if @battler.actor? ==false
        @value_absorb=value
        $game_variables[92]+=@value_absorb
      end
    elsif $game_switches[122]==false
      make_damage_value_absorb(user,item)
    end
  end
end
class Game_ActionResult
  alias make_damage_absorb make_damage
  def make_damage(value, item)
    if $game_switches[121]==true && @battler.actor? ==false
      if value==0
        value_absorb_1=0
      elsif value>0
        @value_absorb_1=value
        value=0
      end
      @critical = false if value == 0
      @hp_damage = value if item.damage.to_hp?
      @mp_damage = value if item.damage.to_mp?
      @mp_damage = [@battler.mp, @mp_damage].min
      @hp_drain = @hp_damage if item.damage.drain?
      @mp_drain = @mp_damage if item.damage.drain?
      @hp_drain = [@battler.hp, @hp_drain].min
      @success = true if item.damage.to_hp? || @mp_damage != 0
    elsif $game_switches[121]==false || @battler.actor? ==true
      make_damage_absorb(value, item)
    end
  end
  def enemy_absorb_text
    if $game_switches[121]==true && @value_absorb_1>0
      fmt = @battler.actor? ? Absorb_text::TEXT_TE : Absorb_text::TEXT_TEXT
      sprintf(fmt,@battler.name, @value_absorb_1)
    end
  end
  alias hp_damage_text_absorb hp_damage_text
  def hp_damage_text
    if $game_switches[121]==true
      if @hp_drain > 0 
        fmt = @battler.actor? ? Vocab::ActorDrain : Absorb_text::TEXT_TE
        sprintf(fmt, @battler.name, Vocab::hp, @hp_drain)
      elsif @hp_damage > 0
        fmt = @battler.actor? ? Vocab::ActorDamage : Absorb_text::TEXT_TE
        sprintf(fmt, @battler.name, @hp_damage)
      elsif @hp_damage < 0
        fmt = @battler.actor? ? Vocab::ActorRecovery : Absorb_text::TEXT_TE
        sprintf(fmt, @battler.name, Vocab::hp, -hp_damage)
      else
        fmt = @battler.actor? ? Vocab::ActorNoDamage : Absorb_text::TEXT_TE
        sprintf(fmt, @battler.name)
      end
    elsif $game_switches[121]==false
      hp_damage_text_absorb
    end
  end
end
class Window_BattleLog
  alias display_damage_enemy_absorb display_damage
  def display_damage(target, item)
    display_hp_absorb(target, item)# if target.result.barrier?#
    display_damage_enemy_absorb(target, item)
  end
  def display_hp_absorb(target, item)
    add_text(target.result.enemy_absorb_text)
    wait
  end
end

module Absorb_text


  TEXT_TE=""


  TEXT_TEXT="%s吸收了%d点伤害。"


end


class Game_Battler < Game_BattlerBase


  alias make_damage_value_absorb make_damage_value


  def make_damage_value(user, item)


    if $game_switches[122]==true


      @value_absorb=0


      value = item.damage.eval(user, self, $game_variables)


      value *= item_element_rate(user, item)


      value *= pdr if item.physical?


      value *= mdr if item.magical?


      value *= rec if item.damage.recover?


      value = apply_critical(value) if @result.critical


      value = apply_variance(value, item.damage.variance)


      value = apply_guard(value)


      @result.make_damage(value.to_i, item)


      if @battler.actor? ==false


        @value_absorb=value


        $game_variables[92]+=@value_absorb


      end


    elsif $game_switches[122]==false


      make_damage_value_absorb(user,item)


    end


  end


end


class Game_ActionResult


  alias make_damage_absorb make_damage


  def make_damage(value, item)


    if $game_switches[121]==true && @battler.actor? ==false


      if value==0


        value_absorb_1=0


      elsif value>0


        @value_absorb_1=value


        value=0


      end


      @critical = false if value == 0


      @hp_damage = value if item.damage.to_hp?


      @mp_damage = value if item.damage.to_mp?


      @mp_damage = [@battler.mp, @mp_damage].min


      @hp_drain = @hp_damage if item.damage.drain?


      @mp_drain = @mp_damage if item.damage.drain?


      @hp_drain = [@battler.hp, @hp_drain].min


      @success = true if item.damage.to_hp? || @mp_damage != 0


    elsif $game_switches[121]==false || @battler.actor? ==true


      make_damage_absorb(value, item)


    end


  end


  def enemy_absorb_text


    if $game_switches[121]==true && @value_absorb_1>0


      fmt = @battler.actor? ? Absorb_text::TEXT_TE : Absorb_text::TEXT_TEXT


      sprintf(fmt,@battler.name, @value_absorb_1)


    end


  end


  alias hp_damage_text_absorb hp_damage_text


  def hp_damage_text


    if $game_switches[121]==true


      if @hp_drain > 0 


        fmt = @battler.actor? ? Vocab::ActorDrain : Absorb_text::TEXT_TE


        sprintf(fmt, @battler.name, Vocab::hp, @hp_drain)


      elsif @hp_damage > 0


        fmt = @battler.actor? ? Vocab::ActorDamage : Absorb_text::TEXT_TE


        sprintf(fmt, @battler.name, @hp_damage)


      elsif @hp_damage < 0


        fmt = @battler.actor? ? Vocab::ActorRecovery : Absorb_text::TEXT_TE


        sprintf(fmt, @battler.name, Vocab::hp, -hp_damage)


      else


        fmt = @battler.actor? ? Vocab::ActorNoDamage : Absorb_text::TEXT_TE


        sprintf(fmt, @battler.name)


      end


    elsif $game_switches[121]==false


      hp_damage_text_absorb


    end


  end


end


class Window_BattleLog


  alias display_damage_enemy_absorb display_damage


  def display_damage(target, item)


    display_hp_absorb(target, item)# if target.result.barrier?#


    display_damage_enemy_absorb(target, item)


  end


  def display_hp_absorb(target, item)


    add_text(target.result.enemy_absorb_text)


    wait


  end


end

---

欢迎光临 Project1 (https://rpg.blue/)

Powered by Discuz! X3.1