# Window_Message by RPG-Maker VX
# ADS by modern algebra (rmrk.net)
# MyMessage by MirainoHikari (http://rpg-maker-vx.bbactif.com)
# version 1.1
#
# Syntaxe des options de message
#
# \v[VAR]                    - Affiche la variable #VAR
# \n[ID]                      - Affiche le nom du personnage ID (liste des personnages)
# \c[COLOR]                - Modifie la couleur du texte pour la couleur avec l'id COLOR
# \G                            - Affiche la fenêtre de monnaie
# \.                              - Attend 1/4 sec (15 frames) avant de poursuivre le message
# \|                            - Attend 1 sec (60 frames) avant de poursuivre le message
# \!                            - Attend que le joueur appuie sur une touche avant de poursuivre le message
# \>                            - Affiche le texte rapidement
# \<                            - Affiche le texte lentement
# \^                            - N'arrête pas le texte à la fin de l'affichage du message
#
# \af[ID]                      - Affiche le visage du personnage ID (liste des personnages)
# \pf[ID]                      - Affiche le visage du personnage ID (liste d'équipe)
# \ns[ID]                      - Affiche le nom de la compétence ID (liste des skills)
#
# \bln[TAGET,BALOON] - Affiche l'emotion avec l'id BALOON sur l'evenement avec l'id TARGET (si 0, sur héro)
#
# \ac[ID]                    - Affiche la classe du personnage ID (liste d'équipe)
# \np[ID]                      - Affiche le nom du personnage ID (liste d'équipe)
# \ne[ID]                    - Affiche le nom de l'événement selon ID de l'event sur la carte active
# \nc[ID]                    - Affiche le nom de la classe ID (liste des classes)
# \nm[ID]                    - Affiche le nom du monstre ID (liste des monstres)
# \ni[ID]                      - Affiche le nom de l'objet ID (liste des items)
# \nw[ID]                    - Affiche le nom de l'arme ID (liste des armes)
# \na[ID]                    - Affiche le nom de l'armure ID (liste des armures)
# \pi[ID]                      - Affiche le prix de l'objet ID (liste des items)
# \pw[ID]                    - Affiche le prix de l'arme ID (liste des armes)
# \pa[ID]                    - Affiche le prix de l'arme ID (liste des armes)
# \ii[ID]                      - Affiche l'icone de l'objet ID (liste des items)
# \iw[ID]                      - Affiche l'icone de l'arme ID (liste des armes)
# \ia[ID]                      - Affiche l'icone de l'arme ID (liste des armes)

#==============================================================================
# MyMessage
#------------------------------------------------------------------------------
# 　Surcharge le script de base Window_Message
#==============================================================================

