Chaos Project

#:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=
# Map Combiner by Nathmatt
# Version: 1.0
# Type: utility
#:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=
#   
#  This work is protected by the following license:
# #----------------------------------------------------------------------------
# #  
# #  Creative Commons - Attribution-NonCommercial-ShareAlike 3.0 Unported
# #  ( http://creativecommons.org/licenses/by-nc-sa/3.0/ )
# #  
# #  You are free:
# #  
# #  to Share - to copy, distribute and transmit the work
# #  to Remix - to adapt the work
# #  
# #  Under the following conditions:
# #  
# #  Attribution. You must attribute the work in the manner specified by the
# #  author or licensor (but not in any way that suggests that they endorse you
# #  or your use of the work).
# #  
# #  Noncommercial. You may not use this work for commercial purposes.
# #  
# #  Share alike. If you alter, transform, or build upon this work, you may
# #  distribute the resulting work only under the same or similar license to
# #  this one.
# #  
# #  - For any reuse or distribution, you must make clear to others the license
# #    terms of this work. The best way to do this is with a link to this web
# #    page.
# #  
# #  - Any of the above conditions can be waived if you get permission from the
# #    copyright holder.
# #  
# #  - Nothing in this license impairs or restricts the author's moral rights.
# #  
# #----------------------------------------------------------------------------
# 
#:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=:=
class Game_Map
  
  alias town_setup setup
  def setup(map_id)
    if $game_system.town[map_id] != nil
      @map_id = map_id
      @map = $game_system.town[map_id]
      # set tile set information in opening instance variables
      tileset = $data_tilesets[@map.tileset_id]
      @tileset_name = tileset.tileset_name
      @autotile_names = tileset.autotile_names
      @panorama_name = tileset.panorama_name
      @panorama_hue = tileset.panorama_hue
      @fog_name = tileset.fog_name
      @fog_hue = tileset.fog_hue
      @fog_opacity = tileset.fog_opacity
      @fog_blend_type = tileset.fog_blend_type
      @fog_zoom = tileset.fog_zoom
      @fog_sx = tileset.fog_sx
      @fog_sy = tileset.fog_sy
      @battleback_name = tileset.battleback_name
      @passages = tileset.passages
      @priorities = tileset.priorities
      @terrain_tags = tileset.terrain_tags
      # Clear refresh request flag
      @need_refresh = false
      # Set map event data
      @events = {}
      for i in @map.events.keys
        @events[i] = Game_Event.new(@map_id, @map.events[i])
      end
      # Set common event data
      @common_events = {}
      for i in 1...$data_common_events.size
        @common_events[i] = Game_CommonEvent.new(i)
      end
      # Initialize all fog information
      @fog_ox = 0
      @fog_oy = 0
      @fog_tone = Tone.new(0, 0, 0, 0)
      @fog_tone_target = Tone.new(0, 0, 0, 0)
      @fog_tone_duration = 0
      @fog_opacity_duration = 0
      @fog_opacity_target = 0
      # Initialize scroll information
      @scroll_direction = 2
      @scroll_rest = 0
      @scroll_speed = 4
    else
      town_setup(map_id)
    end
  end
  
  def add_map(map_id)
    map = load_data(sprintf("Data/Map%03d.rxdata", map_id))
    map.events.each{|id,value|@map.events[@map.events.keys.size+1] = value}
    (0..map.height-1).each{|y|(0..map.width-1).each{|x|(0..3).each{|z|
    if map.data[x,y,z] != nil && map.data[x,y,z] != 0
      @map.data[x,y,z] = map.data[x,y,z]
    end}}}
    $game_system.town[@map_id] = @map
    setup(@map_id)
    $scene.spriteset = Spriteset_Map.new if $scene.is_a?(Scene_Map)
  end
  
end
    
class Game_System
  attr_accessor :town
  alias town_initialize initialize
  def initialize
    town_initialize
    @town = []
  end
end

class Scene_Map
  attr_accessor :spriteset
end