#==============================================================================
# ■ Game_Quests
# créé par Tonyryu, entièrement modifié et optimisé par Corwin
#------------------------------------------------------------------------------

class Game_Quests
#--------------------------------------------------------------------------
# ● intialize
#--------------------------------------------------------------------------
def initialize
@etat = []
@addr_quete = []
# nombre de quetes
@nbre_quete = 4

@quete_declenche = 0

# données des quétes
# format : [ nbreEtat, NomQuete, DescriptionEtat1,...,DescriptionEtat2]
#
@quete = [
#quete n°1
1,"Achats", "Aller en ville pour effectuer des achats divers.",

#quete n°2
2,"Recherche", "Il faut aller voir par-là bas si j'y suis et si j'y suis pas et bien tant pis... on va aller chercher ailleur",  "et bien je dois chercher encore",

#quete n°3
4,"Pierres", "A récupérer les pierre Saintes", "les pierres sont dans les repaires des méchants pas bô", "Et bien... encore une seule pierre et j'ai tout un sac, cool !", "... et c'est vrai, c'est la 4ème partie de la quête !",



#quete n°...
2,"Liste des quêtes...","Il est possible de trouver dans le présent grimoire une liste des différentes quêtes à résoudre", "--"


# attention, la dernière quête ne doit pas avoir de virgule à la fin !

]

# initialisation du tableau de recherche rapide des données de quête
@offset = 0
for i in 0..(@nbre_quete - 1 )
@etat[i] = 0
@addr_quete[i] = @offset

@offset += (@quete[@offset] + 2)
end

end
#--------------------------------------------------------------------------
# ● etatID
# quest_id : ID de la quete dont on veut connaitre l'etat
#--------------------------------------------------------------------------
def etatID(quest_id)
quest_id -= 1
if quest_id <= @nbre_quete and @etat[quest_id] != nil
return @etat[quest_id]
else
return 0
end
end
#--------------------------------------------------------------------------
# ● changer_etat
# quest_id : ID de la quete dont on veut changer l'etat
# neo_etat : nouvel etat de la quete
#--------------------------------------------------------------------------
def changer_etat(quest_id, neo_etat)
quest_id -= 1
if quest_id <= @nbre_quete
@etat[quest_id] = neo_etat
end
end

#--------------------------------------------------------------------------
# ● nom
# quest_id : ID de la quete dont on veut connaitre le nom
#--------------------------------------------------------------------------
def nom(quest_id)
quest_id -= 1
if quest_id <= @nbre_quete
return @quete[ ( @addr_quete[quest_id] + 1 ) ]
end
end

#--------------------------------------------------------------------------
# ● etatNom
# quest_id : ID de la quete dont on veut connaitre l'etat d'avancement
#--------------------------------------------------------------------------
def etatNom(quest_id)
quest_id -= 1
if quest_id <= @nbre_quete
return @quete[ ( @addr_quete[quest_id] + 1 + @etat[quest_id] ) ]
end
end

#--------------------------------------------------------------------------
# ● nbreQuete
# quest_id : ID de la quete dont on veut connaitre l'etat
#--------------------------------------------------------------------------
def nbreQuete()
return @nbre_quete
end

#--------------------------------------------------------------------------
# ● set_etat
# tout_etat : table des etats à rentrer (load)
#--------------------------------------------------------------------------
def set_etat(tout_etat)
@etat = tout_etat
end

#--------------------------------------------------------------------------
# ● get_etat
#--------------------------------------------------------------------------
def get_etat
return @etat
end

#--------------------------------------------------------------------------
# ● set_quete_declenche
# quete_ID :
#--------------------------------------------------------------------------
def set_quete_declenche( quest_id )
@quete_declenche = quest_id
end

#--------------------------------------------------------------------------
# ● get_quete_declenche
#--------------------------------------------------------------------------
def get_quete_declenche
return @quete_declenche
end

#--------------------------------------------------------------------------
# ● declencher
#--------------------------------------------------------------------------
def declencher
changer_etat(@quete_declenche, 1)
end

#--------------------------------------------------------------------------
# ● b_quete_echoue
#--------------------------------------------------------------------------
def b_quete_echoue(quest_id)
return (etatID(quest_id) == -1 )
end

#--------------------------------------------------------------------------
# ● b_quete_reussi
#--------------------------------------------------------------------------
def b_quete_reussi(quest_id)
return (etatID(quest_id) == 99 )
end

#--------------------------------------------------------------------------
# ● b_quete_termine
#--------------------------------------------------------------------------
def b_quete_termine(quest_id)
return (b_quete_echoue(quest_id) or b_quete_reussi(quest_id) )
end

#--------------------------------------------------------------------------
# ● b_quete_commence
#--------------------------------------------------------------------------
def b_quete_commence(quest_id)
return (etatID(quest_id) != 0)
end

