Scripts RPG Maker VX

Crédit

Auteur : Inconnu

Fonction : Permet de faire un système de crédit. Le texte défile de bas en haut

Image(s) : Image n°1

Ressource(s) : Aucune

Démo : Aucune

Remarque : Testé et fonctionnel. Script edité par Mac Malone à partir d'un script XP dont l'auteur est inconnu.

Nombre de scripts : 1

Installation : Allez dans l'éditeur de script, copiez le script et collez le au dessus de "Main"

Utilisation : Vous pouvez modifier le texte après la ligne 57 "CREDIT=<<_END_".
Pour l'image du fond, vous devez mettre l'image dans le dossier Graphics\Pictures. L'image doit être du nom "001-Title01" où bien vous devez modifiez le nom de l'image dans le script vers la ligne 158.

Pour allez sur ce système de crédit, mettez le code suivant dans la commande d'évènement "Insérer un scrip" :

$scene = Scene_Credits.new

Code :

#Font CREDITS_FONT = "Times New Roman" CREDITS_SIZE = 24 CREDITS_OUTLINE = Color.new(0,0,127, 255) CREDITS_SHADOW = Color.new(0,0,0, 100) CREDITS_FILL = Color.new(255,255,255, 255) #============================================================================== # ¦ Scene_Credits #------------------------------------------------------------------------------ # This script has been edited from the original RPG Maker XP version. #------------------------------------------------------------------------------ # 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 #------------------------------------------------------------------------------ # Edited by 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_ Untitled Project Director --------------- Scripts --------------- Graphics --------------- Music and sound --------------- Mapping --------------- Storyline --------------- Beta Testers --------------- Special Thanks --------------- --------------- _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