Кооперативная игра

module DataManager class << self alias th_multiplayer_create_game_objects create_game_objects alias th_multiplayer_make_save_contents make_save_contents alias th_multiplayer_extract_save_contents extract_save_contents end def self.create_game_objects th_multiplayer_create_game_objects $game_player2 = Game_Multiplayer.new end def self.make_save_contents contents = th_multiplayer_make_save_contents contents[:player2] = $game_player2 contents end def self.extract_save_contents(contents) th_multiplayer_extract_save_contents(contents) $game_player2 = contents[:player2] end def self.setup_new_game create_game_objects $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_player2.moveto($data_system.start_x, $data_system.start_y) $game_player2.refresh Graphics.frame_count = 0 end end class Game_Multiplayer < Game_Player DOWN = Input::Y # S in Keyboard LEFT = Input::X # A in Keyboard RIGHT = Input::Z # D in Keyboard UP = Input::R # W in Keyboard ENTER = Input::L # Q in Keyboard RUN = Input::A # Shift in Keyboard def move_by_input return unless movable? return if $game_map.interpreter.running? if Input.press?(DOWN) move_straight(2) elsif Input.press?(LEFT) move_straight(4) elsif Input.press?(RIGHT) move_straight(6) elsif Input.press?(UP) move_straight(8) end end def update_nonmoving(last_moving) return if $game_map.interpreter.running? if last_moving $game_party.on_player_walk return if check_touch_event end if movable? && Input.trigger?(ENTER) return if get_on_off_vehicle return if check_action_event end update_encounter if last_moving end end class Spriteset_Map alias th_multiplayer_create_characters create_characters def create_characters th_multiplayer_create_characters @character_sprites.push(Sprite_Character.new(@viewport1, $game_player2)) end end class Scene_Map < Scene_Base alias th_multiplayer_map_update update def update th_multiplayer_map_update $game_player2.update if $game_player2 end end