查看“Module:Song”的源代码

local specialDelims = {'/', '、', '\\', '／', ' · '}
local yesno = require('Module:Yesno')

-- Trim function
function trim2(s)
    return (s:gsub("^[%z\128-\255%s]+", ""))
end

-- Function to check if a string contains Chinese characters
local function containsChinese(str)
    for i = 1, #str do
        local c = string.byte(str, i)
        if c >= 0x4E00 and c <= 0x9FFF then
            return true
        end
    end
    return false
end

-- Function to check if a string contains English letters
local function containsEnglish(str)
    for i = 1, #str do
        local c = string.byte(str, i)
        if (c >= 0x41 and c <= 0x5A) or (c >= 0x61 and c <= 0x7A) then
            return true
        end
    end
    return false
end

-- Test the functions
--local str1 = "夜夜夜夜 (Demo)"
--local str2 = "Demo (English)"
--print("String 1 contains Chinese: ", containsChinese(str1))  -- Output: true
--print("String 1 contains English: ", containsEnglish(str1))  -- Output: true
--print("String 2 contains Chinese: ", containsChinese(str2))  -- Output: false
--print("String 2 contains English: ", containsEnglish(str2))  -- Output: true

local mArguments
local p = {};     --All Lua modules on Wikipedia must begin by defining a variable 
                    --that will hold their externally accessible functions.
                    --Such variables can have whatever name you want and may 
                    --also contain various data as well as functions.

-- Function to create a mock frame object with arguments
function p.createMockFrame(args)
    local frame = {
        args = args,
        getParent = function() return nil end,
        getTitle = function() return nil end,
        callParserFunction = function() return nil end,
        preprocess = function(_, text) return text end,
        expandTemplate = function(_, tmpl) return tmpl end
    }
    return frame
end

function p.getSongTitlefromPage()
	local songtitle = ''
	local pagename = tostring(mw.title.getCurrentTitle())
	if string.match(pagename, '%(') then
		local pattern = "^(.-)%s*%([^%(%)]*%)$" -- Find the position of the last set of parentheses
		--local pattern = ".*%(([^()]+)%)$" -- This pattern captures the last set of parentheses and its content
		songtitle = string.match(pagename, pattern)
	else
		songtitle = pagename
	end
	return songtitle
end

function p.getArtistfromPage()
	local _ret = ''
	local pagename = tostring(mw.title.getCurrentTitle())
	if string.match(pagename, '%(') then
		local pattern = ".*%(([^()]+)%)$" -- This pattern captures the last set of parentheses and its content
		_ret = string.match(pagename, pattern)
	else
    	_ret = '群星'
	end 
	return _ret 
end

function p.addCat(frame)		-- Add another function
	local cat = frame.args[1] or '' -- To access arguments passed to a module, use `frame.args`
							    -- `frame.args[1]` refers to the first unnamed parameter
							    -- given to the module
    local ret = ''
    
    if cat == '' then
		ret = '[[Category:单曲歌词]] [[Category:Song Lyrics]]'
    end

	if string.match(cat, '国语') then
    	ret = ret .. '[[Category:国语歌词]]'
	end
	if string.match(cat, '粤语') then
    	ret = ret .. '[[Category:粤语歌词]]'
	end
	if string.match(cat, '闽南语') or string.match(cat, '台语') then
    	ret = ret .. '[[Category:闽南语歌词]]'
	end
	if string.match(cat, '英语') then
    	ret = ret .. '[[Category:Lyrics in English]]'
	end	
	if string.match(cat, '日语') then
    	ret = ret .. '[[Category:日本語の歌詞]]'
	end	
	if string.match(cat, '韩语') then
    	ret = ret .. '[[Category:한국어 가사]]'
	end	
	if string.match(cat, '法语') then
    	ret = ret .. '[[Category:Paroles en français]]'
	end	
	if string.match(cat, '音乐') then
    	ret = ret .. '[[Category:Instrumental]]'
	end	

	if ret == '' then
		ret = ret .. '[[Category:另类歌词／非音乐]]'
	end
	
	return ret  -- `..` concatenates strings. This will return a customized
									 -- greeting depending on the name given, such as "Hello, Fred!"
end

