Module:沙盒/盐棋/Sandbox:修订间差异

来自Arcaea中文维基
(haskell)
(expandTemplate)
 
(未显示同一用户的20个中间版本)
第1行: 第1行:
local getArgs = require 'Module:Arguments'.getArgs
-- local link = require 'Module:Link'._link
local mad = require 'Module:AnotherData'
local lang = mw.language.getContentLanguage()
local p = {}
local p = {}
local stream = require "Module:stream"
 
function opt(format, value, default)
local bgLinkF = '[[:分类:采用%s背景的曲目|%s]]'
default = default or ""
local bgCatF = '采用%s背景的曲目'
return value and format:format(tostring(value)) or default
local function array(...) return setmetatable({...}, {__index = table}) end
local function onlySupScript(s) return mw.getCurrentFrame():expandTemplate {title = '仅', args = {s, '', '图片角标'}} end
local function vdValidation(v, d) return v and d and {v, d} end
local function labelText(text) return mw.html.create 'span':addClass 'bg-c label':wikitext(text) end
local br = mw.html.create 'br'
local function dateCov(dateBox, data, plat)
if not data then return end
local version, date = unpack(data)
dateBox:tag 'div':node(labelText(plat)):node(br):wikitext(version):node(br):wikitext('(', date, ')'):done()
end
local function span(len) if len > 1 then return 'gc-s' .. len end end
 
-- .container
-- .img-tab#tab-a
-- .img-tab-part.{cls} * n
-- {text}
-- .tab-text-a.active? * n
-- {file}[画师]{jacket}
---@param view table<integer,table<integer,string>>
---@param activeIdx integer?
---@return table
local function createContainer(view, activeIdx)
activeIdx = activeIdx or 1
local container = mw.html.create 'div':addClass 'container'
local tab = container:tag 'div':addClass 'img-tab':attr('id', 'tab-a')
for _, v in ipairs(view) do
local text, cls = v[1], v[2] or 'normal'
tab:tag 'div':wikitext(text):addClass 'img-tab-part':addClass(cls):done()
end
for idx, v in ipairs(view) do
local file, jacket = v[3], v[4]
container
:tag 'div':addClass 'tab-text-a':addClass(idx == activeIdx and 'active' or nil)
:wikitext('[[文件:', file, '|', 256, 'px|none]]')
:node(labelText '画师')
:wikitext(jacket)
:done()
end
return container
end
end
function p.entry(info)
local function getImage(args, song)
if not string.find(info.duration, ":") then
local id = song and song.id
info.duration = mw.language.getContentLanguage():formatDate("i:s", "@" .. math.floor(tonumber(info.duration)))
local argPic = args['图片'] or args['曲绘']
local argArtist = args['画师']
if args['Beyond画师'] then
return createContainer {
{'Normal', nil, argPic, argArtist},
{'Beyond', 'byd', args['Beyond曲绘'], args['Beyond画师']},
}
end
end
for i = 1, 4 do info.ratings[i] = opt("%s", info.ratings[i], "/") end
return mw.html.create 'div'
return ("|-\n|%s||[[文件:Songs %s.jpg|75px]]||%s||%s||%s||%s||%s||%s"):format(
:wikitext('[[文件:', id and ('Songs ' .. id .. '.jpg') or argPic, '|', 256, 'px|none]]')
table.concat(info.plat), info.id,
:node(labelText '画师')
"[[" .. info.title .. "]]" .. opt('<br /><span lang="ja">-{%s}-</span>', info.title2),
:wikitext(argArtist)
info.artist, info.pack,
end
opt("data-sort-value=%s|", info.bpm_base) .. info.bpm,
local function tabCustom(args)
info.duration, table.concat(info.ratings, "||")
local i = 1
)
local res = array()
while args['tab' .. i] do
res:insert {mw.ustring.match(args['tab' .. i], '([^/]*)/([^/]*)/([^/]*)/(.*)')}
i = i + 1
end
return res, args['默认图片序号']
end
local function merge(charts, field)
local res = array()
local cur, len = charts[1][field], 1
for _, c in ipairs {}, charts, 1 do
local e = c[field]
if e == cur then
len = len + 1
else
res:insert {cur, len}
cur = e
len = 1
end
end
res:insert {cur, len}
return res
end
local function getSet(sm, sns)
--% 要求名字相同
local qm, qns = mad.packQueryWrap(sm and sm.set, 'mobile'), mad.packQueryWrap(sns and sns.set, 'ns')
local namem, namens = qm.section ~= 'unknown' and qm.name or nil, qns.section ~= 'unknown' and qns.name or nil
local name = namem or namens
if not name then return nil end
local res = {name}
if namens and namens ~= name then table.insert(res, namens .. onlySupScript 'NS版') end
if #res > 1 then res[1] = res[1] .. onlySupScript '移动版' end
return table.concat(res, '<br>')
end
-- TODO:displaytitle lowercase
local function getById(list, id)
for _, k in ipairs(list) do if k.id == id then return k end end
end
local function getByTitle(list, title)
for _, k in ipairs(list) do if k.title_localized.en == title then return k end end
end
end
local function auto(args)
local category = {}
local function addCategory(item)
table.insert(category, '[[分类:' .. item .. ']]')
end
local notice = {}
--% "曲名"必存在,"id"必非空串
local songKey, getDatum = args['id'], getById
if not songKey then songKey, getDatum = mw.text.decode(args['曲名']), getByTitle end
local lm, lns
if args['愚人节'] then
lm, lns = mad.listOfReserve(), array()
elseif songKey == 'Last' then
lm, lns = mad.listOfReserve(), mad.listOfReserve()
else
lm, lns = mad.listOf('songs', 'mobile'), mad.listOf('songs', 'ns')
end
local sm, sns = getDatum(lm, songKey), getDatum(lns, songKey)
--% 可能平台不一致
local set = args['曲包'] or getSet(sm, sns)
local platCode = (sm and 1 or 0) + (sns and 2 or 0)
local song = sm or sns
if not (sns and sns ~= song) then sns = {difficulties = array()} end
if not song then
notice.data = true
song = mad.listOfReserve()[1]
song.title_localized.en = songKey
end


