Module:Mayor

local loader = require('Module:Loader') local getArgs = require('Module:Arguments').getArgs

local string, table, yesno = loader.require('String', 'Table', 'Yesno') local mayorData = loader.loadData('Mayor/Data')

local p = {}

local function getMayorLink(mayor) local d = mayorData.mayors[mayor] return ('%s'):format(		d and d.link or mayor, mayor	) end

-- For Template:Current Mayor function p.getCurrentMayor(frame) local args = getArgs(frame) local m = mayorData.currentMayor if args[1] == 'r' then return m end local d = mayorData.mayors[m] return mw.getCurrentFrame:preprocess(('%s'):format( d and d.link or m, m	)) end

-- For Template:MayorList function p.mayorList(frame) local args = getArgs(frame) return mw.getCurrentFrame:preprocess(p._mayorList(args[1])) end

function p._mayorList(_type) local function insertperks(t, perksTb, frontdent) for _, info in ipairs(perksTb) do			table.push(t, ('%s %s : %s'):format( frontdent, mayorData.linkedPerkNames[info[1]] or info[1], type(info[2]) == 'table' and '' or info[2] ))			if type(info[2]) == 'table' then for _, item in ipairs(info[2]) do					table.push(t, ('%s* %s'):format(frontdent, item)) end end end end local mayors = table.deepCopy(mayorData.mayors, true) if _type then mayors = table.filterNamed(mayors, function(k, v)			return v.type == string.lower(_type)		end) end local paragraphs = {} for k, v in table.sortedPairs(mayors) do		local lines_ = {} local frontdent = v.perks_listed and '**#' or '*#' if v.perks_listed then table.push(lines_, '**\'\'\'Listed Perks\'\'\':') insertperks(lines_, v.perks_listed, frontdent) table.push(lines_, ('**\'\'\'Actual Perks\'\'\': \'\'(hidden until %s is elected)\'\''):format(k)) end insertperks(lines_, v.perks, frontdent) table.push(paragraphs, table.concat({ ('*\'\'\'%s\'\'\' %s'):format(				getMayorLink(k), v.aka or ''			), unpack(lines_) }, '\n')) end return table.concat(paragraphs, '\n\n') end

-- For Template:ElectionTable function p.electionTable(frame) return mw.getCurrentFrame:preprocess(p._electionTable) end

function p.generatePerks(mayor, num) local function each(t, i, title, text) text = type(text) == 'table' and text or { text } table.push(t, string.wrapHtml{			i,			' ', {				class = 'minetip gemstone-slot',				style = { ['color'] = 'orange' },				['data-minetip-title'] = '&d&l' .. title,				['data-minetip-text'] = '&f' .. table.concat(table.map(text, function(tx)					return string.gsubAll(tx, '{', '&#123;', '}', '&#125;', '.*', '')				end), '/'),			}		}) end local allperks, t = mayorData.mayors[mayor].perks, {} if num:match('%*') then for i = 1, table.length(allperks) do			each(t, i, allperks[i][1], allperks[i][2]) end else for _, v in ipairs(string.split(num, '')) do			each(t, v, allperks[v][1], allperks[v][2]) end end return table.concat(t, ' ') end

function p._electionTable local dt, rows = mayorData.elections, {} local _date, _year = {}, {} for i = table.length(dt), 1, -1 do		local item = dt[i] local c = item.control or '' table.push(_date, item.date) table.push(_year, i)		if not c:match('collapsedown') then local y1, y2 = _year[1], _year[#_year] local tot, _other, _mayor, _votes, mayorName if item.result then tot, _other = 0, {} for _, v in pairs(item.result) do					tot = tot + v				end for k, v in table.sortedPairsByValue(item.result, function(a, b)					return a > b				end) do					if not _mayor then mayorName = k						_mayor = getMayorLink(mayorName) _votes = ('%s %s'):format(							():format(v / tot * 100),							():format(v)						) else table.push(_other, (' %s: %s %s '):format( getMayorLink(mayorName), (''):format(v / tot * 100), (''):format(v) ))					end end _other = table.concat(_other, ' ') else mayorName = item.mayor _mayor = mayorData.mayors[mayorName] _mayor = item.mayor and getMayorLink(mayorName) or nil _votes = (item.percent and item.votes) and ('%s %s'):format(					():format(item.percent),					():format(item.votes)				) or nil end local _perks = item.perks if _perks then local num, caption = _perks:match('([%d%*%?]+)(%(.-%))') if not num then num = _perks end if num:match('%?') then _perks = '' elseif mayorName then _perks = p.generatePerks(mayorName, num) else _perks = 'Perk ' .. table.concat(string.split(num, ''), ', ') end _perks = caption and ('%s %s'):format(_perks, caption) or _perks end table.push(rows, {				date = table.concat(_date, ' '),				year = y1 == y2 and y1 or ('%s-%s'):format(y2, y1),				mayor = _mayor,				votes = _votes,				perks = _perks,				other = _other,				control = c,			}) _date, _year = {}, {} end end local wikitable = mw.html.create('table'):addClass('article-table wikitable') wikitable:tag('tr'):tag('th'):wikitext('SkyBlock Year'):done :tag('th'):wikitext('Date*'):done :tag('th'):wikitext('Mayor'):done :tag('th'):wikitext('Votes'):done :tag('th'):wikitext('Perks'):done :tag('th'):wikitext('Other Candidates'):done local function g(val, control) return val or (control:match('novote') and  or ) end for _, v in ipairs(rows) do		wikitable:tag('tr'):tag('th'):wikitext(v.year):done :tag('td'):wikitext(v.date):done :tag('td'):wikitext(g(v.mayor, v.control)):done :tag('td'):wikitext(g(v.votes, v.control)):done :tag('td'):wikitext(g(v.perks, v.control)):done :tag('td'):wikitext(g(v.other, v.control)):done end return tostring(wikitable) end

return p