模組:Sandbox/目錄小妹妹/東方Project

萌娘百科，萬物皆可萌的百科全書！轉載請標註來源頁面的網頁連結，並聲明引自萌娘百科。內容不可商用。
前往： 導覽、 搜尋
Template-info.svg 模塊文檔  [] [刷新]
-- 模塊:東方Project
-- 模塊:東方Project:稱號
-- 模塊:東方Project:音樂
-- 模塊:東方Project:符卡

local titleZh = mw.loadData("模塊:東方Project:稱號(中文)")
local titleJp = mw.loadData("模塊:東方Project:稱號(日文)")
local musicZh = mw.loadData("模塊:東方Project:音樂(中文)")
local musicJp = mw.loadData("模塊:東方Project:音樂(日文)")
local spellcardZh = mw.loadData("模塊:東方Project:符卡(中文)")
local spellcardJp = mw.loadData("模塊:東方Project:符卡(日文)")
local spellcardStage = mw.loadData("模塊:東方Project:符卡(位置)")
local p = {}

local function getTitle(charName, workName, lang)
    local title
    if lang == "zh" then
        title = titleZh[charName][workName]
    elseif lang == "jp" then
        title = titleJp[charName][workName]
    else
        return "Invalid Input"
    end
    if title then
        return title
    else
        return "Title Not Found"
    end
end

local function getMusic(workName, order, lang)
    local music
    if lang == "zh" then
        music = musicZh[workName][order]
    elseif lang == "jp" then
        music = musicJp[workName][order]
    else
        return "Invalid Input"
    end
    if music then
        return music
    else
        return "Music Not Found"
    end
end

local function getSC(charName, workName, order, lang)
    local spellcard
    if lang == "zh" then
        spellcard = spellcardZh[charName][workName][order]
    elseif lang == "jp" then
        spellcard = spellcardJp[charName][workName][order]
    else
        return "Invalid Input"
    end
    if spellcard then
        return spellcard
    else
        return "Spell Card Not found"
    end
end

local function printSC(charName, workName)
    local tableprint = '<table class="wikitable"><tr><th>符卡原名</th><th>符卡譯名</th><th>使用場合</th></tr>'
    local zh, jp, stage
    local num = spellcardZh[charName][workName]["n"]
    for i = 1,num do
        zh = spellcardZh[charName][workName][i]
        jp = spellcardJp[charName][workName][i]
        stage = spellcardStage[charName][workName][i]
        zh = '<td>' .. zh .. '</td>'
        jp = '<td>' .. '<span lang="ja" xml:lang="ja">-{' .. jp .. '}-</span>' .. '</td>'
        stage = '<td>' .. stage .. '</td>'
        tableprint = tableprint .. '<tr>' .. jp .. zh .. stage .. '</tr>'
    end
    return tableprint
end

--稱號
--{{#invoke:東方Project|稱號|角色|作品(含位置或順次)|語言}}
p["稱號"] = function(frame)
    local charName = frame.args[1]
    local workName = frame.args[2]
    local lang = frame.args[3]
    return getTitle(charName, workName, lang)
end

--音樂
--{{#invoke:東方Project|音樂|作品|順次(字符串)|語言}}
p["音樂"] = function(frame)
    local workName = frame.args[1]
    local order = frame.args[2]
    local lang = frame.args[3]
    return getMusic(workName, order, lang)
end

--符卡
--{{#invoke:東方Project|符卡|角色|作品|順次|語言}}
p["符卡"] = function(frame)
    local charName = frame.args[1]
    local workName = frame.args[2]
    local order = tonumber(frame.args[3])
    local lang = frame.args[4]
    return getSC(charName, workName, order, lang)
end

p["符卡表"] = function(frame)
    local charName = frame.args[1]
    local workName = frame.args[2]
    return printSC(charName, workName)
end

return p
取自 "http://zh.moegirl.tw/index.php?title=模塊:Sandbox/目錄小妹妹/東方Project&oldid=2063550"