Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.



 
InícioPortalÚltimas imagensProcurarRegistarEntrar
Entrem no novo Forum MGB http://planetmaker.forumeiros.com/

 

 JG Information Option

Ir para baixo 
2 participantes
AutorMensagem
Jorge Guerra
Experiente [***]
Jorge Guerra


Mensagens Mensagens : 52
Cash Makers Cash Makers : 445

JG Information Option Empty
MensagemAssunto: JG Information Option   JG Information Option Icon_minitimeSeg Ago 24, 2009 5:43 pm

JG Information Option

Introdução

Bem esse script faz com que o menu de title tenha uma nova opção a "Informações" como o próprio nome já diz dá informaçôes sobre o jogo.

Configurando

Bem, você precisa criar um mapa, e colocar as informaçôes como incio automatico e depois fazer voltar a tela de título. Para fazer ele teletransportar para esse mapa vá na linha 212 aonde está:
Código:
$game_map.setup(2)

Troque o "2" pelo número do mapa aonde você fez as informações.

Screens:

JG Information Option Jginformationoption

Script:

Código:
#----------------------------------------------------------------#
#------ JG Information Option -----------------------------------#
#----------------------------------------------------------------#
#-- Faz aparecer uma nova opção no Title, a opção "Informações"--#
#--Que dá informações sobre o jogo - Criado por: Jorge Guerra----#
#------------------- Mundo RPG Maker ----------------------------#
#----------------------------------------------------------------#
#----------------------------------------------------------------#

class Scene_Title
 
  #--------------------------------------------------------------------------
  # Processamento Principal
  #--------------------------------------------------------------------------
 
  def main
    # Se estiver em Teste de Batalha
    if $BTEST
      battle_test
      return
    end
    # Carregar o Banco de Dados
    $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")
    # Criar um Sistema
    $game_system = Game_System.new
    # Criar um gráfico de título
    @sprite = Sprite.new
    @sprite.bitmap = RPG::Cache.title($data_system.title_name)
    # Criar uma janela de comandos
    s1 = "Novo Jogo"
    s2 = "Continuar"
    s3 = "Sair"
    s4 = "Informações"
    @command_window = Window_Command.new(192, [s1, s2, s3,s4])
    @command_window.back_opacity = 160
    @command_window.x = 320 - @command_window.width / 2
    @command_window.y = 288
    # O comando Continuar (s2) tem uma determinante
    # Aqui é checado se existe algum arquivo de save
    # Se estiver habilitado, tornar @continue_enabled verdadeiro; se estiver
    # desabilitado, tornar falso
    @continue_enabled = false
    for i in 0..3
      if FileTest.exist?("Save#{i+1}.rxdata")
        @continue_enabled = true
      end
    end
    # Se Continuar estiver habilitado, mover o cursor para "Continuar"
    # Se estiver desabilitado, o texto será mostrado em cinza
    if @continue_enabled
      @command_window.index = 1
    else
      @command_window.disable_item(1)
    end
    # Reproduzir BGM de Título
    $game_system.bgm_play($data_system.title_bgm)
    # Parar de reproduzir BGS e ME
    Audio.me_stop
    Audio.bgs_stop
    # Executar transição
    Graphics.transition
    # Loop principal
    loop do
      # Atualizar a tela de jogo
      Graphics.update
      # Atualizar a entrada de informações
      Input.update
      # Atualizar o frame
      update
      # Abortar o loop caso a tela tenha sido alterada
      if $scene != self
        break
      end
    end
    # Preparar para transição
    Graphics.freeze
    # Exibir a janela de comandos
    @command_window.dispose
    # Exibir o gráfico de Título
    @sprite.bitmap.dispose
    @sprite.dispose
  end
 
  #--------------------------------------------------------------------------
  # Atualização do Frame
  #--------------------------------------------------------------------------
 
  def update
    # Atualizar a janela de comandos
    @command_window.update
    # Se o botão C for pressionado
    if Input.trigger?(Input::C)
      # ramificação pela posição do cursor
      case @command_window.index
      when 0  # Novo Jogo
        command_new_game
      when 1  # Continuar
        command_continue
      when 2  # Sair
        command_shutdown
      when 3 #Informações
        command_informações
      end
    end
  end
 
  #--------------------------------------------------------------------------
  # Comando: Novo Jogo
  #--------------------------------------------------------------------------
 
  def command_new_game
    # Reproduzir SE de OK
    $game_system.se_play($data_system.decision_se)
    # Parar BGM
    Audio.bgm_stop
    # Aqui o contador de frames é resetado para que se conte o Tempo de Jogo
    Graphics.frame_count = 0
    # Criar cada tipo de objetos do jogo
    $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
    # Configurar Grupo Inicial
    $game_party.setup_starting_members
    # Configurar posição inicial no mapa
    $game_map.setup($data_system.start_map_id)
    # Aqui o Jogador é movido até a posição inical configurada
    $game_player.moveto($data_system.start_x, $data_system.start_y)
    # Atualizar Jogador
    $game_player.refresh
    # Rodar, de acordo com o mapa, a BGM e a BGS
    $game_map.autoplay
    # Atualizar mapa (executar processos paralelos)
    $game_map.update
    # Mudar para a tela do mapa
    $scene = Scene_Map.new
  end
 
  #--------------------------------------------------------------------------
  # Comando: Continuar
  #--------------------------------------------------------------------------
 
  def command_continue
    # Se Continuar estiver desabilitado
    unless @continue_enabled
      # Reproduzir SE de erro
      $game_system.se_play($data_system.buzzer_se)
      return
    end
    # Reproduzir SE de OK
    $game_system.se_play($data_system.decision_se)
    # Mudar para a tela de Carregar arquivos
    $scene = Scene_Load.new
  end
 
  #--------------------------------------------------------------------------
  # Comando: Sair
  #--------------------------------------------------------------------------
 
  def command_shutdown
    # Reproduzir SE de OK
    $game_system.se_play($data_system.decision_se)
    # Diminuir o volume de BGM, BGS e ME
    Audio.bgm_fade(800)
    Audio.bgs_fade(800)
    Audio.me_fade(800)
    # Sair
    $scene = nil
  end
#-------------------------------------------------------------------------------
# Comando: Informações
#-------------------------------------------------------------------------------

  def command_informações
    #Reproduzir SE de OK
    $game_system.se_play($data_system.decision_se)
    #Janela de Informações
    Audio.bgm_stop
    Graphics.frame_count = 0
    $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
    $game_party.setup_starting_members
    $game_map.setup(2)
    $game_player.moveto(10, 10)
    $game_player.refresh
    $game_map.autoplay
    $game_map.update
    $scene = Scene_Map.new
  end
end

Créditos:

Jorge Guerra (Eu) - Criar e disponibilizar o script.

Vlws
Ir para o topo Ir para baixo
lz-leo
Super Maker [******]
lz-leo


Mensagens Mensagens : 604
Cash Makers Cash Makers : 895

JG Information Option Empty
MensagemAssunto: Re: JG Information Option   JG Information Option Icon_minitimeSex Set 04, 2009 5:56 pm

Esse ficou show cara,procurava uma coisa assim pra colocar no meu projeto templar,vou colocar os creditos logo no inicio :D parabens pelo Script.
Ir para o topo Ir para baixo
 
JG Information Option
Ir para o topo 
Página 1 de 1

Permissões neste sub-fórumNão podes responder a tópicos
 :: Scripts para RPG Maker :: Scripts para RMXP: RGSS-
Ir para: