Chaos Project

RPG Maker => RPG Maker Scripts => Script Requests => Topic started by: Pm6583 on May 15, 2009, 01:35:31 pm

Title: Custom title screen script.
Post by: Pm6583 on May 15, 2009, 01:35:31 pm
Hay guys i found an amazing script for the RPG maker vx.

Its a script that allows you to have a map in the background as your title screen and what ever events are on it it will also play if there one autorun.

But i was wondering if there was anyone that could convert it to RPG maker XP.

It would be really usefull if it was converted

so here is the script

Spoiler: ShowHide
#==============================================================================
# ? Vixotic_Map Story_Title <VX>
#------------------------------------------------------------------------------
# Version 1
# by Vixotic [vixotic@live.com]
# Exclusive Script for http://rpgmakervx.net/
#============================================================================== 
module VIX
  #-----------------------
  # Map Story Location
  #----------------------
  MAP_ID = 1
  MAP_X = 7
  MAP_Y = 8
  MEMBERS = [1] # Members when Map Story Start.
  # [] is No Member. [1,2,3] is Members ID 1-2-3 from Database
 
  #--------------------------
  # Title Window Properties
  #-------------------------
  TITLE_WINDOW_SKIN = "Window" # Get Windowskin File from System Folder
  TITLE_WINDOW_X = 355
  TITLE_WINDOW_Y = 170
  TITLE_WINDOW_WIDTH = 172
  TITLE_WINDOW_OPACITY = 200 # 0 to 255
end

class Scene_Title < Scene_Base
  def vix_title_window_setup
    $title_window.windowskin = Cache.system(VIX::TITLE_WINDOW_SKIN)
    $title_window.x = VIX::TITLE_WINDOW_X
    $title_window.y = VIX::TITLE_WINDOW_Y
    $title_window.width = VIX::TITLE_WINDOW_WIDTH
    $title_window.opacity = VIX::TITLE_WINDOW_OPACITY
  end

  def start
    super
    load_database
    create_game_objects
    if $title_on == true
      $title_on = false
     command_new_game
    else
    $game_party.vix_setup_starting_member(VIX::MEMBERS)
    $game_map.setup(VIX::MAP_ID)
    $game_player.moveto(VIX::MAP_X,VIX::MAP_Y)
    $game_player.refresh
    $game_map.titlewin = 1
    $scene = Scene_Map.new
    $title_window = Window_Command.new(172, [Vocab::new_game, Vocab::continue,  Vocab::shutdown])
    vix_title_window_setup
    $game_map.autoplay
    end
  end
 
  def command_new_game
    confirm_player_location
    $game_party.setup_starting_members
    $game_map.setup($data_system.start_map_id)
    $game_player.moveto($data_system.start_x, $data_system.start_y)
    $game_player.refresh
    $scene = Scene_Map.new
    RPG::BGM.fade(1500)
    close_command_window
    Graphics.fadeout(60)
    Graphics.wait(40)
    Graphics.frame_count = 0
    RPG::BGM.stop
    $game_map.autoplay
  end
 
  def post_start
  end
  def terminate
  end
  def update
  end
  def pre_terminate
  end
  def perform_transition
  end
  def close_command_window
  end
  def perform_transition
  end
end

class Game_Map
  attr_accessor :titlewin
 
  alias vix_map_update update
  def update
    vix_map_update
    $title_window.visible = true if not $title_window.disposed? and $title_window.visible == false and @titlewin != 2
    if @titlewin == 1
    $title_window.update
    if Input.trigger?(Input::C) and not $game_message.visible
      case $title_window.index
     
      when 0 # New Game
       Sound.play_decision
       Graphics.fadeout(30)
       $title_window.dispose unless $title_window.disposed?
       @titlewin = 2
       $title_on = true
       $scene = Scene_Title.new
       
      when 1 # Continue
       Sound.play_decision
       $scene = Scene_File.new(false, false, true)
       
      when 2 # Shutdown
       Sound.play_decision
       $title_window.dispose unless $title_window.disposed?
       @titlewin = 2
       RPG::BGM.fade(800)
       RPG::BGS.fade(800)
       RPG::ME.fade(800)
       $scene = nil
      end
    end
  end
end
end

class Scene_Map
  alias vix_map_terminate terminate
  def terminate
    if $scene.is_a?(Scene_Battle)
      $title_window.visible = false unless $title_window.disposed?
    end
    vix_map_terminate
  end
end

class Scene_File < Scene_Base
  alias vix_read_data read_save_data
  def read_save_data(file)
    vix_read_data(file)
    $game_map.titlewin = 2
    $title_window.dispose unless $title_window.disposed?
  end
end

class Game_Party
    def vix_setup_starting_member(charalist)
    @actors = charalist
  end
end

Title: Re: Custom title screen script.
Post by: Aqua on May 15, 2009, 02:47:59 pm
Have you tried searching on the site where you got the VX script?
There are a good amount of these already...

Why are you looking at VX when you use XP anyway!?!?

Anyway... here's one that I have... I don't have the instructions though
Something about changing Scene_Load or something...
I /think/ it's on rpgrevolution

Spoiler: ShowHide
# By Murasame assassin 

begin
$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")
  $defaultfonttype = "Tahoma"
  $defaultfontsize = 22
  $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($data_system.start_map_id)
    $game_player.moveto($data_system.start_x, $data_system.start_y)
    $game_player.refresh
    $game_map.autoplay
    $game_map.update
    $scene = Scene_Map.new
  Graphics.freeze
  while $scene != nil
    $scene.main
  end
  Graphics.transition(20)
rescue Errno::ENOENT
  filename = $!.message.sub("No such file or directory - ", "")
  print("File #{filename} not found.")
end
Title: Re: Custom title screen script.
Post by: Pm6583 on May 15, 2009, 03:20:20 pm
Thanks mate

The one i have i found by using the search function on an rpg maker forum, I think it was crankeye.