require('strict')
local numConv = require('Module:Numeral converter').convert
local p = {}
local function format_score(s)
s = mw.ustring.gsub(s or '', '^[%s\']*([%d%.]+)[%s\']*[–−—%-][%s\']*([%d%.]+)', '%1–%2')
s = mw.ustring.gsub(s, '^%s*([%d%.]+)%s*&[MmNn][Dd][Aa][Ss][Hh];%s*([%d%.]+)', '%1–%2')
s = mw.ustring.gsub(s, '^%s*(%[%[[^%[%]]*%|[%d%.]+)%s*%-%s*([%d%.]+)', '%1–%2')
s = mw.ustring.gsub(s, '^%s*(%[[^%[%]%s]*%s+[%d%.]+)%s*%-%s*([%d%.]+)', '%1–%2')
s = mw.ustring.gsub(s, '^%s*(%[%[[^%[%]]*%|[%d%.]+)%s*&[MmNn][Dd][Aa][Ss][Hh];%s*([%d%.]+)', '%1–%2')
s = mw.ustring.gsub(s, '^%s*(%[[^%[%]%s]*%s+[%d%.]+)%s*&[MmNn][Dd][Aa][Ss][Hh];%s*([%d%.]+)', '%1–%2')
return s
end
function p.main(frame)
local getArgs = require('Module:Arguments').getArgs
local args = getArgs(frame, { parentFirst = true })
local n1 = args[1] or 'X'
local n2 = args[2] or 'X'
local s = args['sc'] or args['امتیاز'] or (n1..'–'..n2)
s = format_score(s)
-- following codes obtained from Module:Sports results
-- delink if necessary
if mw.ustring.match(s, '^%s*%[%[[^%[%]]*%|([^%[%]]*)%]%]') then
s = mw.ustring.match(s, '^%s*%[%[[^%[%]]*%|([^%[%]]*)%]%]')
end
if mw.ustring.match(s, '^%s*%[[^%[%]%s]*%s([^%[%]]*)%]') then
s = mw.ustring.match(s, '^%s*%[[^%[%]%s]*%s([^%[%]]*)%]')
end
-- get the scores
local s1 = tonumber(numConv('en', mw.ustring.gsub( s or '',
'^%s*([%d][%d%.]*)%s*–%s*([%d][%d%.]*).*', '%1' )) or nil)
or mw.ustring.gsub(s or '', '^([WL]*)–([WL]*).*', '%1' )
or ''
local s2 = tonumber(numConv('en', mw.ustring.gsub( s or '',
'^%s*([%d][%d%.]*)%s*–%s*([%d][%d%.]*).*', '%2' )) or nil)
or mw.ustring.gsub(s or '', '^([WL]*)–([WL]*).*', '%2' )
or ''
if type(s1) == 'number' and type(s2) == 'number' then
return (s1 > s2) and 'W' or ((s2 > s1) and 'L' or 'T')
elseif s1:match('[WL]') and s2:match('[WL]') and s1 ~= s2 then
return numConv('fa', s1)
else
return mw.ustring.format("''%s''", 'نتیجه نامعلوم')
end
end
return p
