module Gen_Hikari  #version 2.01
MY_RNDMZR = 253 #nombre servant pour obtenir un livre aléatoire peut être modifier pour une valeur de 5 à 9999
#==============================================================================
# Name_Generator
# Par Miraino Hikari
# rpg-maker-vx.bactif.com
#------------------------------------------------------------------------------
#  Génère un nom complet de personne (Prénom, Surnom, Nom de Famille)
#  La valeur retourné sera un string correspondant à ce qu'on veut
#  Soit 0 Nom complet (P-S-N)
#      1 Nom abrégé  (P-N)
#      2 Sans nom de famille (P-S)
#      3 Sans Prénom (S-N)
#      4 Prénom seulement
#      5 Surnom seulement
#      6 Nom seulement
#  autre Anonyme
#==============================================================================
class Name_Generator
   attr_accessor :prenom, :surnom, :nom, :anonyme
   
   NOMS = ["Simon", "Pierre", "Jean", "Alexandre", "Fabien", "Charles", "Mathieu", "Robert", "Roger",
        "Noah", "Jacob", "Michel", "Gabriel", "Daniel", "Marc", "Roland", "Patrice", "Victor"]
         
   SNOM = ["le Sage", "le Puissant", "le Grand", "le Petit", "le Faible", "le Fou"]
   
   NOMF = ["Chanteclair", "Lafaillette", "Dublinville", "de Lafontaine", "Hugo", "Nelligan", "Tremblay", "Morin", "Florant"]
   
   ANON = ["celui qui est sans nom", "quelqu'un qui avait trop honte pour inscrire son nom", "celui qui restera inconnu",
          "l'auteur anonyme", "l'homme invisible", "on s'en fout. Qui se préocupe des auteurs..?"]
       
   def initialize(id)
      @prenom = "#{NOMS[(id%NOMS.size)]}"
      @surnom = "#{SNOM[(id%SNOM.size)]}"
      @nom = "#{NOMF[(id%NOMF.size)]}"
      @anonyme = "#{ANON[(id%ANON.size)]}"
   end
   
   def rand_name(type)
      case type
      when 0 #nom complet (PSN)
         return "#{@prenom} \"#{@surnom}\" #{@nom}"
      when 1 #nom abrégé (PN)
         return "#{@prenom} #{@nom}"
      when 2 #sans nom de famille (PS)
         return "#{@prenom} \"#{@surnom}\""
      when 3 #sans prénom (SN)
         return "\"#{@surnom}\" #{@nom}"
      when 4 #Prénom seulement
         return "#{@prenom}"
      when 5 #Surnom seulement
         "\"#{@surnom}\""
      when 6 #Nom de famille seulement
         "#{@nom}"
      else #Citation comique anonyme
         "#{@anonyme}"
      end
   end
end


#==============================================================================
# Subject_Maker
# Par Miraino Hikari
# rpg-maker-vx.bactif.com
#------------------------------------------------------------------------------
#  Génère un titre et un extrait de contenu d'un documents
#   (type, titre, extrait)
#   peu être généré aléatoirement ou selon un type
#   Ici, une attention particulière doit être apporté si on modifie le script
#   classez vos titres par catgorie en faisant bien attention aux
#   correspondance des crochets []
#==============================================================================
class Subject_Maker
   attr_accessor :titre, :extrait
   TITRE = [
          ["de sorts", "de soins magique"],  #magie
          ["d'herbologie","de soins magique","guériseurs connus"], #soins
          ["de grande gastronomie","de recettes pouvant sauver des vies","des recettes communes"], #nourriture
          ["d'élevage des dragons", "sur les phoenix", "sur les animaux fantastiques"], #animaux
          ["de math","de français","de l'essentiel scientifique","des théorèmes mathématique","de cartographie universelle"], #études
          ["sans titre","de titre inconnu","dont le titre n'est plus lisible"] #autre
         ]
   EXTRAIT = [
           ["Des sorts pour tous les éléments sont traités.","Ce sont de vieux sorts.","Cette magie est incompréhensible.","Ô grimmoire! Que de puissantes magies!","Ces sorts sont proscrits","Le niveau est trop élevé."],
           ["Des exemples de la vie courrante sont illustré.","Efficacité des techniques.","Soins classés par guérisseurs.","Soins classés par efficacité."],
           ["Les meilleurs recettes de la régions.", "Hmmmm, ces recettes semble délicieuse", "Yeurk!! Ces recettes semblent dégoutantes", "De belles et bonne recettes sont illustrés", "La présentation de votre recette est la clé!"],
           ["Guide de soins.", "Comment bien entretenir votre créature.", "Comment se faire un ami.", "Aimé votre animal."],
           ["Oh... Ça semble compliqué.","C'est très technique.","C'est très détaillé.","Cet ouvrage est très ancien.","Ce n'est pas le temps d'étudier.","J'ai mal à la tête. Mieux vaut le ranger."],
           ["Plein de figure et de symbole étrange sont dessiné.","Ce document est codé","Plein d'extrait sont effacé par le temps.","Des extraits ont été retiré volontairement.","Il manque des bouts de pages.", "Rien est écrit."]
           ]
   def initialize
      @titre = "Sans Titre\x00"
      @extrait = "Rien n'est écrit.\x00" 
   end
   
   def rand_title(type, id)
      case type
      when (0...TITRE.size)
         return "#{TITRE[type][id%(TITRE[type].size)]}\x00"
      else
         new_type = type%(TITRE.size)
         return "#{TITRE[new_type][id%(TITRE[new_type].size)]}\x00"
      end
   end
   
   def rand_summary(type, id)
      case type
      when (0...EXTRAIT.size)
         return "#{EXTRAIT[type][id%(EXTRAIT[type].size)]}\x00"
      else
         new_type = type%(EXTRAIT.size)
         return "#{EXTRAIT[new_type][id%(EXTRAIT[new_type].size)]}\x00"
      end   
   end
