-Mog Scene Story V1.0

[Eberk94]

Mog Scene Story V1.0

 

Descrizione

Un fantastico script che permette di visualizzare delle scritte a scorrimento della trma del vostro gioco,crediti, ecc.

 

Autore

Moghunter

 

Allegati

Ecco qui la

demo !

 

Ed ecco uno screen:

http://img229.imageshack.us/img229/8017/scenestoryut6.th.png

 

Istruzioni per l'uso

Copiate lo script e tutte le risorse grafiche(che ovviamente poi dovrete modificare se volete in base alla trama del gioco)

 

Ecco la script:

 

#_______________________________________________________________________________
# MOG Scene Story V1.0			
#_______________________________________________________________________________
# By Moghunter	   
# http://www.atelier-rgss.com
#_______________________________________________________________________________
# Tela de introdução, créditos, mudança de capítulos,etc...
# Para customizar basta trocar as pictures que estão na pasta
# Graphics/Title/
#
# CRD_PANO.png	->  Imagem de fundo.
# CRD_OBJ.png	 ->  Imagem Central.
# CRD_PART.png	->  Imagem de partículas em movimento
# CRD_BORDER.png  ->  Imagem das bordas ou layout.
# CRD_BLANK	   ->  Imagem usada para dar fade na tela.
# CRD_TEXT		->  Imagem do texto(Créditos ou outros).
#
# Para definir o texto que será apresentado você deve 
# coloca-lo na imagem CRD_TEXT.png com a largura máxima de 640.
# A altura pode ser qualquer tamanho, lembrando que os textos
# são pictures, portanto você pode mistura-los juntos com textos
# e imagens.
#
# Para chamar o script use este código no evento.
#
############################
# $scene = Scene_Story.new #
############################
#_______________________________________________________________________________
module MOG
#Definição da música de fundo.  
CREDITS_BGM = "013-Theme02"
#Tipo de transição.
CDT_TR_TYPE = "020-Flat01"
#Tempo para Transição.
CDT_TR_TIME = 100
#Velocidade da movimentação do texto.
TEXT_SPEED = 1
#Ativar as imagens.
OBJETO_VISIBLE = true
PARTI_VISIBLE = true
BORDER_VISIBLE = true
#Tipo de Sinteticidade (Bleding).
# 0 - Normal
# 1 - Inverter 
# 2 - Multiplicar
OBJETO_BLEND = 0
PARTI_BLEND = 1
BORDER_BLEND = 1
#Definição da movimentação da partícula 1.
PARTI_01_OX = 1	#(horizontal)
PARTI_01_OY = 2	#(vertical)
#Definição da movimentação da partícula 2.
PARTI_02_OX = -1   #(horizontal)
PARTI_02_OY = 2	#(vertical)
#Tipo de Background 
# true = Panorama
# false = Mapa 
PANORAMA_MODE = true
end
#-------------------------------------------------------------------------------	
class Scene_Story
include MOG  
def main
Audio.bgm_fade(7000)
if PANORAMA_MODE == false
@spriteset = Spriteset_Map.new
else
@pano = Plane.new
@pano.bitmap = RPG::Cache.title("CRD_PANO")	
@pano.z = 1
end
@objeto = Sprite.new
@objeto.bitmap = RPG::Cache.title("CRD_OBJ")	
@objeto.z = 10
@objeto.x = 230
@objeto.y = 170
@objeto.visible = OBJETO_VISIBLE
@objeto.blend_type = OBJETO_BLEND 
@objeto.opacity = 0
@particula_01 = Plane.new
@particula_01.bitmap = RPG::Cache.title("CRD_PARTI")	
@particula_01.z = 20
@particula_01.blend_type = PARTI_BLEND  
@particula_01.opacity = 0   
@particula_01.visible = PARTI_VISIBLE	
@particula_02 = Plane.new
@particula_02.bitmap = RPG::Cache.title("CRD_PARTI")	
@particula_02.z = 250
@particula_02.ox = 320
@particula_02.oy = 240
@particula_02.blend_type = PARTI_BLEND
@particula_02.opacity = 0
@particula_02.visible = PARTI_VISIBLE
@border = Sprite.new
@border.bitmap = RPG::Cache.title("CRD_BORDER")	
@border.z = 30
@border.blend_type = BORDER_BLEND 
@border.visible = BORDER_VISIBLE
@texto = Sprite.new
@texto.bitmap = RPG::Cache.title("CRD_TEXT") 
@texto.y = 480
@texto.z = 25
@texto.opacity = 0
@blank = Plane.new
@blank.bitmap = RPG::Cache.title("CRD_BLANK")	
@blank.z = 40
@blank.opacity = 253
@time = 0
@time_fv = 0
@texto_Time = 0
@time_move = 0
@time_fade = 480 + @texto.bitmap.height
Graphics.transition(CDT_TR_TIME, "Graphics/Transitions/" + CDT_TR_TYPE) 
Audio.bgm_play("Audio/Bgm/" + CREDITS_BGM)
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
Graphics.freeze
if PANORAMA_MODE == false
@spriteset.dispose
else
@pano.dispose	 
end
@objeto.dispose
@particula_01.dispose
@particula_02.dispose
@border.dispose
@texto.dispose
@blank.dispose
$game_map.autoplay 
end
def update
@time_fv += 1
@time += 1
@time_move += 1	
@objeto.opacity += 1
if PANORAMA_MODE == true
@pano.ox += 1
end
@particula_01.opacity += 15
@particula_02.opacity += 15	
@particula_01.ox += PARTI_01_OX
@particula_01.oy += PARTI_01_OY
@particula_02.ox += PARTI_02_OX
@particula_02.oy += PARTI_02_OY	   
@texto.opacity += 1
if @time_fade  <= 0
@blank.opacity += 1
Audio.bgm_fade(10000)
end
if @time_fade  > 0 and @blank.opacity > 0
@blank.opacity -= 1
end
if @blank.opacity >= 254 and @time_fade  <= 0
$scene = Scene_Map.new	  
end		
if @time_move > 1 and @blank.opacity <= 0
@time_move = 0
@texto.oy += TEXT_SPEED
@time_fade -= TEXT_SPEED
end		
if @time > 12
@time = 0
end
if @time_fv > 100
@time_fv = 0
end  
if @time_fv > 50
if @time >= 12
@objeto.y -= 1
end
else
if @time >= 12
@objeto.y += 1	 
end
end
if @objeto.y < 160
@objeto.y = 160
elsif @objeto.y > 180
@objeto.y = 180
end	
end
end

 

