Anonymous

Module:CombatAreas: Difference between revisions

From Melvor Idle

Module:CombatAreas (view source)

Revision as of 23:08, 7 January 2022

494 bytes added ,  7 January 2022
Use tabs instead of spaces for indentation; getMonsterAreas: Remove check for ID 1/Hill Giants - Game data no longer flags ITM afflicted monsters in this way
mNo edit summary
(Use tabs instead of spaces for indentation; getMonsterAreas: Remove check for ID 1/Hill Giants - Game data no longer flags ITM afflicted monsters in this way)
(5 intermediate revisions by the same user not shown)
Line 8: Line 8:
local Icons = require('Module:Icons')
local Icons = require('Module:Icons')
local Items = require('Module:Items')
local Items = require('Module:Items')
local Shop = require('Module:Shop')
p.eventData = AreaData.event


function processArea(area, index, type)
function processArea(area, index, type)
  local result = Shared.clone(area)
local result = Shared.clone(area)
  result.id = index - 1
result.id = index - 1
  if result.name == nil then
if result.name == nil then
    result.name = result.areaName
result.name = result.areaName
  end
end
  result.type = type
result.type = type
  return result
return result
end
end


function p.getArea(name)
function p.getArea(name)
  local result = nil
local result = nil
  --There are three types of areas but the lists are pretty short so looping all of them isn't a real issue
--There are three types of areas but the lists are pretty short so looping all of them isn't a real issue
  for i, area in pairs(AreaData.combatAreas) do
for i, area in pairs(AreaData.combatAreas) do
    if area.name == name then
if area.name == name then
      return processArea(area, i, 'combat')
return processArea(area, i, 'combat')
    end
end
  end
end


  for i, area in pairs(AreaData.slayerAreas) do
for i, area in pairs(AreaData.slayerAreas) do
    if area.name == name then
if area.name == name then
      return processArea(area, i, 'slayer')
return processArea(area, i, 'slayer')
    end
end
  end
end


  for i, area in pairs(AreaData.dungeons) do
for i, area in pairs(AreaData.dungeons) do
    if area.name == name then
if area.name == name then
      return processArea(area, i, 'dungeon')
return processArea(area, i, 'dungeon')
    end
end
  end
end


  return nil
return nil
end
end


function p.getAreaByID(type, id)
function p.getAreaByID(type, id)
  if type == 'dungeon' then type = 'dungeons'
if type == 'dungeon' then type = 'dungeons'
  elseif type == 'combat' then type = 'combatAreas'
elseif type == 'combat' then type = 'combatAreas'
  elseif type == 'slayer' then type = 'slayerAreas' end
elseif type == 'slayer' then type = 'slayerAreas' end
  return processArea(AreaData[type][id + 1], id + 1)
return processArea(AreaData[type][id + 1], id + 1)
end
end


function p.getAreaFilterType(type, name)
function p.getAreaFilterType(type, name)
  local areaName = nil
local areaName = nil
  if type == 'dungeon' then areas = AreaData.dungeons
if type == 'dungeon' then areas = AreaData.dungeons
  elseif type == 'combat' then areas = AreaData.combatAreas
elseif type == 'combat' then areas = AreaData.combatAreas
  elseif type == 'slayer' then areas = AreaData.slayerAreas  
elseif type == 'slayer' then areas = AreaData.slayerAreas  
  else return nil end
else return nil end


  for i, area in pairs(areas) do
for i, area in pairs(areas) do
    if type == 'dungeon' then areaName = area.name
if type == 'dungeon' then areaName = area.name
    else areaName = area.areaName end
else areaName = area.areaName end


    if areaName == name then
if areaName == name then
      return processArea(area, i, type)
return processArea(area, i, type)
    end
end
  end
end


  return nil
return nil
end
end


function p.getAreas(checkFunc)
function p.getAreas(checkFunc)
  local resultArray = {}
local resultArray = {}


  for i, area in Shared.skpairs(AreaData.combatAreas) do
for i, area in Shared.skpairs(AreaData.combatAreas) do
    local temp = processArea(area, i, 'combat')
local temp = processArea(area, i, 'combat')
    if checkFunc(temp) then
if checkFunc(temp) then
      table.insert(resultArray, temp)
table.insert(resultArray, temp)
    end
end
  end
end
  for i, area in Shared.skpairs(AreaData.slayerAreas) do
for i, area in Shared.skpairs(AreaData.slayerAreas) do
    local temp = processArea(area, i, 'slayer')