end

#==============================================================================
# Book_Materials
# Par Miraino Hikari
# rpg-maker-vx.bactif.com
#------------------------------------------------------------------------------
#  Génère les caractéristique visible du livre
#   (couverture, papier, reliure, locket, encre)
#   doit être utilisé avec
#   Ici, une attention particulière doit être apporté si on modifie le script
#   classez vos titres par catgorie en faisant bien attention aux
#   correspondance des crochets []
#==============================================================================
class Book_Materials
   attr_accessor :couvert, :papier, :reliure, :fermeture, :encre
      
   COVER = ["en métal",
          "en bois",
          "en cuir",
          "en tissu",
          "en carton épais",
          "en papier",
          "dans un matériau inconnu",
          "inexistante",
          "fortement endommagée"]
         
   BIND = ["attachées avec de la ficelle",
         "reliées par des anneaux de métal",
         "retenues par des disques de bois gravés",
         "sans reliure, classé soigneusement",
         "sans reliure, les pages pêle-mêle",
         "et sont collées",
         "reliées simplement avec une spirale"]
         
   PAPER = ["en parchemin",
          "en papier fin",
         "en écorce",
         "en papier de riz"]
 
   INK = ["noire de bonne qualité",
        "blue, provenant d'une plante locale",
        "rouge, d'origine inconnue",
        "multicolore partiellement effacée",
        "verte, surment végétale",
        "gravée au laser"]
       
   CLOSE = ["retenu par un ruban de tissu et une boucle",
          "fermé par magie",
          "un cadenas empêche l'ouverture",
          "sans locquet"]
   
   def initialize(type, id)
      case type
      when 0 #parchemin
         @couvert = "le porte-rouleau est #{COVER[(id%COVER.size)]}\x00"
         @reliure = ""
         @fermeture = ""
         @encre = "l'encre est #{INK[(id%INK.size)]}\x00"
      when 1 #manuscrit
         @couvert = "la couverture est #{COVER[(id%COVER.size)]}\x00"
         @reliure = "#{BIND[(id%BIND.size)]}\x00"
         @fermeture = ""
         @encre = "l'encre est #{INK[(id%INK.size)]}\x00"
      else #autres livres
         @couvert = "la couverture est #{COVER[(id%COVER.size)]}\x00"
         @reliure = "#{BIND[(id%BIND.size)]}\x00"
         @fermeture = "#{CLOSE[(id%CLOSE.size)]}\x00"
         @encre = ""
      end
      @papier = "les pages sont #{PAPER[(id%PAPER.size)]}\x00"
   end
   
end


