وحدة:4td

من أرابيكا، الموسوعة الحرة
اذهب إلى التنقل اذهب إلى البحث

local p = {}

function p.td2(frame)
	local roo = {}
	local list = {y='سنوات' , c='أندية' , m='مباريات' , g='أهداف'}
	local frame = frame
	local pframe = frame.getParent(frame)
	local arg-- = getArgs(frame)
	function getArg(ar)
		--if pframe.args[ar] then
			--mw.log('Module:4td: pframe.args '  .. ar .. pframe.args[ar])
			--return pframe.args[ar]
		--elseif frame.args[ar] then
		if pframe.args[ar] then
			--mw.log('Module:4td: frame.args '  .. ar .. frame.args[ar])
			return pframe.args[ar]
		else
			return ''
		end
	end
	local Table = mw.html.create("table")
	local ii = 1
	while true do
		years =	 list.y .. ii --'سنوات' .. ii
		clubs =	 list.c .. ii --'أندية' .. ii
		matchs = list.m .. ii -- 'مباريات' .. ii
		goals =	 list.g .. ii --'أهداف' .. ii
		if pframe.args[clubs] or pframe.args[years] then
			if (pframe.args[clubs] and pframe.args[clubs] ~= '') or (pframe.args[years] and pframe.args[years]	~= '' )
			then --and arg[list.c .. ii] ~= '' then
				if pframe.args[goals] and pframe.args[goals] ~= '' then goals_r = pframe.args[goals] else goals_r = '-' end
				local tr = mw.html.create("tr")
				--local td1 = tr:tag("td"):css('background-color', '#f2f2f2'):tag("span"):addClass('nowrap'):wikitext(pframe.args[years])
				local td1 = tr:tag("td"):addClass('nowrap'):css('background-color', '#f2f2f2'):tag("span"):wikitext(pframe.args[years])
				local td2 = tr:tag("td"):tag("span"):wikitext(pframe.args[clubs])
				local td3 = tr:tag("td"):tag("span"):wikitext(getArg(matchs))
				local td4 = tr:tag("td"):tag("span"):wikitext('(' .. goals_r .. ')')
				table.insert(roo, tostring(tr).. '\n')
			else
				--if (getArg(matchs) and getArg(matchs) ~= '') or (pframe.args[goals] and pframe.args[goals] ~= '') then
					--sos = '|' .. matchs .. '= و|' .. goals .. '='
					-- mw.log("Module:4td: Can't find |" .. clubs .. "= or |" .. years .. "= so: " .. sos " was ignored ."  )
				--end
			end
		else
			break
		end	
		ii =  ii + 1
	end
	OP = table.concat(roo)
	return tostring(OP)
end

return p