#==============================================================================
# GRAPHICS Finder v 1.0
#------------------------------------------------------------------------------
# Author: Wecoc
#==============================================================================

# (Game_Maps by Youkai)

class Game_Maps ; end

if not Game_Maps.method_defined?(:maps)

  module ScriptTools
    def self.get_map_id(id)
      return map_id = id < 1 ? $game_map.map_id : id
    end
  end
  
  class Game_Maps
    attr_accessor  :maps
    def initialize
      @maps = [nil]
      id = 1
      while FileTest.exist?(sprintf("Data/Map%03d.rxdata", id))
        map = load_data(sprintf("Data/Map%03d.rxdata", id))
        @maps.push(map)
        id += 1
      end
    end
  end
  
  class Scene_Title
    alias tilemod_command_new_game command_new_game unless $@
    def command_new_game
      $game_maps =      Game_Maps.new
      tilemod_command_new_game
    end
  end
  
  class Game_Event < Game_Character
    attr_accessor :id
  end
  
  class Game_System
    def initialize
      @map_interpreter = Interpreter.new(0, true)
      @battle_interpreter = Interpreter.new(0, false)
      @timer = 0
      @timer_working = false
      @save_disabled = false
      @menu_disabled = false
      @encounter_disabled = false
      @message_position = 2
      @message_frame = 0
      @save_count = 0
      @magic_number = 0
    end
  end
  
end

#==============================================================================