#--------------------------------------------------------------------------
# ● b_quete_inconu
#--------------------------------------------------------------------------
def b_quete_inconu(quest_id)
return (etatID(quest_id) == 0)
end

#--------------------------------------------------------------------------
# ● finir_quete
#--------------------------------------------------------------------------
def finir_quete(quest_id)
changer_etat(quest_id, 99)
end

#--------------------------------------------------------------------------
# ● echouer_quete
#--------------------------------------------------------------------------
def echouer_quete(quest_id)
changer_etat(quest_id, -1)
end

end # fin de la classe

 #==============================================================================
# ■ Window_Quests
# créé par Tonyryu, entièrement modifié et optimisé par Corwin
#------------------------------------------------------------------------------
# 　Permet de visualiser les quêtes en cours
#==============================================================================

class Window_Quests < Window_Selectable
#--------------------------------------------------------------------------
# ● initialize
#--------------------------------------------------------------------------
def initialize

super(54, 104, 260, 330)

refresh

self.index = 0
self.active = true
self.opacity = 0

end

#--------------------------------------------------------------------------
# ● refresh
#--------------------------------------------------------------------------
def refresh
if self.contents != nil
self.contents.dispose
self.contents = nil

end



@IDquest = []
@nbreQuestActive = 0

for i in 0...$game_quests.nbreQuete()
if $game_quests.etatID(i) != 0
@IDquest[@nbreQuestActive] = (i)
@nbreQuestActive += 1
end
end

@item_max = (@nbreQuestActive == 0 ? 1 : @nbreQuestActive)

self.contents = Bitmap.new(width - 32, @item_max * 32)
self.contents.font.name = $fontfaceQuest
self.contents.font.size = $fontsizeQuest
self.contents.font.color = normal_color

if @nbreQuestActive != 0
for i in 0...(@nbreQuestActive)
 
if $game_quests.etatID(@IDquest[i]) == -1
self.contents.font.color = red_color
else if $game_quests.etatID(@IDquest[i]) == 99
self.contents.font.color = green_color
else
self.contents.font.color = normal_color 
end
end



self.contents.draw_text(4, i * 32, 600, 32, $game_quests.nom(@IDquest[i]))
end


end
end


#--------------------------------------------------------------------------
# ● update_help
#--------------------------------------------------------------------------
def update_help
if @nbreQuestActive != 0
if $game_quests.etatID(@IDquest[self.index]) == -1
text = "Quête lamentablement échouée."
@help_window.contents.font.color = red_color

else
if $game_quests.etatID(@IDquest[self.index]) == 99
text = "Quête terminée avec succés !"
@help_window.contents.font.color = green_color

else
text = $game_quests.etatNom(@IDquest[self.index])
@help_window.contents.font.color = normal_color
end
end
else
text = "Aucune quête en cours..."
@help_window.contents.font.color = normal_color
end

@help_window.set_text(text)


end
end

 #==============================================================================
# ■ Scene_Quests
# créé par Tonyryu, entièrement modifié et optimisé par Corwin
#------------------------------------------------------------------------------
# 　Permet de gérer l'affichage des quêtes
#==============================================================================

class Scene_Quests
#--------------------------------------------------------------------------
# ● main
#--------------------------------------------------------------------------
def main
# Prèparation des fenêtre

@quest_book= Sprite.new
@quest_book.bitmap = RPG::Cache.picture("quests")
@quest_book.z = 9999
@quest_book.visible = true
@quest_book.opacity = 120

# ---  @help_window = Window_Help.new
@help_window = Window_QuestsMsge.new
@quest_window = Window_Quests.new
# Définir une fenêtre d'aide
@quest_window.help_window = @help_window


@quest_details_window = Window_QuestDetails.new





# Boucle de transition, mise à jour graphique et entré clavier
Graphics.transition
# boucle
loop do
# Mise à jour graphique
Graphics.update
# Mise à jour des entrées clavier
Input.update
# Mise à jour de la class
update

# Si la scene n'existe plus, alors sortir de la boucle
if $scene != self
break
end
end
# figer les graphiques
Graphics.freeze
# destruction des objets



@help_window.dispose
@quest_window.dispose
@quest_details_window.dispose
@quest_book.dispose


end
#--------------------------------------------------------------------------
# ● update
#--------------------------------------------------------------------------
def update
# Mise à jour de la fenêtre aide
@help_window.update

# Mise à jour de la fenêtre quete
@quest_window.update
# Gestion des entrées clavier
# Si B est appuyé
if Input.trigger?(Input::B)
# jouer le son d'annulation
$game_system.se_play($data_system.cancel_se)
# Revenir au menu sur l'élément 6
$scene = Scene_Menu.new(6)
return
end
end
end

 #==============================================================================
# ■ Window_QuestsMsge
# créé par Corwin
#------------------------------------------------------------------------------
#==============================================================================