local temp = processArea(area, i, 'slayer')
    if checkFunc(temp) then
if checkFunc(temp) then
      table.insert(resultArray, temp)
table.insert(resultArray, temp)
    end
end
  end
end
  for i, area in Shared.skpairs(AreaData.dungeons) do
for i, area in Shared.skpairs(AreaData.dungeons) do
    local temp = processArea(area, i, 'dungeon')
local temp = processArea(area, i, 'dungeon')
    if checkFunc(temp) then
if checkFunc(temp) then
      table.insert(resultArray, temp)
table.insert(resultArray, temp)
    end
end
  end
end


  return resultArray
return resultArray
end
end


function p._getAreaRequirements(area)
function p._getAreaRequirements(area)
  local result = ''
local result = ''
  local resultArray = {}
local resultArray = {}
  local addReqsToArray = function(reqArray, requirements)
local addReqsToArray = function(reqArray, requirements)
      for i, reqDetails in Shared.skpairs(requirements) do
for i, reqDetails in Shared.skpairs(requirements) do
        if reqDetails.type == 'Level' then
if reqDetails.type == 'Level' then
          for j, lvlDetails in Shared.skpairs(reqDetails.levels) do
for j, lvlDetails in Shared.skpairs(reqDetails.levels) do
            local skill = Constants.getSkillName(lvlDetails.skill)
local skill = Constants.getSkillName(lvlDetails.skill)
            table.insert(reqArray, Icons._SkillReq(skill, lvlDetails.level))
table.insert(reqArray, Icons._SkillReq(skill, lvlDetails.level))
          end
end
        elseif reqDetails.type == 'SlayerItem' then
elseif reqDetails.type == 'SlayerItem' then
          local item = Items.getItemByID(reqDetails.itemID)
local item = Items.getItemByID(reqDetails.itemID)
          table.insert(reqArray, Icons.Icon({item.name, type='item'})..' Equipped')
table.insert(reqArray, Icons.Icon({item.name, type='item'})..' Equipped')
        elseif reqDetails.type == 'Dungeon' then
elseif reqDetails.type == 'Dungeon' then
          for j, dungDetails in Shared.skpairs(reqDetails.dungeons) do
for j, dungDetails in Shared.skpairs(reqDetails.dungeons) do
            local dung = p.getAreaByID('dungeon', dungDetails.dungeonID)
local dung = p.getAreaByID('dungeon', dungDetails.dungeonID)
            if dungDetails.count > 1 then
if dungDetails.count > 1 then
              table.insert(reqArray, dungDetails.count..'x '..Icons.Icon({dung.name, type='dungeon'})..' Completions')
table.insert(reqArray, dungDetails.count..'x '..Icons.Icon({dung.name, type='dungeon'})..' Completions')
            else
else
              table.insert(reqArray, Icons.Icon({dung.name, type='dungeon'})..' Completed')
table.insert(reqArray, Icons.Icon({dung.name, type='dungeon'})..' Completed')
            end
end
          end
end
        end
elseif reqDetails.type == 'ShopPurchase' then
      end
local shopPurchase = Shop.processPurchase(reqDetails.category, reqDetails.id)
    end
if shopPurchase ~= nil then
 
table.insert(reqArray, Shop._getPurchaseIcon({ shopPurchase }) .. ' Purchased')
  if area.entryRequirements ~= nil then
end
    addReqsToArray(resultArray, area.entryRequirements)
else
  end
table.insert(reqArray, 'ERROR: Unknown requirement type ' .. (reqDetails.type or 'nil') .. '[[Category:Pages with script errors]]')
end
end
end


  if area.unlockRequirement ~= nil then
if area.entryRequirements ~= nil then
    addReqsToArray(resultArray, { area.unlockRequirement })
addReqsToArray(resultArray, area.entryRequirements)
  end
end


  result = table.concat(resultArray, '<br/>')
if area.unlockRequirement ~= nil then
  return result
-- Ensure this requirement isn't already part of the entry requirements
local addReq = true
if area.entryRequirements ~= nil then
local unlockReqStr = mw.dumpObject(area.unlockRequirement)
for i, reqDetails in ipairs(area.entryRequirements) do
-- Using mw.dumpObject() as a lazy way to compare tables
if area.unlockRequirement.type == reqDetails.type and mw.dumpObject(reqDetails) == unlockReqStr then
addReq = false
break
end
end
end
if addReq then
addReqsToArray(resultArray, { area.unlockRequirement })
end
end
 
result = table.concat(resultArray, '<br/>')
return result
end
end