function p.addSongTitle(frame)
	local songtitle = frame.args[1] or ''
	if songtitle == '' then
		local pagename = tostring(mw.title.getCurrentTitle())
		if string.match(pagename, '%(') then
			local pattern = "^(.-)%s*%([^%(%)]*%)$" -- Find the position of the last set of parentheses
			--local pattern = ".*%(([^()]+)%)$" -- This pattern captures the last set of parentheses and its content
			songtitle = string.match(pagename, pattern)
		else
    		songtitle = pagename
    	end
	end 
	return songtitle
end

function p.addSongLink(frame)		-- Add Track link (input = frame)
	local ret = '—'
	local songname = frame.args[1] or ret
	
	if (songname == '' or songname == '—') then
		-- do nothing, keep ret as '—'
	elseif (string.match(songname, '%{') or string.match(songname,'%[') or string.match(songname, "\127")) then
		ret = songname -- update ret as songname, don't add links
	else
		local artist = frame.args[2] or p.getArtistfromPage()
		if artist == '' then artist = p.getArtistfromPage() end

		ret = '[[' .. songname ..'_(' .. artist .. ')|' .. songname .. ']]' -- '{{sl|' .. songname .. '}}'
	end
	
	return ret
end	

function p.addTrackNumUp(frame)		-- Add Track Seq number 上一首，曲序号减小
	local ret = ''
	local tracknum = frame.args[1] or '0'
	local currtracknum = frame.args[3] or '0'
	local songname = frame.args[2] or ret

	if (songname == '' or songname == '—') then
		-- do nothing, keep ret as ''
	elseif (tracknum == '0' or tracknum == '') then
		currtracknum = tonumber(currtracknum) or 999
		currtracknum = currtracknum - 1
		ret = '\r(' .. currtracknum .. ')'
		
	--elseif (string.match(tracknum, '%{') or string.match(tracknum,'%[') or string.match(tracknum, "\127")) then
	--	ret = '\r(' .. tracknum .. ')'-- update ret as tracknum, don't add links
	else
		--tracknum = tonumber(tracknum)
		ret = '\r(' .. tracknum .. ')'
	end
	return ret
end	

function p.addTrackNumDown(frame)		-- Add Track Seq number 下一首，曲序号增加
	local ret = ''
	local tracknum = frame.args[1] or '0'
	local currtracknum = frame.args[3] or '0'
	local songname = frame.args[2] or ret

	if (songname == '' or songname == '—') then
		-- do nothing, keep ret as ''
	elseif (tracknum == '0' or tracknum == '') then
		currtracknum = tonumber(currtracknum) or 999
		currtracknum = currtracknum + 1
		ret = '\r(' .. currtracknum .. ')'
		
	--elseif (string.match(tracknum, '%{') or string.match(tracknum,'%[') or string.match(tracknum, "\127")) then
	--	ret = '\r(' .. tracknum .. ')'-- update ret as tracknum, don't add links
	else
		--tracknum = tonumber(tracknum)
		ret = '\r(' .. tracknum .. ')'
	end
	return ret
end	

function p.getTrackNum(tracknum, currtracknum, n)		-- get Last/Next TrackNum (input = current track num)
	local ret = ''
	local tracknum = tracknum or '0'
	n = tonumber(n) or 0
	
	if (tracknum == '0' or tracknum == '') then -- if tracknum is not available
		currtracknum = tonumber(currtracknum) or 999
		tracknum = currtracknum + n
		ret = '(' .. tracknum .. ')'
	else
		ret = '(' .. tracknum .. ')'
	end
	return ret
end	

function p.getSecHeader(title, artist)		-- get Section Header from album/albumartist (input)
	local ret = ''
	if artist == '' then artist = p.getArtistfromPage() end
	
	if title == '' then -- 不是专辑，是单曲
		local args1 = { artist }
		local frame1 = p.createMockFrame(args1)
		artist = p.addDiscogsArtist(frame1)

		ret = ret .. artist .. ' · 单曲发行列表'
	else
		local args2 = { title, artist }
		local frame2 = p.createMockFrame(args2)
		ret = p.addDiscogs(frame2)
		ret = ret .. '  曲目列表'
	end
	
	return ret
end	

