Module:沙盒/盐棋/Sandbox2

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

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

local p={}
local W=mw
function LoadJson(filename)
    return W.text.jsonDecode(W.getCurrentFrame():expandTemplate{ title = filename })
end

local packPrior,packName=(function ()
	local huge=16383
	local P,N={single = huge},{single = 'Memory Archive'}
	local contest={['base']=true,['observer']=true,['omatsuri']=true}
	local conbine=function(rt,lf)return rt..'#'..rt..' - '..lf..'|'..rt..' - '..lf end
	for i,v in ipairs(LoadJson("packlist").packs) do
		P[v.id]=i
		N[v.id]=v.name_localized.en
		if v.pack_parent then
			P[v.id]=P[v.pack_parent]
			N[v.id]=conbine(N[v.pack_parent],N[v.id])
		elseif v.custom_banner and not contest[v.id] then
			N[v.id]=N[v.id]..' Collaboration'
		end
	end
	for i,v in ipairs(LoadJson("packlist NS").packs) do
		if not N[v.id] and v.pack_parent then--single-append
			P[v.id]=P[v.pack_parent]
			N[v.id]=conbine(N[v.pack_parent],v.name_localized.en)
		end
	end
	return P,N
end)()

local songs=(function ()
	local tmp,SS={},{}
	local mbIcon,nsIcon='[[文件:Icon Smartphone.png|16px|link=曲目列表 (移动版)]]','[[文件:Icon Nintendo switch.png|16px|link=曲目列表 (Nintendo Switch版)]]'
	local NS_byd_set={['tempestissimo']=true}
	local display={['ifi']='＃1f1e33',['aiueoon']='AI［UE］OON',['quon']='Quon (Feryquitous)',['quonwacca']='Quon (DJ Noriken)'}
	for i,v in ipairs(LoadJson("songlist").songs) do
		v.__plat={mbIcon}
		tmp[v.id]=v
		v.__title=v.title_localized.en
	end
	for i,v in pairs(display) do
		tmp[i].__title=v
	end
	for i,v in ipairs(LoadJson("songlist NS").songs) do
		if tmp[v.id] then
			tmp[v.id].__plat[2]=nsIcon
		else
			v.__plat={nsIcon}
			tmp[v.id]=v
			v.__title=v.title_localized.en
		end
	end
	for i,v in pairs(tmp) do
		local page=W.title.new(v.__title):getContent()
		local artist=page:match("编曲=([^|]+)|")
		local dur='0'..page:match("时长=0?(%d:%d%d)")
		local plat,bpm,rate='',v.bpm,''
		if not tonumber(bpm) then
			bpm='data-sort-value='..v.bpm_base..'|'..bpm
		end
		for j,d in ipairs(v.__plat) do
			plat=plat..d
		end
		for j,d in ipairs(v.difficulties) do
			rate=rate..'|'..d.rating
			if d.ratingPlus then
				rate=rate..'+'
			end
		end
		if v.difficulties[4] then
			if not NS_byd_set[v.id] then
				rate=rate..'{{仅|移动版||图片角标}}'
			end
		else
			rate=rate..'|/'
		end
		page=nil
		SS[i]='|'..plat..'|[[文件:Songs '..v.id..'.jpg|75px]]'
		..'|[['..v.__title..']]'--4ids
		..'|[['..artist..']]'
		..'|[['..packName[v.set]..']]'
		..'|'..bpm
		..'|'..dur
		..'|'..rate
	end
	return SS
end)()

function p.main()
	return W.text.jsonEncode({packPrior=packPrior, packName=packName, songs=songs},W.text.JSON_PRETTY)
end

return p