赞 | 2 |
VIP | 335 |
好人卡 | 3 |
积分 | 1 |
经验 | 14077 |
最后登录 | 2020-1-28 |
在线时间 | 264 小时 |
Lv1.梦旅人 冰
- 梦石
- 0
- 星屑
- 142
- 在线时间
- 264 小时
- 注册时间
- 2006-11-22
- 帖子
- 1057
|
以下引用alwing于2008-4-19 20:04:23的发言:
本贴悬赏额度如下:VIP:0 积分:100
#--------------------------------------------------------------------------
# ● 開始結束戰鬥回合
#--------------------------------------------------------------------------
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
# 出現寶物判定
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
end
# 限制寶物數為 6 個
treasures = treasures[0..5]
# 獲得 EXP
for i in 0...$game_party.actors.size
actor = $game_party.actors
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)
@result_window.z = ??????????????????????
# 設定等待計數
@phase5_wait_count = 100
end 系统信息:本贴由楼主认可为正确答案,66RPG感谢您的热情解答~ |
|