faire un credit a son jeux

#==============================================================================
# ■ Window_Crédit
#------------------------------------------------------------------------------
# <=Made by : kei-kun==
#==============================================================================

class Window_Credit < Window_Base
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize
    super(0, 0, 440, 92 * 26)
    self.contents = Bitmap.new(width - 32, height - 32)
    self.contents.font.name = "Arial" # police des noms
    @police_titre = "Times New Roman" # police des titres
    @intro = ["Titre du jeu","Sous titre","Un jeu de (Auteur)"]
    @scripteur = ["Scripteur :","Scripteur .1.","Scripteur .2.","Scripteur .3.","Scripteur .4.","Bodom-Child"]
    @site_sources = ["Site Sources :","RPG-Créative","Site . 2 .","Site . 3 ."]
    @graphisme = ["Graphisme :","Charactere Maker (Gimp Master)","PhotoFiltre (Antonio Da Cruz)","etc . . ."]
    @audio_BG = ["Musique :","RPGM-XP","Conpositeur .1.","Conpositeur .2."]
    @audio_SE = ["Effet Sonore :","RPGM-XP","etc . . .","etc . . ."]
    @adaptation = ["Adaptation :","Bodom-Child" ,"(Auteur)"]
    @btesteur = ["Beta testeur :","testeur .1." ,"testeur .2."]
    @merci = ["Un Grand Merci à :","- nom .1.","- nom .2.","- nom .3.","- nom .4."]
    refresh
  end
  #--------------------------------------------------------------------------
  # ● Text
  #--------------------------------------------------------------------------
  def text(index,txt)
  if @title == true 
  self.contents.font.name = @police_titre
  self.contents.font.size = 32
  self.contents.font.color = Color.new(0,0,0,160)
  self.contents.draw_text(1, (index+2) * 24+1, 440, 32,txt)
  self.contents.font.color = Color.new(0,0,0,60)
  self.contents.draw_text(10, (index+2) * 24+5, 440, 32,txt)
  self.contents.font.color = system_color
  self.contents.draw_text(0, (index+2) * 24, 440, 32,txt)
  @title = false
  @li += 3
  self.contents.font.name = $fontface
  else
  self.contents.font.size = 22
  self.contents.font.color = Color.new(0,0,0,160)
  self.contents.draw_text(1, index * 24+1, 440, 32,txt)
  self.contents.font.color = Color.new(0,0,0,60)
  self.contents.draw_text(10, index * 24+5, 440, 32,txt)
  self.contents.font.color = system_color
  self.contents.draw_text(0, index * 24, 440, 32,txt)
  end
  end
  #--------------------------------------------------------------------------
  # ● refresh
  #--------------------------------------------------------------------------
  def refresh
    self.contents.clear
    @li = 1
    @title = true
    for i in 0..@intro.size
    @li += 1
    text(@li,@intro[i].to_s)
    end
    @title = true
    for i in 0..@scripteur.size
    @li += 1
    text(@li,@scripteur[i].to_s)
    end
    @title = true
    for i in 0..@site_sources.size
    @li += 1
    text(@li,@site_sources[i].to_s)
    end
    @title = true
    for i in 0..@graphisme.size
    @li += 1
    text(@li,@graphisme[i].to_s)
    end
    @title = true
    for i in 0..@audio_BG.size
    @li += 1
    text(@li,@audio_BG[i].to_s)
    end
    @title = true
    for i in 0..@audio_SE.size
    @li += 1
    text(@li,@audio_SE[i].to_s)
    end
    @title = true
    for i in 0..@adaptation.size
    @li += 1
    text(@li,@adaptation[i].to_s)
    end
    @title = true
    for i in 0..@btesteur.size
    @li += 1
    text(@li,@btesteur[i].to_s)
    end
    @title = true
    for i in 0..@merci.size
    @li += 1
    text(@li,@merci[i].to_s)
    end
  end
end

    s1 = "Commencer"
    s2 = "Continuer"
    s3 = "Crédit"
    s4 = "Quitter"
    @command_window = Window_Command.new(192, [s1, s2, s3,s4])

def update
    if @window_credit != nil
      if @window_credit.y > - 92 * 26
      @window_credit.y -= 1
      else
      @window_credit = nil
      end
    end
    # コマンドウィンドウを更新
    @command_window.update
    # C ボタンが押された場合
    if Input.trigger?(Input::C)
      # コマンドウィンドウのカーソル位置で分岐
      case @command_window.index
      when 0  # ニューゲーム
        @window_credit.dispose if @window_credit != nil
        @window_credit = nil if @window_credit != nil
        command_new_game
      when 1  # コンティニュー
        @window_credit.dispose if @window_credit != nil
        @window_credit = nil if @window_credit != nil
        command_continue
      when 2  # シャットダウン
        command_credit
      when 3  # シャットダウン
        @window_credit.dispose if @window_credit != nil
        @window_credit = nil if @window_credit != nil
        command_shutdown
      end
    end
  end

#--------------------------------------------------------------------------
  # ● Credi
  #--------------------------------------------------------------------------
  def command_credit
    $game_system.se_play($data_system.decision_se)
    if @window_credit == nil
    @window_credit = Window_Credit.new
    @window_credit.x = 256
    @window_credit.y = 420 # Ne pas Modifier !
    @window_credit.z = 0 # Priorité de superposition
    @window_credit.opacity = 0 # Ne pas Modifier.
  end
  end