Admin: ۱ نسخه واردشده

2016-03-03T11:25:24Z

۱ نسخه واردشده

Mr. Stradivarius: Protected Module:Infobox road/locations: High-risk Lua module: 17,000 transclusions ([Edit=Allow only template editors and admins] (indefinite) [Move=Allow only template editors and admins] (indefinite))

2013-11-20T15:34:23Z

Protected Module:Infobox road/locations: High-risk Lua module: 17,000 transclusions ([Edit=Allow only template editors and admins] (indefinite) [Move=Allow only template editors and admins] (indefinite))

صفحهٔ تازه

local p = {}

local function countries(args, country)
local data = {EUR = "no", ASIA = "no", default = "yes"}
local yesOrNo = data[country] or data.default
if yesOrNo == "no" then
return args.countries
else
return nil
end
end

local function regions(args, country)
local data = {EUR = "no", ESP = "no", ITA = "no", HRV = "no", CZE = "no", CAN = "no", CYP = "no", GRC = "no", POL = "no", HUN = "no",
SVN = "no", SVK = "no", AUT = "no", TUR = "no", UKR = "no", BIH = "no", SRB = "no", SGP = "no", AUS = "no", default = "yes"}
local yesOrNo = data[country] or data.default
if yesOrNo == "no" then
return args.regions
else
return nil
end
end

local function states(args, country)
local data = {USA = "no", IND = "no", DEU = "no", AUT = "no", MEX = "no", AUS = "no", default = "yes"}
local yesOrNo = data[country] or data.default
if yesOrNo == "no" then
return args.states
else
return nil
end
end

local function provinces(args, country)
local data = {TUR = "no", THA = "no", IRN = "no", NLD = "no", ESP = "no", default = "yes"}
local yesOrNo = data[country] or data.default
if yesOrNo == "no" then
return args.provinces
else
return nil
end
end

local function counties(args, country)
local counties = args.counties
local districts = args.districts
local municipalities = args.municipalities
local parishes = args.parishes
local boroughs = args.boroughs
if counties then
return "Counties:", counties
elseif districts then
return "Districts:", districts
elseif municipalities then
return "Municipalities:", municipalities
elseif parishes then
return "Parishes:", parishes
elseif boroughs then
return "Boroughs:", boroughs
else
return '', nil
end
end

local function ruralMunis(args, country)
local label
local province = country or ''
if province == "AB" then
label = "Specialized and rural municipalities:"
else
label = "Rural municipalities:"
end
local data = {MB = "no", SK = "no", AB = "no", default = "yes"}
local yesOrNo = data[province] or data.default
if yesOrNo == "no" then
return label, args.rural_municipalities
else
return '', nil
end
end

local function divisions(args, country)
local province = country or ''
local data = {ON = "no", default = "yes"}
local yesOrNo = data[province] or data.default
if yesOrNo == "no" then
return args.divisions
else
return nil
end
end

local function cities(args, country, parameter)
local data = {USA = "yes", default = "no"}
local yesOrNo = data[country] or data.default
if yesOrNo == "no" then
return args[parameter]
else
return nil
end
end

local function destinations(args, country)
local label
if country == "GBR" then
label = "[[Primary status|Primary destinations]]:"
else
label = "Primary destinations:"
end
local data = {AUS = "no", NZL = "no", GBR = "no", IRL = "no", MYS = "no", IND = "no", NPL = "no", default = "yes"}
local yesOrNo = data[country] or data.default
if yesOrNo == "no" then
return label, args.destinations
else
return '', nil
end
end

local function lga(args, country)
local labels = {SA = "[[Local government areas of South Australia|LGA(s)]]", VIC = "[[Local government in Victoria|LGA(s)]]", NSW = "[[Local government areas of New South Wales|LGA(s)]]",
QLD = "[[Local government areas of Queensland|LGA(s)]]", NT = "[[Local government areas of the Northern Territory|LGA(s)]]",
WA = "[[Local government areas of Western Australia|LGA(s)]]", TAS = "[[Local government areas of Tasmania|LGA(s)]]", ACT = "District(s)"}
local data = {AUS = "no", default = "yes"}
local yesOrNo = data[country] or data.default
if yesOrNo == "no" then
local state = args.state or ''
local label = labels[state] or "[[Local government in Australia|LGA(s)]]"
return label, args.lga
else
return '', nil
end
end

local function locations(args, country)
local labels = {highway = "Major settlements:", ["rural road"] = "Major settlements:", freeway = "Major suburbs:", ["city highway"] = "Major suburbs:", road = "Major suburbs:", street = "Suburb:"}
local data = {AUS = "no", default = "yes"}
local yesOrNo = data[country] or data.default
if yesOrNo == "no" then
local type = args.type or ''
local label = labels[type] or "Primary destinations:"
return label, args.locations
else
return '', nil
end
end

function p.locations(frame)
local pframe = frame:getParent()
local config = frame.args -- the arguments passed BY the template, in the wikitext of the template itself
local args = pframe.args -- the arguments passed TO the template, in the wikitext that transcludes the template

local parameters = {label1 = "Countries:", label2 = "Regions:", label3 = "States:", label4 = "Provinces:", label7 = "Divisions:", label8 = "Major cities:",
label9 = "Towns:", label10 = "Villages:", child = "yes", decat = "yes", labelstyle = "text-align:right", title = "Location"}
local data = {}

local function emptyParam(param)
if param == '' then
return nil
else
return param
end
end

local country = emptyParam(args.country)
local state = emptyParam(args.state)
local province = emptyParam(args.province)
if not(country) then
local stateParam = args.state or args.province
if not(stateParam) then
country = ''
else
local countryMask = require "Module:Infobox road/meta/mask/country"
country = countryMask._country(stateParam, country)
end
end
data[1] = countries(args, country)
data[2] = regions(args, country)
data[3] = states(args, country)
data[4] = provinces(args, country)
parameters.label5, data[5] = counties(args, country)
parameters.label6, data[6] = ruralMunis(args, province)
data[7] = divisions(args, province)
data[8] = cities(args, country, 'cities')
data[9] = cities(args, country, 'towns')
data[10] = cities(args, country, 'villages')
parameters.label11, data[11] = destinations(args, country)
parameters.label12, data[12] = lga(args, country)
parameters.label13, data[13] = locations(args, country)

local hasData = false
for k,v in pairs(data) do
if v ~= '' then
hasData = true
break
end
end
if not(hasData) then
return ''
end

for k,v in pairs(data) do
parameters["data" .. k] = v
end

local infoboxModule = require 'Module:Infobox'
return infoboxModule.infobox(parameters)
end

return p

→ نسخهٔ قدیمی‌تر	نسخهٔ ‏۱۳ اسفند ۱۳۹۴، ساعت ۱۱:۲۵
(بدون تفاوت)

پودمان:Infobox road/locations - تاریخچهٔ ویرایش‌ها

Admin: ۱ نسخه واردشده

Mr. Stradivarius: Protected Module:Infobox road/locations: High-risk Lua module: 17,000 transclusions ([Edit=Allow only template editors and admins] (indefinite) [Move=Allow only template editors and admins] (indefinite))