#000000000000000000000000000000000000000000000000000000000000000000000000000000 #~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~by Jenz~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ # map im hintergrud beim Titel # V.0.2 #000000000000000000000000000000000000000000000000000000000000000000000000000000 class Scene_Title #----------------------------------------------------------------- def initialize @map_id = 1 # Die map id die im Hintergrund angezeigt werden soll @x = 0 # Die x koordinate wo die map im Hintergrund startet @y = 0 # Die y koordinate wo die map im Hintergrund startet @neues_spiel = "Neues Spiel" @laden = "Fortfahren" @beenden = "Schließen" @titelname = "Titel" # Wenn man kein bild mit den namen haben möchte "" statt "Titel" schreiben das #Bild muss im Titel ordner importiert werden @titelname_x = 70 # Die X Koordinate Des Titelnamens @titelname_y = 50 # Die Y Koordinate Des Titelnamens @auswahl_x = 320 # Die X Koordinate Des Command_Windows @auswahl_y = 288 # 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 $game_system.bgm_play($data_system.title_bgm) 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 $game_map.setup(@map_id) $game_player.moveto(@x, @y) $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
SDK.check_requirements(2.3,[1,3]) SDK.log('Map im Hintergrund beim Titel', 'Jenz', 0.2, '02.01.2008') if SDK.enable('Map im Hintergrund beim Titel') #000000000000000000000000000000000000000000000000000000000000000000000000000000 #~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~by Jenz~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ # map im hintergrud beim Titel # V.0.2 #000000000000000000000000000000000000000000000000000000000000000000000000000000 module Jenz Map_id = 1 # Die map id die im Hintergrund angezeigt werden soll X = 0 # Die x koordinate wo die map im Hintergrund startet Y = 0 # Die y koordinate wo die map im Hintergrund startet 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 = 70 # Die X Koordinate Des Titelnamens Titelname_y = 50 # Die Y Koordinate Des Titelnamens Auswahl_x = 320 # Die X Koordinate Des Command_Windows Auswahl_y = 288 # Die Y Koordinate Des Command_Windows end class Scene_Title include Jenz #----------------------------------------------------------------- def main_window #-------------------------------------------------------- map @spriteset = Spriteset_Map.new @Titel_name = Sprite.new @Titel_name.bitmap = RPG::Cache.title(Jenz::Titelname) @Titel_name.x = Jenz::Titelname_x @Titel_name.y = Jenz::Titelname_y s1 = Jenz::Neues_spiel s2 = Jenz::Laden s3 = Jenz::Beenden @command_window = Window_Command.new(192, [s1, s2, s3]) @command_window.back_opacity = 160 @command_window.x = Jenz::Auswahl_x - @command_window.width / 2 @command_window.y = Jenz::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 end #------------------------------------------------------------ def map commandnewgame_gamedata $game_map.setup(Jenz::Map_id) $game_player.moveto(Jenz::X, Jenz::Y) $game_player.refresh $game_map.update end #----------------------------------------------------------- alias_method :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 if Input.trigger?(Input::C) case @command_window.index when 0 # New game command_new_game when 1 # Continue command_continue when 2 # Shutdown command_shutdown end end updatesprjenz end #------------------------------------------------------------- end end