Xenharmonic Wiki

Module:MOS modes: Difference between revisions

← Older edit
Ganaram inukshuk (talk | contribs)
autopatrolled, emailconfirmed
6,211 edits
change main function to take a table of args, instead of passing each one in one by one; rewrite to re-add mode names and other info still wip
Ganaram inukshuk (talk | contribs)
autopatrolled, emailconfirmed
6,211 edits
force-collapse, following nick vucis recommendation on not sponsoring mode names
 
(14 intermediate revisions by the same user not shown)
Line 1: Line 1:
local getArgs = require("Module:Arguments").getArgs
local p = {}
local mos     = require("Module:MOS")
 
local rat     = require("Module:Rational")
local mos = require("Module:MOS")
local rat = require("Module:Rational")
local tamnams = require("Module:TAMNAMS")
local tamnams = require("Module:TAMNAMS")
local tip     = require("Module:Template input parse")
local tip = require("Module:Template input parse")
local utils   = require("Module:Utils")
local utils = require("Module:Utils")
local yesno   = require("Module:Yesno")
local yesno = require("Module:Yesno")
 
local p = {}


-- TODO:
-- TODO:
-- - Add ability to autocollapse on large mos pages (say, more than 12 modes)
-- - Add ability to autocollapse on large mos pages (say, more than 12 modes)
-- - Drop/replace delimiter-based mode name input; it's harder to maintain
-- Extract column info
-- Mode numbering is by BRIGHT GENS DOWN PER PERIOD
-- Nothing is returned; instead, args is modified
function p.preprocess_entries(num_modes, args, col_name)
local col_name = col_name or ""
local col_data = {}
local is_col_empty = true
for i = 1, num_modes do
-- Put together key, then use it to get data from args
local bright_gens_down = i - 1
local key = string.format("%sD", bright_gens_down) .. (col_name ~= "" and string.format(" %s", col_name) or "")
local cell = args[key] or ""
cell = utils.trim(cell)
-- Then transfer data to col_data
table.insert(col_data, cell)
-- Then remove data from args
args[key] = nil
-- Check whether data was present; absence of data is expressed as an
-- empty string.
is_col_empty = is_col_empty and cell == ""
end
if not is_col_empty then
args[string.format("%s Entries", col_name)] = col_data
end
end


-- "Main" function
-- "Main" function
-- To be called by wrapper
-- To be called by wrapper
function p._mos_modes(args)
function p._mos_modes(input_mos, mode_names, headers, entries, is_collapsed)
local is_collapsed = args["Is Collapsed"] == true
local is_collapsed = true
local input_mos   = args["Input MOS"] or mos.new(5,2)
local input_mos = input_mos or mos.new(5,2)
local mode_names   = {}
local mode_names = mode_names or {}
local headers     = {}
local headers = headers or {}
local entries     = {}
local entries = entries or {}
-- Get UDPs and CPOs
-- Get UDPs and CPOs
Line 129: Line 96:
-- Wrapper function; to be called by template
-- Wrapper function; to be called by template
function p.modes_table(frame)
function p.modes_table(frame)
local args = getArgs(frame)
local scale_sig = frame.args["Scale Signature"] or "5L 2s"
-- Process scalesig to input mos
local scale_sig = args["Scale Signature"] or "5L 2s"
local input_mos = mos.parse(scale_sig)
local input_mos = mos.parse(scale_sig)
args["Scale Signature"] = nil
-- Get collapse options
args["Collapsed"] = yesno(args["Collapsed"], false)
-- Get mode names entered
--if #frame.args["Mode Names"] ~= 0 then
-- mode_names = tip.parse_entries(frame.args["Mode Names"], "$")
--end
-- Get the mos's mode names, if given
-- Get the mos's mode names, if given
-- Mode names are entered as a semicolon-delimited list
-- Mode names are entered as a semicolon-delimited list
-- 5L 2s gets default names
-- 5L 2s gets default names
--[[
local mode_names = nil
local mode_names = nil
if scale_sig == "5L 2s" then
if scale_sig == "5L 2s" then
Line 160: Line 114:
}
}
end
end
]]--
-- Get mode names entered
if #frame.args["Mode Names"] ~= 0 then
mode_names = tip.parse_entries(frame.args["Mode Names"], "$")
end


-- Get supplementary info
-- Get supplementary info
--local headers_unparsed = frame.args["Table Headers"]
local headers_unparsed = frame.args["Table Headers"]
--local headers = tip.parse_entries(headers_unparsed, "$")
local headers = tip.parse_entries(headers_unparsed, "$")
--local entries_unparsed = frame.args["Table Entries"]
local entries_unparsed = frame.args["Table Entries"]
--local entries = tip.parse_entries(entries_unparsed, "$")
local entries = tip.parse_entries(entries_unparsed, "$")
 
local is_collapsed = yesno(frame.args["Collapsed"], false)
local result = p._mos_modes(args)
local debugg = yesno(frame.args["debug"])
local result = p._mos_modes(input_mos, mode_names, headers, entries, is_collapsed)
-- Current means of adding entries is unmaintainable; to be deprecated.
-- Current means of adding entries is unmaintainable; to be deprecated.
Line 176: Line 135:
-- Debugger option
-- Debugger option
local debugg = yesno(args["debug"])
if debugg == true then
if debugg == true then
result = "<syntaxhighlight lang=\"wikitext\">" .. result .. "</syntaxhighlight>"
result = "<syntaxhighlight lang=\"wikitext\">" .. result .. "</syntaxhighlight>"
Line 182: Line 140:
return frame:preprocess(result)
return frame:preprocess(result)
end
-- Tester
function p.tester()
local args = {
["0D Name"] = "AAA",
["1D Name"] = "BBB",
["2D Name"] = "CCC",
["3D Name"] = "DDD"
}
p.preprocess_entries(5, args, "Name")
return args
end
end


return p
return p
Retrieved from "https://en.xen.wiki/w/Module:MOS_modes"