function p.addTrackSection(frame)		-- frame args[1] = section序号
	local ret = ''
	mArguments = require('Module:Arguments')
	local args = mArguments.getArgs(frame, {parentOnly = true})
	local k = frame.args[1] or ''
	local lastTrack = args['上一首' .. k] or ''
	local nextTrack = args['下一首' .. k] or ''
	local lastTrackNum = args['上一首曲序' .. k] or '0'
	local nextTrackNum = args['下一首曲序' .. k] or '0'
	local currTrackNum = args['曲序' .. k] or '0'
	
	if (lastTrack == '' or lastTrack == '—') then lastTrackNum = ''
	else lastTrackNum = p.getTrackNum(lastTrackNum, currTrackNum, -1) or '0' end
	if (nextTrack == '' or nextTrack == '—') then nextTrackNum = ''
	else nextTrackNum = p.getTrackNum(nextTrackNum, currTrackNum, 1) or '0' end
	currTrackNum = p.getTrackNum(currTrackNum, currTrackNum, 0) or '0' 

	local artist = args['专辑艺人' .. k] or args['艺人' .. k] or p.getArtistfromPage() or ''
	local albumtitle = args['专辑' .. k] or ''
	
	if lastTrack == '' and nextTrack == '' then
	else
		local secHeader = args['Chronology' .. k] or p.getSecHeader(albumtitle, artist)
		
		local trackArgs = { lastTrack, artist }
		local frame_track = p.createMockFrame(trackArgs)
		local lastTrackTitle = p.addSongLink(frame_track)
		
		local currTrackTitle = args['歌名'] or p.getSongTitlefromPage()
		currTrackTitle = "'''" .. currTrackTitle .. "'''"
		
		trackArgs = { nextTrack, artist }
		frame_track = p.createMockFrame(trackArgs)
		local nextTrackTitle = p.addSongLink(frame_track)

		ret = ret .. '\n|-\n! colspan="3" scope="col" class="infoheaderprime" style="font-size: 9pt" | ' .. secHeader
		ret = ret .. '\n|-\n| colspan="3" |'
		ret = ret .. '\n{| cellspacing="0" cellpadding="0" width="100%" style="background: transparent;"'
		ret = ret .. '\n|- style="text-align: center; font-size: 0.8em; line-height: 1.4em;"\n'
		ret = ret .. '| style="width: 33%; vertical-align: top; padding: 0.2em 0.1em 0.2em 0;" | ' .. lastTrackTitle .. '<br>' .. lastTrackNum .. '\n'
		ret = ret .. '| style="width: 33%; vertical-align: top; padding: 0.2em 0.1em 0.2em 0.1em;" | ' .. currTrackTitle .. '<br>' .. currTrackNum .. '\n'
		ret = ret .. '| style="width: 33%; vertical-align: top; padding: 0.2em 0 0.2em 0.1em;" | ' .. nextTrackTitle .. '<br>' .. nextTrackNum .. '\n'
		ret = ret .. '|}'
	end
	
	return ret	
end

