Project1

标题: 如何让敌人逃跑也能得到物品? [打印本页]

作者: ☆会飞的鱼☆    时间: 2009-1-22 00:48
提示: 作者被禁止或删除 内容自动屏蔽
作者: 200878242    时间: 2009-1-22 01:34
什么是让敌人逃跑也能得到物品?不明白
作者: 嫁衣    时间: 2009-1-22 02:03
用戰鬥後公共事件試試看
http://rpg.blue/web/htm/news409.htm
作者: ☆会飞的鱼☆    时间: 2009-1-22 19:06
提示: 作者被禁止或删除 内容自动屏蔽
作者: 御风天之痕    时间: 2009-1-22 19:13
提示: 作者被禁止或删除 内容自动屏蔽
作者: ONEWateR    时间: 2009-1-22 19:17
  1. class Scene_Battle
  2.   #--------------------------------------------------------------------------
  3.   # ● 开始结束战斗回合
  4.   #--------------------------------------------------------------------------
  5.   def start_phase5
  6.     # 转移到回合 5
  7.     @phase = 5
  8.     # 演奏战斗结束 ME
  9.     $game_system.me_play($game_system.battle_end_me)
  10.     # 还原为战斗开始前的 BGM
  11.     $game_system.bgm_play($game_temp.map_bgm)
  12.     # 初始化 EXP、金钱、宝物
  13.     exp = 0
  14.     gold = 0
  15.     treasures = []
  16.     # 循环
  17.     for enemy in $game_troop.enemies
  18.       # 敌人不是隐藏状态的情况下
  19.       unless enemy.hidden
  20.         # 获得 EXP、增加金钱
  21.         exp += enemy.exp
  22.         gold += enemy.gold
  23.         # 出现宝物判定
  24.       end
  25.       
  26.         if rand(100) < enemy.treasure_prob
  27.           if enemy.item_id > 0
  28.             treasures.push($data_items[enemy.item_id])
  29.           end
  30.           if enemy.weapon_id > 0
  31.             treasures.push($data_weapons[enemy.weapon_id])
  32.           end
  33.           if enemy.armor_id > 0
  34.             treasures.push($data_armors[enemy.armor_id])
  35.           end
  36.         end

  37.     end
  38.     # 限制宝物数为 6 个
  39.     treasures = treasures[0..5]
  40.     # 获得 EXP
  41.     for i in 0...$game_party.actors.size
  42.       actor = $game_party.actors[i]
  43.       if actor.cant_get_exp? == false
  44.         last_level = actor.level
  45.         actor.exp += exp
  46.         if actor.level > last_level
  47.           @status_window.level_up(i)
  48.         end
  49.       end
  50.     end
  51.     # 获得金钱
  52.     $game_party.gain_gold(gold)
  53.     # 获得宝物
  54.     for item in treasures
  55.       case item
  56.       when RPG::Item
  57.         $game_party.gain_item(item.id, 1)
  58.       when RPG::Weapon
  59.         $game_party.gain_weapon(item.id, 1)
  60.       when RPG::Armor
  61.         $game_party.gain_armor(item.id, 1)
  62.       end
  63.     end
  64.     # 生成战斗结果窗口
  65.     @result_window = Window_BattleResult.new(exp, gold, treasures)
  66.     # 设置等待计数
  67.     @phase5_wait_count = 100
  68.   end
  69. end
复制代码

作者: 200878242    时间: 2009-1-22 19:21
LZ没必要这样做吧,向楼上说的要价一些判定,比如说逃跑成功得到什么,逃跑失败又怎样




欢迎光临 Project1 (https://rpg.blue/) Powered by Discuz! X3.1