local p = {}
local Navbox = require("Module:Navbox")
local country = {
["阿布哈兹"] = {""},
["阿富汗"] = {""},
["阿尔巴尼亚"] = {""},
["阿尔及利亚"] = {""},
["安道尔"] = {""},
["安哥拉"] = {""},
["安提瓜和巴布达"] = {""},
["阿根廷"] = {""},
["亚美尼亚"] = {""},
["澳大利亚"] = {""},
["奥地利"] = {""},
["阿塞拜疆"] = {""},
["巴哈马"] = {""},
["巴林"] = {""},
["孟加拉"] = {""},
["巴巴多斯"] = {""},
["白俄罗斯"] = {""},
["比利时"] = {""},
["伯利兹"] = {""},
["贝宁"] = {""},
["不丹"] = {""},
["玻利维亚"] = {""},
["波黑"] = {"波斯尼亚和黑塞哥维那"},
["博茨瓦纳"] = {""},
["巴西"] = {""},
["文莱"] = {""},
["保加利亚"] = {""},
["布基纳法索"] = {""},
["布隆迪"] = {""},
["柬埔寨"] = {""},
["喀麦隆"] = {""},
["加拿大"] = {""},
["佛得角"] = {""},
["中非"] = {"中非共和国"},
["乍得"] = {""},
["智利"] = {""},
["中国"] = {"中华人民共和国"},
["哥伦比亚"] = {""},
["科摩罗"] = {""},
["刚果民主共和国"] = {""},
["刚果共和国"] = {""},
["库克群岛"] = {""},
["哥斯达黎加"] = {""},
["科特迪瓦"] = {""},
["克罗地亚"] = {""},
["古巴"] = {""},
["塞浦路斯"] = {""},
["捷克"] = {"捷克共和国"},
["丹麦"] = {""},
["吉布提"] = {""},
["多米尼克"] = {""},
["多米尼加共和国"] = {""},
["厄瓜多尔"] = {""},
["埃及"] = {""},
["萨尔瓦多"] = {""},
["赤道几内亚"] = {""},
["厄立特里亚"] = {""},
["爱沙尼亚"] = {""},
["史瓦帝尼"] = {""},
["埃塞俄比亚"] = {""},
["斐济"] = {""},
["芬兰"] = {""},
["法国"] = {""},
["加蓬"] = {""},
["冈比亚"] = {""},
["格鲁吉亚"] = {""},
["德国"] = {""},
["加纳"] = {""},
["希腊"] = {""},
["格林纳达"] = {""},
["危地马拉"] = {""},
["几内亚"] = {""},
["几内亚比绍"] = {""},
["圭亚那"] = {""},
["海地"] = {""},
["洪都拉斯"] = {""},
["匈牙利"] = {""},
["冰岛"] = {""},
["印度"] = {""},
["印度尼西亚"] = {""},
["伊朗"] = {""},
["伊拉克"] = {""},
["爱尔兰"] = {""},
["以色列"] = {""},
["意大利"] = {""},
["牙买加"] = {""},
["日本"] = {""},
["约旦"] = {""},
["哈萨克斯坦"] = {""},
["肯尼亚"] = {""},
["基里巴斯"] = {""},
["科索沃"] = {""},
["朝鲜"] = {"朝鲜民主主义人民共和国"},
["韩国"] = {"大韩民国"},
["科威特"] = {""},
["吉尔吉斯斯坦"] = {""},
["老挝"] = {""},
["拉脱维亚"] = {""},
["黎巴嫩"] = {""},
["莱索托"] = {""},
["利比里亚"] = {""},
["利比亚"] = {""},
["列支敦士登"] = {""},
["立陶宛"] = {""},
["卢森堡"] = {""},
["马达加斯加"] = {""},
["马拉维"] = {""},
["马来西亚"] = {""},
["马尔代夫"] = {""},
["马里"] = {""},
["马耳他"] = {""},
["马绍尔群岛"] = {""},
["毛里塔尼亚"] = {""},
["毛里求斯"] = {""},
["墨西哥"] = {""},
["密克罗尼西亚联邦"] = {""},
["摩尔多瓦"] = {""},
["摩纳哥"] = {""},
["蒙古"] = {""},
["黑山"] = {""},
["摩洛哥"] = {""},
["莫桑比克"] = {""},
["缅甸"] = {""},
["纳米比亚"] = {""},
["瑙鲁"] = {""},
["尼泊尔"] = {""},
["荷兰"] = {""},
["新西兰"] = {""},
["尼加拉瓜"] = {""},
["尼日尔"] = {""},
["尼日利亚"] = {""},
["纽埃"] = {""},
["北塞浦路斯"] = {""},
["北马其顿"] = {""},
["挪威"] = {""},
["阿曼"] = {""},
["巴基斯坦"] = {""},
["帕劳"] = {""},
["巴勒斯坦"] = {"巴勒斯坦国"},
["巴拿马"] = {""},
["巴布亚新几内亚"] = {""},
["巴拉圭"] = {""},
["秘鲁"] = {""},
["菲律宾"] = {""},
["波兰"] = {""},
["葡萄牙"] = {""},
["德涅斯特河沿岸"] = {""},
["卡塔尔"] = {""},
["罗马尼亚"] = {""},
["俄罗斯"] = {""},
["卢旺达"] = {""},
["圣基茨和尼维斯"] = {""},
["圣卢西亚"] = {""},
["圣文森特和格林纳丁斯"] = {""},
["萨摩亚"] = {""},
["圣马力诺"] = {""},
["圣多美和普林西比"] = {""},
["沙特阿拉伯"] = {""},
["塞内加尔"] = {""},
["塞尔维亚"] = {""},
["塞舌尔"] = {""},
["塞拉利昂"] = {""},
["新加坡"] = {""},
["斯洛伐克"] = {""},
["斯洛文尼亚"] = {""},
["所罗门群岛"] = {""},
["索马里"] = {""},
["索马里兰"] = {""},
["南非"] = {""},
["南奥塞梯"] = {""},
["南苏丹"] = {""},
["西班牙"] = {""},
["斯里兰卡"] = {""},
["苏丹"] = {""},
["苏里南"] = {""},
["瑞典"] = {""},
["瑞士"] = {""},
["叙利亚"] = {""},
["台湾"] = {"中华民国"},
["塔吉克斯坦"] = {""},
["坦桑尼亚"] = {""},
["泰国"] = {""},
["东帝汶"] = {""},
["多哥"] = {""},
["汤加"] = {""},
["特立尼达和多巴哥"] = {""},
["突尼斯"] = {""},
["土耳其"] = {""},
["土库曼斯坦"] = {""},
["图瓦卢"] = {""},
["乌干达"] = {""},
["乌克兰"] = {""},
["阿联酋"] = {"阿拉伯联合酋长国"},
["英国"] = {""},
["美国"] = {""},
["乌拉圭"] = {""},
["乌兹别克斯坦"] = {""},
["瓦努阿图"] = {""},
["梵蒂冈"] = {""},
["委内瑞拉"] = {""},
["越南"] = {""},
["西撒哈拉"] = {"撒拉威阿拉伯民主共和国"},
["也门"] = {""},
["赞比亚"] = {""},
["津巴布韦"] = {""},
}
function p.main(frame)
local pframe = frame:getParent()
local config = frame.args
local args = pframe.args
return p._main(args)
end
function p._main(args)
if mw.title.getCurrentTitle() == "Template:World topic" then
state = "autocollapse"
else
state = args.state
end
if args[1] ~= nil or args.prefix ~= nil and (args[2] == nil or ags.suffix == nil) then
titlemid = ""
end
if args.title ~= nil then
title = args.title
else
title = "[["..(args[1] or args.prefix or "")..(titlemid or "").."世界"..(args.suffix or "").."]]"
end
if args.group1 ~= nil and args.group1 ~= "" then
group1 = args.group1
end
local sorter = {}
for n in pairs(country) do
table.insert(sorter, n)
end
table.sort(sorter)
-- parse link overrides, e.g. |link_United_States=Foo sets override["United States"] = "Foo"
local override = {}
for k,v in pairs(args) do
local country = mw.ustring.match(k, "^link_(.*)")
if country then
country = mw.ustring.gsub(country, "_", " ")
override[country] = v
end
end
local redlinks = args.noredlinks == nil
local list1 = table.concat(links(args[1], args[2], args.prefix, args.suffix, sorter, redlinks, override) )
local navarguments = {
name = args.name or "World topic",
state = state,
navbar = args.navbar or "Tnavbar",
border = args.border,
title = title,
image = args.image,
titlestyle = args.titlestyle,
bodystyle = args.bodystyle,
abovestyle = args.abovestyle,
belowstyle = args.belowstyle,
groupstyle = args.groupstyle,
liststyle = args.liststyle,
listclass = "hlist",
above = args.above,
group1 = group1,
list1 = list1
}
return Navbox._navbox(navarguments)
end
function links(args1, args2, argsprefix, argssuffix, sorter, redlinks, override)
local list = {}
local prefix = (args1 or argsprefix or "") .. " "
local suffix = args2 or argssuffix or ""
for x, y in pairs(sorter) do
local target = nil
if redlinks then
if override[y] then
target = override[y]
elseif y == "Georgia" or y == "Palestine" then
if mw.title.new(prefix..country[y][1]..suffix).exists then
target = prefix..country[y][1]..suffix
else
target = prefix..y..suffix
end
else
target = prefix..linktarget(y, country[y][1])..suffix
end
else -- noredlinks
if override[y] then
if mw.title.new(override[y]).exists then
target = override[y]
end
elseif mw.title.new(prefix..linktarget(y, country[y][1])..suffix).exists then
target = prefix..linktarget(y, country[y][1])..suffix
elseif y == "Georgia" or y == "Palestine" then
if mw.title.new(prefix..y..suffix).exists then
target = prefix..y..suffix
end
end
end
if target then
table.insert(list, li("[["..target.."|"..y.."]]" ) )
end
end
return list
end
function li(text)
local li = mw.html.create("li")
li
:wikitext(text)
:done()
return tostring(li)
end
function linktarget(x, y)
if y ~= nil and y == "" then
return x
else
return y
end
end
return p
