南三龙铁路沙溪河大桥正在合龙 主体工程已基本完成

??????? [?????]

百度 去年，KimKi-nam所在的部门营收高达108万亿韩元（约合1000亿美元），占三星电子总营收的45%。

local p = {}
local wd2 = require('Module:Wikidata2').formatStatementsFromLua

function p.usesProperty(frame)
	local parent = frame.getParent(frame)
	local result = ''
	local ii = 1
	while true do
		local p_num = parent.args[ii] or ''
		if p_num ~= '' then
			p_num = mw.text.trim( p_num )
			if mw.ustring.gsub( p_num, '%d', '' ) == 'P' then
				local label = mw.wikibase.label(p_num) or "???? ???"
			result = result .. "<li><b><i>[[d:Property:" .. p_num .. "|" .. label .. " <small>(" .. string.upper(p_num) .. ")</small>]]</i></b> (?????? [[d:Special:WhatLinksHere/Property:" .. p_num .. "|?????????]])</li>"
			end

		else break
		end
		ii = ii + 1
	end
	return result
end

Type = {
		["wikibase-item"]= "???? ??? ????",
		["wikibase-property"]= "????? ???? ???",
		["commonsMedia"]= "????? ?????",
		["math"]= "?????",
		["time"]= "???",
		["external-id"]= "?????? ??? ??",
		["string"]= "??",
		["globe-coordinate"]= "????????",
		["quantity"]= "?????",
		["geo-shape"]= "??? ???????",
		["url"]= "?? ?? ???",
		["monolingualtext"]= "?? ???? ?????",
		}
function getpropertytype(id) 
	local entity = mw.wikibase.getEntityObject(id)
		if entity
		and entity['datatype']
		and Type[entity['datatype']]
		then
			ca = Type[entity['datatype']]
			else ca =''
		end
	if ca and ca ~= '' then
	return '<small> (' .. ca ..	 ')</small>'
	end
return ''
end

function LabelOrDes(langcode , id , lab , parent) 
	if lab == 'labels'
		then cas = 'lab'
	elseif lab == 'descriptions'
		then  cas = 'des'
	end
	----------------------
	local arg = parent.args[id .. cas] or ''
	local lan = langcode or 'ur'
	local entity = mw.wikibase.getEntityObject(id)
	----------------------
	if arg and arg ~= '' 
	then 
		return arg
	else
		if entity
		and entity[''..lab ..'']
		and entity[''..lab ..''][''..lan..'']
		and entity[''..lab ..''][''..lan..''].value 
		then
			local lang = entity[''..lab ..''][''..lan..'']
				if lang['language'] == lan 
				then
					return entity[''..lab ..''][''..lan..''].value
				else
					return nil
				end
		end
	end
end

function makecat(P, name)
	PO = ''
	----------------------
	if P and P ~='' then
		local cat = mw.ustring.gsub(P, '????:' , '')
		local catname = mw.ustring.gsub(cat, '????? ??????? ?????' , '????? ???????')
		if name and name ~= '' then	 catname = name end
		PO = "[[:" .. P .. "|" .. catname .. "]] (<abbr title='??? ?????????'>??</abbr> " .. mw.site.stats.pagesInCategory(cat, 'all') .. " ????)"		
	end
	----------------------
	return PO
end

function getprop(id , prop , parent , name)
	local PO = ''
	local Property = wd2({entityId =  id , property = prop ,formatting ='sitelink', addTrackingCat ='',noicon='t',nolink ='t', enbarten='s'}) or ''
	--if Property and Property ~='' then Property = '[[:' .. Property ...']] ({{PAGESINCAT:' .. mw.ustring.gsub(Property, '????:' , '') ..	 '}} ????)' end
	----------------------
	if parent.args[id .. 'cat'] and parent.args[id .. 'cat'] ~= '' 
	then 
		Property = parent.args[id .. 'cat'] 
	end
	----------------------
	if Property and Property ~='' then
		PO = makecat(Property , name)
	end
	----------------------
	return PO
end

