Module:Apt

From CrawlWiki
Revision as of 23:04, 18 September 2013 by CommanderC (talk | contribs)
Jump to: navigation, search

Documentation for this module may be created at Module:Apt/doc

local p = {}
 
function p.aptitude(frame)
  local data = mw.loadData('Module:Table of aptitudes')
  local sp = frame.args[1]
  local sk = frame.args[2]
  if not sp or not sk then
    return ""
  end
  if sp == "Draconian" then
    sp = "Base Draconian"
  end
  return data[sp][sk]
end

function p.skill_table(frame)
  local data = mw.loadData('Module:Table of aptitudes')
  local skill = frame.args[1]
  local species = {'Human',  'Centaur', 'Demigod', 'Demonspawn',
   'Base Draconian', 'Deep Dwarf', 'Deep Elf', 'High Elf',
   'Sludge Elf', 'Felid', 'Ghoul', 'Halfling', 'Kobold', 'Merfolk', 
   'Minotaur', 'Mummy', 'Naga', 'Octopode', 'Ogre', 'Hill Orc',
   'Spriggan', 'Tengu', 'Troll', 'Vampire'}
  local result = [=[
{| class="wikitable" border="1"
|-
|'''[[Human|Hu]]'''
|'''[[Centaur|Ce]]'''
|'''[[Demigod|Dg]]'''
|'''[[Demonspawn|Ds]]'''
|'''[[Draconian|Dr]]'''
|'''[[Deep Dwarf|DD]]
|'''[[Deep Elf|DE]]'''
|'''[[High Elf|HE]]'''
|'''[[Sludge Elf|SE]]'''
|'''[[Felid|Fe]]'''
|'''[[Ghoul|Gh]]'''
|'''[[Halfling|Ha]]'''
|'''[[Kobold|Ko]]'''
|'''[[Merfolk|Mf]]'''
|'''[[Minotaur|Mi]]'''
|'''[[Mummy|Mu]]'''
|'''[[Naga|Na]]'''
|'''[[Octopode|Op]]'''
|'''[[Ogre|Og]]'''
|'''[[Hill Orc|HO]]'''
|'''[[Spriggan|Sp]]'''
|'''[[Tengu|Te]]'''
|'''[[Troll|Tr]]'''
|'''[[Vampire|Vp]]'''
|-
]=]
  for _, sp in ipairs(species) do
    result = result .. "| " .. data[sp][skill] .. "\n"
  end
  result = result .. "|}"
  return result
end

local function aptitude_chart(skills, header)
  local data = mw.loadData('Module:Table of aptitudes')
  local species = {'Human',  'Centaur', 'Demigod', 'Demonspawn',
   'Base Draconian', 'Deep Dwarf', 'Deep Elf', 'High Elf',
   'Sludge Elf', 'Felid', 'Ghoul', 'Halfling', 'Kobold', 'Merfolk', 
   'Minotaur', 'Mummy', 'Naga', 'Octopode', 'Ogre', 'Hill Orc',
   'Spriggan', 'Tengu', 'Troll', 'Vampire'}
  local result = header

  -- constants used by sort_key
  local a_ord = string.byte('a')
  local z_ord = string.byte('z')
  local aa_ord = string.byte('A')
  -- generates the table keys
  function sort_key(i)
    local result
    if i > z_ord - a_ord then
      i = i - (z_ord - a_ord) - 1
      result = '!' .. string.char(aa_ord + i)
    else
      result = '"' .. string.char(a_ord + i)
    end
    return result
  end

  local i = 0
  for _, sp in ipairs(species) do
    result = result .. '|<span style="display:none;">' .. sort_key(i) .. '</span>' .. sp .. "\n"
    for _,sk in ipairs(skills) do
      result = result .. "||" .. data[sp][sk] .. "\n"
    end
    result = result .. "|-\n"
    i = i + 1
  end
  result = result .. "|}"
  return result
end

function p.aptitude_chart_general(frame)
  local skills = {'Armour', 'Dodging', 'Stealth', 'Stabbing',
   'Shields', 'Traps', 'Invocations', 'Evocations', 'Hit Points', 'Magic Points', 'Experience'}
  local header = [=[
{| class="wikitable sortable" style="font-size:75%" border=1
! scope="col" | [[Species]]
! scope="col" | [[Armour (skill)|Arm]]
! scope="col" | [[Dodging|Ddg]]
! scope="col" | [[Stealth|Sth]]
! scope="col" | [[Stabbing|Stb]]
! scope="col" | [[Shields (skill)|Shd]]
! scope="col" | [[Traps|Trp]]
! scope="col" | [[Invocations|Inv]]
! scope="col" | [[Evocations|Evo]]
! scope="col" | [[HP]]
! scope="col" | [[MP]]
! scope="col" | [[Exp]]
|-
]=]
  return aptitude_chart(skills, header)
end

function p.aptitude_chart_combat(frame)
  local skills = {'Fighting', 'Short Blades', 'Long Blades', 'Maces Flails',
   'Axes', 'Polearms', 'Staves', 'Unarmed Combat', 'Throwing', 'Slings', 'Bows', 'Crossbows'}
  local header = [=[
{| class="wikitable sortable" style="font-size:75%" border=1
! scope="col" | [[Species]]
! scope="col" | [[Fighting|Fgt]]
! scope="col" | [[Short Blades|SBl]]
! scope="col" | [[Long Blades|LBl]]
! scope="col" | [[Maces &amp; Flails|M&amp;F]]
! scope="col" | [[Axes|Axs]]
! scope="col" | [[Polearms|Pla]]
! scope="col" | [[Staves|Stv]]
! scope="col" | [[Unarmed Combat|UC]]
! scope="col" | [[Throwing|Thr]]
! scope="col" | [[Slings|Slg]]
! scope="col" | [[Bows|Bws]]
! scope="col" | [[Crossbows|Crb]]
|-
]=]
  return aptitude_chart(skills, header)
end

function p.aptitude_chart_magic(frame)
  local skills = {'Spellcasting', 'Conjurations', 'Hexes', 'Charms',
   'Summonings', 'Necromancy', 'Translocations', 'Transmutations', 
   'Fire Magic', 'Ice Magic', 'Air Magic', 'Earth Magic', 'Poison Magic'}
  local header = [=[
{| class="wikitable sortable" style="font-size:75%" border=1
! scope="col" | [[Species]]
! scope="col" | [[Spellcasting|Spc]]
! scope="col" | [[Conjurations|Coj]]
! scope="col" | [[Hexes|Hex]]
! scope="col" | [[Charms|Cha]]
! scope="col" | [[Summonings|Sum]]
! scope="col" | [[Necromancy|Nec]]
! scope="col" | [[Translocations|Trl]]
! scope="col" | [[Transmutations|Trm]]
! scope="col" | [[Fire Magic|Fir]]
! scope="col" | [[Ice Magic|Ice]]
! scope="col" | [[Air Magic|Air]]
! scope="col" | [[Earth Magic|Ear]]
! scope="col" | [[Poison Magic|Poi]]
|-
]=]
  return aptitude_chart(skills, header)
end

return p