Module:User:QFQ/zh-dial-map-helper

The following documentation is located at Module:User:QFQ/zh-dial-map-helper/documentation.

Useful links: root page • root page’s subpages • links • transclusions • testcases • sandbox

showkeys

-- after Mandalay-C
variety_data = {
	group = "粵語",
	english = "曼谷（廣府）",
	link = "Bangkok",
	lat = 13.75,
	long = 100.466667
}
-- after Wengyuan
variety_data = {
	group = "客家語",
	english = "南雄（珠璣）",
	link = "zh:珠璣巷",
	lat = 25.19592,
	long = 114.35594
}
-- after Chaoyang
variety_data = {
	group = "閩南語",
	english = "南澳（後宅）",
	link = "zh:後宅鎮 (南澳縣)",
	lat = 23.42024,
	long = 117.01934
}
-- after Nan'ao-HZ
variety_data = {
	group = "閩南語",
	english = "南澳（雲澳）",
	link = "zh:雲澳鎮",
	lat = 23.40622,
	long = 117.10204
}

local export = {}

local variety_data = require("Module:zh/data/dial")

function export.keys(frame)
	local ks = {}
	for k, t in pairs(variety_data) do
		table.insert(ks, k)
	end
	return 'enwikt_keys = {"' .. table.concat(ks, '", "') .. '"}'
end

function export.showkeys(frame)
	local query = mw.text.split(frame.args, ' ') -- {"Bangkok-C","Nanxiong-ZJ","Nan'ao-HZ","Nan'ao-YA"}
	local data = require("Module:User:QFQ/zh-dial-map-helper/data")
	function dump(h, t)
		local ret = {}
		local ordered_table = require("Module:User:QFQ/ordered-table")
		local todo = ordered_table {}
		-- reverse: { ="Mandarin",="Cantonese",="Gan",="Hakka",="Huizhou",="Jin",="Jiuxing Yumin",="Min Bei",="Min Dong",="Min Nan",="Puxian Min",="Min Zhong",="Zhongshan Min",="Northern Pinghua",="Southern Pinghua",="Shehua",="Waxiang",="Wu",="Xiang" }
		todo = function(s) local t = { ="官話",="粵語",="贛語",="客家語",="徽語",="晉語",="九姓漁民船上話",="閩北語",="閩東語",="閩南語",="莆仙語",="閩中語",="中山閩語",="北部平話",="南部平話",="畲話",="瓦鄉話",="吳語",="湘語" }; return '"' .. t .. '"' end
		todo = function(s) return '"' .. s .. '"' end
		todo = function(s) return '"' .. s .. '"' end
		todo = function(s) return s end
		todo = function(s) return s end
		for k, f in pairs(todo) do
			if t then
				table.insert(ret, string.format('\t%s = %s', k == 'chinese' and 'english' or k, f(t)))
			end
		end
		return string.format('variety_data = {\n%s\n}', h, table.concat(ret, ',\n'))
	end
	local ret = {}
	for _, k in pairs(query) do
		table.insert(ret, string.format("-- after %s", data))
		table.insert(ret, dump(k, data))
	end
	return frame:extensionTag('syntaxhighlight', table.concat(ret, '\n'), { lang = 'lua' } )
end

function export.count(frame)
	local ks = {}
	for k, t in pairs(variety_data) do
		table.insert(ks, k)
	end
	return #ks
end

function export.test(frame)
	local query = mw.text.split(frame.args, ' ') -- {"Bangkok-C","Nanxiong-ZJ","Nan'ao-HZ","Nan'ao-YA"}
	local data = require("Module:User:QFQ/zh-dial-map-helper/data")
	function dump(h, t)
		local ret = {}
		local ordered_table = require("Module:User:QFQ/ordered-table")
		local todo = ordered_table {}
		-- reverse: { ="Mandarin",="Cantonese",="Gan",="Hakka",="Huizhou",="Jin",="Jiuxing Yumin",="Min Bei",="Min Dong",="Min Nan",="Puxian Min",="Min Zhong",="Zhongshan Min",="Northern Pinghua",="Southern Pinghua",="Shehua",="Waxiang",="Wu",="Xiang" }
		todo = function(s) local t = { ="官話",="粵語",="贛語",="客家語",="徽語",="晉語",="九姓漁民船上話",="閩北語",="閩東語",="閩南語",="莆仙語",="閩中語",="中山閩語",="北部平話",="南部平話",="畲話",="瓦鄉話",="吳語",="湘語" }; return '"' .. t .. '"' end
		todo = function(s) return '"' .. s .. '"' end
		todo = function(s) return '"' .. s .. '"' end
		todo = function(s) return s end
		todo = function(s) return s end
		for k, f in pairs(todo) do
			if t then
				table.insert(ret, string.format('\t%s = %s', k == 'chinese' and 'english' or k, f(t)))
			end
		end
		return string.format('variety_data = {\n%s\n}', h, table.concat(ret, ',\n'))
	end
	local ret = {}
	for _, k in pairs(query) do
		table.insert(ret, string.format("-- after %s", data))
		table.insert(ret, dump(k, data))
	end
	return frame:extensionTag('syntaxhighlight', table.concat(ret, '\n'), { lang = 'lua' } )
end

return export

Module:User:QFQ/zh-dial-map-helper

showkeys

Wikious

Boobota

Sagapedia