自己写的一个双倍经验的脚本……

风花雪月 · 发表于 2009-1-2 00:39:01

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

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

x

写了一个脚本，大概就是使某个角色战斗结束后获得的经验翻倍，不过我测试了一遍却没有用，请前辈们帮我改一改……

class Game_Actor < Game_Battler
attr_accessor :add_exp #############
def initialize(actor_id)
super()
setup(actor_id)
@add_exp = false #############
end
end
class Scene_Battle
def start_phase5
@phase = 5
$game_system.me_play($game_system.battle_end_me)
$game_system.bgm_play($game_temp.map_bgm)
exp = 0
gold = 0
treasures = []
for enemy in $game_troop.enemies
unless enemy.hidden
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
treasures = treasures[0..5]
for i in 0...$game_party.actors.size
actor = $game_party.actors[i]
if actor.cant_get_exp? == false
last_level = actor.level
if actor.add_exp == true #############
actor.exp += exp*2 #############
else #############
actor.exp += exp #############
end #############
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

复制代码

开启、关闭方法是$game_actors[x].add_exp = true/false

版务信息：本贴由楼主自主结贴～

IamI · 发表于 2009-1-2 00:42:43

是不认真还是不专心= =

以下引用风花雪月于2009-1-1 16:39:01的发言：
class Game_Actor < Game_Battler
  attr_accessor :add_exp #############
  def initialize(actor_id)
super()
setup(actor_id)
@add_exp = false #############
  end
end
class Scene_Battle
  def start_phase5
@phase = 5
$game_system.me_play($game_system.battle_end_me)
$game_system.bgm_play($game_temp.map_bgm)
exp = 0
gold = 0
treasures = []
for enemy in $game_troop.enemies
   unless enemy.hidden
      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
treasures = treasures[0..5]
for i in 0...$game_party.actors.size
   actor = $game_party.actors
   if actor.cant_get_exp? == false
      last_level = actor.level
      if actor.add_exp == true #############
      actor.exp += exp*2 #############
   else #############
      actor.exp += exp #############
      end #############
      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

开启、关闭方法是$game_actors[x].add_exp = true/false

★_茄孓 · 发表于 2009-1-2 00:50:16

class Game_Actor < Game_Battler
attr_accessor :add_exp #############
def initialize(actor_id)
super()
setup(actor_id)
@add_exp = false #############
end
end
class Scene_Battle
def start_phase5
@phase = 5
$game_system.me_play($game_system.battle_end_me)
$game_system.bgm_play($game_temp.map_bgm)
exp = 0
gold = 0
treasures = []
for enemy in $game_troop.enemies
unless enemy.hidden
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
treasures = treasures[0..5]
for i in 0...$game_party.actors.size
actor = $game_party.actors[i]
if actor.cant_get_exp? == false
last_level = actor.level
if actor.add_exp == true
exp = exp*2
actor.exp += exp
else
actor.exp += exp
end
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

复制代码

系统信息：本贴由楼主认可为正确答案，66RPG感谢您的热情解答～

风花雪月 · 发表于 2009-1-2 00:57:22

唔……谢谢……这个脚本确实是变成了双倍经验，只不过没显示出来而已，感谢LS帮我改……

玄月 · 发表于 2009-2-8 03:01:21

稍微挖坟 - - 记得玩天龙八部的时候经验和参战人数成反比的。然后就华丽的参考了 = =
所以有练级狂可能会不要命的总是单打独斗，最后发现最终BOSS打不赢，一个人的话 - - 。
话说金钱和参战人数成正比和EXP一样都是rand(gold)+1.5*gold * 参战人数。我想会不会有人这么财迷总是一堆人上弄到最后老大把他们全员给秒了 = = 哈啊

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

自己写的一个双倍经验的脚本……

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

开拓者

贵宾