Module:Exclusive

-- l10n text, need to be translated. local l10n = { ['en'] = { ['icon_link_d'] = 'Desktop Version history', ['icon_text_d'] = 'Desktop Version', ['icon_link_c'] = 'Console version', ['icon_text_c'] = 'Console Version', ['icon_link_o'] = 'Old-gen console version', ['icon_text_o'] = 'Old-gen console version', ['icon_link_m'] = 'Mobile Version', ['icon_text_m'] = 'Mobile Version', ['icon_link_3'] = '3DS version', ['icon_text_3'] = '3DS Version', ['icon_link_j'] = 'Old-gen console version#Japanese Release', ['icon_text_j'] = 'Japanese Console version', },	['zh'] = { ['icon_link_d'] = '电脑版版本历史', ['icon_text_d'] = '电脑版', ['icon_link_c'] = '主机版', ['icon_text_c'] = '主机版', ['icon_link_o'] = '前代主机版', ['icon_text_o'] = '前代主机版', ['icon_link_m'] = '移动版', ['icon_text_m'] = '移动版', ['icon_link_3'] = '3DS版', ['icon_text_3'] = '3DS版', ['icon_link_j'] = '前代主机版#日本发布版', ['icon_text_j'] = '日本主机版', }, }

-- l10n function to get plural form, it may be different for each language. If function for target language does not exist, the EN version is used. -- about the function itself: -- return plural form, nil if no pluralism processing occurs. -- _arg1 is the original text(without auto translation), _arg2 is custom text(without auto translation) or plural postfix, may be s/es/ies/ves (for english). -- the retruned result will be auto translated. local plural = { -- for English (en) ['en'] = function(_arg1, _arg2) -- intuitive pluralism -- The comparisons are performed in order, so putting the more common ones in front gives the best performance. if _arg2 == 's' then local suffix1 = _arg1:sub(-1) -- cache for better performance. local suffix2 = _arg1:sub(-2) -- cache for better performance. if suffix1 == 'y' then if suffix2 == 'ay' or suffix2 == 'ey' or suffix2 == 'iy' or suffix2 == 'oy' or suffix2 == 'uy' then return _arg1 .. 's'                -- eg. ray->rays else return _arg1:sub(1, -2) .. 'ies'   -- eg. firefly->fireflies end end if suffix2 == 'fe' and string.lower(_arg1) ~= 'safe' then return _arg1:sub(1, -3) .. 'ves'       -- eg. knife->knives end if suffix1 == 'f' and suffix2 ~= 'ff' then return _arg1:sub(1, -2) .. 'ves'       -- eg. wolf->wolves, leaf->leaves, but buff->buffs else return _arg1 .. 's'			end end

if _arg2 == 'es' then return _arg1 .. 'es' end

if _arg2 == 'ies' then return _arg1:sub(1, -2) .. 'ies' end

if _arg2 == 'ves' then if _arg1:sub(-2) == 'fe' then return _arg1:sub(1, -3) .. 'ves'   --replace last 2 letters, e.g. knife->knives end if _arg1:sub(-1) == 'f' or _arg1:sub(-2) ~= 'ff' then return _arg1:sub(1, -2) .. 'ves'   --replace last letter, e.g. wolf-wolves, leaf->leaves, but buff->buffs end end end,

-- for Chinese (zh) ['zh'] = function(_arg1, _arg2) -- there is no plural form in chinese. if _arg2 == 's' or _arg2 == 'es' or _arg2 == 'ies' or _arg2 == 'ves' then return _arg1 end return nil end,

-- for German (de) !! may need to be improved !! ['de'] = function(_arg1, _arg2) if _arg2 == 's' or _arg2 == 'es' or _arg2 == 'ies' or _arg2 == 'ves' then return _arg1 end return nil end,

-- for Italian (it) !! may need to be improved !! ['it'] = function(_arg1, _arg2) if _arg2 == 's' or _arg2 == 'es' or _arg2 == 'ies' or _arg2 == 'ves' then return _arg1 end return nil end,

}

--- The following is not related to l10n. --

local trim = mw.text.trim

local exclusive_info = mw.loadData( 'Module:exclusive/data' )

local currentFrame -- cache -- helper function local getArg = function(key) local value = trim(currentFrame.args[key] or '') return (value ~= '') and value or nil end

local function parameter(parameter, base) if parameter then if parameter == 'y' or parameter == 'yes' then return 'y'		end if parameter == 'n' or parameter == 'no' then return nil end end return base end

local function getText(_arg1, _arg2, lang, frame) if not _arg2 then return frame:expandTemplate{ title = 'tr', args = {_arg1, lang=lang} } -- auto translate end local plural_function = plural[lang] or plural['en'] or function end return frame:expandTemplate{ title = 'tr', args = {plural_function(_arg1, _arg2) or _arg2, lang=lang} } -- auto translate end

