Module:C

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

local p = {}

local p = {}

local function makeBar(frame, title, content, link, flags, bottom)
    -- ... (unchanged)
end

-- === NEW: shared abilities parsing helpers ===
local function parseAbilitiesString(abilitiesString)
    local abilities = {}
    for ability in mw.text.gsplit(abilitiesString or '', ";;", true) do
        ability = mw.text.trim(ability)
        if ability ~= "" then
            local name = ability
            local limited, improved = "", ""
            local gifted, adept = false, false

            -- flags
            if mw.ustring.find(ability, "%-g%-") then gifted = true end
            if mw.ustring.find(ability, "%-a%-") then adept = true end

            -- notes (order-insensitive, tolerate any following marker)
            local limitedMatch = mw.ustring.match(ability, "%-l%-(.-)(%-[liag]%-|$)")
                                   or mw.ustring.match(ability, "%-l%-(.+)$")
            if limitedMatch then limited = mw.text.trim(limitedMatch) end

            local improvedMatch = mw.ustring.match(ability, "%-i%-(.-)(%-[liag]%-|$)")
                                    or mw.ustring.match(ability, "%-i%-(.+)$")
            if improvedMatch then improved = mw.text.trim(improvedMatch) end

            -- clean name (strip markers + payloads/flags)
            name = mw.ustring.gsub(name, "%-l%-.+", "")
            name = mw.ustring.gsub(name, "%-i%-.+", "")
            name = mw.ustring.gsub(name, "%-g%-", "")
            name = mw.ustring.gsub(name, "%-a%-", "")
            name = mw.text.trim(name)

            table.insert(abilities, {
                name = name,
                limited = limited,
                improved = improved,
                gifted = gifted,
                adept = adept
            })
        end
    end

    table.sort(abilities, function(a, b) return a.name < b.name end)
    return abilities
end

local function buildAETransclusions(abilities)
    local transclusions = {}
    for _, a in ipairs(abilities or {}) do
        local t = {"{{AE|", a.name}
        if a.limited ~= "" then table.insert(t, "|limited=" .. a.limited) end
        if a.improved ~= "" then table.insert(t, "|improved=" .. a.improved) end
        if a.gifted then table.insert(t, "|gifted=1") end
        if a.adept  then table.insert(t, "|adept=1")  end
        table.insert(t, "}}")
        table.insert(transclusions, table.concat(t))
    end
    -- no visible separators between AE templates
    return table.concat(transclusions, "")
end
-- === END helpers ===

function p.c(frame)
    local args = frame.args
    local rawAbilities = args['a'] or ''

    -- === TAGS & CATEGORIES via TagBuilder ===
    local TagBuilder = require('Module:TagBuilder')
    local tRaw = args['t'] or ''
    local looks = args['l'] or ''
    local name = args['name'] or ''
    local baseHp = args['hp'] or '1'
    local baseMp = args['mp'] or '1'
    local size = args['size'] or '3'
    local int = args['int'] or '0'
    local str = args['str'] or '0'
    local mov = args['mov'] or '0'
    local snk = args['snk'] or '0'
    local per = args['per'] or '0'

    local preAbilities = ''
    if (int == '0') then preAbilities = preAbilities .. "Normal Intelligence;; " end
    if (str == '0') then preAbilities = preAbilities .. "Normal Strength;; " end
    if (mov == '0') then preAbilities = preAbilities .. "Normal Movement;; " end
    if (snk == '0') then preAbilities = preAbilities .. "Normal Sneak;; " end
    if (per == '0') then preAbilities = preAbilities .. "Normal Perception;; " end

    local abilitiesString = preAbilities .. rawAbilities
    local opts = {
        name = name,
        ns = 'Creature',
        transparent = args.o or args.transparent
    }
    local tagOut, catOut = TagBuilder.build(tRaw, 'TagCreatures', 'traits', opts)

    -- === Parse and render main abilities with shared helpers ===
    local abilities = parseAbilitiesString(abilitiesString)
    local inner = buildAETransclusions(abilities)

    local categoryString = ''

    -- (stats/attributes rendering unchanged)
    -- ...

    local out = ""
    out = out .. makeBar(frame, "Stats", statContent, nul, nul, false)
    out = out .. makeBar(frame, "Attributes", attributeContent, nul, nul, false)
    out = out .. makeBar(frame, "Traits", (tagOut or ''), nul, nul, false)
    out = out .. makeBar(frame, "Looks", looks, nul, nul, false)
    if args['lifespan'] then
        local lifespanText = args['lifespan'] .. " years."
        categoryString = categoryString .. "[[Category:" .. args['lifespan'] .. " year lifespan creatures]]"
        if args['adult'] then
            lifespanText = lifespanText .. " Adult at age " .. args['adult'] .. "."
        end
        out = out .. makeBar(frame, "Lifespan", lifespanText, nul, nul, false)
    end

    out = out .. '<hr>'
    if args['d'] then out = out .. args['d'] .. '<hr>' end

    -- main abilities block
    out = out .. '<div class="expandable-table"><div>' .. frame:preprocess(inner) .. '</div></div>'

    -- === familiar abilities (args['f']) using the same parsing ===
    if args['f'] and mw.text.trim(args['f']) ~= '' then
        local fAbilities = parseAbilitiesString(args['f'])
        local fInner = buildAETransclusions(fAbilities)
        -- You can wrap in a bar or just mirror the main output style; here we label it:
        out = out .. makeBar(frame, "Familiar Abilities",
            frame:preprocess('<div class="expandable-table"><div>' .. fInner .. '</div></div>'),
            nul, nul, false)
    end

    out = out .. (catOut or '')

    local page = mw.title.getCurrentTitle().text
    local namespace = frame:preprocess('{{NAMESPACE}}')
    if ((namespace == "Creature") and (page == name)) then
        out = out .. categoryString
    end

    return frame:preprocess(out)
end

return p