モジュール:仮リンク/linkのソースを biểu kỳ

local p = {}

function p.otherLangLinkList(args)

local label = ""
if args['label'] ~= "" and args['label'] ~= nil then
label = "|".. args['label']
end

if args['view'] ~= "" and args['view'] ~= nil then
local result = {}

-- ツールチップ chỉ định
result[1] = string.format(
'<span title= "%s" >[[%s%s]]',
args['title'],
args[1],
label
)

if args[2] ~= "" and args[3] ~= "" then
-- フォント chỉ định
if args['viewInterwikiPageName'] ~= '1' then
result[2] = '<span style= "font-size: 0.77em; font-weight: normal;" class= "noprint" >'
else
result[2] = ''
end

-- cải hành chỉ định đối ứng
if args['br'] == "" or args['br'] == nil then
result[3] = ""
else
result[3] = '<br/>'
end

result[4] = ' ( '
if args['viewInterwikiPageName'] == '1' then
result[5] = p.otherLangLinkDispName(args[2], args[3], args['interwikilabel'], args['short'], args['links'])
else
local tmp = {}
tmp[1] = p.otherLangLink(args[2], args[3])
tmp[2] = p.otherLangLink(args[4], args[5])
tmp[3] = p.otherLangLink(args[6], args[7])
tmp[4] = p.otherLangLink(args[8], args[9])
result[5] = table.concat(p._tableShorten(tmp), ', ')
end
result[6] = ' ) '

if args['viewInterwikiPageName'] ~= '1' then
result[7] = '</span>'
else
result[7] = ''
end
end

result[8] = '</span>'

return table.concat(p._tableShorten(result))
else
return string.format(
'[[%s%s]]',
args[1],
label
)
end
end

function p.otherLangLink(langCode, pageName)
-- dẫn sổ が chỉ định されていない tràng hợp は không văn tự を phản す
if langCode == "" or langCode == nil or pageName == "" or pageName == nil then
return ""
end

local langDisp

-- wikidataの tràng hợp は “wikidata”, それ dĩ ngoại の tràng hợp は ngôn ngữ danh + “Bản” とする
if langCode == 'wikidata' then
langDisp = 'wikidata'
else
local mWikipediaLangName = require('モジュール:Wikipedia ngôn ngữ danh ')

local newFrameArg = {}
newFrameArg[1] = langCode
local newFrame = { args = newFrameArg }

langDisp = mWikipediaLangName.GetWikipediaPageName(newFrame)
end

if langDisp == nil then
error(' ngôn ngữ コードの chỉ định に ngộ りがあります')
elseif langCode ~= 'wikidata' then
langDisp = langDisp.. ' bản '
end

return string.format(
'[[:%s:%s|%s]]',
langCode,
pageName,
langDisp
)
end

function p.otherLangLinkDispName(langCode, pageName, interwikilabel, short, links)
-- tất tu dẫn sổ が chỉ định されていない tràng hợp は không văn tự を phản す
if langCode == "" or langCode == nil or pageName == "" or pageName == nil then
return ""
end

-- tha ngôn ngữ bản リンクラベル danh が chỉ định されていない tràng hợp はページ danh を chỉ định
if interwikilabel == "" or interwikilabel == nil then
interwikilabel = pageName
end

-- ページリンク bộ phân thủ đắc
local pageLink = string.format(
'<span lang= "%s" xml:lang= "%s" >[[:%s:%s|%s]]</span>',
langCode,
langCode,
langCode,
pageName,
interwikilabel
)

-- ngôn ngữ ページ thủ đắc
local mWikipediaLangName = require('モジュール:Wikipedia ngôn ngữ danh ')
local newFrameArg = {}
newFrameArg[1] = langCode
local newFrame = { args = newFrameArg }
local langPage = mWikipediaLangName.GetWikipediaPageName(newFrame)

if langPage == nil then
error(' ngôn ngữ コードの chỉ định に ngộ りがあります')
end

-- ngôn ngữ biểu kỳ danh thủ đắc
local langDisp
local localShort = short
if short == 'on' then
newFrameArg = {}
newFrameArg[1] = langCode.. '-short'
newFrame = { args = newFrameArg }
langDisp = mWikipediaLangName.GetWikipediaPageName(newFrame)
if langPage == langDisp then
localShort = 'off'
end
end

-- ngôn ngữ biểu kỳ bộ phân thủ đắc
local langLink
if links ~= 'no' and localShort ~= 'on' then
-- デフォルト(リンクあり, ngôn ngữ danh tỉnh lược なし)
langLink = string.format(
'[[%s]]',
langPage
)
elseif links ~= 'no' and localShort == 'on' then
-- リンクあり, ngôn ngữ danh tỉnh lược
langLink = string.format(
'[[%s|%s]]',
langPage,
langDisp
)
elseif links == 'no' and localShort ~= 'on' then
-- リンクなし, ngôn ngữ danh tỉnh lược なし
langLink = langPage
else
-- リンクなし, ngôn ngữ danh tỉnh lược
langLink = langDisp
end

return langLink.. ': '.. pageLink

end

function p._tableShorten(t)
local newTable = {}
local i = 0
for j,m in ipairs(t) do
if m ~= "" and m ~= nil then
i = i + 1
newTable[i] = m
end
end

return newTable
end

return p