*Selezione Campagna

[André LaCroix]

Descrizione

Questo script fa sì che sia possibile intraprendere più di una storia all'interno di un unico gioco.

 

Autore

Andrè LaCroix

 

Allegati

Inserire eventuali link di risorse necessarie per il funzionamento dello script, o link ad una demo dimostrativa.

 

Istruzioni per l'uso

ATTENZIONE: Per funzionare correttamente, questo script necessita che nella cartella \Graphics\Titles\ sia presente un file png di formato 640 x 480 che abbia come nome "Campagna" e come estensione il formato PNG. In caso questo file non esista, il gioco andrà in crash quando selezionerete l'opzione "Nuova Partita". In allegato vi do l'immagine che sto usando in BSA, tanto per provare.
Campagna.PNG

 

Script

Funziona in modo semplicissimo. Prendete tutto sto malloppo e ficcatelo in una nuova classe chiamata Scene_CampaignSelection:

 

 

 

#==============================================================================
# ** Scene_CampaignSelection
#------------------------------------------------------------------------------
# Utile per giochi di azione. Invece di affrontare solo una campagna, si avrà
# facoltà di scegliere che avventura giocare per prima.
#==============================================================================

class Scene_CampaignSelection
	#--------------------------------------------------------------------------
	# * Processo principale
	#--------------------------------------------------------------------------
	def main
		# Visualizza l'immagine di sfondo (che si trova nella cartella
		# Graphics/Title e si chiama Campagna.png
		@sprite = Sprite.new
		@sprite.bitmap = RPG::Cache.title("Campagna.PNG")
		# Crea i comandi
		s0 = "Tutorial"
		s1 = "Campagna 1"
		s2 = "Campagna 2"
		s3 = "Campagna 3"
		s4 = "Indietro"
		@command_window = Window_Command.new(300, [s0, s1, s2, s3, s4])
		@command_window.back_opacity = 160
		@command_window.x = 320 - @command_window.width / 2
		@command_window.y = 240 - @command_window.height / 2
		# Avvio riproduzione BGM
		$game_system.bgm_play($data_system.title_bgm)
		# Ferma la riproduzione di ME e BGS
		Audio.me_stop
		Audio.bgs_stop
		# Esegue la transizione
		Graphics.transition
		# Loop principale
		loop do
			# Aggiorna la schermata
			Graphics.update
			# Aggiorna l'input
			Input.update
			# Richiamo della def update
			update
			# Ferma il loop se la scene cambia
			if $scene != self
				break
			end
		end
		# Prepara la transizione
		Graphics.freeze
		# Disposizione della finestra
		@command_window.dispose
		# Disposizione dell'immagine di sfondo
		@sprite.bitmap.dispose
		@sprite.dispose
	end
	#--------------------------------------------------------------------------
	# * Aggiornamento
	#--------------------------------------------------------------------------
	def update
		# Aggiorna la finestra dei comandi
		@command_window.update
		# Se si preme Esc torna al titolo
		if Input.trigger?(Input::B)
			titolo
		end
		# Se si preme il tasto INVIO
		if Input.trigger?(Input::C)
			# Casistica della posizione del cursore
			case @command_window.index
			when 0 # prima opzione (in BSA: Tutorial)
				#Le seguenti tre variabili controllano la posizione iniziale.
				#Cambiarne i valori per cambiare la destinazione.
				#start_map_id = ID Mappa iniziale
				#start.x = posizione sull'asse X
				#start.y = posizione sull'asse Y
				$data_system.start_map_id = 5
				$data_system.start_x = 10
				$data_system.start_y = 6
				tutorial
			when 1 # seconda opzione (in BSA: '91 - '05)
				$data_system.start_map_id = 11
				$data_system.start_x = 0
				$data_system.start_y = 0
				campagna_1
			when 2 # terza opzione (in BSA: 2005 - 2009)
				$data_system.start_map_id = 7
				$data_system.start_x = 0
				$data_system.start_y = 0
				campagna_2
			when 3 # quarta opzione (in BSA: 2010)
				$data_system.start_map_id = 9
				$data_system.start_x = 0
				$data_system.start_y = 0
				campagna_3
			when 4
				#torna al titolo
				titolo
			end
		end
	end
	#--------------------------------------------------------------------------
	# * Trasferimento alla prima campagna.
	#--------------------------------------------------------------------------
	def campagna_1
		# Riproduci SE
		$game_system.se_play($data_system.decision_se)
		# Ferma BGM
		Audio.bgm_stop
		# Resetta il frame count (serve per calcolare il tempo di gioco)
		Graphics.frame_count = 0
		# Crea gli oggetti
		$game_temp = Game_Temp.new
		$game_system = Game_System.new
		$game_switches = Game_Switches.new
		$game_variables = Game_Variables.new
		$game_self_switches = Game_SelfSwitches.new
		$game_screen = Game_Screen.new
		$game_actors = Game_Actors.new
		$game_party = Game_Party.new
		$game_troop = Game_Troop.new
		$game_map = Game_Map.new
		$game_player = Game_Player.new
		# Imposta il party iniziale
		$game_party.setup_starting_members
		# Imposta la mappa iniziale
		$game_map.setup($data_system.start_map_id)
		# Coordinate iniziali
		$game_player.moveto($data_system.start_x, $data_system.start_y)
		# Refresh del giocatore
		$game_player.refresh
		# Riproduce i BGM e BGS propri di quella mappa
		$game_map.autoplay
		# Aggiorna mappa (per gli eventi in parallelo)
		$game_map.update
		# Vai alla Scene_Map
		$scene = Scene_Map.new
	end
	#--------------------------------------------------------------------------
	# * Trasferimento alla seconda campagna.
	#--------------------------------------------------------------------------
	def campagna_2
		# Riproduci SE
		$game_system.se_play($data_system.decision_se)
		# Stop BGM
		Audio.bgm_stop
		# Reset frame count for measuring play time
		Graphics.frame_count = 0
		# Make each type of game object
		$game_temp = Game_Temp.new
		$game_system = Game_System.new
		$game_switches = Game_Switches.new
		$game_variables = Game_Variables.new
		$game_self_switches = Game_SelfSwitches.new
		$game_screen = Game_Screen.new
		$game_actors = Game_Actors.new
		$game_party = Game_Party.new
		$game_troop = Game_Troop.new
		$game_map = Game_Map.new
		$game_player = Game_Player.new
		# Set up initial party
		$game_party.setup_starting_members
		# Set up initial map position
		$game_map.setup($data_system.start_map_id)
		# Move player to initial position
		$game_player.moveto($data_system.start_x, $data_system.start_y)
		# Refresh player
		$game_player.refresh
		# Run automatic change for BGM and BGS set with map
		$game_map.autoplay
		# Update map (run parallel process event)
		$game_map.update
		# Switch to map screen
		$scene = Scene_Map.new
	end
	#--------------------------------------------------------------------------
	# * Trasferimento alla terza campagna
	#--------------------------------------------------------------------------
	def campagna_3
		# Play decision SE
		$game_system.se_play($data_system.decision_se)
		# Stop BGM
		Audio.bgm_stop
		# Reset frame count for measuring play time
		Graphics.frame_count = 0
		# Make each type of game object
		$game_temp = Game_Temp.new
		$game_system = Game_System.new
		$game_switches = Game_Switches.new
		$game_variables = Game_Variables.new
		$game_self_switches = Game_SelfSwitches.new
		$game_screen = Game_Screen.new
		$game_actors = Game_Actors.new
		$game_party = Game_Party.new
		$game_troop = Game_Troop.new
		$game_map = Game_Map.new
		$game_player = Game_Player.new
		# Set up initial party
		$game_party.setup_starting_members
		# Set up initial map position
		$game_map.setup($data_system.start_map_id)
		# Move player to initial position
		$game_player.moveto($data_system.start_x, $data_system.start_y)
		# Refresh player
		$game_player.refresh
		# Run automatic change for BGM and BGS set with map
		$game_map.autoplay
		# Update map (run parallel process event)
		$game_map.update
		# Switch to map screen
		$scene = Scene_Map.new
	end
	#--------------------------------------------------------------------------
	# * Tornare al titolo
	#--------------------------------------------------------------------------
	def titolo
		# Play decision SE
		$game_system.se_play($data_system.cancel_se)
		$scene = Scene_Title.new
	end
	#--------------------------------------------------------------------------
	# * Trasferimento al tutorial
	#--------------------------------------------------------------------------
	def tutorial
		# Play decision SE
		$game_system.se_play($data_system.decision_se)
		# Stop BGM
		Audio.bgm_stop
		# Reset frame count for measuring play time
		Graphics.frame_count = 0
		# Make each type of game object
		$game_temp = Game_Temp.new
		$game_system = Game_System.new
		$game_switches = Game_Switches.new
		$game_variables = Game_Variables.new
		$game_self_switches = Game_SelfSwitches.new
		$game_screen = Game_Screen.new
		$game_actors = Game_Actors.new
		$game_party = Game_Party.new
		$game_troop = Game_Troop.new
		$game_map = Game_Map.new
		$game_player = Game_Player.new
		# Set up initial party
		$game_party.setup_starting_members
		# Set up initial map position
		$game_map.setup($data_system.start_map_id)
		# Move player to initial position
		$game_player.moveto($data_system.start_x, $data_system.start_y)
		# Refresh player
		$game_player.refresh
		# Run automatic change for BGM and BGS set with map
		$game_map.autoplay
		# Update map (run parallel process event)
		$game_map.update
		# Switch to map screen
		$scene = Scene_Map.new
	end