function p.addLyricsinfoSection(frame)
	local ret = ''
	mArguments = require('Module:Arguments')
	local args = mArguments.getArgs(frame, {parentOnly = true})
	--local k = frame.args[1] or ''
	local catalog = args['整理编号'] or ''
	
	if catalog == '' then
		return ret
	else
		local team = args['分部'] or ''
		local secHeader = '[[' .. team .. '工作室|' .. team .. '歌词整理列表]]'
		local owner = args['整理人'] or '[[Lyricsinfo]]'
		local credits = args['制作信息'] or '否'
		local verify = args['校对'] or '否'

		local lastWork = args['上一张整理'] or ''
		local nextWork = args['下一张整理'] or ''
		local lastCatalog = args['上一整理编号'] or ''
		if (lastCatalog == '' or lastCatalog == '—') then lastCatalog = ''
		else lastCatalog = p.getTrackNum(lastCatalog, lastCatalog, 0) or '' end
		local nextCatalog = args['下一整理编号'] or ''
		if (nextCatalog == '' or nextCatalog == '—') then nextCatalog = ''
		else nextCatalog = p.getTrackNum(nextCatalog, nextCatalog, 0) or '' end
		local currCatalog = p.getTrackNum(catalog, catalog, 0) or '' 
		
		local single = args['歌名'] or p.getSongTitlefromPage()
		single = "'''" .. single .. "'''"
		
		ret = ret .. '\n|-\n! colspan="3" scope="col" style="background: #CECEF6;font-size: 9pt" | ' .. secHeader
		ret = ret .. '\n|-'
		ret = ret .. '\n! scope="row" style="width: 5.2em; text-align: left;font-size: 9pt" | 整理编号'
		ret = ret .. '\n| colspan="2" style="width: 14em;font-size: 9pt" |' .. catalog
		ret = ret .. '\n|-'
		ret = ret .. '\n! scope="row" style="width: 5.2em; text-align: left;font-size: 9pt" | 分部'
		ret = ret .. '\n| colspan="2" style="width: 14em;font-size: 9pt" |' .. team
		ret = ret .. '\n|-'
		ret = ret .. '\n! scope="row" style="width: 5.2em; text-align: left;font-size: 9pt" | 整理人'
		ret = ret .. '\n| colspan="2" style="width: 14em;font-size: 9pt" |' .. owner
		ret = ret .. '\n|-'
		ret = ret .. '\n! scope="row" style="width: 5.2em; text-align: left;font-size: 9pt" | 制作信息'
		ret = ret .. '\n| colspan="2" style="width: 14em;font-size: 9pt" |' .. credits
		ret = ret .. '\n|-'
		ret = ret .. '\n! scope="row" style="width: 5.2em; text-align: left;font-size: 9pt" | 校对'
		ret = ret .. '\n| colspan="2" style="width: 14em;font-size: 9pt" |' .. verify
		ret = ret .. '\n|-'
		
		ret = ret .. '\n| colspan="3" |'
		ret = ret .. '\n{| cellspacing="0" cellpadding="0" width="100%" style="background: transparent;"'
		ret = ret .. '\n|- style="text-align: center; font-size: 0.8em; line-height: 1.4em;"\n'
		ret = ret .. '| style="width: 33%; vertical-align: top; padding: 0.2em 0.1em 0.2em 0;" | ' .. lastWork .. '<br>' .. lastCatalog .. '\n'
		ret = ret .. '| style="width: 33%; vertical-align: top; padding: 0.2em 0.1em 0.2em 0.1em;" | ' .. single .. '<br>' .. currCatalog .. '\n'
		ret = ret .. '| style="width: 33%; vertical-align: top; padding: 0.2em 0 0.2em 0.1em;" | ' .. nextWork .. '<br>' .. nextCatalog .. '\n'
		ret = ret .. '|}'

	end
	
	return ret	
end

function p.getMultiISRCs(frame, delim)
    -- Split the input string by the delimiter " / "
    local segments = {}
    local isrcstr = frame.args[1] or ''

    delim = delim or ''
    isrcstr = string.gsub(isrcstr, delim, "/")
    
    for segment in string.gmatch(isrcstr, '([^/]+)') do
        -- Remove leading and trailing whitespace
        segment = segment:match("^%s*(.-)%s*$")

        table.insert(segments, segment)
    end
    return segments

end

function p.addCatAlbum(frame)		-- 自动增加专辑标签
	local nocat = yesno(frame.args[3], false)
	
	if nocat then
		return ''
	end
	
	local album = frame.args[1] 
	local tracknum = frame.args[2] or '0'
	
	tracknum = tonumber(tracknum) 

	local ret = '[[Category:'
	if string.match(album, "`UNIQ--") then
		album = string.match(album, "(.-)\127") -- remove string after DEL 
	end
	if string.match(album, '《') or string.match(album, ':w:c:zh.discogs:') then
		local pattern = "%[%[.-|(.-)%]%]" -- This pattern looks for [[ followed by any number of characters until |, then captures everything until ]]
		if (string.match(album, pattern)) then
			ret = ret .. string.match(album, pattern) .. ' (专辑)'	
		else
			ret = ret .. album .. ' (专辑)'
		end
	else
		ret = ret .. album .. ' (专辑)'
	end
	
	if tracknum then
		tracknum = p.numberToUC(tracknum) or '0'
		ret = ret .. '|' .. tracknum .. ']]'
	else
		ret = ret .. ']]'
	end
	
	return ret
