查看“Module:ChartConstantDetail”的源代码

local p = {}
local songlist = mw.text.jsonDecode(mw.getCurrentFrame():expandTemplate{ title = 'Songlist.json' })
local songlistAppend = mw.text.jsonDecode(mw.getCurrentFrame():expandTemplate{ title = 'Songlist append.json' })
local trans = mw.text.jsonDecode(mw.getCurrentFrame():expandTemplate{ title = 'Template:Transition.json' })

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

function getInfList()
	-- 返回一个数据表。
	local songlistE = {}
	local appendList = {} -- 记录在songlistAppend中存在的曲目，避免重复列举
	local ratingClass
	for _,songInf in ipairs(songlistAppend["songs"])
	do
		for _,diffInf in ipairs(songInf["difficulties"])
		do
			if diffInf["ratingClass"] == 0 then ratingClass = "I"
			elseif diffInf["ratingClass"] == 1 then ratingClass = "II"
			elseif diffInf["ratingClass"] == 2 then ratingClass = "III"
			elseif diffInf["ratingClass"] == 3 then ratingClass = "IV"
			end
			table.insert(songlistE,{
				songInf["id"],
				songInf["title_localized"]["default"] ,
				ratingClass,
				diffInf["ratingReal"]
			})
		end
		appendList[songInf["id"]] = true
	end

	
	for _,songInf in ipairs(songlist["songs"])
	do
		if songInf["difficulties"] and not(appendList[songInf["id"]])
		then
			for _,diffInf in ipairs(songInf["difficulties"])
			do
				if diffInf["ratingClass"] == 0 then ratingClass = "I"
				elseif diffInf["ratingClass"] == 1 then ratingClass = "II"
				elseif diffInf["ratingClass"] == 2 then ratingClass = "III"
				elseif diffInf["ratingClass"] == 3 then ratingClass = "IV"
				end
				table.insert(songlistE,{
					songInf["id"],
					songInf["title_localized"]["default"] ,
					ratingClass,
					diffInf["ratingReal"]
				})
			end
		end
	end
	return songlistE
end



function p.main(frame)
    local args = getArgs(frame)
    return p._main(args)
end

function p._main(args)
	local inf = getInfList()

	local listReplyA = {}
	for _,k in ipairs(inf)
	do
		if listReplyA[k[4]] == nil then listReplyA[k[4]] = {} end
		table.insert(listReplyA[k[4]], k)
	end

	local listReplyB = {}

	local tableC
    for s, k in pairs(listReplyA) do
		tableC = {}
		for _, m in pairs(k) do
			table.insert(tableC, mw.getCurrentFrame():expandTemplate { title = '组排单元', args = { m[2], m[1], m[3]} } )
		end
		table.insert(listReplyB, {s, tableC} )
    end
	tableC = nil

	table.sort(listReplyB, function(a, b) return a[1] > b[1] end)

	local outputTable = mw.html.create("table")
	outputTable:tag("tr"):tag("th"):wikitext("曲绘"):tag("th"):wikitext("曲目")
				:tag("th"):wikitext("曲师"):tag("th"):wikitext("谱师")
				:tag("th"):wikitext("难度"):tag("th"):wikitext("定数")


    return outputTable
end

return p