Bugs e Conflitti Noti

Inserite qui il testo (obbligatorio, se non ci sono bugs o conflitti conosciuti scrivete N/A)

[Dark Sora]

Fantastico script! Bravo Eberk94!!! ^_^

[Amos_MHF]

Ho notato un bug, quindi mi sono permesso di modificare lo script.

 

Praticamente, finchè il chiama script si metteva in un evento attivato con Azione andava bene, ma se si metteva in un evento in processo parallelo o inizio automatico lo script si attivava ma subito dopo attivava i comandi dell'evento.

 

Faccio un esempio:

 

Se in un evento in parallel process mettiamo questo per fare una introduzione

 

@Script: $scene = Scene_Story.new

@Trasporto: [Mappa1], (001,001)

 

l'effetto su mappa è questo:

La transizione parte ma subito avviene il Trasporto.

Quindi è inutile fare una introduzione solo su un evento con attivazione Azione no?

 

 

Bene, ho modificato lo script rendendolo funzionante al 100%.

Ho fatto in modo di far funzionare il tutto grazie ad uno switch.

Istruzioni all'interno.

 

PS: Già che c'ero, l'ho anche tradotto completamente.

 

 

#===============================================================================
# **MOG Scene Story V1.0 Fixed and Translated by Amos_MHF		 
#===============================================================================
# By Moghunter	   
# http://www.atelier-rgss.com
# Fixato e tradotto da Amos_MHF (rpg2s.net)
#-------------------------------------------------------------------------------
# Istruzioni
#------------------------------------------------------------------------------
# Questo script può essere usato per creare una introduzione d'effetto.
# Per configurare basta inserire il Graphics/Titles delle immagini con i nomi
# sotto elencati:
#
# CRD_PANO.png	->  Immagine di Sfondo.
# CRD_OBJ.png	 ->  Immagine Centrale.
# CRD_PART.png	->  Immagine dei particolari in movimento.
# CRD_BORDER.png  ->  Immagine del bordo.
# CRD_BLANK	   ->  Immagine di transizione
# CRD_TEXT		->  Immagine del testo.
#
# L'immagine CRD_TEXT.png dovrà avere una larghezza massima di 640 pixel. 
# La lunghezza, invece, è libera, dato che avverrà lo scorrimento della
# immagine stessa.
#
# E' molto importante, però, configurare la Switch di Attivazione (riga 78)
# Infatti l'evento deve apparire così:
#
# <>IF: Switch [switch di attivazione] == ON
#   <>Tutto ciò che deve succedere una volta eseguito lo script (es. un trasporto)
# : ELSE
#   <>Script: $scene = Scene_Story.new
# : END
# <>IF: Switch [switch di attivazione] == ON
#   <>Tutto ciò che deve succedere una volta eseguito lo script (es. un trasporto)
# : ELSE
#   <>Script: $scene = Scene_Story.new
# : END
#  
#
# Per chiamare lo script, inserite in un evento questo Call Script:
#
# $scene = Scene_Story.new
#------------------------------------------------------------------------------
#------------------------------------------------------------------------------
# Configurazione
#------------------------------------------------------------------------------
module MOG
#Definizione del BGM di sfondo:  
CREDITS_BGM = "013-Theme02"