class Game_System
  def check_all_anim_complete
    data = []
    # Data Animation
    for animation in 1...$data_animations.size
      ani = $data_animations[animation]
      data.push(ani.animation_name)
    end
    data.compact!
    data.delete("")
    return data
  end

  def check_all_anim
    data = check_all_anim_complete
    hash = Hash.new(0)
    data.each{|x| hash[x]+=1 }
    data = hash.keys
    data.sort!
    return data
  end
  
  def check_animation_complete
    animation = []
    # Data Weapon / Item / Skill / Enemy / State
    for weapon in 1...$data_weapons.size
      weapon = $data_weapons[weapon]
      animation.push(weapon.animation1_id)
      animation.push(weapon.animation2_id)
    end
    for item in 1...$data_items.size
      item = $data_items[item]
      animation.push(item.animation1_id)
      animation.push(item.animation2_id)
    end
    for skill in 1...$data_skills.size
      skill = $data_skills[skill]
      animation.push(skill.animation1_id)
      animation.push(skill.animation2_id)
    end
    for enemy in 1...$data_enemies.size
      enemy = $data_enemies[enemy]
      animation.push(enemy.animation1_id)
      animation.push(enemy.animation2_id)
    end
    for state in 1...$data_states.size
      state = $data_states[state]
      animation.push(state.animation_id)
    end
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 207 # Show Animation (Map)
          animation.push(list[i].parameters[1])
        end
        if list[i].code == 337 # Show Animation (Battle)
          animation.push(list[i].parameters[2])
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 207 # Show Animation (Map)
              animation.push(list.parameters[1])
            end
            if list.code == 337 # Show Animation (Battle)
              animation.push(list.parameters[2])
            end
          end
        end
      end
    end
    animation.compact!
    animation.delete(0)
    data = []
    for i in 0...animation.size
      next if $data_animations[i] == nil
      data.push($data_animations[i].animation_name)
    end
    data.delete("")
    return data
  end
  
  def check_animation
    data = check_animation_complete
    hash = Hash.new(0)
    data.each{|x| hash[x]+=1 }
    data = hash.keys
    data.sort!
    return data
  end
  
  def not_used_animations?
    data = check_animation
    data2 = []
    for animation in 1...$data_animations.size
      data2.push($data_animations[animation].animation_name)
    end
    hash = Hash.new(0)
    data2.each{|x| hash[x]+=1 }
    data2 = hash.keys
    data2.sort!
    data3 = []
    for i in 0...data.size
      data3.push(i) if not data.include?(data2[i])
    end
    while data2.size > data.size
      data3.push(data2.pop)
    end
    data3.delete(0)
    return data3
  end
  
  def ani_donde?(animation) # (where is used)
    animation_data = []
    data = []
    if animation.is_a?(String)
      for ani in 1...$data_animations.size
        if $data_animations[ani].animation_name == animation
          animation_data.push(ani)
        end
      end
    elsif animation.is_a?(Integer)
      animation_data = [animation]
    end
    for weapon in 1...$data_weapons.size
      weapon = $data_weapons[weapon]
      if weapon.animation1_id != nil and animation_data.include?(weapon.animation1_id)
        data.push("Weapon '"+weapon.name+" ("+weapon.id.to_s+
        ") A1 = "+$data_animations[weapon.animation1_id].name)
      end
      if weapon.animation2_id != nil and animation_data.include?(weapon.animation2_id)
        data.push("Weapon '"+weapon.name+" ("+weapon.id.to_s+
        ") A2 = "+$data_animations[weapon.animation1_id].name)
      end
    end
    for item in 1...$data_items.size
      item = $data_items[item]
      if item.animation1_id != nil and animation_data.include?(item.animation1_id)
        data.push("Item '"+item.name+" ("+item.id.to_s+
        ") A1 = "+$data_animations[item.animation1_id].name)
      end
      if item.animation2_id != nil and animation_data.include?(item.animation2_id)
        data.push("Item '"+item.name+" ("+item.id.to_s+
        ") A2 = "+$data_animations[item.animation2_id].name)
      end
    end
    for skill in 1...$data_skills.size
      skill = $data_skills[skill]
      if skill.animation1_id != nil and animation_data.include?(skill.animation1_id)
        data.push("Skill '"+skill.name+" ("+skill.id.to_s+
        ") A1 = "+$data_animations[skill.animation1_id].name)
      end
      if skill.animation2_id != nil and animation_data.include?(skill.animation2_id)
        data.push("Skill '"+skill.name+" ("+skill.id.to_s+
        ") A2 = "+$data_animations[skill.animation2_id].name)
      end
    end
    for enemy in 1...$data_enemies.size
      enemy = $data_enemies[enemy]
      if enemy.animation1_id != nil and animation_data.include?(enemy.animation1_id)
        data.push("Enemy '"+enemy.name+" ("+enemy.id.to_s+
        ") A1 = "+$data_animations[enemy.animation1_id].name)
      end
      if enemy.animation2_id != nil and animation_data.include?(enemy.animation2_id)
        data.push("Enemy '"+enemy.name+" ("+enemy.id.to_s+
        ") A2 = "+$data_animations[enemy.animation2_id].name)
      end
    end
    for state in 1...$data_states.size
      state = $data_states[state]
      if state.animation_id != nil and animation_data.include?(state.animation_id)
        data.push("State '"+state.name+" ("+state.id.to_s+
        ") A = "+$data_animations[state.animation_id].name)
      end
    end
    if data.size == 0
      data.push("Not found!")
    end
    return data
  end

  #---------------------------------------------------------------------------

  def check_autotile_complete
    data = []
    # Tileset
    for tileset in 1...$data_tilesets.size
      tileset = $data_tilesets[tileset]
      for autotile in 0..8
        data.push(tileset.autotile_names[autotile])
      end
    end
    data.compact!
    data.delete("")
    return data
  end
  
  def check_autotile
    data = check_autotile_complete
    hash = Hash.new(0)
    data.each{|x| hash[x]+=1 }
    data = hash.keys
    data.sort!
    return data
  end
  
  def atile_donde?(autotile)
    data = check_autotile_complete
    if data.include?(autotile)
      return "On Tileset Database!"
    else
      return "Not found!"
    end
  end
  
  #---------------------------------------------------------------------------
  
  def check_battleback_complete
    data = []
    # Tileset
    for tileset in 1...$data_tilesets.size
      tileset = $data_tilesets[tileset]
      data.push(tileset.battleback_name)
    end
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 204 # Change Map Graphics
          if list[i].parameters[0] == 2 # Battleback
            data.push(list[i].parameters[1])
          end
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 204 # Change Map Graphics
              if list.parameters[0] == 2 # Battleback
                data.push(list.parameters[1])
              end
            end
          end
        end
      end
    end
    data.compact!
    data.delete("")
    return data
  end
  
  def check_battleback
    data = check_battleback_complete
    hash = Hash.new(0)
    data.each{|x| hash[x]+=1 }
    data = hash.keys
    data.sort!
    return data
  end
  
  def bback_donde?(bback)
    data = []
    for tileset in 1...$data_tilesets.size
      tileset = $data_tilesets[tileset]
      if tileset.battleback_name == bback
        data.push("Tileset "+tileset.name)
      end
    end
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 204 # Change Map Graphics
          if list[i].parameters[0] == 2 # Battleback
            if list[i].parameters[1] == bback
              data.push("Common Ev "+common_event.to_s)
            end
          end
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 204 # Change Map Graphics
              if list.parameters[0] == 2 # Battleback
                if list.parameters[1] == bback
                  data.push("Map "+gamemap.to_s+" Event "+event.to_s+
                  " Page #{page+1}")
                end
              end
            end
          end
        end
      end
    end
    if data.size == 0
      data.push("Not found!")
    end
    return data
  end
  
  #---------------------------------------------------------------------------
  
  def check_battler_complete
    data = []
    # Data Actor / Enemy
    for actor in 1...$data_actors.size
      actor = $data_actors[actor]
      data.push(actor.battler_name)
    end
    for enemy in 1...$data_enemies.size
      enemy = $data_enemies[enemy]
      data.push(enemy.battler_name)
    end
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 322 # Change Actor Graphic
          data.push(list[i].parameters[3])
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 322 # Change Actor Graphic
              data.push(list.parameters[3])
            end
          end
        end
      end
    end    
    data.compact!
    data.delete("")
    return data
  end
  
  def check_battler
    data = check_battler_complete
    hash = Hash.new(0)
    data.each{|x| hash[x]+=1 }
    data = hash.keys
    data.sort!
    return data
  end

  def battler_donde?(battler)
    data = []
    # Data Actor / Enemy
    for actor in 1...$data_actors.size
      actor = $data_actors[actor]
      if actor.battler_name == battler
        data.push("Actor "+actor.id.to_s)
      end
    end
    for enemy in 1...$data_enemies.size
      enemy = $data_enemies[enemy]
      if enemy.battler_name == battler
        data.push("Enemy "+enemy.id.to_s)
      end
    end
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 322 # Change Actor Graphic
          if list[i].parameters[3] == battler
            data.push("Common Ev "+common_event.to_s)
          end
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 322 # Change Actor Graphic
              if list.parameters[3] == battler
                data.push("Map "+gamemap.to_s+" Event "+event.to_s+
                " Page #{page+1}")
              end
            end
          end
        end
      end
    end    
    if data.size == 0
      data.push("Not found!")
    end
    return data
  end
  
  #---------------------------------------------------------------------------
  
  def check_character_complete
    data = []
    # Data Actor
    for actor in 1...$data_actors.size
      actor = $data_actors[actor]
      data.push(actor.character_name)
    end
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 322 # Change Actor Graphic
          data.push(list[i].parameters[1])
        end
        if list[i].code == 209 # Move Route
          for param in 1...list.parameters.size
            parameter = list.parameters[param]
            for param2 in 0...parameter.list.size
              param3 = parameter.list[param2]
              if param3.code == 41
                data.push(param3.parameters[0])
              end
            end
          end
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 322 # Change Actor Graphic
              data.push(list.parameters[1])
            end
            if list.code == 209 # Move Route
              for param in 1...list.parameters.size
                parameter = list.parameters[param]
                for param2 in 0...parameter.list.size
                  param3 = parameter.list[param2]
                  if param3.code == 41
                    data.push(param3.parameters[0])
                  end
                end
              end
            end
          end
        end
      end
    end
    # Event Routes
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.move_route.list.size
            list = map.events[event].pages[page].move_route.list[glist]
            if list.code == 41
              data.push(list.parameters[0])
            end
          end
        end
      end
    end
    # Event Graphics
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          data.push(pag.graphic.character_name)
        end
      end
    end
    data.compact!
    data.delete("")
    return data
  end
  
  def check_character
    data = check_character_complete
    hash = Hash.new(0)
    data.each{|x| hash[x]+=1 }
    data = hash.keys
    data.sort!
    return data
  end
  
  def chara_donde?(chara)
    data = []
    # Data Actor
    for actor in 1...$data_actors.size
      actor = $data_actors[actor]
      if actor.character_name == chara
        data.push("Actor "+actor.id.to_s)
      end
    end
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 322 # Change Actor Graphic
          if list[i].parameters[1] == chara
            data.push("Common Ev "+common_event.to_s)
          end
        end
        if list[i].code == 209 # Move Route
          for param in 1...list.parameters.size
            parameter = list.parameters[param]
            for param2 in 0...parameter.list.size
              param3 = parameter.list[param2]
              if param3.code == 41
                if param3.parameters[0] == chara
                  data.push("Common Ev "+common_event.to_s+" (Command Route)")
                end
              end
            end
          end
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 322 # Change Actor Graphic
              if list.parameters[1] == chara
                data.push("Map "+gamemap.to_s+
                " Event "+event.to_s+" Page #{page+1}")
              end
            end
            if list.code == 209 # Move Route
              for param in 1...list.parameters.size
                parameter = list.parameters[param]
                for param2 in 0...parameter.list.size
                  param3 = parameter.list[param2]
                  if param3.code == 41
                    if param3.parameters[0] == chara
                      data.push("Map "+gamemap.to_s+
                      " Event "+event.to_s+" Page #{page+1} (Command Route)")
                    end
                  end
                end
              end
            end
          end
        end
      end
    end
    # Event Routes
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.move_route.list.size
            list = map.events[event].pages[page].move_route.list[glist]
            if list.code == 41
              if list.parameters[0] == chara
                data.push("Map "+gamemap.to_s+
                " Event "+event.to_s+" Page #{page+1} (Event Page Route)")
              end
            end
          end
        end
      end
    end
    # Event Graphics
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          if pag.graphic.character_name == chara
            data.push("Map "+gamemap.to_s+
                " Event "+event.to_s+" Page #{page+1} (Event Graphic)")
          end
        end
      end
    end
    if data.size == 0
      data.push("Not found!")
    end
    return data
  end
  
  #---------------------------------------------------------------------------
  
  def check_fog_complete
    data = []
    # Tileset
    for tileset in 1...$data_tilesets.size
      tileset = $data_tilesets[tileset]
      data.push(tileset.fog_name)
    end
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 204 # Change Map Graphics
          if list[i].parameters[0] == 1 # Fog
            data.push(list[i].parameters[1])
          end
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 204 # Change Map Graphics
              if list.parameters[0] == 1 # Fog
                data.push(list.parameters[1])
              end
            end
          end
        end
      end
    end
    data.compact!
    data.delete("")
    return data
  end
  
  def check_fog
    data = check_fog_complete
    hash = Hash.new(0)
    data.each{|x| hash[x]+=1 }
    data = hash.keys
    data.sort!
    return data
  end

  def fog_donde?(fog)
    data = []
    # Tileset
    for tileset in 1...$data_tilesets.size
      tileset = $data_tilesets[tileset]
      if tileset.fog_name == fog
        data.push("Tileset "+tileset.name)
      end
    end
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 204 # Change Map Graphics
          if list[i].parameters[0] == 1 # Battleback
            if list[i].parameters[1] == fog
              data.push("Common Ev "+common_event.to_s)
            end
          end
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 204 # Change Map Graphics
              if list.parameters[0] == 1 # Battleback
                if list.parameters[1] == fog
                  data.push("Map "+gamemap.to_s+" Event "+event.to_s+
                  " Page #{page+1}")
                end
              end
            end
          end
        end
      end
    end
    if data.size == 0
      data.push("Not found!")
    end
    return data
  end
  
  #---------------------------------------------------------------------------
  
  def check_icon_complete
    data = []
    # Data Skills / Items / Weapons / Armors
    for skill in 1...$data_skills.size
      data.push($data_skills[skill].icon_name)
    end
    for item in 1...$data_items.size
      data.push($data_items[item].icon_name)
    end
    for weapon in 1...$data_weapons.size
      data.push($data_weapons[weapon].icon_name)
    end
    for armor in 1...$data_armors.size
      data.push($data_armors[armor].icon_name)
    end
    data.compact!
    data.delete("")
    return data
  end
  
  def check_icon
    data = check_icon_complete
    hash = Hash.new(0)
    data.each{|x| hash[x]+=1 }
    data = hash.keys
    data.sort!
    return data
  end
  
  def icon_donde?(icon)
    data = []
    # Data Skills / Items / Weapons / Armors
    for skill in 1...$data_skills.size
      if $data_skills[skill].icon_name == icon
        data.push("Skill "+$data_skills[skill].name)
      end
    end
    for item in 1...$data_items.size
      if $data_items[item].icon_name == icon
        data.push("Item "+$data_items[item].name)
      end
    end
    for weapon in 1...$data_weapons.size
      if $data_weapons[weapon].icon_name == icon
        data.push("Weapon "+$data_weapons[weapon].name)
      end
    end
    for armor in 1...$data_armors.size
      if $data_armors[armor].icon_name == icon
        data.push("Armor "+$data_armors[armor].name)
      end
    end
    if data.size == 0
      data.push("Not found!")
    end
    return data
  end
  
  #---------------------------------------------------------------------------

  def check_panorama_complete
    data = []
    # Tileset
    for tileset in 1...$data_tilesets.size
      tileset = $data_tilesets[tileset]
      data.push(tileset.panorama_name)
    end
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 204 # Change Map Graphics
          if list[i].parameters[0] == 0 # Panorama
            data.push(list[i].parameters[1])
          end
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 204 # Change Map Graphics
              if list.parameters[0] == 0 # Panorama
                data.push(list.parameters[1])
              end
            end
          end
        end
      end
    end
    data.compact!
    data.delete("")
    return data
  end
  
  def check_panorama
    data = check_panorama_complete
    hash = Hash.new(0)
    data.each{|x| hash[x]+=1 }
    data = hash.keys
    data.sort!
    return data
  end

  def panorama_donde?(panorama)
    data = []
    # Tileset
    for tileset in 1...$data_tilesets.size
      tileset = $data_tilesets[tileset]
      if tileset.panorama_name == panorama
        data.push("Tileset "+tileset.name)
      end
    end
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 204 # Change Map Graphics
          if list[i].parameters[0] == 0
            if list[i].parameters[1] == panorama
              data.push("Common Ev "+common_event.to_s)
            end
          end
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 204 # Change Map Graphics
              if list.parameters[0] == 0
                if list.parameters[1] == panorama
                  data.push("Map "+gamemap.to_s+" Event "+event.to_s+
                  " Page #{page+1}")
                end
              end
            end
          end
        end
      end
    end
    if data.size == 0
      data.push("Not found!")
    end
    return data
  end
  
  #---------------------------------------------------------------------------

  def check_picture_complete
    data = []
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 231 # Show Picture
          data.push(list[i].parameters[1])
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 231 # Show Picture
              data.push(list.parameters[1])
            end
          end
        end
      end
    end
    data.compact!
    data.delete("")
    return data
  end
  
  def check_picture
    data = check_picture_complete
    hash = Hash.new(0)
    data.each{|x| hash[x]+=1 }
    data = hash.keys
    data.sort!
    return data
  end
  
  def picture_donde?(picture)
    data = []
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 231 # Show Picture
          if list[i].parameters[1] == picture
            data.push("Common Ev "+common_event.to_s)
          end
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 231 # Show Picture
              if list.parameters[1] == picture
                data.push("Map "+gamemap.to_s+" Event "+event.to_s+
                  " Page #{page+1}")
              end
            end
          end
        end
      end
    end
    if data.size == 0
      data.push("Not found!")
    end
    return data
  end
  
  #---------------------------------------------------------------------------

  def check_tileset_complete
    data = []
    # Tileset
    for tileset in 1...$data_tilesets.size
      tileset = $data_tilesets[tileset]
      data.push(tileset.tileset_name)
    end
    data.compact!
    data.delete("")
    return data
  end
  
  def check_tileset
    data = check_tileset_complete
    hash = Hash.new(0)
    data.each{|x| hash[x]+=1 }
    data = hash.keys
    data.sort!
    return data
  end
  
  def tileset_donde?(tileset)
    data = check_tileset_complete
    if data.include?(tileset)
      return "On Tileset Database!"
    else
      return "Not found!"
    end
  end
  
  #---------------------------------------------------------------------------

  def check_transition_complete
    data = []
    # System Database
    data.push($data_system.battle_transition)
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 222 # Show Transition
          data.push(list[i].parameters[0])
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 222 # Show Transition
              data.push(list.parameters[0])
            end
          end
        end
      end
    end
    data.compact!
    data.delete("")
    return data
  end
  
  def check_transition
    data = check_transition_complete
    hash = Hash.new(0)
    data.each{|x| hash[x]+=1 }
    data = hash.keys
    data.sort!
    return data
  end
  
  def trans_donde?(transition)
    data = []
    # System Database
    if $data_system.battle_transition == transition
      data.push("Battle Transition")
    end
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 222 # Show Transition
          if list[i].parameters[0] == transition
            data.push("Common Ev "+common_event.to_s)
          end
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 222 # Show Transition
              if list.parameters[0] == transition
                data.push("Map "+gamemap.to_s+" Event "+event.to_s+
                  " Page #{page+1}")
              end
            end
          end
        end
      end
    end
    if data.size == 0
      data.push("Not found!")
    end
    return data
  end
  
  #---------------------------------------------------------------------------

  alias stwindow_ini initialize unless $@
  def initialize
    stwindow_ini
    $stwindow = windowskin_name
  end

  def check_windowskin_complete
    data = []
    # System Database
    data.push($stwindow)
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 131 # Change Windowskin
          data.push(list[i].parameters[0])
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 131 # Change Windowskin
              data.push(list.parameters[0])
            end
          end
        end
      end
    end
    data.compact!
    data.delete("")
    return data
  end
  
  def check_windowskin
    data = check_windowskin_complete
    hash = Hash.new(0)
    data.each{|x| hash[x]+=1 }
    data = hash.keys
    data.sort!
    return data
  end
  
  def window_donde?(windowskin)
    data = []
    # System Database
    if $stwindow == windowskin
      data.push("System Database")
    end
    # Data Common Events
    for common_event in 1...$data_common_events.size
      list = $data_common_events[common_event].list
      for i in 0...list.size
        if list[i].code == 131 # Change Windowskin
          if list[i].parameters[0] == windowskin
            data.push("Common Ev"+common_event.to_s)
          end
        end
      end
    end
    # Event Lists
    for gamemap in 1...$game_maps.maps.size
      map = $game_maps.maps[gamemap]
      next if map == nil
      for event in 1..map.events.size
        eve = map.events[event]
        next if eve == nil
        for page in 0...eve.pages.size
          pag = eve.pages[page]
          for glist in 0...pag.list.size
            list = map.events[event].pages[page].list[glist]
            if list.code == 131 # Change Windowskin
              if list.parameters[0]
                data.push("Map "+gamemap.to_s+" Event "+event.to_s+
                  " Page #{page+1}")
              end
            end
          end
        end
      end
    end
    if data.size == 0
      data.push("Not found!")
    end
    return data
  end