end

function p.numberToUC(num)
    local utf8Bytes = {}
    
    if num >= 1 and num <= 20 then
        -- 使用带圆圈的数字字符，Unicode起始码点为0x2460
        local unicodeStart = 0x2460 + num - 1
        -- 构建UTF-8字节序列
        if unicodeStart >= 0x2460 and unicodeStart <= 0x2469 then
            utf8Bytes = {0xE2, 0x91, 0xA0 + (unicodeStart - 0x2460)}
        elseif unicodeStart >= 0x246A and unicodeStart <= 0x246F then
            utf8Bytes = {0xE2, 0x91, 0xAA + (unicodeStart - 0x246A)}
        elseif unicodeStart >= 0x2470 and unicodeStart <= 0x2479 then
            utf8Bytes = {0xE2, 0x91, 0xB0 + (unicodeStart - 0x2470)}
        end
        
    elseif num >= 21 and num <= 35 then
        local unicodeStart = 0x3251 + num - 21
        -- 构建UTF-8字节序列
        if unicodeStart >= 0x3251 and unicodeStart <= 0x3259 then
            utf8Bytes = {0xE3, 0x89, 0x91 + (unicodeStart - 0x3251)}
        elseif unicodeStart >= 0x325A and unicodeStart <= 0x325F then
            utf8Bytes = {0xE3, 0x89, 0x9A + (unicodeStart - 0x325A)}
        end
    
    elseif num >= 36 and num <= 50 then
        local unicodeStart = 0x32B1 + num - 36
        -- 构建UTF-8字节序列
        if unicodeStart >= 0x32B1 and unicodeStart <= 0x32B9 then
            utf8Bytes = {0xE3, 0x8A, 0xB1 + (unicodeStart - 0x32B1)}
        elseif unicodeStart >= 0x32BA and unicodeStart <= 0x32BF then
            utf8Bytes = {0xE3, 0x8A, 0xBA + (unicodeStart - 0x32BA)}
        end 
    
    elseif num > 50 and num <=90 then
		-- 使用带圆圈的数字字符，Unicode起始码点为0x2470
        local unicodeStart = 0x2474 + num - 51
         
        if unicodeStart >= 0x2470 and unicodeStart <= 0x2479 then
            utf8Bytes = {0xE2, 0x91, 0xB0 + (unicodeStart - 0x2470)}
        elseif unicodeStart >= 0x247A and unicodeStart <= 0x247F then
            utf8Bytes = {0xE2, 0x91, 0xBA + (unicodeStart - 0x247A)}
        elseif unicodeStart >= 0x2480 and unicodeStart <= 0x2489 then
            utf8Bytes = {0xE2, 0x92, 0x80 + (unicodeStart - 0x2480)}
        elseif unicodeStart >= 0x248A and unicodeStart <= 0x248F then
            utf8Bytes = {0xE2, 0x92, 0x8A + (unicodeStart - 0x248A)}
        elseif unicodeStart >= 0x2490 and unicodeStart <= 0x2499 then
            utf8Bytes = {0xE2, 0x92, 0x90 + (unicodeStart - 0x2490)}
        elseif unicodeStart >= 0x249A and unicodeStart <= 0x249F then
            utf8Bytes = {0xE2, 0x92, 0x9A + (unicodeStart - 0x249A)}
        end
        
    elseif num > 90 and num <=99 then
		-- 使用带圆圈的数字字符，Unicode起始码点为0x2776
        local unicodeStart = 0x2776 + num - 91  
        if unicodeStart >= 0x2776 and unicodeStart <= 0x2779 then
           utf8Bytes = {0xE2, 0x9D, 0xB6 + (unicodeStart - 0x2776)}
        elseif unicodeStart >= 0x277A and unicodeStart <= 0x277F then
           utf8Bytes = {0xE2, 0x9D, 0xBA + (unicodeStart - 0x277A)}
        end
        
    else
        return '0'
    end
    
    -- 将字节序列转换为字符
    local char = ""
    for _, byte in ipairs(utf8Bytes) do
        char = char .. string.char(byte)
    end

    return char
   
end