class Window_Message < Window_Selectable
  #--------------------------------------------------------------------------
  # ● convert_special_characters
  #--------------------------------------------------------------------------
  alias mm_csc convert_special_characters
  def convert_special_characters
    mm_csc
    # By Hikari
    @text.gsub!(/\\AF\[(\d+)\]/i) { "\x31[#{$1.to_i}]"} # Actor Face
    @text.gsub!(/\\PF\[(\d+)\]/i) { "\x32[#{$1.to_i}]"} # Party Face
    @text.gsub!(/\\NS\[(\d+)\]/i) { $data_skills[$1.to_i].name } # Skill Name
    @text.gsub!(/\\IS\[(\d+)\]/i) { "\x98[#{$data_skills[$1.to_i].icon_index}]" } # Skill Icon
   
    # from ADS Edited by SPM
    @text.gsub!(/\\SE\[(\d+)\]/i) {(RPG::SE.new($1)).play}
   
    # FROM ADS
    @text.gsub! (/\\BLN\[(\d+,\d+)\]/i) { "\x96[#{$1.to_s}]" } # Balloon
    @text.gsub!(/\\AC\[(\d+)\]/i) { $game_actors[$1.to_i].class.name } # Actor Class
    @text.gsub!(/\\NC\[(\d+)\]/i) { $data_classes[$1.to_i].name } # Class Name
    @text.gsub!(/\\NP\[(\d+)\]/i) { $game_party.members[$1.to_i].name } # Actor Name by Party Index
    begin
      @text.gsub!(/\\NE\[(\d+)\]/i) { $game_map.events[$1.to_i].name } # Event Name
    rescue
    end
    @text.gsub!(/\\NM\[(\d+)\]/i) { $data_enemies[$1.to_i].name } # Monster Name
    @text.gsub!(/\\NI\[(\d+)\]/i) { $data_items[$1.to_i].name }  # Item Name
    @text.gsub!(/\\NW\[(\d+)\]/i) { $data_weapons[$1.to_i].name } # Weapon Name
    @text.gsub!(/\\NA\[(\d+)\]/i) { $data_armors[$1.to_i].name } # Armor Name
    @text.gsub!(/\\PI\[(\d+)\]/i) { $data_items[$1.to_i].price.to_s } # Item Price
    @text.gsub!(/\\PW\[(\d+)\]/i) { $data_weapons[$1.to_i].price.to_s } # Weapon Price
    @text.gsub!(/\\PA\[(\d+)\]/i) { $data_armors[$1.to_i].price.to_s } # Armor Price
    @text.gsub! (/\\II\[(\d+)\]/i) { "\x98[#{$data_items[$1.to_i].icon_index}]" } # Item Icon
    @text.gsub! (/\\IW\[(\d+)\]/i) { "\x98[#{$data_weapons[$1.to_i].icon_index}]" } # Weapon Icon
    @text.gsub! (/\\IA\[(\d+)\]/i) { "\x98[#{$data_armors[$1.to_i].icon_index}]" } # Armor Icon
  end
  #--------------------------------------------------------------------------
  # ● Update Message
  #--------------------------------------------------------------------------
  alias mm_update_m update_message
  def update_message
    loop do
      c = @text.slice(/./m)            # Get next text character
      case c
      when "\x31" #Hikari - \AF[X] affiche le visage d'un acteur
        @text.sub! (/\[(\d*)\]/, "") #Récupère l'id de l'acteur
        actor = $game_actors[$1.to_i]
        $game_message.face_name = actor.face_name
        $game_message.face_index = actor.face_index
        begin
        draw_face(actor.face_name, actor.face_index, 0, 0)
        rescue
        end
        @contents_x = 112
        @text.slice!(/./) #retire cette commande de la liste
      when "\x32" #Hikari - \PF[X] affiche le visage d'un personnage
        @text.sub! (/\[(\d*)\]/, "") #récupère l'index du personnage
        actor = $game_party.members[$1.to_i]
        $game_message.face_name = actor.face_name
        $game_message.face_index = actor.face_index
        begin
        draw_face(actor.face_name, actor.face_index, 0, 0)
        rescue
        end
        @contents_x = 112
        @text.slice!(/./) #retire cette commande de la liste
      when "\x96"                        # Show Balloon #ADS
        # Extract Target and Balloon ID
        @text.sub! (/\[(\d*),(\d*)\]/, "")
        # If target is player
        if $1.to_i == 0
          $game_player.balloon_id = $2.to_i
        else
          return if $game_map.events[$1.to_i] == nil
          $game_map.events[$1.to_i].balloon_id = $2.to_i
        end
        @text.slice!(/./) #retire cette commande de la liste
      when "\x98"                      # (Icon) #ADS
        @text.sub!(/\[(\d*)\]/, "")
        draw_icon ($1.to_i, @contents_x, @contents_y)
        @contents_x += 24
        @text.slice!(/./) #retire cette commande de la liste
      else # pour le reste, sortir de la boucle et se référer au code original
        break
      end
    end
    mm_update_m
  end
end

when "\x77" #MH
        @text.sub! (/\[(\d*)\]/, "")
        actor = $game_actors[$1.to_i]
        begin
        draw_face(actor.face_name, actor.face_index, 0, 0)
        rescue
        end
        @contents_x = 112
        @restart_line = 112