end

#==============================================================================

class Interpreter
  def check_all_anim_complete
    $game_system.check_all_anim_complete
  end
  def check_all_anim
    $game_system.check_all_anim
  end
  def check_animation_complete
    $game_system.check_animation_complete
  end
  def check_animation
    $game_system.check_animation
  end
  def not_used_animations?
    $game_system.not_used_animations?
  end
  def ani_donde?(animation)
    $game_system.ani_donde?(animation)
  end
  def check_autotile_complete
    $game_system.check_autotile_complete
  end
  def check_autotile
    $game_system.check_autotile
  end
  def atile_donde?(autotile)
    $game_system.atile_donde?(autotile)
  end
  def check_battleback_complete
    $game_system.check_battleback_complete
  end
  def check_battleback
    $game_system.check_battleback
  end
  def bback_donde?(battleback)
    $game_system.bback_donde?(battleback)
  end
  def check_battler_complete
    $game_system.check_battler_complete
  end
  def check_battler
    $game_system.check_battler
  end
  def battler_donde?(battler)
    $game_system.battler_donde?(battler)
  end
  def check_character_complete
    $game_system.check_character_complete
  end
  def check_character
    $game_system.check_character
  end
  def chara_donde?(chara)
    $game_system.chara_donde?(chara)
  end
  def check_fog_complete
    $game_system.check_fog_complete
  end
  def check_fog
    $game_system.check_fog
  end
  def fog_donde?(fog)
    $game_system.fog_donde?(fog)
  end
  def check_icon_complete
    $game_system.check_icon_complete
  end
  def check_icon
    $game_system.check_icon
  end
  def icon_donde?(icon)
    $game_system.icon_donde?(icon)
  end
  def check_panorama_complete
    $game_system.check_panorama_complete
  end
  def check_panorama
    $game_system.check_panorama
  end
  def panorama_donde?(panorama)
    $game_system.panorama_donde?(panorama)
  end
  def check_picture_complete
    $game_system.check_picture_complete
  end
  def check_picture
    $game_system.check_picture
  end
  def picture_donde?(picture)
    $game_system.picture_donde?(picture)
  end
  def check_tileset_complete
    $game_system.check_tileset_complete
  end
  def check_tileset
    $game_system.check_tileset
  end
  def tileset_donde?(tileset)
    $game_system.tileset_donde?(tileset)
  end
  def check_transition_complete
    $game_system.check_transition_complete
  end
  def check_transition
    $game_system.check_transition
  end
  def trans_donde?(transition)
    $game_system.trans_donde?(transition)
  end
  def check_windowskin_complete
    $game_system.check_windowskin_complete
  end
  def check_windowskin
    $game_system.check_windowskin
  end
  def window_donde?(windowskin)
    $game_system.window_donde?(windowskin)
  end
end

#==============================================================================

class Interpreter
  def ani_where?(animation)
    ani_donde?(animation)
  end
  def atile_where?(autotile)
    atile_donde?(autotile)
  end
  def bback_where?(battleback)
    bback_donde?(battleback)
  end
  def battler_where?(battler)
    battler_donde?(battler)
  end
  def chara_where?(chara)
    chara_donde?(chara)
  end
  def fog_where?(fog)
    fog_donde?(fog)
  end
  def icon_where?(icon)
    icon_donde?(icon)
  end
  def panorama_where?(panorama)
    panorama_donde?(panorama)
  end
  def picture_where?(picture)
    picture_donde?(picture)
  end
  def tileset_where?(tileset)
    tileset_donde?(tileset)
  end
  def trans_where?(transition)
    trans_donde?(transition)
  end
end