function p._getAreaStat(area, statName)
function p._getAreaStat(area, statName)
  if statName == 'requirements' then
if statName == 'requirements' then
    return p._getAreaRequirements(area)
return p._getAreaRequirements(area)
  elseif statName == 'areaEffectDesc' then
elseif statName == 'areaEffectDesc' then
    if area.areaEffect ~= nil and area.areaEffect then
if area.areaEffect ~= nil and area.areaEffect then
      local descText, subIdx = string.gsub(area.areaEffectDescription, '${effectValue}', area.areaEffectValue or 0)
local descText, subIdx = string.gsub(area.areaEffectDescription, '${effectValue}', area.areaEffectValue or 0)
      return descText
return descText
    else
else
      return 'None'
return 'None'
    end
end
  elseif statName == 'difficulty' then
elseif statName == 'difficulty' then
    local result = Constants.getDifficultyString(area.difficulty[1])
local result = Constants.getDifficultyString(area.difficulty[1])
    if area.difficulty[2] ~= nil then
if area.difficulty[2] ~= nil then
      result = result..' - '..Constants.getDifficultyString(area.difficulty[2])
result = result..' - '..Constants.getDifficultyString(area.difficulty[2])
    end
end
    return result
return result
  end
end


  return area[statName]
return area[statName]
end
end


function p.getAreaStat(frame)
function p.getAreaStat(frame)
  local areaName = frame.args ~= nil and frame.args[1] or frame[1]
local areaName = frame.args ~= nil and frame.args[1] or frame[1]
  local statName = frame.args ~= nil and frame.args[2] or frame[2]
local statName = frame.args ~= nil and frame.args[2] or frame[2]
  local area = p.getArea(areaName)
local area = p.getArea(areaName)
  if area == nil then
if area == nil then
    return "ERROR: Could not find an area named "..areaName
return "ERROR: Could not find an area named "..areaName
  end
end


  return p._getAreaStat(area, statName)
return p._getAreaStat(area, statName)
end
end


function p.getMonsterAreas(monsterID)
function p.getMonsterAreas(monsterID)
  local areaArray = {}
local areaArray = {}
  --There are three types of areas but the lists are pretty short so looping all of them isn't a real issue
--There are three types of areas but the lists are pretty short so looping all of them isn't a real issue
  for i, area in pairs(AreaData.combatAreas) do
for i, area in pairs(AreaData.combatAreas) do
    if Shared.contains(area.monsters, monsterID) then
if Shared.contains(area.monsters, monsterID) then
      table.insert(areaArray, processArea(area, i, 'combat'))
table.insert(areaArray, processArea(area, i, 'combat'))
    end
end
  end
end
 
for i, area in pairs(AreaData.slayerAreas) do
if Shared.contains(area.monsters, monsterID) then
table.insert(areaArray, processArea(area, i, 'slayer'))
end
end


  for i, area in pairs(AreaData.slayerAreas) do
for i, area in pairs(AreaData.dungeons) do
    if Shared.contains(area.monsters, monsterID) then
if Shared.contains(area.monsters, monsterID) then
      table.insert(areaArray, processArea(area, i, 'slayer'))
table.insert(areaArray, processArea(area, i, 'dungeon'))
    end
end
  end
end


  --Hill Giants specifically ignore dungeons to prevent the issue with Into the Mist incorrectly being listed.
return areaArray
  if monsterID ~= 1 then
    for i, area in pairs(AreaData.dungeons) do
      if Shared.contains(area.monsters, monsterID) then
        table.insert(areaArray, processArea(area, i, 'dungeon'))
      end
    end
  end
  return areaArray
end
end


function p.getDungeonRequirements(frame)
function p.getDungeonRequirements(frame)
  local areaName = frame.args ~= nil and frame.args[1] or frame
local areaName = frame.args ~= nil and frame.args[1] or frame
  local area = p.getArea(areaName)
local area = p.getArea(areaName)
  if area == nil then
if area == nil then
    return "ERROR: Could not find an area named "..areaName
return "ERROR: Could not find an area named "..areaName
  end
end


  local result = p._getAreaStat(area, 'requirements')
local result = p._getAreaStat(area, 'requirements')
  if result ~= '' then
if result ~= '' then
    result = "\r\n|-\r\n|'''Requirements:'''<br/>"..result
result = "\r\n|-\r\n|'''Requirements:'''<br/>"..result
  end
end
  return result
return result
end
end


return p
return p
Retrieved from "https://wiki.melvoridle.com/w/Special:MobileDiff/47608...49895"