Module:Cenrail - Revision history

Annwan at 20:41, 1 December 2025

2025-12-01T20:41:53Z

@@ Line 65: / Line 65: @@
 			  .. "<th>Stop</th>"
 			  .. "<th>Code</th>"
 			  .. "<th>Date opened</th>"
 			  .. "<th>Notes</th>"
 			  .. "</tr>"
 		out = out .. "</table>"
 		return out

Annwan at 20:31, 1 December 2025

2025-12-01T20:31:23Z

← Older revision		Revision as of 20:31, 1 December 2025
Line 61:		Line 61:
	local out = [[<table class="wikitable" id = "line_table-]] .. linecode .. [[">]]		local out = [[<table class="wikitable" id = "line_table-]] .. linecode .. [[">]]
	out = out .. "<caption>" .. line.name .. " [" .. line.code .. "]<caption>"		out = out .. "<caption>" .. line.name .. " [" .. line.code .. "]<caption>"
	out = out .. "<th>"		out = out .. "<tr>"
	.. "<td rowspan=" .. #line.stops .. " style=\"background-color:" .. ( line.color or "#000" ) .. "\"></td>"		.. "<td rowspan=" .. #line.stops .. " style=\"background-color:" .. ( line.color or "#000" ) .. "\"></td>"
	.. "<td>Stop</td>"		.. "<th>Stop</th>"
	.. "<td>Code</td>"		.. "<th>Code</th>"
	.. "<td>Overworld Counterpart</td>"		.. "<th>Overworld Counterpart</th>"
	.. "<td>Date opened</td>"		.. "<th>Date opened</th>"
	.. "<td>Notes</td>"		.. "<th>Notes</th>"
	.. "</th>"		.. "</tr>"
	out = out .. "</table>"		out = out .. "</table>"
	return out		return out

Annwan at 20:30, 1 December 2025

2025-12-01T20:30:18Z

← Older revision		Revision as of 20:30, 1 December 2025
Line 14:		Line 14:
	_m.line_table = function (frame)		_m.line_table = function (frame)
	local linecode = frame.args[1] or frame.args.code or "CE"		local linecode = frame.args[1] or frame.args.code or "CE"
			local style = frame.args[2] or frame.args.style or "cenrail"
	local nether = linecode:sub(1,2) == "N-"		local nether = linecode:sub(1,2) == "N-"
	local dim = nether and "the_nether" or "overworld"		local dim = nether and "the_nether" or "overworld"
	local line = find_when(function(_, v) return v.code == linecode end, data.lines[dim])		local line = find_when(function(_, v) return v.code == linecode end, data.lines[dim])
	local out = "{\| class=\"wikitable\" id=\"line_table-" .. linecode .. "\"\n"		if style == "cenrail" then
	out = out .. "\|+ " .. line.name .. " [" .. line.code .. "]\n"		local out = "{\| class=\"wikitable\" id=\"line_table-" .. linecode .. "\"\n"
	out = out .. "\|-\n"		out = out .. "\|+ " .. line.name .. " [" .. line.code .. "]\n"
	out = out .. "! rowspan = " .. #line.stops .. " style=\"background-color:" .. ( line.color or "#000" ) .. "\" \| \n"		out = out .. "\|-\n"
	out = out .. "! Stop \n! Code \n! Date opened\n! Usage notes\n"		out = out .. "! rowspan = " .. #line.stops .. " style=\"background-color:" .. ( line.color or "#000" ) .. "\" \| \n"
	out = out .. "\|-\n"		out = out .. "! Stop \n! Code \n! Date opened\n! Usage notes\n"
	for _, stop in ipairs(line.stops) do		out = out .. "\|-\n"
	if type(stop) == "string" then		for _, stop in ipairs(line.stops) do
	out = out .. "\| colspan = 4 \| '''" .. stop .. "'''\n\|-\n"		if type(stop) == "string" then
	else		out = out .. "\| colspan = 4 \| '''" .. stop .. "'''\n\|-\n"
	local code = ((nether and "N-" or "") .. stop.code)		else
	local name = find_when(function(i, v)		local code = ((nether and "N-" or "") .. stop.code)
	return i == code		local name = find_when(function(i, v)
	end, data.stations) or ("<ERROR station `" .. code .. "` has no assigned name>")		return i == code
	local country = ""		end, data.stations) or ("<ERROR station `" .. code .. "` has no assigned name>")
	if stop.code:sub(1,1) ~= "X" then		local country = ""
	country = ", [[" .. (		if stop.code:sub(1,1) ~= "X" then
	countries.get(stop.code:sub(1,2)) or {common_name = "??"}		country = ", [[" .. (
	).common_name .. "]]"		countries.get(stop.code:sub(1,2)) or {common_name = "??"}
	end		).common_name .. "]]"
	local usage_notes = stop.usage_notes or ""		end
	for _, s in ipairs(data.connections) do		local usage_notes = stop.usage_notes or ""
	local self = nether and 2 or 1		for _, s in ipairs(data.connections) do
	local other = nether and 1 or 2		local self = nether and 2 or 1
	if s[self].code == stop.code then		local other = nether and 1 or 2
	usage_notes = usage_notes .. (nether and "Cen" or "Lesh") .."rail connection with " .. s[other].code .. "."		if s[self].code == stop.code then
			usage_notes = usage_notes .. (nether and "Cen" or "Lesh") .."rail connection with " .. s[other].code .. "."
			end
	end		end
			if type(name) == "table" then name = name[1] end
			out = out .. "\| " .. name .. country .. "\n"
			out = out .. "\| " .. code .. "\n"
			out = out .. "\| " .. (stop.date_opened or "") .. "\n"
			out = out .. "\| " .. usage_notes .. "\n"
			out = out .. "\|-\n"
	end		end
	~~if type(name) == "table" then name = name[1] end~~
	~~out = out .. "\| " .. name .. country .. "\n"~~
	~~out = out .. "\| " .. code .. "\n"~~
	~~out = out .. "\| " .. (stop.date_opened or "") .. "\n"~~
	~~out = out .. "\| " .. usage_notes .. "\n"~~
	~~out = out .. "\|-\n"~~
	end		end
			if line.loop then out = out .. "\| colspan = 4 \| '''LOOPS'''\n\|-\n" end
			out = out .. "\|}"
			return out
			elseif style == "leshrail" then
			local out = [[<table class="wikitable" id = "line_table-]] .. linecode .. [[">]]
			out = out .. "<caption>" .. line.name .. " [" .. line.code .. "]<caption>"
			out = out .. "<th>"
			.. "<td rowspan=" .. #line.stops .. " style=\"background-color:" .. ( line.color or "#000" ) .. "\"></td>"
			.. "<td>Stop</td>"
			.. "<td>Code</td>"
			.. "<td>Overworld Counterpart</td>"
			.. "<td>Date opened</td>"
			.. "<td>Notes</td>"
			.. "</th>"
			out = out .. "</table>"
			return out
	end		end
	~~if line.loop then out = out .. "\| colspan = 4 \| '''LOOPS'''\n\|-\n" end~~
	~~out = out .. "\|}"~~
	~~return out~~
	end		end

	return _m		return _m

