敌人在战斗中的另种算法

slick · 发表于 2008-11-8 19:49:25

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

这个系统让敌人在游戏中使用一种新的智慧算法，让攻击目标的选择更加人性化。

敌人专挑以下三种目标发动攻击：
1.重攻轻守的。
2.快死的。
3.不能回避攻击的。

当然，敌人也会优先选择己方比较厉害的角色优先进行治疗与回复。

这样，电脑就和玩家一样，好像有一个活生生的“人”在幕后控制敌人的行动。

#==============================================================================
# ■ Game_BattleAction
#------------------------------------------------------------------------------
# 　处理行动 (战斗中的行动) 的类。这个类在 Game_Battler 类
# 的内部使用。
#==============================================================================
class Game_BattleAction
#--------------------------------------------------------------------------
# ● 既定目标 (敌人用)
#--------------------------------------------------------------------------
def decide_certain_target_for_enemy
# 效果范围的分支
if for_one_friend_hp0?
battler = $game_troop.certain_target_enemy_hp0
elsif for_one_friend?
battler = $game_troop.certain_target_enemy
else
battler = $game_party.certain_target_actor
end
# 对像存在的话取得索引、
# 对像不存在的场合下清除行动
if battler != nil
@target_index = battler.index
else
clear
end
end
end
#==============================================================================
# ■ Game_Party
#------------------------------------------------------------------------------
# 　处理同伴的类。包含金钱以及物品的信息。本类的实例
# 请参考 $game_party。
#==============================================================================
class Game_Party
#--------------------------------------------------------------------------
# ● 对像角色的确定
# hp0 : 限制为 HP 0 的角色
#--------------------------------------------------------------------------
def certain_target_actor(hp0 = false)
# 初始化权重值
power = 1.0
last_power = 1.0
# 初始化轮流
roulette = nil
# 循环
for actor in @actors
# 符合条件的场合
if (not hp0 and actor.exist?) or (hp0 and actor.hp0?)
power = 1.0
if actor.guarding?
power2 = 0.5
elsif actor.cant_evade?
power2 = 2.0
else
power2 = 1.0
end
# 检查其它状态：若防御修正值偏低，则权重加大，否则减小
for iii in 1...$data_states.size
if actor.state?(iii)
power2 *= 100.0 / $data_states[iii].pdef_rate
power2 *= 100.0 / $data_states[iii].mdef_rate
power2 *= 100.0 / $data_states[iii].eva
end
end
power = 1.0 * actor.hp * (actor.pdef + actor.mdef) * actor.agi / (actor.int * actor.atk * actor.str * power2)
if roulette == nil
roulette = actor
last_power = power
else
# 权重值的修正：如果下一位战斗员的权重值较小，则换人
if power < last_power
roulette = actor
last_power = power
end
end
end
end
# 决定角色
return roulette
end
end
#==============================================================================
# ■ Game_Troop
#------------------------------------------------------------------------------
# 　处理队伍的类。本类的实例请参考 $game_troop
#
#==============================================================================
class Game_Troop
#--------------------------------------------------------------------------
# ● 对像敌人的确定
# hp0 : 限制 HP 0 的敌人
#--------------------------------------------------------------------------
def certain_target_enemy(hp0 = false)
# 初始化权重值
power = 1.0
last_power = 1.0
# 初始化轮流
roulette = nil
# 循环
for enemy in @enemies
# 符合条件的场合
if (not hp0 and enemy.exist?) or (hp0 and enemy.hp0?)
power = 1.0
if enemy.guarding?
power2 = 0.5
elsif enemy.cant_evade?
power2 = 2.0
else
power2 = 1.0
end
power = 1.0 * enemy.hp * (enemy.pdef + enemy.mdef) * enemy.agi / (enemy.int * enemy.atk * enemy.str * power2)
if roulette == nil
roulette = enemy
last_power = power
else
# 权重值的修正：如果下一位战斗员的权重值较小，则换人
if power < last_power
roulette = enemy
last_power = power
end
end
end
end
# 决定敌人
return roulette
end
#--------------------------------------------------------------------------
# ● 对像敌人的确定 (HP 0)
#--------------------------------------------------------------------------
def certain_target_enemy_hp0
return certain_target_enemy(true)
end
end
#==============================================================================
# ■ Game_Enemy
#------------------------------------------------------------------------------
# 　处理敌人的类。本类在 Game_Troop 类 ($game_troop) 的
# 内部使用。
#==============================================================================
class Game_Enemy < Game_Battler
#--------------------------------------------------------------------------
# ● 生成行动
#--------------------------------------------------------------------------
def make_action
# 清除当前行动
self.current_action.clear
# 无法行动的情况
unless self.movable?
# 过程结束
return
end
# 抽取现在有效的行动
available_actions = []
rating_max = 0
for action in self.actions
# 确认回合条件
n = $game_temp.battle_turn
a = action.condition_turn_a
b = action.condition_turn_b
if (b == 0 and n != a) or
(b > 0 and (n < 1 or n < a or n % b != a % b))
next
end
# 确认 HP 条件
if self.hp * 100.0 / self.maxhp > action.condition_hp
next
end
# 确认等级条件
if $game_party.max_level < action.condition_level
next
end
# 确认开关条件
switch_id = action.condition_switch_id
if switch_id > 0 and $game_switches[switch_id] == false
next
end
# 符合条件 : 添加本行动
available_actions.push(action)
if action.rating > rating_max
rating_max = action.rating
end
end
# 最大概率值作为 3 合计计算(0 除外)
ratings_total = 0
for action in available_actions
if action.rating > rating_max - 3
ratings_total += action.rating - (rating_max - 3)
end
end
# 概率合计不为 0 的情况下
if ratings_total > 0
# 生成随机数
value = rand(ratings_total)
# 设置对应生成随机数的当前行动
for action in available_actions
if action.rating > rating_max - 3
if value < action.rating - (rating_max - 3)
self.current_action.kind = action.kind
self.current_action.basic = action.basic
self.current_action.skill_id = action.skill_id
# 修改：敌人不再盲目乱打，而是死盯一个确定目标=================================
self.current_action.decide_certain_target_for_enemy
# =============================================================================
return
else
value -= action.rating - (rating_max - 3)
end
end
end
end
end
end

