Module:ChartColors - Revision history

Pppery: Fix unintended global variable (and I wish people wouldn't stricten transitive dependencies to force this on me)

2025-02-22T18:35:12Z

Fix unintended global variable (and I wish people wouldn't stricten transitive dependencies to force this on me)

← Previous revision		Revision as of 18:35, 22 February 2025
Line 66:		Line 66:
	end		end
	else		else
	Count = 0		local Count = 0
	for i=StartN, MaxN, Step do		for i=StartN, MaxN, Step do
	table.insert(SelColors, Palet[i])		table.insert(SelColors, Palet[i])

Gonnym: require('strict')

2025-02-18T12:50:56Z

require('strict')

← Previous revision		Revision as of 12:50, 18 February 2025
Line 1:		Line 1:
			require('strict')
	local p = {}		local p = {}

Uzume: fix "OutlineColor" local

2023-02-10T21:16:28Z

fix "OutlineColor" local

← Previous revision		Revision as of 21:16, 10 February 2023
Line 141:		Line 141:
	local Labels = {}		local Labels = {}
	local NLabels = 0		local NLabels = 0
			local OutlineColor
	local IsTemplate = true		local IsTemplate = true
	ColorFound = p.GetColors (ColorName, IsInv, StartN, N, true)		ColorFound = p.GetColors (ColorName, IsInv, StartN, N, true)

Uzume: fix "Palet" local

2023-02-10T21:15:24Z

fix "Palet" local

← Previous revision		Revision as of 21:15, 10 February 2023
Line 41:		Line 41:
	error (I18nStr ('ColorNumInvalid',tostring(MaxN),tostring(N)))		error (I18nStr ('ColorNumInvalid',tostring(MaxN),tostring(N)))
	else		else
	Palet = {}		local Palet = {}
	if IsInv then		if IsInv then
	for i=MaxN, 1, -1 do		for i=MaxN, 1, -1 do

Uzume: localize some variables

2023-02-10T21:14:24Z

localize some variables

← Previous revision		Revision as of 21:14, 10 February 2023
Line 37:		Line 37:
	error (I18nStr ('ColorNameInvalid',ColorName))		error (I18nStr ('ColorNameInvalid',ColorName))
	end		end
	MaxN = table.getn(Palet0)		local MaxN = table.getn(Palet0)
	if (N < 0) or (N > MaxN) then		if (N < 0) or (N > MaxN) then
	error (I18nStr ('ColorNumInvalid',tostring(MaxN),tostring(N)))		error (I18nStr ('ColorNumInvalid',tostring(MaxN),tostring(N)))
Line 106:		Line 106:
	end --ColorNameInvStartFromS		end --ColorNameInvStartFromS

	function ColorNameInv (args)		local function ColorNameInv (args)
	local S = args[1] or ''		local S = args[1] or ''
	local ColorName, IsInv, ParamsA = CFCM.ColorNameInvFromS0 (S)		local ColorName, IsInv, ParamsA = CFCM.ColorNameInvFromS0 (S)

ProcrastinatingReader: not used? Wikipedia_talk%3ALua#Help_find_and_remove_a_testing_module

2020-07-23T12:01:39Z

not used? Wikipedia_talk:Lua#Help_find_and_remove_a_testing_module

← Previous revision		Revision as of 12:01, 23 July 2020
Line 4:		Line 4:
	local CFCM = require "Module:ComplForColorModules"		local CFCM = require "Module:ComplForColorModules"
	local TNTT = require "Module:TNTTools"		local TNTT = require "Module:TNTTools"
	local SD = require "Module:SimpleDebug"		--local SD = require "Module:SimpleDebug"

	local I18n = 'ChartColors'		local I18n = 'ChartColors'

Pppery at 23:35, 9 December 2019

2019-12-09T23:35:31Z

← Previous revision		Revision as of 23:35, 9 December 2019
Line 143:		Line 143:
	local IsTemplate = true		local IsTemplate = true
	ColorFound = p.GetColors (ColorName, IsInv, StartN, N, true)		ColorFound = p.GetColors (ColorName, IsInv, StartN, N, true)
	Labels, NLabels, OutlineColor = CFCM.GetLabels (args~~, Nargs~~, N, 4)		Labels, NLabels, OutlineColor = CFCM.GetLabels (args, N, 4)
	return CFCM.LegendText (ColorFound, Labels, NLabels, ColWidth, IsTemplate, OutlineColor)		return CFCM.LegendText (ColorFound, Labels, NLabels, ColWidth, IsTemplate, OutlineColor)
	end		end

Pppery at 04:53, 9 December 2019

2019-12-09T04:53:33Z

← Previous revision		Revision as of 04:53, 9 December 2019
Line 119:		Line 119:
	});		});
	local ColorName, IsInv, StartN = ColorNameInv (args)		local ColorName, IsInv, StartN = ColorNameInv (args)
	local N = ~~tonum~~(args[2])		local N = tonumber(args[2])
	local WriteColor = args[3] or ""		local WriteColor = args[3] or ""
	local ColorFound = {}		local ColorFound = {}

Pppery: Replace usage of module being deleted

2019-12-09T04:52:53Z

Replace usage of module being deleted

← Previous revision		Revision as of 04:52, 9 December 2019
Line 1:		Line 1:
	local p = {}		local p = {}

	local SA = require "Module:~~SimpleArgs~~"		local ARG = require "Module:Arguments"
	local CFCM = require "Module:ComplForColorModules"		local CFCM = require "Module:ComplForColorModules"
	local TNTT = require "Module:TNTTools"		local TNTT = require "Module:TNTTools"
