如何让敌人逃跑也能得到物品？

☆会飞的鱼☆ · 发表于 2009-1-22 00:48:10

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

200878242 · 发表于 2009-1-22 19:21:04

LZ没必要这样做吧，向楼上说的要价一些判定，比如说逃跑成功得到什么，逃跑失败又怎样

ONEWateR · 发表于 2009-1-22 19:17:37

class Scene_Battle
#--------------------------------------------------------------------------
# ● 开始结束战斗回合
#--------------------------------------------------------------------------
def start_phase5
# 转移到回合 5
@phase = 5
# 演奏战斗结束 ME
$game_system.me_play($game_system.battle_end_me)
# 还原为战斗开始前的 BGM
$game_system.bgm_play($game_temp.map_bgm)
# 初始化 EXP、金钱、宝物
exp = 0
gold = 0
treasures = []
# 循环
for enemy in $game_troop.enemies
# 敌人不是隐藏状态的情况下
unless enemy.hidden
# 获得 EXP、增加金钱
exp += enemy.exp
gold += enemy.gold
# 出现宝物判定
end
if rand(100) < enemy.treasure_prob
if enemy.item_id > 0
treasures.push($data_items[enemy.item_id])
end
if enemy.weapon_id > 0
treasures.push($data_weapons[enemy.weapon_id])
end
if enemy.armor_id > 0
treasures.push($data_armors[enemy.armor_id])
end
end
end
# 限制宝物数为 6 个
treasures = treasures[0..5]
# 获得 EXP
for i in 0...$game_party.actors.size
actor = $game_party.actors[i]
if actor.cant_get_exp? == false
last_level = actor.level
actor.exp += exp
if actor.level > last_level
@status_window.level_up(i)
end
end
end
# 获得金钱
$game_party.gain_gold(gold)
# 获得宝物
for item in treasures
case item
when RPG::Item
$game_party.gain_item(item.id, 1)
when RPG::Weapon
$game_party.gain_weapon(item.id, 1)
when RPG::Armor
$game_party.gain_armor(item.id, 1)
end
end
# 生成战斗结果窗口
@result_window = Window_BattleResult.new(exp, gold, treasures)
# 设置等待计数
@phase5_wait_count = 100
end
end

复制代码

御风天之痕 · 发表于 2009-1-22 19:13:19

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

☆会飞的鱼☆ · 发表于 2009-1-22 19:06:30

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

嫁衣 · 发表于 2009-1-22 02:03:01

用戰鬥後公共事件試試看
http://rpg.blue/web/htm/news409.htm

200878242 · 发表于 2009-1-22 01:34:00

什么是让敌人逃跑也能得到物品？不明白

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