Scene_Map:[font=Consolas, 'Courier New', Courier, mono, serif]#============================================================================== [/font] [font=Consolas, 'Courier New', Courier, mono, serif]# ■ Scene_Map [/font] [font=Consolas, 'Courier New', Courier, mono, serif]#------------------------------------------------------------------------------ [/font] [font=Consolas, 'Courier New', Courier, mono, serif]# マップ画面の処理を行うクラスです。 [/font] [font=Consolas, 'Courier New', Courier, mono, serif]#============================================================================== [/font] [font=Consolas, 'Courier New', Courier, mono, serif] [/font] [font=Consolas, 'Courier New', Courier, mono, serif]class Scene_Map [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ● メイン処理 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] def main [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # スプライトセットを作成 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @spriteset = Spriteset_Map.new[/font] [font=Consolas, 'Courier New', Courier, mono, serif] # メッセージウィンドウを作成 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @message_window = Window_Message.new [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @interface = Interface_Echap.new if $game_map.map_id != POKEMON_S::MAPSCENA [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @button_red = Bouton_Rouge.new[/font] [font=Consolas, 'Courier New', Courier, mono, serif] @interface = New_Interface.new[/font] [font=Consolas, 'Courier New', Courier, mono, serif] # トランジション実行 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] Graphics.transition [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # メインループ [/font] [font=Consolas, 'Courier New', Courier, mono, serif] loop do [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ゲーム画面を更新 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] Graphics.update [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # 入力情報を更新 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] Input.update [/font] [font=Consolas, 'Courier New', Courier, mono, serif] update [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @interface = Interface_Echap.new if @interface.nil? and $game_map.map_id != POKEMON_S::MAPSCENA [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @interface.refresh if not @interface.nil?[/font] [font=Consolas, 'Courier New', Courier, mono, serif] @button_red.refresh[/font] [font=Consolas, 'Courier New', Courier, mono, serif] # 画面が切り替わったらループを中断 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $scene != self [/font] [font=Consolas, 'Courier New', Courier, mono, serif] break [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # トランジション準備 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] Graphics.freeze [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # スプライトセットを解放 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @spriteset.dispose [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @interface.dispose if $game_map.map_id != POKEMON_S::MAPSCENA [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @button_red.dispose [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # メッセージウィンドウを解放 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @message_window.dispose [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $scene.is_a?(Scene_Title) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # 画面をフェードアウト [/font] [font=Consolas, 'Courier New', Courier, mono, serif] Graphics.transition [/font] [font=Consolas, 'Courier New', Courier, mono, serif] Graphics.freeze [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ● フレーム更新 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] def update [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ループ [/font] [font=Consolas, 'Courier New', Courier, mono, serif] loop do [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # マップ、インタプリタ、プレイヤーの順に更新 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # (この更新順序は、イベントを実行する条件が満たされているときに [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # プレイヤーに一瞬移動する機会を与えないなどの理由で重要)[/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_map.update [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_system.map_interpreter.update [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.update [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # システム (タイマー)、画面を更新 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_system.update [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_screen.update [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # プレイヤーの場所移動中でなければループを中断 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] unless $game_temp.player_transferring [/font] [font=Consolas, 'Courier New', Courier, mono, serif] break [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # 場所移動を実行 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] transfer_player [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # トランジション処理中の場合、ループを中断 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $game_temp.transition_processing [/font] [font=Consolas, 'Courier New', Courier, mono, serif] break [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # スプライトセットを更新 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @spriteset.update[/font] [font=Consolas, 'Courier New', Courier, mono, serif] @interface.refresh[/font] [font=Consolas, 'Courier New', Courier, mono, serif] # メッセージウィンドウを更新 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @message_window.update [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ゲームオーバーの場合 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $game_temp.gameover [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ゲームオーバー画面に切り替え [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $scene = Scene_Gameover.new [/font] [font=Consolas, 'Courier New', Courier, mono, serif] return [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # タイトル画面に戻す場合 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $game_temp.to_title [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # タイトル画面に切り替え [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $scene = Scene_Title.new [/font] [font=Consolas, 'Courier New', Courier, mono, serif] return [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # トランジション処理中の場合 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $game_temp.transition_processing [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # トランジション処理中フラグをクリア [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.transition_processing = false [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # トランジション実行 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $game_temp.transition_name == "" [/font] [font=Consolas, 'Courier New', Courier, mono, serif] Graphics.transition(20) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] else [/font] [font=Consolas, 'Courier New', Courier, mono, serif] Graphics.transition(40, "Graphics/Transitions/" + [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.transition_name) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # メッセージウィンドウ表示中の場合 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $game_temp.message_window_showing [/font] [font=Consolas, 'Courier New', Courier, mono, serif] return [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # エンカウント カウントが 0 で、エンカウントリストが空ではない場合 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $game_player.encounter_count == 0 and $game_map.encounter_list != [] [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # イベント実行中かエンカウント禁止中でなければ [/font] [font=Consolas, 'Courier New', Courier, mono, serif] unless $game_system.map_interpreter.running? or [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_system.encounter_disabled [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # トループを決定 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] n = rand($game_map.encounter_list.size) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] troop_id = $game_map.encounter_list[n] [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # トループが有効なら [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $data_troops[troop_id] != nil [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # バトル呼び出しフラグをセット [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.battle_calling = true [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.battle_troop_id = troop_id [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.battle_can_escape = true [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.battle_can_lose = false [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.battle_proc = nil [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # B ボタンが押された場合 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if Input.trigger?(Input::B) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # イベント実行中かメニュー禁止中でなければ [/font] [font=Consolas, 'Courier New', Courier, mono, serif] unless $game_system.map_interpreter.running? or [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_system.menu_disabled [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # メニュー呼び出しフラグと SE 演奏フラグをセット [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.menu_calling = true [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.menu_beep = true [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # デバッグモードが ON かつ F9 キーが押されている場合 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $DEBUG and Input.press?(Input::F9) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # デバッグ呼び出しフラグをセット [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.debug_calling = true [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # プレイヤーの移動中ではない場合 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] unless $game_player.moving? [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # 各種画面の呼び出しを実行 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $game_temp.battle_calling [/font] [font=Consolas, 'Courier New', Courier, mono, serif] call_battle [/font] [font=Consolas, 'Courier New', Courier, mono, serif] elsif $game_temp.shop_calling [/font] [font=Consolas, 'Courier New', Courier, mono, serif] call_shop [/font] [font=Consolas, 'Courier New', Courier, mono, serif] elsif $game_temp.name_calling [/font] [font=Consolas, 'Courier New', Courier, mono, serif] call_name [/font] [font=Consolas, 'Courier New', Courier, mono, serif] elsif $game_temp.menu_calling [/font] [font=Consolas, 'Courier New', Courier, mono, serif] call_menu [/font] [font=Consolas, 'Courier New', Courier, mono, serif] elsif $game_temp.save_calling [/font] [font=Consolas, 'Courier New', Courier, mono, serif] call_save [/font] [font=Consolas, 'Courier New', Courier, mono, serif] elsif $game_temp.debug_calling [/font] [font=Consolas, 'Courier New', Courier, mono, serif] call_debug [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ● バトルの呼び出し [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] def call_battle [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # バトル呼び出しフラグをクリア [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.battle_calling = false [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # メニュー呼び出しフラグをクリア [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.menu_calling = false [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.menu_beep = false [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # エンカウント カウントを作成 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.make_encounter_count [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # マップ BGM を記憶し、BGM を停止 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.map_bgm = $game_system.playing_bgm [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_system.bgm_stop [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # バトル開始 SE を演奏 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_system.se_play($data_system.battle_start_se) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # バトル BGM を演奏 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_system.bgm_play($game_system.battle_bgm) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # プレイヤーの姿勢を矯正 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.straighten [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # バトル画面に切り替え [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $scene = Scene_Battle.new [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ● ショップの呼び出し [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] def call_shop [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ショップ呼び出しフラグをクリア [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.shop_calling = false [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # プレイヤーの姿勢を矯正 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.straighten [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ショップ画面に切り替え [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $scene = Scene_Shop.new [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ● 名前入力の呼び出し [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] def call_name [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # 名前入力呼び出しフラグをクリア [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.name_calling = false [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # プレイヤーの姿勢を矯正 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.straighten [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # 名前入力画面に切り替え [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $scene = Scene_Name.new [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ● メニューの呼び出し [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] def call_menu [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # メニュー呼び出しフラグをクリア [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.menu_calling = false [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # メニュー SE 演奏フラグがセットされている場合 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $game_temp.menu_beep [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # 決定 SE を演奏 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_system.se_play($data_system.decision_se) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # メニュー SE 演奏フラグをクリア [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.menu_beep = false [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # プレイヤーの姿勢を矯正 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.straighten [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # メニュー画面に切り替え [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $scene = Scene_Menu.new [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ● セーブの呼び出し [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] def call_save [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # プレイヤーの姿勢を矯正 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.straighten [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # セーブ画面に切り替え [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $scene = Scene_Save.new [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ● デバッグの呼び出し [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] def call_debug [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # デバッグ呼び出しフラグをクリア [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.debug_calling = false [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # 決定 SE を演奏 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_system.se_play($data_system.decision_se) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # プレイヤーの姿勢を矯正 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.straighten [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # デバッグ画面に切り替え [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $scene = Scene_Debug.new [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # ● プレイヤーの場所移動 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] #-------------------------------------------------------------------------- [/font] [font=Consolas, 'Courier New', Courier, mono, serif] def transfer_player [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # プレイヤー場所移動フラグをクリア [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.player_transferring = false [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # 移動先が現在のマップと異なる場合 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $game_map.map_id != $game_temp.player_new_map_id [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # 新しいマップをセットアップ [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_map.setup($game_temp.player_new_map_id) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # プレイヤーの位置を設定 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.moveto($game_temp.player_new_x, $game_temp.player_new_y) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # プレイヤーの向きを設定 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] case $game_temp.player_new_direction [/font] [font=Consolas, 'Courier New', Courier, mono, serif] when 2 # 下 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.turn_down [/font] [font=Consolas, 'Courier New', Courier, mono, serif] when 4 # 左 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.turn_left [/font] [font=Consolas, 'Courier New', Courier, mono, serif] when 6 # 右 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.turn_right [/font] [font=Consolas, 'Courier New', Courier, mono, serif] when 8 # 上 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.turn_up [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # プレイヤーの姿勢を矯正 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_player.straighten [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # マップを更新 (並列イベント実行) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_map.update [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # スプライトセットを再作成 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @spriteset.dispose [/font] [font=Consolas, 'Courier New', Courier, mono, serif] @spriteset = Spriteset_Map.new [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # トランジション処理中の場合 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] if $game_temp.transition_processing [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # トランジション処理中フラグをクリア [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_temp.transition_processing = false [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # トランジション実行 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] Graphics.transition(20) [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # マップに設定されている BGM と BGS の自動切り替えを実行 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] $game_map.autoplay [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # フレームリセット [/font] [font=Consolas, 'Courier New', Courier, mono, serif] Graphics.frame_reset [/font] [font=Consolas, 'Courier New', Courier, mono, serif] # 入力情報を更新 [/font] [font=Consolas, 'Courier New', Courier, mono, serif] Input.update [/font] [font=Consolas, 'Courier New', Courier, mono, serif] end [/font] [font=Consolas, 'Courier New', Courier, mono, serif]end [/font]
|