function p.addCatISRC(isrc)
	local ret = '[[Category:'
	if string.match(isrc, "`UNIQ--") then
		isrc = string.match(isrc, "(.-)\127") -- remove string after DEL 
	end
	local isrc_clean = isrc:gsub("-", "")
    
    -- 使用模式匹配来拆分处理过的字符串
    local isrc_m, isrc_t = isrc_clean:match("^(%a+%d+%d+%d+)(%d%d)$")
    if not isrc_m or not isrc_t then
        ret = ret .. "Invalid ISRC]]"

    else
    	isrc_m = isrc_m .. '00'
    	ret = ret .. 'ISRC ' .. isrc_m
    	
    	isrc_t = tonumber(isrc_t) or '0'
    	isrc_t = p.numberToUC(isrc_t)
    	
    	ret = ret .. '|' .. isrc_t .. ']]'
    end
    
	return ret
end

function p.addISRC(frame)		-- Add another function
	local cat = frame.args[1]  
	local nocat = yesno(frame.args[2], false)
	
	local ret = cat
	if string.match(cat, '{{ISRC') then

	elseif string.match(cat, '/') then
		ret = '<span class="ISRC">' .. cat .. '</span>'
		
		if nocat then 
		else
			local isrcs = {}
			local match = '/'
			isrcs = p.getMultiISRCs(frame, match)
			for i, c in ipairs(isrcs) do
				isrcs[i] = p.addCatISRC(c)
			end
			ret = ret .. table.concat(isrcs, " ")
		end

	else
		if nocat then
		else
			ret = ret .. p.addCatISRC(cat)
		end
	end
	
	return ret
end


function p.addCatMultiArtists(frame)		-- 自动增加多艺人标签
	local multiartiststr = frame.args[1] or ''

	local ret = multiartiststr	
	if (multiartiststr == '') then
		return ret
	else

		local match = ''
		for i, d in ipairs(specialDelims) do
			match = string.match(multiartiststr, specialDelims[i]) or match --or string.match(artist, "/") or ''
		end
		
		if match == '' then
			ret = '[[Category:' .. multiartiststr .. ']]'
		else -- 多艺人
			local artists = {}
			artists = p.getMultiArtists(frame, match)
			for i, a in ipairs(artists) do
				if string.match(a, "`UNIQ--") then
					a = string.match(a, "(.-)\127") -- remove string after DEL 
				end
				artists[i] = '[[Category:' .. a	.. ']]'
			end
			ret = table.concat(artists, " ")
		end
	end

	return ret
end

function p.addCreatePageDefault(frame)		-- Add another function
	local pagename = frame.args[1]  
    local ret = ''
	if string.match(pagename, '%(') then
		local pattern = "%([^()]+%)$" -- This pattern captures the last set of parentheses and its content
		ret = '曲名 ' .. string.match(pagename, pattern)
	else
    	ret = '曲名 (艺术家)'
	end
	return ret  
end

function p.getArtist(frame)		-- 从参数或歌词页面标题获取艺术家名
	local ret = frame.args[1] or ''
	if string.match(ret, "`UNIQ--") then
		ret = string.match(ret, "(.-)\127") -- remove string after DEL 
	end
	
	if ret == '' then
		ret = p.getArtistfromPage()
	end
	return ret  
end

function p.getMultiArtists(frame, delim)
    -- Split the input string by the delimiter " / "
    local segments = {}
    local artiststr = frame.args[1] or ''

    delim = delim or ''
    artiststr = string.gsub(artiststr, delim, "/")
    
    for segment in string.gmatch(artiststr, '([^/]+)') do
        -- Remove leading and trailing whitespace
        segment = segment:match("^%s*(.-)%s*$")
        -- Format each segment
        if string.match(segment, ':w:c:zh.discogs:') then
			local pattern2 = "%[%[.-|(.-)%]%]" -- This pattern looks for [[ followed by any number of characters until |, then captures everything until ]]
			if (string.match(segment, pattern2)) then
				segment = string.match(segment, pattern2)	
			end
		end
        --local formattedSegment = string.format("[[:w:c:zh.discogs:%s|%s]]", segment, segment)
        table.insert(segments, segment)
    end
    return segments
    -- Join the formatted segments with " / "
    --local result = table.concat(segments, " / ")
    --return result
end