复制代码

范例工程：
http://rpg.blue/upload_program/d ... ��法_106573658.rar

一路一风尘 · 发表于 2008-11-8 19:57:45

提示: 作者被禁止或删除内容自动屏蔽

slick · 发表于 2008-11-8 20:13:47

以下引用一路一风尘于2008-11-8 11:57:45的发言：

感觉利用权值做AI,例如血量多少，杀伤力多少，回复力多少，是否可造成异常伤害，再根据人的心理习惯，优先攻击恢复系与异常系的特征展1~2层树，或许效果会更好。

对了，我这个算法的基本原理是这样：

第一权重值的计算方法：

对象HP * (对象PDEF + 对象MDEF) * 对象AGI / (对象INT * 对象ATK * 对象STR * 第二权重值)

第二权重值的计算方法：

如果对象不能回避攻击，这个值取2;
如果对象正在防御，这个值取0.5;
对象的状态也会影响权重值：
防御降低——第二权重加大
防御升高——第二权重减小
其它情况下均取1。

第一权重值越小，被攻击的概率越高。

而第二权重的加大会导致第一权重的减小。

心理习惯。。。这个建议不错{/jy}

TERENCE · 发表于 2008-11-9 03:05:47

敌人不再盲目乱打，而是死盯一个确定目标
self.current_action.decide_certain_target_for_enemy
这一段這似乎太殘人了～～

万一敌人一多豈不是会被围殴了！

整合到RTAB版我试了一下死的更惨.....
敌人都好兇啊～～

slick · 发表于 2008-11-9 06:20:22

以下引用TERENCE于2008-11-8 19:05:47的发言：

敌人不再盲目乱打，而是死盯一个确定目标
self.current_action.decide_certain_target_for_enemy
这一段這似乎太殘人了～～

万一敌人一多豈不是会被围殴了！

整合到RTAB版我试了一下死的更惨.....
敌人都好兇啊～～

呵呵，这才像跟人一样玩嘛，我们在玩RPG的时候不都会选择逐个击破的策略么。

一路一风尘 · 发表于 2008-11-9 06:23:45

提示: 作者被禁止或删除内容自动屏蔽

一路一风尘 · 发表于 2008-11-9 06:23:51

提示: 作者被禁止或删除内容自动屏蔽

slick · 发表于 2008-11-9 07:36:01

以下引用一路一风尘于2008-11-8 22:23:45的发言：
其实这样有套路可寻，反而变傻，增加点变数或许更为合适。

再试试这个新工程，50号变量操纵敌人的智能等级
http://rpg.blue/upload_program/d ... �法1_106616148.rar

一路一风尘 · 发表于 2008-11-9 07:38:09

提示: 作者被禁止或删除内容自动屏蔽

slick · 发表于 2008-11-9 07:42:33

以下引用一路一风尘于2008-11-8 23:38:09的发言：

工程下来我也无法打开，还是贴代码吧，我还阅读的了。