#Nome della transizione:
CDT_TR_TYPE = "020-Flat01"


#Tempo per la transizione:
CDT_TR_TIME = 100


#Velocità del testo:
TEXT_SPEED = 1


#Attivazione delle immagini (se volete disattivarne qualcuna,
#							inserite false al posto di true).
OBJETO_VISIBLE = true
PARTI_VISIBLE = true
BORDER_VISIBLE = true


#Tipo di Blending (Fusione con lo sfondo):
# 0 - Normale
# 1 - Inverti 
# 2 - Moltiplica
OBJETO_BLEND = 0
PARTI_BLEND = 1
BORDER_BLEND = 1


#Movimento del primo particolare:
PARTI_01_OX = 1	#(orizzontale)
PARTI_01_OY = 2	#(verticale)


#Movimento del secondo particolare:
PARTI_02_OX = -1   #(orizzontale)
PARTI_02_OY = 2	#(verticale)


#Switch di attivazione:
SWITCH_ATTIVAZIONE = 1


# Tipo di sfondo: 
# true = Panorama
# false = Mappa 
PANORAMA_MODE = true
end
#-------------------------------------------------------------------------------	
class Scene_Story
include MOG  
def main
Audio.bgm_fade(7000)
if PANORAMA_MODE == false
@spriteset = Spriteset_Map.new
else
@pano = Plane.new
@pano.bitmap = RPG::Cache.title("CRD_PANO")	
@pano.z = 1
end
@objeto = Sprite.new
@objeto.bitmap = RPG::Cache.title("CRD_OBJ")	
@objeto.z = 10
@objeto.x = 230
@objeto.y = 170
@objeto.visible = OBJETO_VISIBLE
@objeto.blend_type = OBJETO_BLEND 
@objeto.opacity = 0
@particula_01 = Plane.new
@particula_01.bitmap = RPG::Cache.title("CRD_PARTI")	
@particula_01.z = 20
@particula_01.blend_type = PARTI_BLEND  
@particula_01.opacity = 0   
@particula_01.visible = PARTI_VISIBLE	
@particula_02 = Plane.new
@particula_02.bitmap = RPG::Cache.title("CRD_PARTI")	
@particula_02.z = 250
@particula_02.ox = 320
@particula_02.oy = 240
@particula_02.blend_type = PARTI_BLEND
@particula_02.opacity = 0
@particula_02.visible = PARTI_VISIBLE
@border = Sprite.new
@border.bitmap = RPG::Cache.title("CRD_BORDER")	
@border.z = 30
@border.blend_type = BORDER_BLEND 
@border.visible = BORDER_VISIBLE
@texto = Sprite.new
@texto.bitmap = RPG::Cache.title("CRD_TEXT") 
@texto.y = 480
@texto.z = 25
@texto.opacity = 0
@blank = Plane.new
@blank.bitmap = RPG::Cache.title("CRD_BLANK")	
@blank.z = 40
@blank.opacity = 253
@time = 0
@time_fv = 0
@texto_Time = 0
@time_move = 0
@time_fade = 480 + @texto.bitmap.height
Graphics.transition(CDT_TR_TIME, "Graphics/Transitions/" + CDT_TR_TYPE) 
Audio.bgm_play("Audio/Bgm/" + CREDITS_BGM)
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
Graphics.freeze
if PANORAMA_MODE == false
@spriteset.dispose
else
@pano.dispose	 
end
@objeto.dispose
@particula_01.dispose
@particula_02.dispose
@border.dispose
@texto.dispose
@blank.dispose
$game_map.autoplay 
end
def update
@time_fv += 1
@time += 1
@time_move += 1	
@objeto.opacity += 1
if PANORAMA_MODE == true
@pano.ox += 1
end
@particula_01.opacity += 15
@particula_02.opacity += 15	
@particula_01.ox += PARTI_01_OX
@particula_01.oy += PARTI_01_OY
@particula_02.ox += PARTI_02_OX
@particula_02.oy += PARTI_02_OY	   
@texto.opacity += 1
if @time_fade  <= 0
@blank.opacity += 1
Audio.bgm_fade(10000)
end
if @time_fade  > 0 and @blank.opacity > 0
@blank.opacity -= 1
end
if @blank.opacity >= 254 and @time_fade  <= 0
$game_switches[SWITCH_ATTIVAZIONE] = true
$scene = Scene_Map.new	  
end		
if @time_move > 1 and @blank.opacity <= 0
@time_move = 0
@texto.oy += TEXT_SPEED
@time_fade -= TEXT_SPEED
end		
if @time > 12
@time = 0
end
if @time_fv > 100
@time_fv = 0
end  
if @time_fv > 50
if @time >= 12
@objeto.y -= 1
end
else
if @time >= 12
@objeto.y += 1	 
end
end
if @objeto.y < 160
@objeto.y = 160
elsif @objeto.y > 180
@objeto.y = 180
end	
end
end

 

 

