模块:字表调用

此模块的文档可以在模块:字表调用/doc创建

local p = {}
local mw = mw

-- 地区名到模块路径的映射表
local region_map = {
  -- 饶平-三饶片
  ["三饶"] = "饶平-三饶片-三饶",
  ["凤凰"] = "饶平-三饶片-凤凰",
  ["新丰"] = "饶平-三饶片-新丰",
  ["新塘"] = "饶平-三饶片-新塘",
  ["汤溪"] = "饶平-三饶片-汤溪",
  ["浮山"] = "饶平-三饶片-浮山",
  ["浮滨"] = "饶平-三饶片-浮滨",
  ["东山"] = "饶平-三饶片-东山",

  -- 饶平-黄冈片
  ["黄冈"] = "饶平-黄冈片-三饶",
  ["联饶"] = "饶平-黄冈片-联饶",
  ["樟溪"] = "饶平-黄冈片-樟溪",
  ["新圩"] = "饶平-黄冈片-新圩",
  ["钱东"] = "饶平-黄冈片-高堂",
  ["海山"] = "饶平-黄冈片-海山",
  ["汫洲"] = "饶平-黄冈片-汫洲",

      -- 饶平-南澳片
  ["后宅"] = "饶平-南澳片-后宅",
  ["深澳"] = "饶平-南澳片-深澳",
  ["青澳"] = "饶平-南澳片-青澳",
  ["所城"] = "饶平-南澳片-所城",
  ["大埕"] = "饶平-南澳片-大埕",
  
  -- 海阳-府城片
  ["府城"] = "海阳-府城片-府城",
  ["铁铺"] = "海阳-府城片-铁铺",
  ["古巷"] = "海阳-府城片-古巷",
  ["凤塘"] = "海阳-府城片-凤塘",
  ["意溪"] = "海阳-府城片-意溪",
  ["赤凤"] = "海阳-府城片-赤凤",
  ["归湖"] = "海阳-府城片-归湖",
  ["浮洋"] = "海阳-府城片-浮洋",

  -- 海阳-潮安片
  ["庵埠"] = "海阳-潮安片-庵埠",
  ["铁铺"] = "海阳-潮安片-铁铺",
  ["磷溪"] = "海阳-潮安片-磷溪",
  ["官塘"] = "海阳-潮安片-官塘",
  ["沙溪"] = "海阳-潮安片-沙溪",
  ["金石"] = "海阳-潮安片-金石",
  ["东凤"] = "海阳-潮安片-东凤",
  ["江东"] = "海阳-潮安片-江东",

    -- 澄海-澄城片
  ["澄城"] = "澄海-澄城片-澄城",
  ["莲阳"] = "澄海-澄城片-莲阳",
  ["上华"] = "澄海-澄城片-上华",
  ["隆都"] = "澄海-澄城片-隆都",
  ["坝头"] = "澄海-澄城片-坝头",
  ["外砂"] = "澄海-澄城片-外砂",
  ["新溪"] = "澄海-澄城片-新溪",
  
    -- 澄海-东里片
  ["东里"] = "澄海-东里片-东里",
  ["盐鸿"] = "澄海-东里片-盐鸿",
  ["溪南"] = "澄海-东里片-溪南",
  ["莲华"] = "澄海-东里片-莲华",

    -- 汕头-埠区片
  ["埠区"] = "汕头-埠区片-埠区",
  ["鮀浦"] = "汕头-埠区片-鮀浦",
  ["角石"] = "汕头-埠区片-角石",
  ["欧汀"] = "汕头-埠区片-欧汀",
  
    -- 潮阳-外山片
  ["棉城"] = "潮阳-外山片-棉城",
  ["金浦"] = "潮阳-外山片-金浦",
  ["河溪"] = "潮阳-外山片-河溪",
  ["西胪"] = "潮阳-外山片-西胪",
  ["达濠"] = "潮阳-外山片-达濠",
  ["河浦"] = "潮阳-外山片-河浦",
  ["珠浦"] = "潮阳-外山片-珠浦",
  ["广澳"] = "潮阳-外山片-广澳",
  ["海门"] = "潮阳-外山片-海门",

    -- 潮阳-内山片
  ["峡山"] = "潮阳-内山片-峡山",
  ["和平"] = "潮阳-内山片-和平",
  ["铜孟"] = "潮阳-内山片-铜孟",
  ["谷饶"] = "潮阳-内山片-谷饶",
  ["井都"] = "潮阳-内山片-井都",
  ["陇田"] = "潮阳-内山片-陇田",
  ["雷岭"] = "潮阳-内山片-雷岭",
  ["红场"] = "潮阳-内山片-红场",
  ["成田"] = "潮阳-内山片-成田",
  ["胪岗"] = "潮阳-内山片-胪岗",
  ["两英"] = "潮阳-内山片-两英",
  ["仙城"] = "潮阳-内山片-仙城",
  ["司马浦"] = "潮阳-内山片-司马浦",

    -- 潮阳-榕腔片
  ["金灶"] = "潮阳-榕腔片-金灶",
  ["关埠"] = "潮阳-榕腔片-关埠",

    -- 揭阳-榕城片
  ["榕城"] = "揭阳-榕城片-榕城",
  ["梅云"] = "揭阳-榕城片-梅云",
  ["渔湖"] = "揭阳-榕城片-渔湖",
  ["地都"] = "揭阳-榕城片-地都",
  ["炮台"] = "揭阳-榕城片-炮台",
  ["登岗"] = "揭阳-榕城片-登岗",
  ["曲溪"] = "揭阳-榕城片-曲溪",
  ["磐东"] = "揭阳-榕城片-磐东",
  ["云路"] = "揭阳-榕城片-云路",
  ["玉滘"] = "揭阳-榕城片-玉滘",
  ["霖磐"] = "揭阳-榕城片-霖磐",
  ["月城"] = "揭阳-榕城片-月城",
  ["白塔"] = "揭阳-榕城片-白塔",
  ["龙尾"] = "揭阳-榕城片-龙尾",
  ["桂岭"] = "揭阳-榕城片-桂岭",
  ["锡场"] = "揭阳-榕城片-锡场",
  ["新亨"] = "揭阳-榕城片-新亨",
  ["玉湖"] = "揭阳-榕城片-玉湖",
  ["埔田"] = "揭阳-榕城片-埔田",

    -- 揭阳-棉湖片
  ["棉湖"] = "揭阳-棉湖片-棉湖",
  ["凤江"] = "揭阳-棉湖片-凤江",
  ["东园"] = "揭阳-棉湖片-东园",
  ["塔头"] = "揭阳-棉湖片-塔头",
  ["金和"] = "揭阳-棉湖片-金和",
  ["钱坑"] = "揭阳-棉湖片-钱坑",
  ["大溪"] = "揭阳-棉湖片-大溪",
  ["灰寨"] = "揭阳-棉湖片-灰寨",

    -- 惠来-惠城片
  ["惠城"] = "惠来-惠城片-惠城",
  ["华湖"] = "惠来-惠城片-华湖",
  ["神泉"] = "惠来-惠城片-神泉",
  ["东陇"] = "惠来-惠城片-东陇",
  ["岐石"] = "惠来-惠城片-岐石",
  ["隆江"] = "惠来-惠城片-隆江",
  ["溪西"] = "惠来-惠城片-溪西",

    -- 惠来-葵潭片
  ["葵潭"] = "惠来-葵潭片-葵潭",
  ["鳌江"] = "惠来-葵潭片-鳌江",
  ["东港"] = "惠来-葵潭片-东港",

    -- 惠来-靖海片
  ["靖海"] = "惠来-靖海片-靖海",
  ["仙庵"] = "惠来-靖海片-仙庵",
  ["周田"] = "惠来-靖海片-周田",
  ["前詹"] = "惠来-靖海片-前詹",
  
    -- 普宁-洪阳片
  ["洪阳"] = "普宁-洪阳片-洪阳",
  ["广太"] = "普宁-洪阳片-广太",
  ["南溪"] = "普宁-洪阳片-南溪",
  ["赤岗"] = "普宁-洪阳片-赤岗",
  ["大坝"] = "普宁-洪阳片-大坝",
  ["梅塘"] = "普宁-洪阳片-梅塘",
  ["里湖"] = "普宁-洪阳片-里湖",

    -- 普宁-流沙片
  ["流沙"] = "普宁-流沙片-流沙",
  ["燎原"] = "普宁-流沙片-燎原",
  ["池尾"] = "普宁-流沙片-池尾",
  ["大南山"] = "普宁-流沙片-大南山",
  ["麒麟"] = "普宁-流沙片-麒麟",
  ["南径"] = "普宁-流沙片-南径",
  ["占陇"] = "普宁-流沙片-占陇",
  ["军埠"] = "普宁-流沙片-军埠",
  ["下架山"] = "普宁-流沙片-下架山",

    -- 丰顺片
  ["汤坑"] = "丰顺片-汤坑",
  ["汤南"] = "丰顺片-汤南",
  ["汤西"] = "丰顺片-汤西",
  ["留隍"] = "丰顺片-留隍",
  ["黄金"] = "丰顺片-黄金",

    -- 域外方音
  ["泰国"] = "域外方音-泰国",
  ["南洋"] = "域外方音-南洋",

}

