BattleEnd XP

じ☆ve冰风

BattleEnd XP

by Kyonides​

Introduction

As many years passed, some RMXP scripts got lost in the sands of time for many reasons. This is why I thought that offering you another option for improving the Party's Victory processing stage was something very convenient for everybody.

What this scriptlet does is simple:

It rewrites the Scene_Battle#start_phase5 by subdividing it into several other methods that handle very specific stuff.
Then I added a Game Variable and a Game Switch to alter its normal behavior.

The Game Variable handles how much EXP your heroes will get.

• 0 stands for EXP divided by Total Heroes
  
• 1 stands for EXP divided by Total Heroes * 2
  
• 2 stands for Full EXP
  

The Game Switch defines if the Party will get the whole list of Treasures.
The Party will only get up to 5 Treasures if the Game Switch is OFF.

                Ruby:       

1. # * BattleEnd XP * #
2. #   Scripter : Kyonides Arkanthes
3. #   2023-06-16
5. # - Values for VAR_FULL_EXP Game Variable:
6. # 0 - EXP divided by Total Heroes
7. # 1 - EXP divided by Total Heroes * 2 (Punishment)
8. # 2 - Full EXP (Reward)
10. # - SWITCH_ALL_TREASURES Game Switch allows you to let the party get all of
11. #   the treasures they have earned instead of just 5 of them.
13. module BattleEnd
14.   VAR_FULL_EXP = 1
15.   SWITCH_ALL_TREASURES = 1
16. end
18. class Scene_Battle
19.   def start_phase5
20.     @phase = 5
21.     $game_system.me_play($game_system.battle_end_me)
22.     $game_system.bgm_play($game_temp.map_bgm)
23.     process_exp_gold_treasures
24.     limit_treasures
25.     distribute_treasures
26.     distribute_exp_gold
27.   end
29.   def process_exp_gold_treasures
30.     @exp = 0
31.     @gold = 0
32.     @treasures = []
33.     for enemy in $game_troop.enemies
34.       next if enemy.hidden
35.       @exp += enemy.exp
36.       @gold += enemy.gold
37.       if rand(100) < enemy.treasure_prob
38.         if enemy.item_id > 0
39.           @treasures << $data_items[enemy.item_id]
40.         elsif enemy.weapon_id > 0
41.           @treasures << $data_weapons[enemy.weapon_id]
42.         elsif enemy.armor_id > 0
43.           @treasures << $data_armors[enemy.armor_id]
44.         end
45.       end
46.     end
47.   end
49.   def limit_treasures
50.     return if $game_variables[BattleEnd::SWITCH_ALL_TREASURES]
51.     @treasures = @treasures[0..5]
52.   end
54.   def gain_treasure(item_id)
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
65.   def distribute_treasures
66.     @treasures.each {|treasure| gain_treasure(treasure.id) }
67.   end
69.   def distribute_exp(actor)
70.     case $game_variables[BattleEnd::VAR_FULL_EXP]
71.     when 0
72.       @final_exp = @exp / $game_party.actors.size
73.       actor.exp += @final_exp
74.     when 1
75.       @final_exp = @exp / $game_party.actors.size / 2
76.       actor.exp += @final_exp
77.     when 2
78.       @final_exp = @exp
79.       actor.exp += @exp
80.     end
81.   end
83.   def distribute_exp_gold
84.     $game_party.actors.each_with_index do |actor, i|
85.       next if actor.cant_get_exp?
86.       last_level = actor.level
87.       distribute_exp(actor)
88.       @status_window.level_up(i) if actor.level > last_level
89.     end
90.     $game_party.gain_gold(@gold)
91.     @result_window = Window_BattleResult.new(@final_exp, @gold, @treasures)
92.     @phase5_wait_count = 100
93.   end
94. end

复制代码

Terms & Conditions

Free for use in any game.
Due credit is mandatory.
That's it!



本贴来自国际rpgmaker官方论坛作者:kyonides处,因国际论坛即将永久关站,为了存档多年珍贵资料,署名转载到本论坛存档,由于官方帖子为英文原帖，需要中文翻译请点击论坛顶部切换语言为中文就可以将帖子翻译成中文浏览,方便大家随时查看,原文地址：https://forums.rpgmakerweb.com/threads/battleend-xp.158407/