Line 90:		Line 90:
	local StartN = 1		local StartN = 1
	local ParamsA = {}		local ParamsA = {}
	function GetStartN (Pos)
	SA.CheckSIsPosInt (ParamsA[Pos])
	if SA.Error.yes then
	p.MsgError()
	else
	StartN = tonumber (ParamsA[Pos])
	end
	end
	local ColorName, IsInv		local ColorName, IsInv
	ColorName, IsInv, ParamsA = CFCM.ColorNameInvFromS0 (S)		ColorName, IsInv, ParamsA = CFCM.ColorNameInvFromS0 (S)
Line 105:		Line 97:
	IsInv = true		IsInv = true
	else		else
	~~GetStartN~~ (2)		StartN = tonumber (ParamsA[2])
	end		end
	if PN == 3 then		if PN == 3 then
	~~GetStartN~~ (3)		StartN = tonumber (ParamsA[3])
	end		end
	end		end
Line 123:		Line 115:

	function p.ShowColors(frame)		function p.ShowColors(frame)
	local args~~,Nargs~~ = SA.~~GetArgs~~ (frame)		local args = ARG.getArgs(frame,{
			removeBlanks = false
	if Nargs > 0 then
			});
	local ColorName, IsInv, StartN = ColorNameInv (args)
	local N = ~~SA.RPosInt_Par~~ (args~~, 2~~)		local ColorName, IsInv, StartN = ColorNameInv (args)
	local ~~WriteColor~~ = ~~SA.Char_Par~~ (args~~, 3, 'a-', ''~~)		local N = tonum(args[2])
	local ~~ColorFound~~ = {}		local WriteColor = args[3] or ""
	ColorFound = p.GetColors (ColorName, IsInv, StartN, N, true)		local ColorFound = {}
			ColorFound = p.GetColors (ColorName, IsInv, StartN, N, true)
	local boxes = {}		local boxes = {}
	for i=1, table.getn(ColorFound) do		for i=1, table.getn(ColorFound) do
	table.insert(boxes, CFCM.Box(ColorFound[i],WriteColor))		table.insert(boxes, CFCM.Box(ColorFound[i],WriteColor))
	end
⚫	return table.concat(boxes, " ")
	end		end
		⚫	return table.concat(boxes, " ")
	end --ShowColors		end --ShowColors

	function p.Legends(frame)		function p.Legends(frame)
	local args~~,Nargs~~ = SA.~~GetArgs~~ (frame)		local args = ARG.getArgs(frame,{
			removeBlanks = false
	if Nargs > 0 then
			})
	local ColorName, IsInv, StartN = ColorNameInv (args)
	local N = SA.~~RPosInt_Par~~ (args~~, 2~~)		local Nargs = require("Module:TableTools").length(args)
	local ~~ColWidth~~ = args~~[3]~~		local ColorName, IsInv, StartN = ColorNameInv (args)
	local ~~ColorFound~~ = {}		local N = tonumber(args[2])
	local ~~Labels~~ = {}		local ColWidth = args[3]
	local ~~NLabels~~ = 0		local ColorFound = {}
	local ~~IsTemplate~~ = ~~true~~		local Labels = {}
			local NLabels = 0
⚫	ColorFound = p.GetColors (ColorName, IsInv, StartN, N, true)
			local IsTemplate = true
⚫	Labels, NLabels, OutlineColor = CFCM.GetLabels (args, Nargs, N, 4)
		⚫	ColorFound = p.GetColors (ColorName, IsInv, StartN, N, true)
⚫	return CFCM.LegendText (ColorFound, Labels, NLabels, ColWidth, IsTemplate, OutlineColor)
		⚫	Labels, NLabels, OutlineColor = CFCM.GetLabels (args, Nargs, N, 4)
	end
		⚫	return CFCM.LegendText (ColorFound, Labels, NLabels, ColWidth, IsTemplate, OutlineColor)
	end		end

Pppery: Please stop attempting to overturn consensus

2019-11-12T20:05:37Z

Please stop attempting to overturn consensus

← Previous revision		Revision as of 20:05, 12 November 2019
Line 143:		Line 143:
	local ColorName, IsInv, StartN = ColorNameInv (args)		local ColorName, IsInv, StartN = ColorNameInv (args)
	local N = SA.RPosInt_Par (args, 2)		local N = SA.RPosInt_Par (args, 2)
	local ~~NCols~~ = ~~SA.RPosInt_Par (~~args, 3~~, 1, 10)~~		local ColWidth = args[3]
	local ColorFound = {}		local ColorFound = {}
	local Labels = {}		local Labels = {}
Line 150:		Line 150:
	ColorFound = p.GetColors (ColorName, IsInv, StartN, N, true)		ColorFound = p.GetColors (ColorName, IsInv, StartN, N, true)
	Labels, NLabels, OutlineColor = CFCM.GetLabels (args, Nargs, N, 4)		Labels, NLabels, OutlineColor = CFCM.GetLabels (args, Nargs, N, 4)
	return CFCM.LegendText (ColorFound, Labels, NLabels, ~~NCols~~, IsTemplate, OutlineColor)		return CFCM.LegendText (ColorFound, Labels, NLabels, ColWidth, IsTemplate, OutlineColor)
	end		end
	end		end