function p.getReading(frame)
    local char = frame.args[1]
    local region = frame.args[2]
    local mode = frame.args[3] or "潮拼"

    if not char or char == "" then
        return "错误：缺少字。"
    end
    if not region or region == "" then
        return "错误：缺少地区。"
    end

    local module_path = region_map[region]
    if not module_path then
        return "查无此地区数据。"
    end

    local ok, mod = pcall(require, "Module:调查字表/" .. module_path)
    if not ok or not mod or not mod.data then
        return "查无此地区数据。"
    end

    local readings = mod.data[char]
    if not readings then
        return "查无“" .. char .. "”在" .. region .. "的读音。"
    end

    local result = {}
    for _, entry in ipairs(readings) do
        local s = entry[mode] or "—"
        local zt = entry["字态"] or ""
        local note = entry["注释"] or ""
        local gray = entry["灰色"]

        if gray then
            s = '<span style="color:gray">' .. s .. '</span>'
        end
        if zt ~= "" then
            s = s .. ' <span style="color:#fff;">[' .. zt .. ']</span>'
        end
        if note ~= "" then
            s = s .. ' <sub>' .. mw.text.nowiki(note) .. '</sub>'
        end

        table.insert(result, '<div>' .. s .. '</div>')
    end

    return table.concat(result, "\n")
end

return p