end

 

 

 

 

 

fatto questo, andate in Scene_Title e sostituitene il contenuto con:

 

 

 

#==============================================================================
# ** Scene_Title
#------------------------------------------------------------------------------
# This class performs title screen processing.
#==============================================================================

class Scene_Title
	#--------------------------------------------------------------------------
	# * Main Processing
	#--------------------------------------------------------------------------
	def main
		# If battle test
		if $BTEST
			battle_test
			return
		end
		# Load database
		$data_actors = load_data("Data/Actors.rxdata")
		$data_classes = load_data("Data/Classes.rxdata")
		$data_skills = load_data("Data/Skills.rxdata")
		$data_items = load_data("Data/Items.rxdata")
		$data_weapons = load_data("Data/Weapons.rxdata")
		$data_armors = load_data("Data/Armors.rxdata")
		$data_enemies = load_data("Data/Enemies.rxdata")
		$data_troops = load_data("Data/Troops.rxdata")
		$data_states = load_data("Data/States.rxdata")
		$data_animations = load_data("Data/Animations.rxdata")
		$data_tilesets = load_data("Data/Tilesets.rxdata")
		$data_common_events = load_data("Data/CommonEvents.rxdata")
		$data_system = load_data("Data/System.rxdata")
		# Make system object
		$game_system = Game_System.new
		# Make title graphic
		@sprite = Sprite.new
		@sprite.bitmap = RPG::Cache.title($data_system.title_name)
		# Make command window
		s1 = "AVVIA"
		s2 = "RIPRENDI"
		s3 = "CHIUDI"
		@command_window = Window_Command.new(192, [s1, s2, s3])
		@command_window.back_opacity = 160
		@command_window.x = 320 - @command_window.width / 2
		@command_window.y = 240 - @command_window.height / 2
		# Continue enabled determinant
		# Check if at least one save file exists
		# If enabled, make @continue_enabled true; if disabled, make it false
		@continue_enabled = false
		for i in 0..3
			if FileTest.exist?("Save#{i+1}.rxdata")
				@continue_enabled = true
			end
		end
		# If continue is enabled, move cursor to "Continue"
		# If disabled, display "Continue" text in gray
		if @continue_enabled
			@command_window.index = 1
		else
			@command_window.disable_item(1)
		end
		# Play title BGM
		$game_system.bgm_play($data_system.title_bgm)
		# Stop playing ME and BGS
		Audio.me_stop
		Audio.bgs_stop
		# Execute transition
		Graphics.transition
		# Main loop
		loop do
			# Update game screen
			Graphics.update
			# Update input information
			Input.update
			# Frame update
			update
			# Abort loop if screen is changed
			if $scene != self
				break
			end
		end
		# Prepare for transition
		Graphics.freeze
		# Dispose of command window
		@command_window.dispose
		# Dispose of title graphic
		@sprite.bitmap.dispose
		@sprite.dispose
	end
	#--------------------------------------------------------------------------
	# * Frame Update
	#--------------------------------------------------------------------------
	def update
		# Update command window
		@command_window.update
		# If C button was pressed
		if Input.trigger?(Input::C)
			# Branch by command window cursor position
			case @command_window.index
			when 0 # New game
				command_new_game
			when 1 # Continue
				command_continue
			when 2 # Shutdown
				command_shutdown
			end
		end
	end
	#--------------------------------------------------------------------------
	# * Command: New Game
	#--------------------------------------------------------------------------
	def command_new_game
		# Play decision SE
		$game_system.se_play($data_system.decision_se)
		# Reset frame count for measuring play time
		Graphics.frame_count = 0
		$scene = Scene_CampaignSelection.new
	end
	#--------------------------------------------------------------------------
	# * Command: Continue
	#--------------------------------------------------------------------------
	def command_continue
		# If continue is disabled
		unless @continue_enabled
			# Play buzzer SE
			$game_system.se_play($data_system.buzzer_se)
			return
		end
		# Play decision SE
		$game_system.se_play($data_system.decision_se)
		# Switch to load screen
		$scene = Scene_Load.new
	end
	#--------------------------------------------------------------------------
	# * Command: Shutdown
	#--------------------------------------------------------------------------
	def command_shutdown
		# Play decision SE
		$game_system.se_play($data_system.decision_se)
		# Fade out BGM, BGS, and ME
		Audio.bgm_fade(800)
		Audio.bgs_fade(800)
		Audio.me_fade(800)
		# Shutdown
		$scene = nil
	end
	
	#--------------------------------------------------------------------------
	# * Battle Test
	#--------------------------------------------------------------------------
	def battle_test
		# Load database (for battle test)
		$data_actors = load_data("Data/BT_Actors.rxdata")
		$data_classes = load_data("Data/BT_Classes.rxdata")
		$data_skills = load_data("Data/BT_Skills.rxdata")
		$data_items = load_data("Data/BT_Items.rxdata")
		$data_weapons = load_data("Data/BT_Weapons.rxdata")
		$data_armors = load_data("Data/BT_Armors.rxdata")
		$data_enemies = load_data("Data/BT_Enemies.rxdata")
		$data_troops = load_data("Data/BT_Troops.rxdata")
		$data_states = load_data("Data/BT_States.rxdata")
		$data_animations = load_data("Data/BT_Animations.rxdata")
		$data_tilesets = load_data("Data/BT_Tilesets.rxdata")
		$data_common_events = load_data("Data/BT_CommonEvents.rxdata")
		$data_system = load_data("Data/BT_System.rxdata")
		# Reset frame count for measuring play time
		Graphics.frame_count = 0
		# Make each game object
		$game_temp = Game_Temp.new
		$game_system = Game_System.new
		$game_switches = Game_Switches.new
		$game_variables = Game_Variables.new
		$game_self_switches = Game_SelfSwitches.new
		$game_screen = Game_Screen.new
		$game_actors = Game_Actors.new
		$game_party = Game_Party.new
		$game_troop = Game_Troop.new
		$game_map = Game_Map.new
		$game_player = Game_Player.new
		# Set up party for battle test
		$game_party.setup_battle_test_members
		# Set troop ID, can escape flag, and battleback
		$game_temp.battle_troop_id = $data_system.test_troop_id
		$game_temp.battle_can_escape = true
		$game_map.battleback_name = $data_system.battleback_name
		# Play battle start SE
		$game_system.se_play($data_system.battle_start_se)
		# Play battle BGM
		$game_system.bgm_play($game_system.battle_bgm)
		# Switch to battle screen
		$scene = Scene_Battle.new
	end
end

 

 

 

 

 

Bugs e Conflitti Noti

N/A

Edited March 15, 2013 by Flame

[Kuchizotchi]

Bravo Kanta :*

[Timisci]

Ottimo Kanta

[Caios]

Mi da errore sulla linea 40.

[Caios]

Mi da errore sulla linea 40 di Scene_Title.

[André LaCroix]

Mi da errore sulla linea 40.

Sì, avevo sbagliato la versione sbagliata di Scene_Title. Riprova con quella che ho postato adesso.

[Caios]

Grazie, ora va!

Carino, utile!

[Soul Eater]

Bravo Kanta:D!!!

[Kenshin]

Hem... non basta fare un evento "scelta" in autostart?

Praticamente io sto facendo una cosa simile ed ho usato questo metodo ^^;;;

Non c'è neanche da toccare gli script...