function p.usestable(frame)
	aaa = {}
	aa = {}
	local nott = "<abbr title='??? ???? ??? ???? ??????'>????.</abbr>"
	local same = "<abbr title='??? ??? ?? ???? ??????'>??????.</abbr>"
	local def ="<abbr title='??? ?????? ?? ???? ??????'>??????.</abbr>"
	local parent = frame.getParent(frame)
	local r = '! data-sort-type="number" style="width: 20%;"| ???????'
	r =	 r .. '!! style="width: 45%; " | ?????'
	r =	 r .. '!! style="width: 30%; " | ????? ???? ?????????' 
	local r1 = r .. '\n|-\n'
	r =	 r .. '!! style="width: 30%; " | ' .. nott
	r =	 r .. '!! style="width: 30%; " | ' .. same
	r =	 r .. '!! style="width: 30%; " | ' .. def
	r =	 r .. '\n|-\n'
	local temp	= parent.args['?????'] or '?????'
	local ii = 1
	while true do
		local p_num = parent.args[ii] or ''
		mw.log(p_num)
		if p_num ~= '' then
			p_num = mw.text.trim( p_num )
			if mw.ustring.gsub( p_num, '%d', '' ) == 'P' then
				table.insert(aa, p_num)
			--else
				
				--if mw.ustring.gsub( p_num, '?????=', '' ) ~= p_num then
					--temp = mw.ustring.gsub( p_num, '?????=', '' )
				--end
			end
		else break
		end	
		ii = ii + 1
	end
	if temp ~= '??????' 
		then temp = '[[?????:' .. temp .. ']]' 
	end
	local head = '{| class="wikitable sortable" style="text-align:right; width: 80%; font-size: 95%;"\n|+'
	local head = head .. '???? [[???? ????]] ??????? ?? ' .. temp .. '\n'

	local result = ''
	local result1 = ''
	local FFF = ''
	--table.sort(aa, function(a, b) return a < b end)
	table.sort(aa)
	for k, p_num in pairs(aa) do
			local rr = " (???? [[d:Special:WhatLinksHere/Property:" .. p_num .. "|?????????]])"
			local label = LabelOrDes('ur', p_num ,'labels' , parent) or LabelOrDes('en', p_num ,'labels' , parent) or "???? ?????"
			local description = LabelOrDes( 'ur', p_num ,'descriptions'	 , parent) or "" --"???? ???"
			local P2875 = getprop(p_num , 'P2875' , parent , '')
			local P3713 = getprop(p_num , 'P3713' , parent , '????')
			local P3734 = getprop(p_num , 'P3734' , parent , '??????')
			local P3709 = getprop(p_num , 'P3709' , parent , '??????')
			if P3713 ~='' or P3734 ~='' or P3709 ~='' then
				FFF = 'sa'
			end
			--local pro = '<span style="font-family: monospace, monospace;">' .. string.upper(p_num) .. '</span>'
			--local span= ' data-sort-value="' .. mw.ustring.gsub(p_num, 'P' , '').. '"| ' .. pro .. ''
			--local name  = "|" .. span	 .. "|| <b>[[d:Property:" .. p_num .. "|" .. label .. "]]</b> || "
			local propertytype = getpropertytype(p_num)
			local pro = ' (' .. string.upper(p_num) .. ')'
			local span= '| data-sort-value="' .. mw.ustring.gsub(p_num, 'P' , '').. '"| '
			--local name  = span  .. " <small>[[d:Property:" .. p_num .. "|" .. label .. pro .. "]]</small>" .. propertytype.. " ||"
			local name	= span	.. " <b>[[d:Property:" .. p_num .. "|" .. label .. pro .. "]]</b>" .. propertytype.. " ||"
			result = result .. name .. description
			result1 = result1 .. name .. description  .. "|| " .. P2875 ..	"\n|-\n"
			result = result	 .. "|| " .. P2875
			result = result	 .. "|| " .. P3713
			result = result	 .. "|| " .. P3734
			result = result	 .. "|| " .. P3709
			result = result ..	"\n|-\n"
	end
	final  = head  .. r .. result .. '|}[[????:????? ?? ??????? ???? ?? ???? ????]]'
	final1 = head  .. r1 .. result1 .. '|}[[????:????? ?? ??????? ???? ?? ???? ????]]'
	--######################
	if FFF ~= '' then 
		return final
	else
		return final1
	end
	--######################
end

return p