(Translated by https://www.hiragana.jp/)
模組:Road data/strings/TWN - 维基百科，自由的百科全书
维基百科

模も組ぐみ:Road data/strings/TWN

< Module:Road data‎ | strings
文档图示 模かたぎ块文档[创建]
-- 臺灣たいわん
local TWN = {}
local format = mw.ustring.format
local function en_to_tiangan(num) -- 轉換てんかん為ため天てん干ひ
	local transfer = {a="甲かぶと",b="乙おつ",c="丙へい",d="丁ひのと",e="戊つちのえ",f="己おのれ",g="庚かのえ"}
	if (transfer[string.sub(num,-1,-1)]== nil) then 
		return ""
	else
		return transfer[string.sub(num,-1,-1)]
	end
end

---國道こくどう---
TWN.Fwy = {shield = {hook = "lowercase",---國道こくどう
                     default = "TWHW%lowercase%.svg"},
                   --主おも線せん--
           link = {["1"] = "中山ちゅうざん高速こうそく公おおやけ路ろ", 
           	       ["2"] = "國道こくどう二に號ごう (中華民國ちゅうかみんこく)", 
           	       ["3"] = "福ぶく爾なんじ摩ま沙すな高速こうそく公おおやけ路ろ",
           	       ["4"] = "國道こくどう四よん號ごう (中華民國ちゅうかみんこく)", 
           	       ["5"] = "蔣渭水すい高速こうそく公おおやけ路ろ", 
           	       ["6"] = "水すい沙すな連れん高速こうそく公おおやけ路ろ",
           	       ["7"] = "國道こくどう七なな號ごう (中華民國ちゅうかみんこく)", 
           	       ["8"] = "國道こくどう八はち號ごう (中華民國ちゅうかみんこく)",
                   ["10"] = "國道こくどう十じゅう號ごう (中華民國ちゅうかみんこく)",
                   --支線しせん--
                   ["1a"] = "桃園ももぞの航空こうくう城じょう北側きたがわ聯れん外がい高速こうそく公おおやけ路ろ", 
                   ["2a"] = "國道こくどう二に號ごう甲かぶと線せん",
                   ["3a"] = "國道こくどう三さん號ごう甲かぶと線せん"},
                 --主おも線せん--         
          abbr = {["1"] = "國道こくどう一いち號ごう", 
          	      ["2"] = "國道こくどう二に號ごう", 
          	      ["3"] = "國道こくどう三さん號ごう", 
          	      ["4"] = "國道こくどう四よん號ごう", 
          	      ["5"] = "國道こくどう五ご號ごう",
                  ["6"] = "國道こくどう六ろく號ごう", 
                  ["7"] = "國道こくどう七なな號ごう", 
                  ["8"] = "國道こくどう八はち號ごう",
                  ["10"] = "國道こくどう十じゅう號ごう",
                 --支線しせん--
                  ["1a"] = "國道こくどう一いち號ごう甲かぶと線せん", 
                  ["2a"] = "國道こくどう二に號ごう甲かぶと線せん", 
                  ["3a"] = "國道こくどう三さん號ごう甲かぶと線せん"},
          width = "expand"}

TWN.Freeway = TWN.Fwy
TWN.NH = TWN.Fwy
---（擴充かくじゅう）國道こくどう全ぜん稱しょう---
TWN["Fwy-ALL"] = {shield = {hook = "lowercase",
                     default = "TWHW%lowercase%.svg"},
                   --主おも線せん--
           link = {["1"] = "中山ちゅうざん高速こうそく公おおやけ路ろ", 
           	       ["2"] = "國道こくどう二に號ごう (中華民國ちゅうかみんこく)", 
           	       ["3"] = "福ぶく爾なんじ摩ま沙すな高速こうそく公おおやけ路ろ",
           	       ["4"] = "國道こくどう四よん號ごう (中華民國ちゅうかみんこく)", 
           	       ["5"] = "蔣渭水すい高速こうそく公おおやけ路ろ", 
           	       ["6"] = "水すい沙すな連れん高速こうそく公おおやけ路ろ",
           	       ["7"] = "高雄たかお港こう東側ひがしがわ聯れん外がい高速こうそく公おおやけ路ろ", 
           	       ["8"] = "國道こくどう八はち號ごう (中華民國ちゅうかみんこく)", 
                   ["10"] = "國道こくどう十じゅう號ごう (中華民國ちゅうかみんこく)",
                   --支線しせん--
                   ["1a"] = "桃園ももぞの航空こうくう城じょう北側きたがわ聯れん外がい高速こうそく公おおやけ路ろ", 
                   ["2a"] = "國道こくどう二に號ごう甲かぶと線せん", 
                   ["3a"] = "國道こくどう三さん號ごう甲かぶと線せん"},
                 --主おも線せん--         
          abbr = {["1"] = "中山ちゅうざん高速こうそく公おおやけ路ろ", 
          	      ["2"] = "桃園ももぞの環たまき線せん", 
          	      ["3"] = "福ぶく爾なんじ摩ま沙すな高速こうそく公おおやけ路ろ", 
          	      ["4"] = "台だい中ちゅう環たまき線せん", 
          	      ["5"] = "蔣渭水すい高速こうそく公おおやけ路ろ",
                  ["6"] = "水すい沙すな連れん高速こうそく公おおやけ路ろ", 
                  ["7"] = "高雄たかお港こう東側ひがしがわ聯れん外がい高速こうそく公おおやけ路ろ", 
                  ["8"] = "台だい南みなみ支線しせん", 
                  ["10"] = "高雄たかお支線しせん",
                 --支線しせん--
                  ["1a"] = "桃園ももぞの航空こうくう城じょう北側きたがわ聯れん外がい高速こうそく公おおやけ路ろ", 
                  ["2a"] = "大園おおぞの支線しせん", 
                  ["3a"] = "台北たいぺい聯絡れんらく線せん"},
          width = "expand"}

TWN["Freeway-ALL"] = TWN["Fwy-ALL"]
TWN["NH-ALL"] = TWN["Fwy-ALL"]

---省しょう道どう---
local ph_aux_number =  {"1a","1b","1c","1d","1e","1f","2a","2b","2c","2d","2e","2f","2g","3a","3b","3c","5a","5b","7a","7b","7c","7d",
						"8a","9a","9b","9c","9d","9e","10b","11a","11b","11c","13a","14a","14b","14c","14d","15a","17a","17b","19a",
						"20a","20b","21a","27a","61a","61b","62a","63a","68a","74a"}

local ph_link = {default = "台だい%route%線せん"}
local ph_abbr = {default = "台だい%route%線せん"}

for _, num in ipairs(ph_aux_number) do
	ph_link[num] = format("台だい%s線せん#%s線せん", string.sub(num,1,-2), en_to_tiangan(num))
	ph_abbr[num] = format("台だい%s%s線せん", string.sub(num,1,-2), en_to_tiangan(num))
end

TWN.PH = {shield = {hook = "lowercase",
                    default = "TW PHW%lowercase%.svg"},
           link = ph_link,
           abbr = ph_abbr,
	       width = "expand"}

---（擴充かくじゅう）快速かいそく公おおやけ路ろ全ぜん稱しょう---
TWN["PH-ALL"] = {shield = {hook = "lowercase",
                     default = "TW PHW%lowercase%.svg"},
           link = {default = "台だい%route%線せん", 
                   ["2f"] = "台だい2線せん#己おのれ線せん",
                   ["61"] = "西部せいぶ濱はま海かい快速かいそく公おおやけ路ろ", 
                   ["61a"] = "西部せいぶ濱はま海かい快速かいそく公おおやけ路ろ#甲かぶと線せん（已やめ解かい編へん）", 
                   ["61b"] = "西部せいぶ濱はま海かい快速かいそく公おおやけ路ろ#乙おつ線せん",
                   ["62a"] = "台だい62線せん#甲かぶと線せん",
                   ["74a"] = "台だい74線せん#甲かぶと線せん"},            
           abbr = {["2f"] = "基もと隆たかし港西みなとにし岸がん聯れん外がい道路どうろ",
                   ["61"] = "西部せいぶ濱はま海かい快速かいそく公おおやけ路ろ", 
                   ["61b"] = "彰あきら濱はま聯絡れんらく道どう",
           	       ["62"] = "萬まん里さと瑞みず濱はま線せん",
           	       ["62a"] = "基もと隆たかし港こう東岸とうがん聯れん外がい道路どうろ",
           	       ["63"] = "中ちゅう投とう公おおやけ路ろ",
           	       ["64"] = "八はち里さと新店しんてん線せん", 
           	       ["65"] = "五ご股また土ど城じょう線せん",
           	       ["66"] = "觀音かんのん大溪おおたに線せん", 
           	       ["68"] = "南みなみ寮りょう竹ちく東ひがし線せん", 
                   ["72"] = "後ご龍りゅう汶水線せん",
                   ["74"] = "快かい官かん霧きり峰ほう線せん", 
                   ["74a"] = "彰あきら化か東外ひがしそと環たまき道どう", 
                   ["76"] = "芳よし苑えん草くさ屯たむろ線せん",
                   ["78"] = "台だい西にし古こ坑あな線せん",
                   ["82"] = "東石とうせき嘉よしみ義ぎ線せん",
                   ["84"] = "北門きたもん玉井たまい線せん",
                   ["86"] = "台だい南關なんかん廟びょう線せん",
                   ["88"] = "高だか雄ゆう潮うしお州しゅう線せん"},
          width = "expand"}

---縣けん市道しどう---
local cr_number =  {city_main = {"101","102","103","104","105","106","107","108","109","110",
								 "111","112","113","114","115","116","118","121","125","127",
								 "129","132","136","165","171","172","173","174","175","176",
								 "177","178","180","181","182","183","186","188"},
					city_aux = {"101a","102a","103a","106a","107a","110a","112a","113a","114a",
								"132a","171a","172a","173a","177a","178a","180a","183a","186a",
								"106b","110b","113b","171b","172b","183b",
								"113c"},
					county_aux = {"119a","124a","134a","135a","138a","139a","143a","144a","145a","146a","149a",
								  "151a","153a","154a","156a","158a","159a","162a","185a","187a","189a","191a",
								  "192a","196a","199a","200a","204a",
								  "124b","124a","134b","139b","145b","149b","154b","156b","158b","162b","187b",
								  "191b",
								  "124c","187c"}}

local function cr_link_format(types,num)
	local tiangan = en_to_tiangan(num)
	local formats = {city_main = format("市道しどう%s號ごう",num),
				 	 city_aux = format("市道しどう%s號ごう#%s線せん", string.sub(num,1,-2), tiangan),
					 county_aux = format("縣道けんどう%s號ごう#%s線せん", string.sub(num,1,-2), tiangan)}
	return formats[types]
end

local function cr_abbr_format(types,num)
	local tiangan = en_to_tiangan(num)
	local formats = {city_main = format("市道しどう%s號ごう",num),
				 	 city_aux = format("市道しどう%s%s線せん", string.sub(num,1,-2), tiangan),
					 county_aux = format("縣道けんどう%s%s線せん", string.sub(num,1,-2), tiangan)}
	return formats[types]
end

local cr_link = {default = "縣道けんどう%route%號ごう"}
local cr_abbr = {default = "縣道けんどう%route%號ごう"}

for _, types in ipairs({"city_main","city_aux","county_aux"}) do
	for _, num in ipairs(cr_number[types]) do
		cr_link[num] = cr_link_format(types,num)
		cr_abbr[num] = cr_abbr_format(types,num)
	end 
end

TWN.CR = {shield = {hook = "lowercase",
                    default = "TW CHW%lowercase%.svg"},
           link = cr_link,
           abbr = cr_abbr,
	       width = "expand"}

TWN.CH = TWN.CR

---（擴充かくじゅう）只ただ顯示けんじ「縣道けんどうXXX」---
local cr2_link = {default = "縣道けんどう%route%號ごう"}
local cr2_abbr = {default = "縣道けんどう%route%號ごう"}

for _, types in ipairs({"city_aux","county_aux"}) do
	for _, num in ipairs(cr_number[types]) do
		cr2_link[num] = cr_link_format(types,num)
		cr2_abbr[num] = format("縣道けんどう%s%s線せん", string.sub(num,1,-2), en_to_tiangan(num))
	end 
end

TWN.CR2 = {shield = {hook = "lowercase",
                    default = "TW CHW%lowercase%.svg"},
           link = cr2_link,
           abbr = cr2_abbr,
	       width = "expand"}

TWN.CH2 = TWN.CR2

---鄉ごう區く道どう---
local county_en = {"TP","TY","HC","ML","TC","CH","NT","YL","CY","TN","KH","PT",
				   "IL","HL","TT","PH"}

local function county_abbr(cname) --轉換てんかん為ため縣けん市し鄉ごう區く道どう簡稱
	local tables = {TP="北きた",TY="桃もも",HC="竹ちく",ML="苗なえ",TC="中ちゅう",CH="彰あきら",NT="投とう",YL="雲くも",
					CY="嘉よしみ",TN="南みなみ",KH="高だか",PT="屏へい",IL="宜むべ",HL="花はな",TT="東ひがし",PH="澎"}
	return tables[cname]
end

for _, cname in ipairs(county_en) do
	num = "%route%"
	TWN["TR"..cname] = {shield = format("TW THW%s%s.svg", string.lower(cname), num),
		                link = format("%s%s線せん", county_abbr(cname), num),
		                abbr = format("%s%s線せん", county_abbr(cname), num)}
end

return TWN
检索自じ“https://zh.wikipedia.org/w/index.php?title=Module:Road_data/strings/TWN&oldid=81819419”