Annwan at 19:52, 1 December 2025

2025-12-01T19:52:38Z

← Older revision		Revision as of 19:52, 1 December 2025
Line 17:		Line 17:
	local dim = nether and "the_nether" or "overworld"		local dim = nether and "the_nether" or "overworld"
	local line = find_when(function(_, v) return v.code == linecode end, data.lines[dim])		local line = find_when(function(_, v) return v.code == linecode end, data.lines[dim])
	local out = "{\| class=\"wikitable\" id=\"line_table-" .. ~~code~~ .. "\"\n"		local out = "{\| class=\"wikitable\" id=\"line_table-" .. linecode .. "\"\n"
	out = out .. "\|+ " .. line.name .. " [" .. line.code .. "]\n"		out = out .. "\|+ " .. line.name .. " [" .. line.code .. "]\n"
	out = out .. "\|-\n"		out = out .. "\|-\n"

Annwan at 19:51, 1 December 2025

2025-12-01T19:51:58Z

← Older revision		Revision as of 19:51, 1 December 2025
Line 17:		Line 17:
	local dim = nether and "the_nether" or "overworld"		local dim = nether and "the_nether" or "overworld"
	local line = find_when(function(_, v) return v.code == linecode end, data.lines[dim])		local line = find_when(function(_, v) return v.code == linecode end, data.lines[dim])
	local out = "{\| class=\"wikitable\"\n"		local out = "{\| class=\"wikitable\" id=\"line_table-" .. code .. "\"\n"
	out = out .. "\|+ " .. line.name .. " [" .. line.code .. "]\n"		out = out .. "\|+ " .. line.name .. " [" .. line.code .. "]\n"
	out = out .. "\|-\n"		out = out .. "\|-\n"

Annwan at 17:16, 1 December 2025

2025-12-01T17:16:40Z

← Older revision		Revision as of 17:16, 1 December 2025
Line 7:		Line 7:
	for i, v in pairs(list) do		for i, v in pairs(list) do
	if predicate(i, v) then		if predicate(i, v) then
	return i, v		return v
	end		end
	end		end
