Ruby Quellcode

#==============================================================================
# ** Map im Hintergrund beim Titel V0.2
# MapImHintergrundBeimTitel.rb von Jenz (04.09.2009)
#------------------------------------------------------------------------------
# http://www.rpg-studio.de/scriptdb/node/323
# http://www.rpg-studio.de/forum/index.php?page=Thread&threadID=13304
#==============================================================================
 
#000000000000000000000000000000000000000000000000000000000000000000000000000000 
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~by Jenz~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 
# map im hintergrud beim Titel 
# V.0.2 
#000000000000000000000000000000000000000000000000000000000000000000000000000000 
class Scene_Title 
#----------------------------------------------------------------- 
def initialize 
@map_id = [1] # Die Maps, von denen eine zufällig gewählt wird
# die koordinaten wie die map gescrollt ist
# Müssen die reihenfolge passend zu den Maps haben!
@x = [50, 0, 0]
@y = [0, 0, 0]
# die bgm, muss wieder passend zu den maps sein
@bgms = ['012-Theme01']
 
@neues_spiel = " 	Neues Spiel" 
@laden = "  	Fortfahren" 
@beenden = "  	Schließen" 
@titelname = "" # Wenn man kein bild mit den namen haben möchte "" statt "Titel" schreiben das 
#Bild muss im Titel ordner importiert werden
@titelname_x = 10 # Die X Koordinate Des Titelnamens 
@titelname_y = 50 # Die Y Koordinate Des Titelnamens 
@auswahl_x = 320 # Die X Koordinate Des Command_Windows 
@auswahl_y = 340 # Die Y Koordinate Des Command_Windows 
end 
#----------------------------------------------------------------- 
def main 
if $BTEST 
battle_test 
return 
end 
#------------------------------------------------------- 
$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") 
$game_system = Game_System.new 
#-------------------------------------------------------- 
map 
@spriteset = Spriteset_Map.new 
@Titel_name = Sprite.new 
@Titel_name.bitmap = RPG::Cache.title(@titelname) 
@Titel_name.x = @titelname_x 
@Titel_name.y = @titelname_y 
s1 = @neues_spiel 
s2 = @laden 
s3 = @beenden 
@command_window = Window_Command.new(192, [s1, s2, s3]) 
@command_window.back_opacity = 160 
@command_window.x = @auswahl_x - @command_window.width / 2 
@command_window.y = @auswahl_y 
#------------------------------------------------------- 
@continue_enabled = false 
for i in 0..3 
if FileTest.exist?("Save#{i+1}.rxdata") 
@continue_enabled = true 
end 
end 
if @continue_enabled 
@command_window.index = 1 
else 
@command_window.disable_item(1) 
end 
Audio.me_stop 
Audio.bgs_stop 
Graphics.transition 
loop do 
Graphics.update 
Input.update 
update 
if $scene != self 
break 
end 
end 
dispose 
end 
#------------------------------------------------------------ 
def dispose 
Graphics.freeze 
@command_window.dispose 
@Titel_name.dispose 
@Titel_name.bitmap.dispose 
@spriteset.dispose 
end 
#------------------------------------------------------------ 
def map 
$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 
x = rand(@map_id.size)
$game_map.setup(@map_id[x]) 
$game_system.bgm_play(RPG::AudioFile.new(@bgms[x], 100, 100)) 
$game_player.moveto(@x[x], @y[x]) 
$game_player.refresh 
$game_map.update 
end 
#----------------------------------------------------------- 
alias updatesprjenz update 
def update 
loop do 
$game_map.update 
$game_system.map_interpreter.update 
$game_player.update 
$game_system.update 
$game_screen.update 
unless $game_temp.player_transferring 
break 
end 
if $game_temp.transition_processing 
break 
end 
end 
@spriteset.update 
updatesprjenz 
end 
#------------------------------------------------------------- 
end