--
-- This module implements
-- {{NBA color cell}}, {{NBA color cell2}}
-- {{Euroleague color}}, {{Euroleague color cell}}, {{Euroleague color cell2}},
-- {{NBL colour}}, {{NBL colour cell}}, {{NBL colour cell2}},
-- {{PBA color}}, {{PBA color cell}}, {{PBA color cell2}},
-- {{European leagues color}}, {{European leagues color cell}}, {{European leagues color cell2}},
-- {{KBL color}}, {{KBL color cell}}, {{KBL color cell2}}
--
-- {{Baseball color}}, {{Baseball secondary color}},
-- {{Baseball primary style}}, {{Baseball secondary style}}
--
local p = {}
local data_module = 'Module:Sports color/basketball'
local function stripwhitespace(text)
return text:match("^%s*(.-)%s*$")
end
local function bordercss(c, w)
local s = 'inset ' .. w .. 'px ' .. w .. 'px 0 #' .. c
.. ', inset -' .. w .. 'px -' .. w .. 'px 0 #' .. c
return 'box-shadow: ' .. s .. ';'
end
local function get_colors(team, unknown)
team = stripwhitespace(team or '')
unknown = unknown or {"DCDCDC", "000000", "000000", "FFFFFF"}
local use_default = {
[""] = 1,
["retired"] = 1,
["free agent"] = 1,
}
local colors = nil
if ( team and use_default[team:lower()] ) then
colors = {"DCDCDC", "000000", "DCDCDC", "000000"}
else
local all_colors = mw.loadData(data_module .. '/sandbox')
colors = all_colors[team]
if ( colors and type(colors) == 'string' ) then
colors = all_colors[colors]
end
end
return colors or unknown
end
local function team_check(team, unknown)
local colors = get_colors(team, unknown)
if type(colors) == 'table' then
return 'known'
else
return unknown
end
end
local function team_color(team, num)
local colors = get_colors(team, nil)
num = tonumber(num:match('[1-4]') or '0')
if ( num ) then
return colors[num]
else
return ''
end
end
local function team_colorcell(team, borderwidth, bg, fg, bd, simple)
local colors = get_colors(team, nil)
local border = ''
borderwidth = borderwidth or ''
if (borderwidth ~= '') then
local bordercolor = stripwhitespace(colors[bd]) or 'FFFFFF'
if bordercolor ~= 'FFFFFF' then
if simple then
border = 'border: ' .. borderwidth .. 'px solid #' .. bordercolor .. ';'
else
border = bordercss(bordercolor, borderwidth)
end
end
end
return 'background-color: #' .. stripwhitespace(colors[bg]) .. '; color: #' .. stripwhitespace(colors[fg]) .. '; ' .. border
end
local function team_titlestripe(team, topc, botc, borderwidth)
local colors = get_colors(team, nil)
local border = ''
borderwidth = borderwidth or ''
if (borderwidth ~= '') then
local bordercolor = stripwhitespace(colors[topc]) or 'FFFFFF'
if bordercolor ~= 'FFFFFF' then
border = border .. 'border-top: ' .. borderwidth .. 'px solid #' .. bordercolor .. ';'
end
bordercolor = stripwhitespace(colors[botc]) or bordercolor
if bordercolor ~= 'FFFFFF' then
border = border .. 'border-bottom: ' .. borderwidth .. 'px solid #' .. bordercolor .. ';'
end
end
return 'background-color: #FFFFFF; ' .. border
end
local function team_cellborder(team, pri, sec, ter, borderwidth, simple)
local colors = get_colors(team, nil)
local border = ''
borderwidth = borderwidth or ''
if (borderwidth ~= '') then
local bordercolor = stripwhitespace(colors[pri] or colors[sec] or colors[ter]) or 'FFFFFF'
if bordercolor ~= 'FFFFFF' then
if simple then
border = 'border: ' .. borderwidth .. 'px solid #' .. bordercolor .. ';'
else
border = bordercss(bordercolor, borderwidth)
end
end
end
return 'background-color: #FFFFFF; ' .. border
end
function p.check(frame)
local args = (frame.args[1] ~= nil) and frame.args or frame:getParent().args
data_module = 'Module:Sports color/' .. (frame.args['sport'] or frame:getParent().args['sport'] or 'basketball')
return team_check(args[1] or '', args[2] or '')
end
function p.color(frame)
local args = (frame.args[1] ~= nil) and frame.args or frame:getParent().args
data_module = 'Module:Sports color/' .. (frame.args['sport'] or frame:getParent().args['sport'] or 'basketball')
return team_color(args[1] or '', args[2] or '')
end
function p.colorcell(frame)
local args = (frame.args[1] ~= nil) and frame.args or frame:getParent().args
data_module = 'Module:Sports color/' .. (frame.args['sport'] or frame:getParent().args['sport'] or 'basketball')
return team_colorcell(args[1] or '', args['border'] or '', 1, 2, 3, args['simple'] and 1 or nil )
end
function p.colorcell2(frame)
local args = (frame.args[1] ~= nil) and frame.args or frame:getParent().args
data_module = 'Module:Sports color/' .. (frame.args['sport'] or frame:getParent().args['sport'] or 'basketball')
return team_colorcell(args[1] or '', args['border'] or '', 3, 4, 1, args['simple'] and 1 or nil )
end
function p.titlestripe(frame)
local args = (frame.args[1] ~= nil) and frame.args or frame:getParent().args
data_module = 'Module:Sports color/' .. (frame.args['sport'] or frame:getParent().args['sport'] or 'ice hockey')
return team_titlestripe(args[1] or '', 1, 3, args['width'] or '5')
end
function p.cellborder(frame)
local args = (frame.args[1] ~= nil) and frame.args or frame:getParent().args
data_module = 'Module:Sports color/' .. (frame.args['sport'] or frame:getParent().args['sport'] or 'ice hockey')
return team_cellborder(args[1] or '', 3, 1, 4, args['width'] or '2', args['simple'] and 1 or nil )
end
function p.cellborder2(frame)
local args = (frame.args[1] ~= nil) and frame.args or frame:getParent().args
data_module = 'Module:Sports color/' .. (frame.args['sport'] or frame:getParent().args['sport'] or 'ice hockey')
return team_cellborder(args[1] or '', 4, 3, 1, args['width'] or '2', args['simple'] and 1 or nil )
end
return p
