Game Over when leader dies

=begin

Game Over when leader dies
Made by: Sixth

Description:
Just a small snippet to trigger game over when the party leader dies instead of
doing the same when the whole party dies.
You can enable of disable the script with a switch during the game if youw want.

If you use Falcao's ABS, this will also disable the party leader switch when
the player dies! This can also be disabled with the same switch you set up in
this script!

Installation:
Place this script between Materials and Main!
If you are using Falcao's ABS, put this script below all of the ABS scripts!

=end

module LdrGmOver

  # Turn this switch ON in the game if you want to disable this script!
  DisableSw = 60 # Disable Switch ID!

end

class Game_BattlerBase

  alias leader_ko_gmover6662 hp=
  def hp=(hp)
    leader_ko_gmover6662(hp)
    return if $game_switches[LdrGmOver::DisableSw]
    if self.is_a?(Game_Actor) && self.hp == 0 && self.index == 0
      SceneManager.goto(Scene_Gameover)
    end
  end

end

if $imported && $imported["Falcao Pearl ABS Liquid"]

class Game_CharacterBase

  def update_battler_collapse
    if @colapse_time > 0
      @colapse_time -= 1
      force_cancel_actions
      if battler.is_a?(Game_Actor)
        Sound.play_actor_collapse if @secollapse.nil?
        @secollapse = true
        if @colapse_time == 0
          @secollapse = nil
          for event in $game_map.event_enemies
            event.agroto_f = nil if event.agroto_f == self
          end
          check_for_dead_four
          member = $game_party.battle_members
          # swap and reset player
          if self.is_a?(Game_Player)
            reset_knockdown_actors
            battler.deadposing=$game_map.map_id if PearlKernel::FollowerDeadPose
            if $game_switches[LdrGmOver::DisableSw]
              $game_party.swap_order(0,3) if !member[3].nil? and !member[3].dead?
              $game_party.swap_order(0,2) if !member[2].nil? and !member[2].dead?
              $game_party.swap_order(0,1) if !member[1].nil? and !member[1].dead?
            else
              SceneManager.goto(Scene_Gameover)
            end
          else
            if PearlKernel::FollowerDeadPose
              battler.deadposing = $game_map.map_id
              if !$game_player.follower_fighting? and member.size > 2
                swap_dead_follower
              else
                $game_player.reserved_swap << battler.id if member.size > 2
              end
            end
          end
        end
      elsif battler.is_a?(Game_Enemy)
        @die_through = @through if @die_through.nil?
        @through = true
        apply_collapse_anime(battler.collapse_type)
        @secollapse = true
        battler.object ? @transparent = true : @opacity -= 2 if !@deadposee
        self.kill_enemy if @colapse_time == 0
      end
    end
  end

end

end