class Window_QuestsMsge < Window_Base
  def initialize
    #super(0, 0, 640, 64)
    super(330, 104, 270, 348)
    self.contents = Bitmap.new(width - 32, height - 32)
    self.contents.font.name = $fontfaceQuest
    self.contents.font.size = $fontsizeQuest
 self.opacity = 0
    end

  def set_text(text, align = 0)
    # テキストとアラインメントの少なくとも一方が前回と違っている場合 
    if text != @text or align != @align
      # テキストを再描画
      self.contents.clear
   
 
# -- test check lgueur ligne

    self.contents.font.size= $fontsizeQuest -4
    height = contents.text_size("Pg").height  #pour avoir une hauteur type
    line_length = 220 #longueur de la ligne
    line = 0
    lgueur_text = text.length
     
   
  #  for i in 0...lgueur_text
     
      pos = lgueur_text
     
      while contents.text_size(text).width > line_length

        pos_nulle = 0
        pos = 0
       
   
   
    # on affiche tant que le texte n'est pas trop long...

          while contents.text_size(text[0, pos]).width < line_length && pos < lgueur_text
            pos += 1
          end     
       
      # on cherche une position nulle à venir
          pos_nulle = pos
         
          while pos_nulle > 0
            if text[pos_nulle] == 32
              break
            end
            pos_nulle -= 1
          end
         
         
          #on a trouvé une position nulle (space), on affiche le texte jusqu'à la pos. nulle
          if pos_nulle == 0
            self.contents.draw_text(4, 2+line*height, self.width - 40,height, text[0,pos])
            text = text[pos, lgueur_text]
          else
            self.contents.draw_text(4, 2+line*height, self.width - 40,height, text[0,pos_nulle])
            text = text[pos_nulle+1, lgueur_text]
          end
         
          line += 1  # permet de descendre d'une ligne pour afficher la suite
         
         
     
      end
     
      if ( text.length > 0 )
          self.contents.draw_text(4, 2+line*height, self.width - 40,height, text[0,pos])
        line += 1
        end
       
        line += 1
     
 #    end


# -- fin check lgeur ligne
     
     

     
      # -- self.contents.draw_text(4, 0, self.width - 40, 32, text, align)
      @text = text
      @align = align
      @actor = nil

    end
    self.visible = true

   
  end
 

  def set_actor(actor)
    if actor != @actor
      self.contents.clear
      draw_actor_name(actor, 4, 0)
      draw_actor_state(actor, 140, 0)
      draw_actor_hp(actor, 284, 0)
      draw_actor_sp(actor, 460, 0)
      @actor = actor
      @text = nil
      self.visible = true
    end
  end

  def set_enemy(enemy)
    text = enemy.name
    state_text = make_battler_state_text(enemy, 112, false)
    if state_text != ""
      text += "  " + state_text
    end
    set_text(text, 1)
  end
end

#==============================================================================
# ■ Window_QuestDetails
# créé par Corwin
#------------------------------------------------------------------------------

class Window_QuestDetails < Window_Base

  def initialize
    #super(0, 0, 640, 64)
    super(0, 0, 640, 64)
    self.contents = Bitmap.new(width - 32, height - 32)
    self.opacity = 0
    self.contents.font.name = $fontfaceQuest
    self.contents.font.size = $fontsizeQuest+12
    self.contents.font.color = gold_color
    self.contents.draw_text(0, -8, self.width - 40, 36, "Grimoire des Quêtes...", 1)
  end

 
  end

#==============================================================================
#==============================================================================
# ■ Main
#------------------------------------------------------------------------------
# 　各クラスの定義が終わった後、ここから実際の処理が始まります。
#==============================================================================

Font.default_name = "Comic Sans MS"
Font.default_color = Color.new(255,255,255,255)
$defaultfontsize = 28
$defaultfonttype = "Comic Sans MS"
begin
  # Change the $fontface variable to change the font style
  $fontface = "Comic Sans MS"
  # Change the $fontsize variable to change the font size
  $fontsize = 28
  # トランジション準備
  Graphics.freeze
  # シーンオブジェクト (タイトル画面) を作成
  $scene = Scene_Title.new
  # $scene が有効な限り main メソッドを呼び出す
  # définition du type de police d'écriture pour l'affichage des Quêtes
$fontfaceQuest = "Comic Sans MS"
$fontsizeQuest = 28 


  while $scene != nil
    $scene.main
  end
  # フェードアウト
  Graphics.transition(20)
rescue Errno::ENOENT
  # 例外 Errno::ENOENT を補足
  # ファイルがオープンできなかった場合、メッセージを表示して終了する
  filename = $!.message.sub("Ne trouve pas le fichier ou le répertoire - ", "")
  print("Le ficher #{filename} n'a pas été trouvé.")
end

    Marshal.dump($game_quests.get_etat, file)

$game_quests.set_etat( Marshal.load(file))

#quete n°1
1,"Achats", "Aller en ville pour effectuer des achats divers.",

@nbre_quete = 4

$game_quests.changer_etat(X,Y)

$scene = Scene_Quests.new