local box = mw.html.create 'div':addClass 'infotable'
local header = box:tag 'div':addClass 'header bg-c fs-l':wikitext(song.title_localized.en)
if song.title_localized.ja then header:node(br):node 'span':attr {lang = 'ja'}:wikitext(song.title_localized.ja) end
if song.title_localized['zh-Hans'] then header:node(br):wikitext(song.title_localized['zh-Hans']) end
box:tag 'div':addClass 'figure central':node(args['tab1'] and createContainer(tabCustom(args)) or getImage(args, song))
--% :create''
local main = box:tag 'div':addClass 'main'
addCategory(({'移动版曲目', 'NS版曲目', '双平台曲目'})[platCode])
local sideCode = (tonumber(args['侧']) or song.side) + 1
box:addClass(({'light', 'conflict', 'colorless'})[sideCode])
addCategory(({'光芒侧曲目', '纷争侧曲目', '消色侧曲目'})[sideCode])
local colTags = array()
for idx, diff in ipairs(song.difficulties) do
colTags[idx] = diff['@tag'] or ({[0] = 'Past', 'Present', 'Future', 'Beyond', 'Eternal'})[diff.ratingClass]
end
main:addClass('repeat-' .. #colTags)
local artist = args['编曲'] or args['曲师'] or song.artist
if not set then notice.pack = true end
-- addCategory %set曲包曲目
local duration = args['时长']
if not duration then notice.duration = true end
local bpm = args['BPM'] or song.bpm
main:tag 'div':addClass 'gc-1 bg-c fs-m':wikitext '曲目信息'
for _, v in ipairs {{'曲师', artist}, {'曲包', set}, {'时长', duration}, {'BPM', bpm},} do
local tag, data = unpack(v)
main:tag 'div':addClass 'bg-c central':wikitext(tag):done()
:tag 'div':addClass 'gc-2':wikitext(data)
end
local bg = args['背景'] or song.bg
if bg then addCategory(bgCatF:format(bg)) end
local vd = vdValidation(args['更新版本'], args['更新时间'])
if not vd then notice.vd = true end
local vdNS
if sns.id then
vdNS = vdValidation(args['更新版本NS'], args['更新时间NS'])
if not vdNS then notice.vd = true end
end
local charts = array()
--% 假定ns难度序列是主难度序列的前缀
for idx, tag in ipairs(colTags) do
local chart = {}
charts:insert(chart)
local diff = song.difficulties[idx]
local class = ({[0] = 'PST', 'PRS', 'FTR', 'BYD', 'ETR'})[diff.ratingClass]
local function chartBasic(df, vd_, s)
chart['rating' .. s] = args[tag .. '等级' .. s] or (df.rating .. (df.ratingPlus and '+' or ''))
chart['note' .. s] = args[tag .. 'Note' .. s]
chart['vdOverride' .. s] = vdValidation(args[tag .. '更新版本' .. s], args[tag .. '更新时间' .. s])
if df.date and not chart['vdOverride' .. s] then notice.vd = true end
chart['vdOverride' .. s] = chart['vdOverride' .. s] or vd_
end
chartBasic(diff, vd, '')
if not chart.note then notice.note = true end
chart.display = ('<b class="text-%s">[%s]</b>'):format(lang:lc(class), tag)
addCategory(class .. chart.rating .. '级曲目')
chart.designer = args[tag .. 'Note编写'] or args['note编写'] or diff.chartDesigner
chart.bgOverride = args[tag .. '背景'] or diff.bg
if chart.bgOverride then addCategory(bgCatF:format(chart.bgOverride)) end
chart.bgOverride = chart.bgOverride or bg
if diff.title_localized then header:node(br):wikitext(diff.title_localized.en, ' ', chart.display) end
local diffNS = sns.difficulties[idx]
if diffNS then
chartBasic(diffNS, vdNS, 'NS')
if diffNS.has_controller_alt_chart then
notice.alt = true
if not chart.noteNS then notice.note = true end
end
if chart.ratingNS and chart.ratingNS ~= chart.rating then
notice.ratingDiffer = true
end
end
end
main:tag 'div':addClass 'gc-1 bg-c fs-m':wikitext '谱面信息'
main:tag 'div':addClass 'bg-c central':wikitext '难度'
for _, c in ipairs(charts) do
main:tag 'div':addClass 'central fd-c':wikitext(c.display,
not notice.ratingDiffer and not c.ratingNS and '仅移动版' or nil)
end
main:tag 'div':addClass 'bg-c central':wikitext '等级'
for _, c in ipairs(charts) do
main:tag 'div':wikitext(c.rating)
end
main:tag 'div':addClass 'bg-c central':wikitext 'note数量'
for _, c in ipairs(charts) do
main:tag 'div':wikitext(c.note)
end
main:tag 'div':addClass 'bg-c central':wikitext '谱面设计'
for _, tp in ipairs(merge(charts, 'designer')) do
local data, len = unpack(tp)
main:tag 'div':addClass(span(len)):wikitext(data)
end
if notice.ratingDiffer then
main:tag 'div':addClass 'bg-c central':wikitext '等级NS'
for _, c in ipairs(charts) do
main:tag 'div':wikitext(c.ratingNS)
end
end
if notice.alt then
addCategory '多模式谱面有差异的曲目'
main:tag 'div':addClass 'bg-c central':wikitext 'note数量<br>(Joy-Con)'
for _, c in ipairs(charts) do
main:tag 'div':wikitext(c.noteNS)
end
end
main:tag 'div':addClass 'bg-c central':wikitext '背景'
for _, tp in ipairs(merge(charts, 'bgOverride')) do
local data, len = unpack(tp)
main:tag 'div':addClass(span(len)):wikitext(data and bgLinkF:format(data, data))
end
main:tag 'div':addClass 'bg-c central':addClass(platCode == 3 and 'gr-s2' or nil):wikitext '更新时间'
for _, tp in ipairs(merge(charts, 'vdOverride')) do
local data, len = unpack(tp)
dateCov(main:tag 'div':addClass(span(len)), data, '移动版')
end
if platCode == 3 then
for _, tp in ipairs(merge(charts, 'vdOverrideNS')) do
local data, len = unpack(tp)
dateCov(main:tag 'div':addClass(span(len)), data, 'NS版')
end
end
local noticeText = ''
for _, v in ipairs {
{'data', '在Songlist中无法检查到此曲目。请尝试更新[[模板:Songlist]],检查页面名或填写正确的<code>曲名</code>参数。'},
{'duration', '此模板缺少<code>时长</code>参数,此参数无法自动读取。'},
{'pack', '未更新Packlist。曲目信息模板无法进行曲包分类。'},
{'vd', '此模板的更新版本是未完整状态。请添加<code>更新版本</code>与<code>更新时间</code>参数。'},
{'note', '此模板缺少某种<code>Note</code>参数,此参数无法自动读取。'},
} do
local msg, text = unpack(v)
if notice[msg] then noticeText = noticeText .. text end
end
if noticeText ~= '' then
noticeText = mw.getCurrentFrame():expandTemplate {title = 'Collapse', args = {['标题'] = '曲目信息模板提示信息', ['状态'] = '折叠',
['标题文字方向'] = 'center', ['标题颜色'] = '#dddddd',
['内容颜色'] = '#eeeeee', ['内容样式'] = 'width:800px',
['style'] = 'display:table;width:200px', ['class'] = 'nomobile',
['内容'] = noticeText}}
addCategory '缺少参数的曲目信息模板'
end
return tostring(box) .. noticeText .. (args['nocat'] and '' or table.concat(category))
-- .. tostring(mw.html.create 'pre':wikitext(mw.dumpObject(charts)))
end
-- p.dateCov = dateCov
function p.main(frame)
function p.main(frame)
local slstIdx = mw.loadData "Module:songlist index".slstIdx
local args = getArgs(frame)
local plst = mw.loadData "Module:packlist index"
return auto(args)
local durs = mw.text.jsonDecode(mw.title.new "Template:duration.json":getContent())
return table.concat(stream.Array(mw.loadData "Module:songlist index".slst)
:filter(function(v) return v.id ~= "lasteternity" end)
:map(function(song) return {
plat = { "[[文件:Icon Smartphone.png|16px|link=曲目列表 (移动版)]]" }, id = song.id,
title = slstIdx[song.id].title, title2 = song.title_localized.ja or song.title_localized["zh-Hans"],
artist = '<span lang="ja">-{' .. song.artist .. "}-</span>", pack = plst[song.set],
bpm = song.bpm, bpm_base = tonumber(song.bpm) ~= song.bpm_base and song.bpm_base or nil,
duration = durs[song.id] or 0,
ratings = stream.Array(song.difficulties):map(function(v) return v.rating .. opt("+", v.ratingPlus) end):toArray(),
date = song.date
}
end)
:sorted(function(a, b)
local d = math.abs(a.pack.idx) - math.abs(b.pack.idx)
if d ~= 0 then return d < 0 else return a.date < b.date end
end)
:map(function(song)
song.pack = "[[" .. song.pack.name .. "]]"
local ride = frame.args[song.id]
if ride then for k, v in pairs(mw.text.jsonDecode(ride)) do song[k] = v end end
local succ, res = pcall(p.entry, song)
if succ then return res else return "" end
end):toArray(), "\n")
end
end
return p
return p

2024年3月13日 (三) 05:32的最新版本

可在Module:沙盒/盐棋/Sandbox/doc创建此模块的帮助文档

local getArgs = require 'Module:Arguments'.getArgs
-- local link = require 'Module:Link'._link
local mad = require 'Module:AnotherData'
local lang = mw.language.getContentLanguage()
local p = {}

local bgLinkF = '[[:分类:采用%s背景的曲目|%s]]'
local bgCatF = '采用%s背景的曲目'
local function array(...) return setmetatable({...}, {__index = table}) end
local function onlySupScript(s) return mw.getCurrentFrame():expandTemplate {title = '仅', args = {s, '', '图片角标'}} end
local function vdValidation(v, d) return v and d and {v, d} end
local function labelText(text) return mw.html.create 'span':addClass 'bg-c label':wikitext(text) end
local br = mw.html.create 'br'
local function dateCov(dateBox, data, plat)
	if not data then return end
	local version, date = unpack(data)
	dateBox:tag 'div':node(labelText(plat)):node(br):wikitext(version):node(br):wikitext('(', date, ')'):done()
end
local function span(len) if len > 1 then return 'gc-s' .. len end end

--	.container
--		.img-tab#tab-a
--			.img-tab-part.{cls} * n
--				{text}
--		.tab-text-a.active? * n
--			{file}[画师]{jacket}
---@param view table<integer,table<integer,string>>
---@param activeIdx integer?
---@return table
local function createContainer(view, activeIdx)
	activeIdx = activeIdx or 1
	local container = mw.html.create 'div':addClass 'container'
	local tab = container:tag 'div':addClass 'img-tab':attr('id', 'tab-a')
	for _, v in ipairs(view) do
		local text, cls = v[1], v[2] or 'normal'
		tab:tag 'div':wikitext(text):addClass 'img-tab-part':addClass(cls):done()
	end
	for idx, v in ipairs(view) do
		local file, jacket = v[3], v[4]
		container
			:tag 'div':addClass 'tab-text-a':addClass(idx == activeIdx and 'active' or nil)
			:wikitext('[[文件:', file, '|', 256, 'px|none]]')
			:node(labelText '画师')
			:wikitext(jacket)
			:done()
	end
	return container
end
local function getImage(args, song)
	local id = song and song.id
	local argPic = args['图片'] or args['曲绘']
	local argArtist = args['画师']
	if args['Beyond画师'] then
		return createContainer {
			{'Normal', nil, argPic, argArtist},
			{'Beyond', 'byd', args['Beyond曲绘'], args['Beyond画师']},
		}
	end
	return mw.html.create 'div'
		:wikitext('[[文件:', id and ('Songs ' .. id .. '.jpg') or argPic, '|', 256, 'px|none]]')
		:node(labelText '画师')
		:wikitext(argArtist)
end
local function tabCustom(args)
	local i = 1
	local res = array()
	while args['tab' .. i] do
		res:insert {mw.ustring.match(args['tab' .. i], '([^/]*)/([^/]*)/([^/]*)/(.*)')}
		i = i + 1
	end
	return res, args['默认图片序号']
end
local function merge(charts, field)
	local res = array()
	local cur, len = charts[1][field], 1
	for _, c in ipairs {}, charts, 1 do
		local e = c[field]
		if e == cur then
			len = len + 1
		else
			res:insert {cur, len}
			cur = e
			len = 1
		end
	end
	res:insert {cur, len}
	return res
end
local function getSet(sm, sns)
	--% 要求名字相同
	local qm, qns = mad.packQueryWrap(sm and sm.set, 'mobile'), mad.packQueryWrap(sns and sns.set, 'ns')
	local namem, namens = qm.section ~= 'unknown' and qm.name or nil, qns.section ~= 'unknown' and qns.name or nil
	local name = namem or namens
	if not name then return nil end
	local res = {name}
	if namens and namens ~= name then table.insert(res, namens .. onlySupScript 'NS版') end
	if #res > 1 then res[1] = res[1] .. onlySupScript '移动版' end
	return table.concat(res, '<br>')
end
-- TODO:displaytitle lowercase
local function getById(list, id)
	for _, k in ipairs(list) do if k.id == id then return k end end
end
local function getByTitle(list, title)
	for _, k in ipairs(list) do if k.title_localized.en == title then return k end end
end
local function auto(args)
	local category = {}
	local function addCategory(item)
		table.insert(category, '[[分类:' .. item .. ']]')
	end
	local notice = {}

	--% "曲名"必存在,"id"必非空串
	local songKey, getDatum = args['id'], getById
	if not songKey then songKey, getDatum = mw.text.decode(args['曲名']), getByTitle end
	local lm, lns
	if args['愚人节'] then
		lm, lns = mad.listOfReserve(), array()
	elseif songKey == 'Last' then
		lm, lns = mad.listOfReserve(), mad.listOfReserve()
	else
		lm, lns = mad.listOf('songs', 'mobile'), mad.listOf('songs', 'ns')
	end
	local sm, sns = getDatum(lm, songKey), getDatum(lns, songKey)
	--% 可能平台不一致
	local set = args['曲包'] or getSet(sm, sns)
	local platCode = (sm and 1 or 0) + (sns and 2 or 0)
	local song = sm or sns
	if not (sns and sns ~= song) then sns = {difficulties = array()} end
	if not song then
		notice.data = true
		song = mad.listOfReserve()[1]
		song.title_localized.en = songKey
	end

	local box = mw.html.create 'div':addClass 'infotable'
	local header = box:tag 'div':addClass 'header bg-c fs-l':wikitext(song.title_localized.en)
	if song.title_localized.ja then header:node(br):node 'span':attr {lang = 'ja'}:wikitext(song.title_localized.ja) end
	if song.title_localized['zh-Hans'] then header:node(br):wikitext(song.title_localized['zh-Hans']) end
	box:tag 'div':addClass 'figure central':node(args['tab1'] and createContainer(tabCustom(args)) or getImage(args, song))
	--% :create''
	local main = box:tag 'div':addClass 'main'

	addCategory(({'移动版曲目', 'NS版曲目', '双平台曲目'})[platCode])
	local sideCode = (tonumber(args['侧']) or song.side) + 1
	box:addClass(({'light', 'conflict', 'colorless'})[sideCode])
	addCategory(({'光芒侧曲目', '纷争侧曲目', '消色侧曲目'})[sideCode])
	local colTags = array()
	for idx, diff in ipairs(song.difficulties) do
		colTags[idx] = diff['@tag'] or ({[0] = 'Past', 'Present', 'Future', 'Beyond', 'Eternal'})[diff.ratingClass]
	end
	main:addClass('repeat-' .. #colTags)

	local artist = args['编曲'] or args['曲师'] or song.artist
	if not set then notice.pack = true end
	-- addCategory %set曲包曲目
	local duration = args['时长']
	if not duration then notice.duration = true end
	local bpm = args['BPM'] or song.bpm
	main:tag 'div':addClass 'gc-1 bg-c fs-m':wikitext '曲目信息'
	for _, v in ipairs {{'曲师', artist}, {'曲包', set}, {'时长', duration}, {'BPM', bpm},} do
		local tag, data = unpack(v)
		main:tag 'div':addClass 'bg-c central':wikitext(tag):done()
			:tag 'div':addClass 'gc-2':wikitext(data)
	end

	local bg = args['背景'] or song.bg
	if bg then addCategory(bgCatF:format(bg)) end
	local vd = vdValidation(args['更新版本'], args['更新时间'])
	if not vd then notice.vd = true end
	local vdNS
	if sns.id then
		vdNS = vdValidation(args['更新版本NS'], args['更新时间NS'])
		if not vdNS then notice.vd = true end
	end

	local charts = array()
	--% 假定ns难度序列是主难度序列的前缀
	for idx, tag in ipairs(colTags) do
		local chart = {}
		charts:insert(chart)
		local diff = song.difficulties[idx]

		local class = ({[0] = 'PST', 'PRS', 'FTR', 'BYD', 'ETR'})[diff.ratingClass]
		local function chartBasic(df, vd_, s)
			chart['rating' .. s] = args[tag .. '等级' .. s] or (df.rating .. (df.ratingPlus and '+' or ''))
			chart['note' .. s] = args[tag .. 'Note' .. s]
			chart['vdOverride' .. s] = vdValidation(args[tag .. '更新版本' .. s], args[tag .. '更新时间' .. s])
			if df.date and not chart['vdOverride' .. s] then notice.vd = true end
			chart['vdOverride' .. s] = chart['vdOverride' .. s] or vd_
		end

		chartBasic(diff, vd, '')
		if not chart.note then notice.note = true end

		chart.display = ('<b class="text-%s">[%s]</b>'):format(lang:lc(class), tag)
		addCategory(class .. chart.rating .. '级曲目')
		chart.designer = args[tag .. 'Note编写'] or args['note编写'] or diff.chartDesigner
		chart.bgOverride = args[tag .. '背景'] or diff.bg
		if chart.bgOverride then addCategory(bgCatF:format(chart.bgOverride)) end
		chart.bgOverride = chart.bgOverride or bg
		if diff.title_localized then header:node(br):wikitext(diff.title_localized.en, ' ', chart.display) end
		local diffNS = sns.difficulties[idx]
		if diffNS then
			chartBasic(diffNS, vdNS, 'NS')
			if diffNS.has_controller_alt_chart then
				notice.alt = true
				if not chart.noteNS then notice.note = true end
			end
			if chart.ratingNS and chart.ratingNS ~= chart.rating then
				notice.ratingDiffer = true
			end
		end
	end
	main:tag 'div':addClass 'gc-1 bg-c fs-m':wikitext '谱面信息'
	main:tag 'div':addClass 'bg-c central':wikitext '难度'
	for _, c in ipairs(charts) do
		main:tag 'div':addClass 'central fd-c':wikitext(c.display,
			not notice.ratingDiffer and not c.ratingNS and '仅移动版' or nil)
	end
	main:tag 'div':addClass 'bg-c central':wikitext '等级'
	for _, c in ipairs(charts) do
		main:tag 'div':wikitext(c.rating)
	end
	main:tag 'div':addClass 'bg-c central':wikitext 'note数量'
	for _, c in ipairs(charts) do
		main:tag 'div':wikitext(c.note)
	end
	main:tag 'div':addClass 'bg-c central':wikitext '谱面设计'
	for _, tp in ipairs(merge(charts, 'designer')) do
		local data, len = unpack(tp)
		main:tag 'div':addClass(span(len)):wikitext(data)
	end
	if notice.ratingDiffer then
		main:tag 'div':addClass 'bg-c central':wikitext '等级NS'
		for _, c in ipairs(charts) do
			main:tag 'div':wikitext(c.ratingNS)
		end
	end
	if notice.alt then
		addCategory '多模式谱面有差异的曲目'
		main:tag 'div':addClass 'bg-c central':wikitext 'note数量<br>(Joy-Con)'
		for _, c in ipairs(charts) do
			main:tag 'div':wikitext(c.noteNS)
		end
	end
	main:tag 'div':addClass 'bg-c central':wikitext '背景'
	for _, tp in ipairs(merge(charts, 'bgOverride')) do
		local data, len = unpack(tp)
		main:tag 'div':addClass(span(len)):wikitext(data and bgLinkF:format(data, data))
	end


	main:tag 'div':addClass 'bg-c central':addClass(platCode == 3 and 'gr-s2' or nil):wikitext '更新时间'
	for _, tp in ipairs(merge(charts, 'vdOverride')) do
		local data, len = unpack(tp)
		dateCov(main:tag 'div':addClass(span(len)), data, '移动版')
	end
	if platCode == 3 then
		for _, tp in ipairs(merge(charts, 'vdOverrideNS')) do
			local data, len = unpack(tp)
			dateCov(main:tag 'div':addClass(span(len)), data, 'NS版')
		end
	end

	local noticeText = ''
	for _, v in ipairs {
		{'data', '在Songlist中无法检查到此曲目。请尝试更新[[模板:Songlist]],检查页面名或填写正确的<code>曲名</code>参数。'},
		{'duration', '此模板缺少<code>时长</code>参数,此参数无法自动读取。'},
		{'pack', '未更新Packlist。曲目信息模板无法进行曲包分类。'},
		{'vd', '此模板的更新版本是未完整状态。请添加<code>更新版本</code>与<code>更新时间</code>参数。'},
		{'note', '此模板缺少某种<code>Note</code>参数,此参数无法自动读取。'},
	} do
		local msg, text = unpack(v)
		if notice[msg] then noticeText = noticeText .. text end
	end
	if noticeText ~= '' then
		noticeText = mw.getCurrentFrame():expandTemplate {title = 'Collapse', args = {['标题'] = '曲目信息模板提示信息', ['状态'] = '折叠',
			['标题文字方向'] = 'center', ['标题颜色'] = '#dddddd',
			['内容颜色'] = '#eeeeee', ['内容样式'] = 'width:800px',
			['style'] = 'display:table;width:200px', ['class'] = 'nomobile',
			['内容'] = noticeText}}
		addCategory '缺少参数的曲目信息模板'
	end
	return tostring(box) .. noticeText .. (args['nocat'] and '' or table.concat(category))
	-- .. tostring(mw.html.create 'pre':wikitext(mw.dumpObject(charts)))
end
-- p.dateCov = dateCov
function p.main(frame)
	local args = getArgs(frame)
	return auto(args)
end

return p