module Play_Exchange
  SE_NAME = "Cursor" # SE-Name, des Geräsch beim wechseln des Players
  CONTROLL_VARIABLE_ID = 1 # ID des Switches, der das Wechseln erlaubt bzw
                           # verbietet.
end
class Game_Party
  def change_first_member_l
    @actors.insert(0,@actors[-1])
    @actors.pop
    $game_player.refresh
  end
  def change_first_member_r
    @actors.insert(-1,@actors[0])
    @actors.delete_at(0)
    $game_player.refresh
  end
end
class Scene_Map
  alias update_player_exchange update unless $@
  def update
    if Input.trigger?(Input::L) && $game_switches[Play_Exchange::CONTROLL_VARIABLE_ID] && !$game_map.interpreter.running?
      Audio.se_play("Audio/SE/#{Play_Exchange::SE_NAME}")
      $game_party.change_first_member_l
    elsif Input.trigger?(Input::R) && $game_switches[Play_Exchange::CONTROLL_VARIABLE_ID] && !$game_map.interpreter.running?
      Audio.se_play("Audio/SE/#{Play_Exchange::SE_NAME}")
      $game_party.change_first_member_r
    end
    update_player_exchange
  end
end