ماژول:Cite/functions
نما
توضیحات این پودمان میتواند در ماژول:Cite/functions/توضیحات قرار گیرد.
local p = {}
local quall = require('Module:Cite/quall')
p.Known_properties = {
"P304", "P50", "P957", "P478", "P98", "P393", "P1476", "P123", "P577", "P433",
"P275", "P698", "P356", "P958", "P1433", "P1680", "P1683", "P1065" ,"P212",
"P854","P170","P248","P143"
} --,"P536","P227"
function p.make_P345_link_o( s )
if not s or s == "" then return "" end
local IMDB_Table = {
['tt'] = 'https://www.imdb.com/title/$1/',
['co'] = 'https://www.imdb.com/search/title?companies=$1',
['ev'] = 'https://www.imdb.com/event/$1/',
['nm'] = 'https://www.imdb.com/name/$1/',
['ni'] = 'https://www.imdb.com/news/$1/',
}
local s2 = s:sub(1,2)
--mw.log("s2" .. s2 )
if IMDB_Table[s2] then
local fo = mw.ustring.gsub( IMDB_Table[s2], '$1', s )
return fo
end
return s
end
function p.authorlist(auth,name)
if not auth or auth == '' then return nil end
local list = mw.text.split( auth, '، و')
local s = {}
for i, auth in pairs(list) do
local str = '|' .. name .. i .. '=' .. auth
if str then table.insert(s, str) end
end
return table.concat(s, '\n')
end
function p.labeel(property,text)
if text then
return text
end
local pro = mw.wikibase.label( property )
return pro
end
function p.get_property_label( Id )
local label = mw.wikibase.label( Id )
return label
end
function p.geturl(url,text)
if url and url ~= '' then
return '[' .. url .. ' ' .. (text or url) .. ']'
end
end
function p.listquall(frame)
local list = mw.html.create("table")
:addClass("wikitable sortable")
:addClass('mw-collapsible')
:addClass('mw-collapsed')
local head = list:tag("tr")
head:tag("th"):wikitext("#")
head:tag("th"):wikitext("عنصر")
head:tag("th"):wikitext("خاصیه")
local number = 0
for v, nam in pairs(quall) do
for _1, nam1 in pairs(nam) do
number = number + 1
local row = list:tag("tr")
row:tag("td"):tag("span"):wikitext(number)
local th = row:tag("td")
local rr = row:tag("td")
local dd = frame:preprocess("{{Q|Q".. v .."}}")
th:tag("span"):wikitext(dd)
local u = frame:preprocess("{{P|".. nam1[1] .."}}")
rr:tag("span"):wikitext(u)
end
end
return list
end
return p