Module:Oldpuabox - 版本历史

2023年4月16日 (日) 09:53 雨音浅夏

2023-04-16T09:53:40Z

←上一版本		2023年4月16日 (日) 17:53的版本
第40行：		第40行：
	for k,v in ipairs(list)do		for k,v in ipairs(list)do
	if(v>=57344 and v<=60159)then --在sprite支持的范围		if(v>=57344 and v<=60159)then --在sprite支持的范围
	out=out.."{{~~Oldpua~~\|"..p.code2str(v).."}}"		out=out.."{{Oldpuasim\|"..p.code2str(v).."}}"
	else		else
	out=out..p.code2str(v)		out=out..p.code2str(v)

2023年4月16日 (日) 08:44 雨音浅夏

2023-04-16T08:44:50Z

←上一版本		2023年4月16日 (日) 16:44的版本
第42行：		第42行：
	out=out.."{{Oldpua\|"..p.code2str(v).."}}"		out=out.."{{Oldpua\|"..p.code2str(v).."}}"
	else		else
	out=out~~.."<span>"~~..p.code2str(v)~~.."</span>"~~		out=out..p.code2str(v)
	end		end
	end		end

2023年4月16日 (日) 08:40 雨音浅夏

2023-04-16T08:40:34Z

←上一版本		2023年4月16日 (日) 16:40的版本
第42行：		第42行：
	out=out.."{{Oldpua\|"..p.code2str(v).."}}"		out=out.."{{Oldpua\|"..p.code2str(v).."}}"
	else		else
	out=out..p.code2str(v)		out=out.."<span>"..p.code2str(v).."</span>"
	end		end
	end		end

2023年4月16日 (日) 08:33 雨音浅夏

2023-04-16T08:33:10Z

←上一版本		2023年4月16日 (日) 16:33的版本
第40行：		第40行：
	for k,v in ipairs(list)do		for k,v in ipairs(list)do
	if(v>=57344 and v<=60159)then --在sprite支持的范围		if(v>=57344 and v<=60159)then --在sprite支持的范围
	out=out.."{{Oldpua\|"..p.code2str(v).."}"		out=out.."{{Oldpua\|"..p.code2str(v).."}}"
	else		else
	out=out..p.code2str(v)		out=out..p.code2str(v)

2023年4月16日 (日) 08:32 雨音浅夏

2023-04-16T08:32:44Z

←上一版本		2023年4月16日 (日) 16:32的版本
第7行：		第7行：
	local listk=1		local listk=1
	while strk <= #strin do		while strk <= #strin do
	if(math.modf(string.byte(strin,1)/16)==14)then		if(math.modf(string.byte(strin,strk)/16)==14)then
	listk=listk+1		listout[listk]=(string.byte(strin,strk)-224)4096+(string.byte(strin,strk+1)-128)64+(string.byte(strin,strk+2)-128)
			listk=listk+1
	strk=strk+3		strk=strk+3
	~~listout[listk]=~~(string.byte(strin,1)~~-224~~)4096+(string.byte(strin,2)-~~128~~)64+(string.byte(strin,3)-128)		elseif(math.modf(string.byte(strin,strk)/32)==6)then
	~~elseif(math.modf(string.byte(strin,1)/32)==6)then~~		listout[listk]=(string.byte(strin,strk)-192)*64+(string.byte(strin,strk+1)-128)
	listk=listk+1		listk=listk+1
	strk=strk+2		strk=strk+2
	~~listout[listk]=(string.byte(strin,1)-192)*64+(string.byte(strin,2)-128)~~
	else		else
	listk=listk+1		listout[listk]=string.byte(strin,strk)
			listk=listk+1
	strk=strk+1		strk=strk+1
	~~listout[listk]=string.byte(strin,1)~~
	end		end
	end		end

2023年4月16日 (日) 08:15 雨音浅夏

2023-04-16T08:15:52Z

←上一版本		2023年4月16日 (日) 16:15的版本
第45行：		第45行：
	end		end
	end		end
	return frame:preprocess(~~args[1]~~) --预处理包含的oldpua模板		return frame:preprocess(out) --预处理包含的oldpua模板
	end		end

	return p		return p

2023年4月16日 (日) 08:15 雨音浅夏

2023-04-16T08:15:30Z

←上一版本		2023年4月16日 (日) 16:15的版本
第45行：		第45行：
	end		end
	end		end
	return frame:preprocess(~~out~~) --预处理包含的oldpua模板		return frame:preprocess(args[1]) --预处理包含的oldpua模板
	end		end

	return p		return p

雨音浅夏：创建页面，内容为“local p = {} local getArgs = require('Module:Arguments').getArgs function p.str2codelist(strin) --转换字符串到unicode码位构成的数组，仅支持第一平面字符 local listout={} local strk=1 local listk=1 while strk <= #strin do if(math.modf(string.byte(strin,1)/16)==14)then listk=listk+1 strk=strk+3 listout[listk]=(string.byte(strin,1)-224)4096+(string.byte(strin,2)-128)64+(string.by…”

2023-04-16T08:12:03Z

创建页面，内容为“local p = {} local getArgs = require('Module:Arguments').getArgs function p.str2codelist(strin) --转换字符串到unicode码位构成的数组，仅支持第一平面字符 local listout={} local strk=1 local listk=1 while strk <= #strin do if(math.modf(string.byte(strin,1)/16)==14)then listk=listk+1 strk=strk+3 listout[listk]=(string.byte(strin,1)-224)*4096+(string.byte(strin,2)-128)*64+(string.by…”

新页面

local p = {}
local getArgs = require('Module:Arguments').getArgs

function p.str2codelist(strin) --转换字符串到unicode码位构成的数组，仅支持第一平面字符
local listout={}
local strk=1
local listk=1
while strk <= #strin do
if(math.modf(string.byte(strin,1)/16)==14)then
listk=listk+1
strk=strk+3
listout[listk]=(string.byte(strin,1)-224)*4096+(string.byte(strin,2)-128)*64+(string.byte(strin,3)-128)
elseif(math.modf(string.byte(strin,1)/32)==6)then
listk=listk+1
strk=strk+2
listout[listk]=(string.byte(strin,1)-192)*64+(string.byte(strin,2)-128)
else
listk=listk+1
strk=strk+1
listout[listk]=string.byte(strin,1)
end
end
return listout
end

function p.code2str(codein) --转换unicode码位到对应字符，仅支持第一平面字符
if(codein>=2048)then
return string.char(224+math.modf(codein/4096),128+math.modf((codein%4096)/64),128+codein%64)
elseif(codein>=128)then
return string.char(192+math.modf(codein/64),128+codein%64)
else
return string.char(codein)
end
end

function p.addsprite(frame) --转换字符中旧pua的部分为sprite图
local args = getArgs(frame)
local list = p.str2codelist(args[1])
local out = ""
for k,v in ipairs(list)do
if(v>=57344 and v<=60159)then --在sprite支持的范围
out=out.."{{Oldpua|"..p.code2str(v).."}"
else
out=out..p.code2str(v)
end
end
return frame:preprocess(out) --预处理包含的oldpua模板
end

return p