模組:VGNL

模块文档[查看] [编辑] [历史] [清除缓存]

本模组可生成最新出刊的《电子游戏专题简讯》页面名和标签。

示例

• {{#invoke:VGNL|link}} ⇒
• {{#invoke:VGNL|target|upcoming}} ⇒
• {{#invoke:VGNL|date|2024-01}} ⇒
• {{#invoke:VGNL|toc|style=inline}} ⇒
• {{#invoke:VGNL|toc}} ⇒ （以点列生成上方内容）
• {{#invoke:VGNL|index}} ⇒ （生成简讯的目录表）

目录

資料定義於子模組Module:VGNL/items。

上述文档嵌入自Module:VGNL/doc。 (编辑 | 历史)
编者可以在本模块的沙盒 (创建 | 镜像)和测试样例 (创建)页面进行实验。
本模块的子页面。

require('strict')

local p = {}
local getArgs = require('Module:Arguments').getArgs
local function makeInvokeFunc(funcName)
    return function(frame)
        local args = getArgs(frame)
        return p[funcName](args)
    end
end

p.target = makeInvokeFunc('_target')
function p._target(args)
    local is_draft = args[1] == 'draft'

    local text = mw.title.new('WikiProject:電子遊戲/簡訊/目錄'):getContent()
    local ptn = 'data%-sort%-value%s*=%s*"' .. (is_draft and 'd' or '') .. '(%d%d%d%d%d%d%d%d)"'
    local available_dates = {}
    for v in text:gmatch(ptn) do
        table.insert(available_dates, v)
    end
    table.sort(available_dates, function(a, b)
        if is_draft then
            return a < b
        end
        return a > b
    end)
    local result_date = available_dates[1]

    local year, month = result_date:sub(1, 4), result_date:sub(5, 6)
    local issue = year .. '-' .. month
    return 'WikiProject:電子遊戲/簡訊/' .. issue
end

p.label = makeInvokeFunc('_label')
function p._label(args)
    local target = p._target(args)
    local text = mw.title.new(target):getContent()
    return text:match('%d%d%d%d年第.-季')
end

p.link = makeInvokeFunc('_link')
function p._link(args)
    local target = p._target(args)
    local label = p._label(args)
    return '[[' .. target .. '|' .. label .. ']]'
end

p.content = makeInvokeFunc('_content')
function p._content(args)
    local target = p._target(args)
    return mw.getCurrentFrame():expandTemplate { title = target }
end

p.toc = makeInvokeFunc('_toc')
function p._toc(args)
    local target = p._target(args)
    local text = mw.title.new(target):getContent()

    local items = {}
    local pattern = mw.ustring.gsub(target, 'WikiProject:', '維基專題:')
    pattern = '%[%[' .. mw.ustring.gsub(pattern, '%-', '%-') .. '/.-|.-%]%]'
    local pos = 1

    while true do
        local s, e = mw.ustring.find(text, pattern, pos, false)
        if s == nil then
            break
        end
        table.insert(items, mw.ustring.sub(text, s, e))
        pos = e + 1
    end

    if args.style == 'comma' then
        return table.concat(items, '、')
    end

    do
        local items_ = { }
        for _, item in ipairs(items) do
            table.insert(items_, '* ' .. item)
        end
        return table.concat(items_, '\n')
    end
end
return p