local getInfo = function(page, invert) -- standlize pagename. page = mw.getContentLanguage:ucfirst(string.gsub(string.gsub(page, '#.*', ''), '_', ' '))

local raw, ex_d, ex_c, ex_o, ex_m, ex_3, ex_j, cached = exclusive_info[page] if raw then ex_d, ex_c, ex_o, ex_m, ex_3, ex_j, cached = raw:find('d'),raw:find('c'),raw:find('o'),raw:find('m'),raw:find('3'),raw:find('j'), 'y'	end

-- invert? if invert then ex_d = not ex_d ex_c = not ex_c ex_o = not ex_o ex_m = not ex_m ex_3 = not ex_3 if ex_j then ex_j = false end end

return ex_d, ex_c, ex_o, ex_m, ex_3, ex_j, cached end

local eicons = function(ex_d, ex_c, ex_o, ex_m, ex_3, ex_j, _small, _link, lang) local link = '' local space = false local size local result = '' local l10n = l10n[lang] or l10n['en'] if ex_d then result = ''			space = true end if ex_c then result = result .. (space and '&thinsp;' or '') .. ''			space = true end if ex_o then result = result .. (space and '&thinsp;' or '') .. ''			space = true end if ex_m then result = result .. (space and '&thinsp;' or '') .. ''			space = true end if ex_3 then result = result .. (space and '&thinsp;' or '') .. ''			space = true end if ex_j then result = result .. (space and '&thinsp;' or '') .. ''		end return mw.text.tag('span',{class='eico'}, result) end

local getExclusiveInfo = function(page, invert) local ex_d, ex_c, ex_o, ex_m, ex_3, ex_j if page then ex_d, ex_c, ex_o, ex_m, ex_3, ex_j = getInfo(page, invert) end -- override ex_d = parameter(getArg('dsk'), ex_d) ex_c = parameter(getArg('cns'), ex_c) ex_o = parameter(getArg('old'), ex_o) ex_m = parameter(getArg('mbl'), ex_m) ex_3 = parameter(getArg('3ds'), ex_3) ex_j = parameter(getArg('jas'), ex_j)

return ex_d, ex_c, ex_o, ex_m, ex_3, ex_j end

-

return { -- for template, get all exclusive info, setting in dplvars. -- parameters: $1 = pagename, $lang = language, $autotr = apply auto translation on pagename? y/n getInfo = function(frame) currentFrame = frame -- cache local page = getArg(1) if not page then frame:callParserFunction{ name = '#dplvar:set', args = { 'ex_d', , 'ex_c', , 'ex_o', , 'ex_m', , 'ex_3', , 'ex_j', , 'ex_cached', '' } }			return end local ex_d, ex_c, ex_o, ex_m, ex_3, ex_j, cached = getInfo(page, getArg('invert')) frame:callParserFunction{ name = '#dplvar:set', args = { 'ex_d', ex_d and 'y' or '', 'ex_c', ex_c and 'y' or '', 'ex_o', ex_o and 'y' or '', 'ex_m', ex_m and 'y' or '', 'ex_3', ex_3 and 'y' or '', 'ex_j', ex_j and 'y' or '', 'ex_cached', cached and 'y' or '' } }	end,

-- for eicons = function(frame) currentFrame = frame -- cache local ex_d, ex_c, ex_o, ex_m, ex_3, ex_j = getExclusiveInfo(getArg(1), getArg('invert')) if not(ex_d or ex_c or ex_o or ex_m or ex_3 or ex_j) then return '' end return eicons(			ex_d, ex_c, ex_o, ex_m, ex_3, ex_j,			getArg('small'), getArg('link'), getArg('lang')		) end,

-- for other module such as Module:item, simple eicons: simpleEicons = function(page, lang, small, link) local ex_d, ex_c, ex_o, ex_m, ex_3, ex_j = getInfo(page) if not(ex_d or ex_c or ex_o or ex_m or ex_3 or ex_j) then return '' end return eicons(			ex_d, ex_c, ex_o, ex_m, ex_3, ex_j, 			small, link, lang		) end, -- for eil = function(frame) currentFrame = frame -- cache local lang = getArg('lang') local link = getArg('link') local text = getText(getArg(1), getArg(2), lang, frame) -- link part: if link and not getArg('nolink') then if link == text then text = ..text.. else text = ..text.. end end -- icons local ex_d, ex_c, ex_o, ex_m, ex_3, ex_j = getExclusiveInfo(getArg('epage') or link, getArg('invert')) if ex_d or ex_c or ex_o or ex_m or ex_3 or ex_j then text = text .. eicons(ex_d, ex_c, ex_o, ex_m, ex_3, ex_j, parameter(getArg('small'), true), getArg('iconlink'), lang) end return mw.text.tag('span',{class='eil'}, text) end,

-- for module:item and other modules. getText = getText, }