#Texte
CREDITS_FONT = "Times New Roman"# Mettre à la place de "Times new Roman" le nom de la police d'écriture.
CREDITS_SIZE = 24#Taille du texte
CREDITS_OUTLINE = Color.new(0,0,127, 255)#Couleur ligne
CREDITS_SHADOW = Color.new(0,0,0, 100)#Couleur de l'ombre ?
CREDITS_FILL = Color.new(255,255,255, 255)#Couleur des files ?

#==============================================================================
# ¦ Scene_Credits
#------------------------------------------------------------------------------
# Ce script est une modification d'un script pour RPG maker XP
#------------------------------------------------------------------------------
# It now uses pictures from the pictures folder instead of titles from the
# titles folder.
#------------------------------------------------------------------------------
# This script might need the RMXP to RMVX Compatibility Patch avialble at RPG
# Maker.net
#------------------------------------------------------------------------------
# Edité par Mac Malone (Dr.?)
# XP Version: Oringinal Author unknow, but edidted by MiDas Mike so it doesn't
# play over the Title, but runs by calling the following:
# $scene = Scene_Credits.new
#==============================================================================

class Scene_Credits

# This next piece of code is the credits.
#Start Editing
CREDIT=<<_END_

La Nouvelle Aventure

Skull21
histoire=

il y a bien longtemps de cela, un jeune enfant dénommer Skull,

fut attaquer par la pire des Team "La Team Tenos".

Cette Team fut appeler comme ça, car c'était les ténèbres en

personne, elle avait tué tellement de gens qu'un certain, héros,

qui était le père de Skull attaqua lui-même cette Team, il avait réussi

à tuer bon nombre d'entre eux, mais fut tuer par le chef de cette

Team maudite, c'est pour cela que le chef par une colère noire

attaqua le village de son père, mais un miracle est survenue

le cristal, nommer Cristal de Lumière que gardait le village,

fut sauver la vie de Skull et celui-ci atterrie dans la demeure

du maître Fitju avec un message avec lui disant =

<<mon cher Fitju cet enfant a été attaqué

par la Team Tenos, je te pris de bien veiller sur lui

et de lui donner tout ce que, tu sais sur l'art du combat,

mais aussi de l'amour, il en à besoin, je ne peux pas

tant dire plus, mais tu dois le garder

PS= Ton cher ami>>

ce fut les dernières paroles venant du village de Skull...




Remerciements spéciaux
La Meche,fabY et le reste du Forum de rpg-marker VX


_END_
#Stop Editing
def main

#-------------------------------
# Animated Background Setup
#-------------------------------
@sprite = Sprite.new
#@sprite.bitmap = Cache.picture($data_system.title_name)
@backgroundList = ["001-Title01"] #Edit this to the picture(s) you wish to show in the background. They do repeat.
@backgroundGameFrameCount = 0
# Number of game frames per background frame.
@backgroundG_BFrameCount = 3.4
@sprite.bitmap = Cache.picture(@backgroundList[0])

#------------------
# Credits Setup
#------------------

credit_lines = CREDIT.split(/\n/)
credit_bitmap = Bitmap.new(640,32 * credit_lines.size)
credit_lines.each_index do |i|
line = credit_lines[i]
credit_bitmap.font.name = CREDITS_FONT
credit_bitmap.font.size = CREDITS_SIZE
x = 0
credit_bitmap.font.color = CREDITS_OUTLINE
credit_bitmap.draw_text(0 + 1,i * 32 + 1,640,32,line,1)
credit_bitmap.draw_text(0 - 1,i * 32 + 1,640,32,line,1)
credit_bitmap.draw_text(0 + 1,i * 32 - 1,640,32,line,1)
credit_bitmap.draw_text(0 - 1,i * 32 - 1,640,32,line,1)
credit_bitmap.font.color = CREDITS_SHADOW
credit_bitmap.draw_text(0,i * 32 + 8,640,32,line,1)
credit_bitmap.font.color = CREDITS_FILL
credit_bitmap.draw_text(0,i * 32,640,32,line,1)
end
@credit_sprite = Sprite.new(Viewport.new(0,50,640,380))
@credit_sprite.bitmap = credit_bitmap
@credit_sprite.z = 9998
@credit_sprite.oy = -430
@frame_index = 0
@last_flag = false

#--------
# Setup
#--------

# ME?BGS ??????
Audio.me_stop
Audio.bgs_stop
Audio.se_stop
# ?????????
Graphics.transition
# ??????
loop do
# ????????
Graphics.update
# ???????
Input.update
# ??????
update
# ????????????????
if $scene != self
break
end
end
# ?????????
Graphics.freeze
@sprite.dispose
@credit_sprite.dispose
end

#Checks if credits bitmap has reached it's ending point
def last?
return (@frame_index >= @credit_sprite.bitmap.height + 480)
end
def last
if not @last_flag
@last_flag = true
@last_count = 0
else
@last_count += 1
end
if @last_count >= 300
$scene = Scene_Map.new
end
end

#Check if the credits should be cancelled
def cancel?
if Input.trigger?(Input::C)
$scene = Scene_Map.new
return true
end
return false
end

#--------------------------------------------------------------------------
# ? ??????
#--------------------------------------------------------------------------
def update
@backgroundGameFrameCount = @backgroundGameFrameCount + 1
if @backgroundGameFrameCount >= @backgroundG_BFrameCount
@backgroundGameFrameCount = 0
# Add current background frame to the end
@backgroundList = @backgroundList << @backgroundList[0]
# and drop it from the first position
@backgroundList.delete_at(0)
@sprite.bitmap = Cache.picture(@backgroundList[0])
end
return if cancel?
last if last?
@credit_sprite.oy += 1
end
end