#==============================================================================
# Book_Generator
# Par Miraino Hikari
# rpg-maker-vx.bactif.com
#------------------------------------------------------------------------------
#
#==============================================================================
class Book_Generator
  #===== Variables d'instances ================================================
  attr_accessor :titre, :auteur
  attr_accessor :couvert, :papier, :reliure, :fermeture, :encre
  attr_accessor :taille, :pages
  #============================================================================
 
  #============================================================================
  # Valeurs possibles pour la génération
  # 
  #  Vous pouvez modifier ces valeur librement. Ce seront les valeurs
  #  utilisées pour fabriquer vos livres. Plus vous en mettez, moins il y
  #  de chance que vous tombiez sur 2 livres identiques.
  #
  #  TYPE  : le type de documents (livre, manuelle, manuscrit, parchemin, etc.)
  #  TAILLE : phrase utilisable pour définir la taille du livre
  # 
  #  La taille du livre et son nombre de pages sont générés automatiquement
  #  selon la valeur utilisée pour la création.
  #
  #============================================================================
 
  TYPE = [
        ["Parchemin", "Rouleau de parchemin", "Rouleau"], #parchemin ou ouvrage pouvant être roulé
        ["Manuscrit", "Essaie"], #ouvrage sans couverture ou reliure rustique
          ["Livre", "Livret", "Guide", "Manuel"], #livres normaux
          ["Tôme", "Collection", "Encyclopédie"] #livres appartenant à une collexion (encyclopédie)
       ]
  TAILLE = ["ses dimensions sont","la taille est de", "mesurant"]
 
  def initialize(id = -1)
   if id == -1
      id = rand(MY_RNDMZR)
   end
   
   my_type = (id%TYPE.size)   
   my_material = Book_Materials.new(my_type, id)
   my_subject = Subject_Maker.new
   
   @titre = "#{TYPE[my_type][(id%TYPE[my_type].size)]} #{(my_subject.rand_title(my_type,id))}"
   @auteur = ((Name_Generator.new(id)).rand_name((id%8)))
   @extrait = "#{my_subject.rand_summary(my_type,id)}"
      
   @couvert = my_material.couvert
   @papier = my_material.papier
   @reliure = my_material.reliure
   @fermeture = my_material.fermeture
   @encre = my_material.encre
   
   @taille = "#{TAILLE[id%TAILLE.size]} #{10+(id%20)} x #{20+(id%20)} cm\x00"
   case my_type
   when 0 #parchemin
      @pages = "de #{((id%10)+1).to_i} pages‚\x00" 
   when 1,2 #manuscrit ou livre
      @pages = "environ #{(20+(id%30)*(id%20)).to_i} pages\x00" 
   when 3 #collection
      @pages = "d'une collection de #{((id%60) +2).to_i} volume\x00d'environ #{(200+(id%101)*(id%101)).to_i} pages\x00" 
   else #autre
      @pages = "contient #{(20+(id%30)*(id%30)).to_i} pages\x00" 
   end
   
  end
 
  def desc_book(type = 1)
   case type
   when 0 #complet
      return "#{@titre} par #{@auteur}.\x00#{@couvert} #{@fermeture} #{@papier} #{@reliure} #{@encre} #{@taille} #{@pages}"
   when 1 #titre auteur et dimension
      return "#{@titre} par #{@auteur}.\x00#{@taille} #{@pages}"
   else
      return "C'est un livre comme les autres..."
   end
  end

  def read_book
    return @extrait
  end
 
  def full_book(type = 1)
    return "#{desc_book(type)}#{read_book}"
  end
 
end

end

#===========================================================================
# Surcharge de Window_Message pour afficher un livre dans le texte
#===========================================================================
#  \L[X] génère un livre
#  \LL[X] génère une decription longue
#  \LE[X] affiche un extrait du livre choisi
#  \L![X] génère un livre et affiche son extrait
#  \LL![X] génère une decription longue avec extrait
#
# X est un entier
#    si X = 0, le livre sera aléatoire,
#       si X >= 1, un livre particulier sera généré
#===========================================================================
class Window_Message < Window_Selectable

  alias books_convert_special_characters convert_special_characters
  def convert_special_characters
    books_convert_special_characters

    #ajouté par Hikari pour la gestion des livres
    @text.gsub!(/\\L\[(\d+)\]/i) { "#{Gen_Hikari::Book_Generator.new(((($1.to_i)-1)).to_i).desc_book(1)}"}
    @text.gsub!(/\\L!\[(\d+)\]/i) { "#{Gen_Hikari::Book_Generator.new(((($1.to_i)-1)).to_i).full_book(1)}"}
    @text.gsub!(/\\LL\[(\d+)\]/i) { "#{Gen_Hikari::Book_Generator.new(((($1.to_i)-1)).to_i).desc_book(0)}"}
    @text.gsub!(/\\LL!\[(\d+)\]/i) { "#{Gen_Hikari::Book_Generator.new(((($1.to_i)-1)).to_i).full_book(0)}"}
    @text.gsub!(/\\LE\[(\d+)\]/i) { "#{Gen_Hikari::Book_Generator.new(((($1.to_i)-1)).to_i).read_book}"}
  end

end

@text.gsub!(/\\LL!\[(\d+)\]/i) { "#{Gen_Hikari::Book_Generator.new(((($1.to_i)-1)).to_i).full_book(0)}"}