Line 16:		Line 16:
	local nether = linecode:sub(1,2) == "N-"		local nether = linecode:sub(1,2) == "N-"
	local dim = nether and "the_nether" or "overworld"		local dim = nether and "the_nether" or "overworld"
	local _, line = find_when(function(_, v) return v.code == linecode end, data.lines[dim])		local line = find_when(function(_, v) return v.code == linecode end, data.lines[dim])
	local out = "{\| class=\"wikitable\"\n"		local out = "{\| class=\"wikitable\"\n"
	out = out .. "\|+ " .. line.name .. " [" .. line.code .. "]\n"		out = out .. "\|+ " .. line.name .. " [" .. line.code .. "]\n"
Line 28:		Line 28:
	else		else
	local code = ((nether and "N-" or "") .. stop.code)		local code = ((nether and "N-" or "") .. stop.code)
	local _, name = find_when(function(i, v)		local name = find_when(function(i, v)
	return i == code		return i == code
	end, data.stations) or (~~function () return nil,~~ "<ERROR station `" .. code .. "` has no assigned name>" ~~end)(~~)		end, data.stations) or ("<ERROR station `" .. code .. "` has no assigned name>")
	local country = ""		local country = ""
	if stop.code:sub(1,1) ~= "X" then		if stop.code:sub(1,1) ~= "X" then

Annwan at 17:15, 1 December 2025

2025-12-01T17:15:22Z

← Older revision		Revision as of 17:15, 1 December 2025
Line 30:		Line 30:
	local _, name = find_when(function(i, v)		local _, name = find_when(function(i, v)
	return i == code		return i == code
	end, data.stations) or ("<ERROR station `" .. code .. "` has no assigned name>")		end, data.stations) or (function () return nil, "<ERROR station `" .. code .. "` has no assigned name>" end)()
	local country = ""		local country = ""
	if stop.code:sub(1,1) ~= "X" then		if stop.code:sub(1,1) ~= "X" then

Annwan at 17:13, 1 December 2025

2025-12-01T17:13:24Z

← Older revision		Revision as of 17:13, 1 December 2025
Line 30:		Line 30:
	local _, name = find_when(function(i, v)		local _, name = find_when(function(i, v)
	return i == code		return i == code
	end, data.stations)		end, data.stations) or ("<ERROR station `" .. code .. "` has no assigned name>")
	local country = ""		local country = ""
	if stop.code:sub(1,1) ~= "X" then		if stop.code:sub(1,1) ~= "X" then
Line 46:		Line 46:
	end		end
	if type(name) == "table" then name = name[1] end		if type(name) == "table" then name = name[1] end
	out = out .. "\| " .. name .. country .. "\n"		out = out .. "\| " .. name .. country .. "\n"
	out = out .. "\| " .. code .. "\n"		out = out .. "\| " .. code .. "\n"
	out = out .. "\| " .. (stop.date_opened or "") .. "\n"		out = out .. "\| " .. (stop.date_opened or "") .. "\n"

Annwan at 19:29, 30 November 2025

2025-11-30T19:29:50Z

← Older revision		Revision as of 19:29, 30 November 2025
Line 42:		Line 42:
	local other = nether and 1 or 2		local other = nether and 1 or 2
	if s[self].code == stop.code then		if s[self].code == stop.code then
	usage_notes = usage_notes .. (nether and "Cen" or "Lesh") .."rail connection with " ~~.. (nether and "" or "N-")~~ .. s[other].code .. "."		usage_notes = usage_notes .. (nether and "Cen" or "Lesh") .."rail connection with " .. s[other].code .. "."
	end		end
	end		end

Annwan at 16:52, 28 November 2025

2025-11-28T16:52:21Z

← Older revision		Revision as of 16:52, 28 November 2025
Line 2:		Line 2:

	local data = mw.loadJsonData "Data:NguhRoutes/network.json"		local data = mw.loadJsonData "Data:NguhRoutes/network.json"
	local countries = require "Module:~~Data/UŊCDSO/Countries~~"		local countries = require "Module:Places"

	local find_when = function (predicate, list)		local find_when = function (predicate, list)
Line 34:		Line 34:
	if stop.code:sub(1,1) ~= "X" then		if stop.code:sub(1,1) ~= "X" then
	country = ", [[" .. (		country = ", [[" .. (
	countries.~~get_country_code2~~(stop.code:sub(1,2)) or {common_name = "??"}		countries.get(stop.code:sub(1,2)) or {common_name = "??"}
	).common_name .. "]]"		).common_name .. "]]"
	end		end