Module:Infobox weather event/scalebar - Revision history

Chlod: basin support

2023-06-23T03:41:33Z

basin support

← Previous revision		Revision as of 03:41, 23 June 2023
Line 14:		Line 14:
	function p._main(frame, args)		function p._main(frame, args)
	local infoboxScale = args["scale"]		local infoboxScale = args["scale"]
			local basin = args["basin"]

	function getCategory(winds)		function getCategory(winds)
	templateArgs = {		templateArgs = {
	categoryonly = "y",		categoryonly = "y",
	winds = winds		winds = winds,
			basin = basin
	}		}
	return frame:expandTemplate{ title = 'Infobox weather event/' .. infoboxScale, args = templateArgs }		return frame:expandTemplate{ title = 'Infobox weather event/' .. infoboxScale, args = templateArgs }

Chlod: pass basin data

2023-01-22T04:00:51Z

pass basin data

← Previous revision		Revision as of 04:00, 22 January 2023
Line 20:		Line 20:
	winds = winds		winds = winds
	}		}
	for k, v in pairs(args) do
	if k ~= "scale" then
	templateArgs[k] = v
	end
	end
	return frame:expandTemplate{ title = 'Infobox weather event/' .. infoboxScale, args = templateArgs }		return frame:expandTemplate{ title = 'Infobox weather event/' .. infoboxScale, args = templateArgs }
	end		end
Line 58:		Line 53:
	:css("text-align", "center")		:css("text-align", "center")
	:css("background-color", "#" .. cats._color(category))		:css("background-color", "#" .. cats._color(category))
	:wikitext("'''" .. cats._name(category) .. "'''<br/>")		:wikitext("'''" .. cats._name(category, args['basin']) .. "'''<br/>")

	local windsCell = mw.html.create("td")		local windsCell = mw.html.create("td")

Chlod: direct pass all arguments

2023-01-17T02:36:17Z

direct pass all arguments

← Previous revision		Revision as of 02:36, 17 January 2023
Line 20:		Line 20:
	winds = winds		winds = winds
	}		}
	if args~~["args"]~~ ~~then~~		for k, v in pairs(args) do
			if k ~= "scale" then
	function mergeArgs()
		⚫	templateArgs[k] = v
	for k, v in pairs(mw.text.jsonDecode(mw.text.decode(args["args"], true))) do
⚫	templateArgs[k] = v
	end
	end

	if not pcall(mergeArgs) then
	error("Failed to parse JSON: " .. args["args"])
	end		end
	end		end

Chlod: add args thing

2022-04-06T03:04:58Z

add args thing

← Previous revision		Revision as of 03:04, 6 April 2022
Line 16:		Line 16:

	function getCategory(winds)		function getCategory(winds)
			templateArgs = {
⚫	return frame:expandTemplate{ title = 'Infobox weather event/' .. infoboxScale, args = {
	categoryonly = "y",		categoryonly = "y",
	winds = winds		winds = winds
	} }		}
			if args["args"] then
			function mergeArgs()
			for k, v in pairs(mw.text.jsonDecode(mw.text.decode(args["args"], true))) do
			templateArgs[k] = v
			end
			end

			if not pcall(mergeArgs) then
			error("Failed to parse JSON: " .. args["args"])
			end
			end
		⚫	return frame:expandTemplate{ title = 'Infobox weather event/' .. infoboxScale, args = templateArgs }
	end		end

Line 28:		Line 40:
	for i = 0, 140 do		for i = 0, 140 do
	local category = getCategory(i)		local category = getCategory(i)
	mw.logObject(category)
	if category ~= last then		if category ~= last then
	if last == start then		if last == start then

Chlod: fix unclosed italics per Module talk:Infobox weather event/scalebar#Unclosed italics lint error

2022-03-22T20:10:40Z

fix unclosed italics per Module talk:Infobox weather event/scalebar#Unclosed italics lint error

← Previous revision		Revision as of 20:10, 22 March 2022
Line 61:		Line 61:
	windsCell:wikitext(		windsCell:wikitext(
	"''" .. minimumWinds .. "–" .. maximumWinds .. " kn, "		"''" .. minimumWinds .. "–" .. maximumWinds .. " kn, "
	.. math.floor(minKmh) .. "–" .. math.floor(maxKmh) .. " km/h'', "		.. math.floor(minKmh) .. "–" .. math.floor(maxKmh) .. " km/h, "
	.. math.floor(minMph) .. "–" .. math.floor(maxMph) .. " mph''"		.. math.floor(minMph) .. "–" .. math.floor(maxMph) .. " mph''"
	)		)

Chlod: creating automatic scale bar for scale infobox documentation

2022-03-20T03:31:01Z

creating automatic scale bar for scale infobox documentation

New page

local getArgs = require('Module:Arguments').getArgs
local cats = require('Module:Storm categories')

local p = {}

function p.main(frame)
local args = getArgs(frame, {
trim = true
})

return p._main(frame, args)
end

function p._main(frame, args)
local infoboxScale = args["scale"]

function getCategory(winds)
return frame:expandTemplate{ title = 'Infobox weather event/' .. infoboxScale, args = {
categoryonly = "y",
winds = winds
} }
end

local steps = {}
local start = getCategory(0)
local last = start
local lastMinimum = 0
for i = 0, 140 do
local category = getCategory(i)
mw.logObject(category)
if category ~= last then
if last == start then
-- first category
table.insert(steps, { last, nil, i - 1 })
else
table.insert(steps, { last, lastMinimum, i - 1 })
end

last = category
lastMinimum = i
end
end
table.insert(steps, { last, lastMinimum, nil })

function barCell(category, minimumWinds, maximumWinds)
local minKmh = minimumWinds and (1.852 * minimumWinds) or nil
local minMph = minimumWinds and (1.151 * minimumWinds) or nil

local maxKmh = maximumWinds and (1.852 * maximumWinds) or nil
local maxMph = maximumWinds and (1.151 * maximumWinds) or nil

local nameCell = mw.html.create("td")
:css("text-align", "center")
:css("background-color", "#" .. cats._color(category))
:wikitext("'''" .. cats._name(category) .. "'''<br/>")

local windsCell = mw.html.create("td")
:css("text-align", "center")
:css("vertical-align", "top")
if minimumWinds ~= nil and maximumWinds ~= nil then
windsCell:wikitext(
"''" .. minimumWinds .. "–" .. maximumWinds .. " kn, "
.. math.floor(minKmh) .. "–" .. math.floor(maxKmh) .. " km/h'', "
.. math.floor(minMph) .. "–" .. math.floor(maxMph) .. " mph''"
)
elseif minimumWinds == nil then
windsCell:wikitext(
"''<" .. maximumWinds .. " kn, <"
.. math.floor(maxKmh) .. " km/h, <" .. math.floor(maxMph) .. " mph''"
)
elseif maximumWinds == nil then
windsCell:wikitext(
"''>" .. minimumWinds .. " kn, >"
.. math.floor(minKmh) .. " km/h, >" .. math.floor(minMph) .. " mph''"
)
end

return { nameCell, windsCell }
end

local nameBar = mw.html.create("tr")
local windsBar = mw.html.create("tr")
for i, v in ipairs(steps) do
local cells = barCell(v[1], v[2], v[3])
nameBar:node(cells[1])
windsBar:node(cells[2])
end

return tostring(
mw.html.create("table")
:addClass("wikitable")
:css("width", "100%")
:node(nameBar)
:node(windsBar)
)
end

return p