#==============================================================================
# ■ Game_BattleAction
#------------------------------------------------------------------------------
# 　处理行动 (战斗中的行动) 的类。这个类在 Game_Battler 类
# 的内部使用。
#==============================================================================
class Game_BattleAction
#--------------------------------------------------------------------------
# ● 既定目标 (敌人用)
#--------------------------------------------------------------------------
def decide_certain_target_for_enemy
# 效果范围的分支
if for_one_friend_hp0?
battler = $game_troop.certain_target_enemy_hp0
elsif for_one_friend?
battler = $game_troop.certain_target_enemy
else
battler = $game_party.certain_target_actor
end
# 对像存在的话取得索引、
# 对像不存在的场合下清除行动
if battler != nil
@target_index = battler.index
else
clear
end
end
end
#==============================================================================
# ■ Game_Party
#------------------------------------------------------------------------------
# 　处理同伴的类。包含金钱以及物品的信息。本类的实例
# 请参考 $game_party。
#==============================================================================
class Game_Party
#--------------------------------------------------------------------------
# ● 对像角色的确定
# hp0 : 限制为 HP 0 的角色
#--------------------------------------------------------------------------
def certain_target_actor(hp0 = false)
# 初始化权重值
power = 1.0
last_power = 1.0
# 初始化轮流
roulette = nil
# 循环
for actor in @actors
# 符合条件的场合
if (not hp0 and actor.exist?) or (hp0 and actor.hp0?)
power = 1.0
if actor.guarding?
power2 = 0.5
elsif actor.cant_evade?
power2 = 2.0
else
power2 = 1.0
end
# 检查其它状态：若防御修正值偏低，则权重加大，否则减小
for iii in 1...$data_states.size
if actor.state?(iii)
power2 *= 100.0 / $data_states[iii].pdef_rate
power2 *= 100.0 / $data_states[iii].mdef_rate
power2 *= 100.0 / $data_states[iii].eva
end
end
power = 1.0 * actor.hp * (actor.pdef + actor.mdef) * actor.agi / (actor.int * actor.atk * actor.str * power2)
if roulette == nil
roulette = actor
last_power = power
else
# 权重值的修正：如果下一位战斗员的权重值较小，则换人
if power < last_power
roulette = actor
last_power = power
end
end
end
end
# 决定角色
return roulette
end
end
#==============================================================================
# ■ Game_Troop
#------------------------------------------------------------------------------
# 　处理队伍的类。本类的实例请参考 $game_troop
#
#==============================================================================
class Game_Troop
#--------------------------------------------------------------------------
# ● 对像敌人的确定
# hp0 : 限制 HP 0 的敌人
#--------------------------------------------------------------------------
def certain_target_enemy(hp0 = false)
# 初始化权重值
power = 1.0
last_power = 1.0
# 初始化轮流
roulette = nil
# 循环
for enemy in @enemies
# 符合条件的场合
if (not hp0 and enemy.exist?) or (hp0 and enemy.hp0?)
power = 1.0
if enemy.guarding?
power2 = 0.5
elsif enemy.cant_evade?
power2 = 2.0
else
power2 = 1.0
end
power = 1.0 * enemy.hp * (enemy.pdef + enemy.mdef) * enemy.agi / (enemy.int * enemy.atk * enemy.str * power2)
if roulette == nil
roulette = enemy
last_power = power
else
# 权重值的修正：如果下一位战斗员的权重值较小，则换人
if power < last_power
roulette = enemy
last_power = power
end
end
end
end
# 决定敌人
return roulette
end
#--------------------------------------------------------------------------
# ● 对像敌人的确定 (HP 0)
#--------------------------------------------------------------------------
def certain_target_enemy_hp0
return certain_target_enemy(true)
end
end
#==============================================================================
# ■ Game_Enemy
#------------------------------------------------------------------------------
# 　处理敌人的类。本类在 Game_Troop 类 ($game_troop) 的
# 内部使用。
#==============================================================================
class Game_Enemy < Game_Battler
#--------------------------------------------------------------------------
# ● 生成行动
#--------------------------------------------------------------------------
def make_action
# 清除当前行动
self.current_action.clear
# 无法行动的情况
unless self.movable?
# 过程结束
return
end
# 抽取现在有效的行动
available_actions = []
rating_max = 0
for action in self.actions
# 确认回合条件
n = $game_temp.battle_turn
a = action.condition_turn_a
b = action.condition_turn_b
if (b == 0 and n != a) or
(b > 0 and (n < 1 or n < a or n % b != a % b))
next
end
# 确认 HP 条件
if self.hp * 100.0 / self.maxhp > action.condition_hp
next
end
# 确认等级条件
if $game_party.max_level < action.condition_level
next
end
# 确认开关条件
switch_id = action.condition_switch_id
if switch_id > 0 and $game_switches[switch_id] == false
next
end
# 符合条件 : 添加本行动
available_actions.push(action)
if action.rating > rating_max
rating_max = action.rating
end
end
# 最大概率值作为 3 合计计算(0 除外)
ratings_total = 0
for action in available_actions
if action.rating > rating_max - 3
ratings_total += action.rating - (rating_max - 3)
end
end
# 概率合计不为 0 的情况下
if ratings_total > 0
# 生成随机数
value = rand(ratings_total)
# 设置对应生成随机数的当前行动
for action in available_actions
if action.rating > rating_max - 3
if value < action.rating - (rating_max - 3)
self.current_action.kind = action.kind
self.current_action.basic = action.basic
self.current_action.skill_id = action.skill_id
# 修改：敌人不再盲目乱打，而是死盯一个确定目标=================================
if $game_variables[50] == 0
self.current_action.decide_random_target_for_enemy
else
self.current_action.decide_certain_target_for_enemy
end
# =============================================================================
return
else
value -= action.rating - (rating_max - 3)
end
end
end
end
end
end

复制代码

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