 #06/11/05
module HIDE_ALL_PAGE
  #--------------------------------------------------------------------------
  # ■現在装備中か判別[true/false]
  #--------------------------------------------------------------------------
  def Equipping?(user,type,name)
    if user.is_a?(Game_Enemy)
      # □エネミーの場合は無効
      return false
    end
    case type
    when 0 #武器
      epuip = $data_weapons[user.weapon_id]
    when 1 #盾
      epuip = $data_armors[user.armor1_id]
    when 2 #頭防具
      epuip = $data_armors[user.armor2_id]
    when 3 #体防具
      epuip = $data_armors[user.armor3_id]
    when 4 #装飾品
      epuip = $data_armors[user.armor4_id]
    end
    # □装備中の判定
    if epuip != nil
      if epuip.name == name
        return true
      end
    end
    # □未装備の場合falseを返す
    return false
  end
  #--------------------------------------------------------------------------
  # ■ステートが付加されているか判別[true/false]
  #--------------------------------------------------------------------------
  def State?(data,name)
    if data.is_a?(Game_Actor) or data.is_a?(Game_Enemy)
      return data.state?(Sname_id?(name))
    else
      return data.include?(Sname_id?(name))
    end
  end
  #--------------------------------------------------------------------------
  # ■ステートIDの取得
  #--------------------------------------------------------------------------
  def Sname_id?(name)
    # 初期設定、ステート名+IDハッシュの作成
    if $state_name == nil or $state_id == nil
      $state_name = {}
      $state_id = {}
      for i in 1...$data_states.size
        $state_name[$data_states[i].name] = $data_states[i].id
        $state_id[$data_states[i].id] = $data_states[i].name
      end
    end
    if $state_name[name] != nil
      return $state_name[name]
    else
      p "存在しないステート名はエラー"
      return 0
    end
  end
  #--------------------------------------------------------------------------
  # ■ステート名の取得
  #--------------------------------------------------------------------------
  def Sname_name?(id)
    # 初期設定、ステート名+IDハッシュの作成
    if $state_name == nil or $state_id == nil
      $state_name = {}
      $state_id = {}
      for i in 1...$data_states.size
        $state_name[$data_states[i].name] = $data_states[i].id
        $state_id[$data_states[i].id] = $data_states[i].name
      end
    end
    if $state_id[id] != nil
      return $state_id[id]
    else
      p "存在しないステートIDはエラー"
      return 0
    end
  end
  #--------------------------------------------------------------------------
  # ■属性が付加されているか判別[true/false]
  #--------------------------------------------------------------------------
  def Element?(data,name)
    if data.is_a?(RPG::Skill) or data.is_a?(RPG::Item) or 
      data.is_a?(RPG::Weapon) or data.is_a?(Game_Actor) or data.is_a?(Game_Enemy)
      return data.element_set.include?($data_system.elements.index(name))
    elsif data.is_a?(RPG::Armor)
      return data.guard_element_set.include?($data_system.elements.index(name))
    end
    return false
  end
  #--------------------------------------------------------------------------
  # ■属性IDの取得
  #--------------------------------------------------------------------------
  def Ename_id?(name)
    return $data_system.elements.index(name)
  end
end