Module:DigimonTab

Example Usage:

<tabber>
|-|Example=<div class="mobileonly"><h3>Example</h3></div>
{{#invoke:DigimonTab|show|Exam|Ex}}
</tabber>

• Example = Version tabber label
• Exam = Master List device tag
• Ex = Footnote tag (if applicable)

---

local p = {}

function p.show(frame)
    local versionTag = frame.args[1] or (frame:getParent() and frame:getParent().args[1]) or "Error: No version tag"
    local label = frame.args[2] or (frame:getParent() and frame:getParent().args[2]) or versionTag  -- Fallback to versionTag if no label
    local data = mw.loadData("Module:MasterList")
    local summonable, unsummonable = {}, {}
    local has_yes = false
    local has_refs = false

-- Extracting the Battle Type from the individual page
    local title = mw.title.getCurrentTitle()
    local content = title:getContent()
    local battleTypeX = nil
    for match in content:gmatch('{{Category|(.-)}}') do
        local parts = mw.text.split(match, '|')
        if #parts >= 1 then
            local cat_name = mw.text.trim(parts[1])
            local match_x = cat_name:match('^Battle Type (.*)$')
            if match_x then
                battleTypeX = match_x
                break
            end
        end
    end

-- Fills in the array for the digimon based on their "Y","N","?", or "*"
    for _, digimon in ipairs(data) do
        for i, v in ipairs(digimon.versions or {}) do
            if v == versionTag then
                local summonable_field = digimon.summonable
                local status
                if type(summonable_field) == 'table' then
                    status = nil
                    for j = i, 1, -1 do
                        if summonable_field[j] then
                            status = summonable_field[j]
                            break
                        end
                    end
                    if not status then
                        error("No summonable status defined for Digimon: " .. digimon.name)
                    end
                else
                    status = summonable_field or "Y"
                end
                local entry = {
                    image = digimon.image and digimon.image ~= "" and "[[File:" .. digimon.image .. "Icon.png|frameless]]" or "",
                    name = "'''" .. digimon.name .. "'''"
                }
                if status == "*" then 
                    entry.name = entry.name .. " [[#" .. label .. "|*]]"
                    has_refs = true
                end
                if status == "Y" or status == "*" then has_yes = true end
                table.insert(status == "N" and unsummonable or summonable, entry)
                break
            end
        end
    end

-- Builds the filled-in array into a table to inject
    local function buildGrid(entries)
        local rows = ""
        local max_entries_per_row = 4  -- Limit to 3 entries per row (6 columns)
        for i = 1, #entries, max_entries_per_row do
            local cells = {}
            for j = 0, max_entries_per_row - 1 do
                local idx = i + j
                if idx > #entries then break end
                table.insert(cells, 'style="border:none;" | ' .. entries[idx].image)
                table.insert(cells, 'style="border:none;" | ' .. entries[idx].name)
            end
            if #cells > 0 then
                rows = rows .. "|-\n| " .. table.concat(cells, " || ") .. "\n"
            end
        end
        return rows
    end

-- Writes out the titles for the sections, then injects the table respectively
    local summonable_title = (#summonable > 0 and has_yes) and "Summonable Digimon" or "Unimplemented Digimon"
    local out = (#summonable > 0 and "=<span id=" .. label .. "S></span>'''" .. summonable_title .. "'''=\n{| class=\"fandom-table\" style=\"border: none; border-collapse: collapse;\"\n" .. buildGrid(summonable) .. "|}\n" or "") ..
                (#unsummonable > 0 and "='''Unsummonable Digimon'''=\n{| class=\"fandom-table\" style=\"border: none; border-collapse: collapse;\"\n" .. buildGrid(unsummonable) .. "|}\n" or (#summonable == 0 and "''No Digimon in this version.''\n" or ""))

-- Adds the ref line if necessary
    if has_refs then
        local battleTypeText = battleTypeX and '[[:Category:Battle Type ' .. battleTypeX .. '|same Battle Type]]' or 'same Battle Type'
        out = out .. "\n:<span id=" .. label .. ">[[#" .. label .. "S|↑]]</span> <sub>You need another device with the " .. battleTypeText .. " in order to battle with this Digimon.  This Digimon '''''can be summoned''''' but '''''cannot battle''''' with this device.</sub>\n"
    end

    return out
end

return p