function p.addDiscogs(frame)		-- Add discogs album link
	local album = frame.args[1]  
	local artist = frame.args[2] or ''
	if artist == '' then
		artist = p.getArtistfromPage()
	end
	local albumtype = frame.args[3] or '专辑'
	if albumtype == '' then albumtype = '专辑' end
	
	local ret = album
	local extra = ''
	if string.match(album, "\127")  then
		--extra = string.match(album, "\127(.-)$") -- '"`UNIQUNIQ--ref-00000003-QINU`"'
		--album = string.match(album, "(.-)\127") 
		return ret
	end

	if string.match(album, '《') then
	elseif string.match(album, '%{') then
	elseif string.match(album, '%[') then
	elseif string.match(album, ':w:c:zh.discogs:') then

	elseif artist == '' or artist == '-' or artist == '－' 
		or artist == '群星' or artist == '合辑' or artist == 'Various Artists' then
		ret = '[[:w:c:zh.discogs:' .. album .. '|' .. album .. ']]'
		
	else
		ret = '[[:w:c:zh.discogs:' .. album .. '_(' .. artist .. albumtype .. ')|' .. album .. ']]'
	end
	
	return ret
end

function p.addDiscogsArtist(frame)		-- Add discogs link to artist 
	local ret = ''
	local artist = frame.args[1] 

	--local pattern = "[" .. table.concat(specialDelims) .. "]"
	local match = ''
	for i, d in ipairs(specialDelims) do
		match = string.match(artist, specialDelims[i]) or match --or string.match(artist, "/") or ''
	end
	
	if match == '' then
		artist = p.getArtist(frame)
		ret = ret .. '[[:w:c:zh.discogs:' .. artist	.. '|' .. artist .. ']]'
	else -- 多艺人
		local artists = {}
		artists = p.getMultiArtists(frame, match)
		for i, a in ipairs(artists) do
			if string.match(a, "\127")  then
				local a0 = string.match(a, "(.-)\127") -- remove string after DEL 
				a = string.gsub(a, "\127'", "]]\127'")
				artists[i] = '[[:w:c:zh.discogs:' .. a0 .. '|' .. a
			else
				artists[i] = '[[:w:c:zh.discogs:' .. a	.. '|' .. a .. ']]'
			end
		end
		ret = table.concat(artists, " / ")
	end
	
	return ret
end

---------------- TEST ---------

function p.numberToUCtest(frame)
    local num = tonumber(frame.args[1])
    local utf8Bytes = {}
    
    if num >= 21 and num <= 35 then
        -- 使用带圆圈的数字字符，Unicode起始码点为0x2460
        local unicodeStart = 0x3251 + num - 21
        -- 构建UTF-8字节序列
        if unicodeStart >= 0x3251 and unicodeStart <= 0x3259 then
            utf8Bytes = {0xE3, 0x89, 0x91 + (unicodeStart - 0x3251)}
        elseif unicodeStart >= 0x325A and unicodeStart <= 0x325F then
            utf8Bytes = {0xE3, 0x89, 0x9A + (unicodeStart - 0x325A)}
        end
    
    elseif num >= 36 and num <= 50 then
        local unicodeStart = 0x32B1 + num - 36
        -- 构建UTF-8字节序列
        if unicodeStart >= 0x32B1 and unicodeStart <= 0x32B9 then
            utf8Bytes = {0xE3, 0x8A, 0xB1 + (unicodeStart - 0x32B1)}
        elseif unicodeStart >= 0x32BA and unicodeStart <= 0x32BF then
            utf8Bytes = {0xE3, 0x8A, 0xBA + (unicodeStart - 0x32BA)}
        end 

    else
    	return '0'
    end
    
    -- 将字节序列转换为字符
    local char = ""
    for _, byte in ipairs(utf8Bytes) do
        char = char .. string.char(byte)
    end

    return char
end

----------- TEST ENDS ----

function p.addLRCSection(frame)
	local ret = ''
	
	local disclaimer = '关于LRC动态歌词的更多信息，请参考[[Lyricsinfo:LRC]]。Lyricsinfo维基站的LRC动态歌词经[[Lyricsinfo:Foobar2000|Foobar2000]]校对，如需获得最佳体验，请参考和采用[[Lyricsinfo:LRC#推荐配置|推荐配置]]。'
	
	ret = '<small>' .. disclaimer .. '</small>'
	return ret
