Habilidade de Fugir das Batalhas

Agora voçê poder reitara a opção de fuga do seu menu e colocala como habilidade e so colar acima do main e nomei como quiser.

Codigo

################################################################################
################################### KGC ########################################
################################################################################
=begin
ESCAPE SKILL

--------------------------------------------------------------------------------
Script criado pelo site KGC.
Created by KGC site.
Tradução por Moghunter.
--------------------------------------------------------------------------------

CARACTERÍSTICAS
Permite usar a habilidade fugir.

UTILIZAÇÃO
Crie um atributo chamado "Fugir" e atribua a habilidade desejada.

=end
#-------------------------------------------------------------------------------
$imported = {} if $imported == nil
$imported["EscapeSkill"] = true

if $game_special_elements == nil
$game_special_elements = {}
$data_system = load_data("Data/System.rxdata")
end
$game_special_elements["skill_escape"] = $data_system.elements.index("Fugir")
class Scene_Battle
alias update_phase2_escape_KGC_EscapeSkill update_phase2_escape
def update_phase2_escape(skill = nil)
if skill == nil
update_phase2_escape_KGC_EscapeSkill
return
end
return unless $game_temp.battle_can_escape
enemies_agi, enemies_number = 0, 0
for enemy in $game_troop.enemies
next unless enemy.exist?
enemies_agi += enemy.agi
enemies_number += 1
end
enemies_agi /= enemies_number if enemies_number > 0
actors_agi, actors_number = 0, 0
for actor in $game_party.actors
next unless actor.exist?
actors_agi += actor.agi
actors_number += 1
end
actors_agi /= actors_number if actors_number > 0
prob = 50 * actors_agi / [enemies_agi, 1].max
prob = prob * skill.power / 100 if skill != nil
success = rand(100) < prob
if success
$game_system.se_play($data_system.escape_se)
$game_system.bgm_play($game_temp.map_bgm)
battle_end(1)
else
return
end
end
end
class Scene_Battle
alias update_phase4_step5_KGC_EscapeSkill update_phase4_step5
def update_phase4_step5
if @active_battler.current_action.kind == 1 &&
@active_battler.current_action.skill_id > 0
skill = $data_skills[@active_battler.current_action.skill_id]
if skill.element_set.include?($game_special_elements["skill_escape"])
update_phase2_escape(skill)
unless $scene.is_a?(Scene_Battle)
@phase4_step = 1
return
end
end
end
update_phase4_step5_KGC_EscapeSkill
end
end