imported>Fredddie: cleanup

2022-12-07T23:21:46Z

cleanup

New page

--[==[
To inspect the content of this data module, use [[Special:ExpandTemplates]]
and enter the following input text:
{{#invoke:Road data/dump|dump|module=Module:<name-of-this-module>}}

To inspect the content of this data module when editing, enter the following
into the Debug console:
local util = require("Module:Road data/util")
print(util.arrayToString(p))
To inspect a particular route type, change `p` above to include the route type
e.g., `p.I` and `p["US-Hist"]`.
]==]

-- Pennsylvania
local PA = {}

local format = mw.ustring.format
local util = require("Module:Road data/util")
util.addAll(PA, require("Module:Road data/strings/USA"))

local suffix = " ([dab||%dab%, |]Pennsylvania)"
local maint = "[[Pennsylvania Department of Transportation|PennDOT]]"

PA.I.link = "Interstate %route% (Pennsylvania)"

for k, v in pairs(PA) do if k:find ("^I") then
v.link = PA.I.link
end
end

PA.BL.link = "Interstate %route% Business ([dab||%dab%, |]Pennsylvania)"

for k, v in pairs(PA) do if k:find ("^BL") then
v.link = PA.BL.link
end
end

PA.US.link = "U.S. Route %route% in Pennsylvania"

for k, v in pairs(PA) do if k:find ("^US %d") then
v.name = PA.US.name
v.link = PA.US.link
end
end

for _,auxType in ipairs({"Alt", "Bus", "Byp", "City", "Conn", "Emerg", "Opt", "Scenic", "Spur", "Temp", "Toll", "Truck"}) do
local spec = PA[" aux "][auxType]
for k, v in pairs(PA) do if k:find (auxType) then if k:find ("^US") then
v.name = PA.US.name .. " " .. spec.name
v.link = PA.US.base .. " " .. spec.name .. " ([dab||%dab%, |]Pennsylvania)"
end
end
end
end
PA["US 1948"].bannersuffix = "1948"
PA["US 1961"].shield = "US %route% (1961 cutout).svg"
PA["US 1961"].bannersuffix = "1961"

PA["US-Truck-Alt"] = {
shield = PA.US.shield,
name = PA["US-Alt"].name .. " Truck",
link = "U.S. Route %route% Alternate Truck ([dab||%dab%, |]Pennsylvania)",
abbr = "US %route% Alt. Truck",
banner = "Alternate truck plate.svg",
width = "expand",
aux = PA[" aux "].Truck
}
PA["US-Alt-Truck"] = PA["US-Truck-Alt"]

PA["US-Bus-Alt-Truck"] = {
shield = PA.US.shield,
name = PA["US-Bus"].name .. " Alternate Truck",
link = "U.S. Route %route% Business Alternate Truck ([dab||%dab%, |]Pennsylvania)",
abbr = "US %route% Bus. Alt. Truck",
banner = "Business-alternate-truck plate.svg",
width = "expand",
aux = PA[" aux "].Truck
}
PA["US-Bus-Truck-Alt"] = PA["US-Bus-Alt-Truck"]

for _,year in ipairs({'1926', '1948', '1961'}) do
for _,auxType in ipairs({"Alt", "Bus", "Byp", "Conn", "Opt", "Scenic", "Spur", "Temp", "Truck"}) do
local type = "US " .. year
local spec = PA[" aux "][auxType]
PA[type .. "-" .. auxType] = {
shield = PA[type].shield,
shieldmain = PA[type].shieldmain,
name = PA[type].name .. " " .. spec.name,
link = PA[type].base .. " " .. spec.name .. suffix,
abbr = PA[type].abbr .. " " .. spec.abbrsuffix,
banner = spec.bannerprefix .. " plate " .. year .. ".svg",
bannersuffix = year,
aux = spec.aux,
width = PA[type].width
}
end
end

PA.SR = {
base = "Pennsylvania Route %route%",
shield = "PA-%route%.svg",
shieldmain = {
["66"] = {"PA-%route%.svg", "Turnpike-%route%.svg"},
["179"] = {"PA-%route%.svg", "Ellipse sign %route%.svg"},
["491"] = {"PA-%route%.svg", "Ellipse sign %route%.svg"},
default = "PA-%route%.svg"
},
name = {
["179"] = "Route %route%",
["491"] = "Route %route%",
default = "Pennsylvania Route %route%"
},
link = "Pennsylvania Route %route% [dab||(%dab%)|]",
abbr = "PA %route%",
width = "expand"
}
PA.PA = PA.SR

for _,type in ipairs({"SR", "PA"}) do
for _,year in ipairs({"1926", "1948", "1960", "1962"}) do
PA[type .. " " .. year] = {
shield = format("PA-%%route%% (%s).svg", year),
name = PA.SR.name.default,
link = PA.SR.link,
abbr = PA.SR.abbr,
width = "square",
bannersuffix = year
}
end
end

for _,type in ipairs({'SR', 'PA'}) do
for _,auxType in ipairs({"Alt", "Bus", "Byp", "Conn", "Opt", "Scenic", "Spur", "Temp", "Truck"}) do
local spec = PA[" aux "][auxType]
PA[type .. "-" .. auxType] = {
shield = PA[type].shield,
name = "Pennsylvania Route %route% " .. spec.name,
link = "Pennsylvania Route %route% " .. spec.name .. PA[" dab "],
abbr = PA[type].abbr .. " " .. spec.abbrsuffix,
banner = spec.bannerprefix .. " plate.svg",
aux = spec.aux,
width = "expand",
}
end
end

for _,type in ipairs({'SR', 'PA'}) do
for _,year in ipairs({'1926', '1948'}) do
for _,auxType in ipairs({"Alt", "Bus", "Byp", "Conn", "Opt", "Scenic", "Spur", "Temp", "Truck"}) do
local type = type .. " " .. year
local spec = PA[" aux "][auxType]
PA[type .. "-" .. auxType] = {
shield = PA[type].shield,
name = "Pennsylvania Route %route% " .. spec.name,
link = "Pennsylvania Route %route% " .. spec.name .. PA[" dab "],
abbr = PA[type].abbr .. " " .. spec.abbrsuffix,
banner = spec.bannerprefix .. " plate " .. year .. ".svg",
bannersuffix = year,
aux = spec.aux,
width = "square",
}
end
end
end

for _,type in ipairs({'SR', 'PA'}) do
for _,year in ipairs({'1960'}) do
for _,auxType in ipairs({"Alt", "Bus", "Byp", "Conn", "Opt", "Scenic", "Spur", "Temp", "Truck"}) do
local type = type .. " " .. year
local spec = PA[" aux "][auxType]
PA[type .. "-" .. auxType] = {
shield = PA[type].shield,
name = "Pennsylvania Route %route% " .. spec.name,
link = "Pennsylvania Route %route% " .. spec.name .. PA[" dab "],
abbr = PA[type].abbr .. " " .. spec.abbrsuffix,
banner = spec.bannerprefix .. " plate 1948.svg",
bannersuffix = "1948",
aux = spec.aux,
width = "expand",
}
end
end
end

for _,type in ipairs({'SR', 'PA'}) do
for _,year in ipairs({'1962'}) do
for _,auxType in ipairs({"Alt", "Bus", "Byp", "Conn", "Opt", "Scenic", "Spur", "Temp", "Truck"}) do
local type = type .. " " .. year
local spec = PA[" aux "][auxType]
PA[type .. "-" .. auxType] = {
shield = PA[type].shield,
name = "Pennsylvania Route %route% " .. spec.name,
link = "Pennsylvania Route %route% " .. spec.name .. PA[" dab "],
abbr = PA[type].abbr .. " " .. spec.abbrsuffix,
banner = spec.bannerprefix .. " plate 1961.svg",
bannersuffix = "1961",
aux = spec.aux,
width = "expand",
}
end
end
end

PA["SR-Truck-Alt"] = {
shield = "PA-%route%.svg",
name = "PA Route %route% Alternate Truck",
link = "Pennsylvania Route %route% Alternate Truck [dab||(%dab%)|]",
abbr = "PA %route% Alt. Truck",
banner = "Alternate truck plate.svg",
width = "expand",
aux = PA[" aux "].Truck
}

PA["PA-Truck-Alt"] = PA["SR-Truck-Alt"]
PA["SR-Alt-Truck"] = PA["SR-Truck-Alt"]
PA["PA-Alt-Truck"] = PA["SR-Truck-Alt"]

PA.SBR = {
shield = "PA Bike Route %route%.svg",
name = "BicyclePA Route %route%",
link = "BicyclePA Route %route%",
abbr = "BicyclePA Route %route%",
orientation = "upright"
}

PA.QR = {
shield = "",
shieldmain = "PA QR %route%.svg",
name = "State Route %route%",
link = "",
abbr = "SR %route%"
}

-- add new types above this line if you want it to have the state highway browse and maint
for k, v in pairs(PA) do if k:find ("^%a") then
v.maint = "[[Pennsylvania Department of Transportation|PennDOT]]"
end
end

for k, v in pairs(PA) do if k:find ("^%a+ %d") then
v.maint = "[[Pennsylvania Department of Highways]]"
end
end

PA.PATP = {
shield = "Pennsylvania Turnpike logo.svg",
name = "Pennsylvania Turnpike",
link = "Pennsylvania Turnpike",
abbr = "Penna Turnpike",
bannersuffix = "green",
maint = [[Pennsylvania Turnpike Commission]]
}
PA.Turnpike = PA.PATP

PA.PANE = {
shield = "Pennsylvania Turnpike logo.svg",
name = "Pennsylvania Turnpike Northeast Extension",
link = "Pennsylvania Turnpike Northeast Extension",
abbr = "Penna Turnpike NE Extension",
bannersuffix = "green",
maint = PA.PATP.maint
}

PA.Toll = {
shield = "Turnpike-%route%.svg",
name = PA.SR.name.default,
link = PA.SR.link,
abbr = "PA Turnpike %route%",
width = "expand",
bannersuffix = "green"
}

PA["Toll2"] = {
shield = "Turnpike-%route%.svg",
link = PA.Toll.link,
abbr = PA.Toll.abbr,
width = PA.Toll.width,
banner = "Toll plate yellow.svg",
bannersuffix = "green"
}

PA["PA-Toll"] = {
shield = "PA-Toll-%route%.svg",
name = PA.SR.name.default .. " Toll",
link = PA.SR.link,
abbr = PA.SR.abbr .. " Toll",
width = "expand",
}

PA.Belt = {
shield = "Pittsburgh PA %route% Belt shield.svg",
name = "%route% Belt",
link = "%route% Belt (Pittsburgh)",
abbr = "%route% Belt"
}

PA.DE = {alias = {module = "USA/DE", type = "DE"}}
PA.MD = {alias = {module = "USA/MD", type = "MD"}}
PA.NJ = {alias = {module = "USA/NJ", type = "NJ"}}
PA.NJTP = {alias = {module = "USA/NJ", type = "NJTP"}}
PA["I-NJ"] = {alias = {module = "USA/NJ", type = "I"}}

return PA

Module:Road data/strings/USA/PA - Revision history

imported>Fredddie: cleanup