查看“Module:Xdnum”的源代码

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

function numtran(input1)
	local input = string.gsub(string.gsub(string.gsub(input1,"n","."),"T","0")," ","")
	local output = ""
	local bj = 0
	local aa = {"0","1","2","3","4","5","6","7","8","9","."}
	local bb = {"1","2","3","4","5","6","7","8","9"}
	local cc = {}
	local dd = {}
	for ii = #aa,1,-1 do
		cc[aa[ii]]=1
	end
	for ii = #bb,1,-1 do
		dd[bb[ii]]=1
	end
	for i = 1,string.len(input) do
		if (string.sub(input,i,i)==".") then
			bj = 2
		end
		if (bj==0 and dd[string.sub(input,i,i)]==1) then
			bj = 1
		end
		if (cc[string.sub(input,i,i)]==nil) then
			bj = 0
		end
		if (bj==1 and string.sub(input,i,i)=="0") then
			output = output.."T"
		else
			output = output..string.sub(input,i,i)
		end
	end
	mw.log(output)
	return output
end

function module.tran(frame)
	local args = getArgs(frame)
	local input = tostring(args[1])
	local keya = {"0","1","2","3","4","5","6","7","8","9","T","%."}
	local vala = {"","","","","","","","","","","",""}
	local output = numtran(input)
	for i = 1,12 do
		output = string.gsub(output, keya[i], vala[i])
	end	
	output = string.gsub(output," ","")
	return output
end

return module