[Belxebu]

Non riesco ad utilizzarlo come intro...mi da vari errori...

[Dark Sora]

Uno script davvero ottimo! Lo userò.....

EDIT:Scusa Amos MHF,ma neanche con il tuo script riesco a far partire lo script se dopo di esso metto un "aspetta" e un "trasporto". Come faccio?

Edited June 22, 2008 by Dark Sora

[Amos_MHF]

Uno script davvero ottimo! Lo userò.....

EDIT:Scusa Amos MHF,ma neanche con il tuo script riesco a far partire lo script se dopo di esso metto un "aspetta" e un "trasporto". Come faccio?

Hai seguito le istruzioni che ho messo nello script?

 

Devi impostare lo script inserendo l'id della Switch

 

poi l'evento deve essere così:

 

IF Switch (ID) == ON

tutto quello che vuoi fare dopo l'evento

 

else

scene = Scene_Story.new

 

END

 

IF Switch (ID) == ON

tutto quello che vuoi fare dopo l'evento

 

else

scene = Scene_Story.new

 

END

[Omix91]

Aiuto mi dite come si fa a scrivere un testo Con sfondo TRASPARENTE??

[Omix91]

Niente, risolto..

[Omix91]

Chi mi può spiegre in modo più chiaro come mettere un teletrasporto dopo l evento nello script di Amos MHF??

[Omix91]

Vabbè mi sono arrangiato in altro modo..

[Shinobido]

Demo inesistente.

[Larryhazard]

Per chi volesse la demo, ecco il link

http://www.atelier-rgss.com/RGSS/Demos/MOG_Scene_Story.zip

 

Dal sito ufficiale http://www.atelier-rgss.com/RGSS/Menu/XP_Menu14.html

[gianlu]

Scusate il necropost ma ho trovato un metodo molto più semplice veloce che consiste nel mettere la scena direttamente dal titolo basta andare nello script Scene_title ed alla riga n° 142 dove sta scritto:

$scene = Scene_Map.new

 

lo sostituite con:

 

$scene = Scene_Story.new

 

in questo modo NON dovrete mettere nessun evento nella mappa dell'introduzione perché lo farà 2da solo" XD

Edited March 4, 2011 by gianlu

[Larryhazard]

Grazie mille, veramente molto utile.

[gianlu]

comunque se qualcuno usa questo metodo deve disattivare la switch alla riga 199 dove sta scritto true lo modificate con false