end

function p.addLRCVideo(frame)
	
	local vid = frame.args[1] or ''
	local songtitle = frame.args[2] or ''
	local artist = frame.args[3] or ''
	local detail = frame.args[4] or ''
	local pagename = tostring(mw.title.getCurrentTitle())
	local pos = frame.args.pos or 'right'
	
	if songtitle == '' then
		songtitle = p.getSongTitlefromPage()
	end
	if artist == '' then
		artist = p.getArtistfromPage()
	end
	if detail == '' then
		detail = 'CD版+动态滚动歌词'
	end
	
	local ret = ''

	if vid == '' then
	elseif string.match(vid, 'BV') then
		local header = frame.args.header 
		if header == '' then header = songtitle .. '｜Lyric Video' end
		
		ret = '<div style="float:' .. pos .. '; clear:' .. pos .. '; width:max-content;"><tabber>' .. header .. '={{BilibiliVideo|' .. vid .. '|title=' .. header .. '}}</tabber></div>'

	else
		ret = '[[File:' .. vid .. ' ' .. artist .. '｜' .. songtitle .. '｜Lyric Video｜' .. detail .. '|right|300px]]\n'
	end

	ret = ret .. '\n详见：-{[[' .. pagename .. '/lrc]]}-\n'
	ret = frame:preprocess(ret)
    
    return ret
end

function p.addLRCCode(frame)
	local ret = ''
	local logtext = frame.args[1] or ''
	
	if (logtext == '') then
		ret = p.addLRCSection(frame)
	else
		ret = '<poem class="lrc">' .. logtext .. '</poem>'
		ret = frame:preprocess(ret)
		ret = ret .. p.addLRCSection(frame)
	end
	
	return ret
end

-------------------------------------------------------------------


local function lucky(a, b) -- One can define custom functions for use. Here we define a function 'lucky' that has two inputs a and b. The names are of your choice.
	if b == 'yeah' then -- Condition: if b is the string 'yeah'. Strings require quotes. Remember to include 'then'.
		return a .. ' is my lucky number.' -- Outputs 'a is my lucky number.' if the above condition is met. The string concatenation operator is denoted by 2 dots.
	else -- If no conditions are met, i.e. if b is anything else, output specified on the next line.  'else' should not have 'then'.
		return a -- Simply output a.
	end -- The 'if' section should end with 'end'.
end -- As should 'function'.

function p.Name2(frame)
	-- The next five lines are mostly for convenience only and can be used as is for your module. The output conditions start on line 50.
	local pf = frame:getParent().args -- This line allows template parameters to be used in this code easily. The equal sign is used to define variables. 'pf' can be replaced with a word of your choice.
	local f = frame.args -- This line allows parameters from {{#invoke:}} to be used easily. 'f' can be replaced with a word of your choice.
	local M = f[1] or pf[1] -- f[1] and pf[1], which we just defined, refer to the first parameter. This line shortens them as 'M' for convenience. You could use the original variable names.
	local m = f[2] or pf[2] -- Second shortened as 'm'.
	local l = f.lucky or pf.lucky -- A named parameter 'lucky' is shortend as l. Note that the syntax is different from unnamed parameters.
	if m == nil then -- If the second parameter is not used.
		return 'Lonely' -- Outputs the string 'Lonely' if the first condition is met.
	elseif M > m then -- If the first condition is not met, this line tests a second condition: if M is greater than m.
		return lucky(M - m, l) -- If the condition is met, the difference is calculated and passed to the self defined function along with l. The output depends on whether l is set to 'yeah'.
	else
		return 'Be positive!'
	end
end


return p    --All modules end by returning the variable containing their functions to Wikipedia.
-- Now we can use this module by calling {{#invoke: Example | hello }},
-- {{#invoke: Example | hello_to | foo }}, or {{#invoke:Example|count_fruit|bananas=5|apples=6}}
-- Note that the first part of the invoke is the name of the Module's wikipage,
-- and the second part is the name of one of the functions attached to the 
-- variable that you returned.

-- The "print" function is not allowed in Wikipedia.  All output is accomplished
-- via strings "returned" to Wikipedia.