Module:Smyth: Difference between revisions

Content deleted Content added
m subsections are sometimes lettered instead of numbered
Misc code cleanup, remove functions and variables used only once
 
(12 intermediate revisions by 2 users not shown)
Line 1:
local export = {}
 
local function Smyth(section, part)
data = {
["Smyth"] = {
["path"] = "1999.04.0007",
["parts"] = { "part", "chapter", "section", "smythp" }
}
}
 
local find, match, gmatch = mw.ustring.find, mw.ustring.match, mw.ustring.gmatch
 
local function url(resourceCode, part, code)
code = mw.uri.encode(code, "PATH")
return "http://www.perseus.tufts.edu/hopper/text?doc=Perseus:text:" .. path .. ":" .. part .. "=" .. code
end
 
function Smyth(section, part)
if not part then
part = "smythp"
end
local Part, url
SmythData = data.Smyth
if numbersection == "" or numbersection == nil then
path = SmythData.path
url, Part = "No number provided", "No number provided"
return url(path, part, section)
else
sectionNumber = tonumber(section)
if sectionNumber == nil then
Part = ""
else
if sectionNumber < 189 then
Part = "Part I: Letters, Sounds, Syllables, Accent"
elseif sectionNumber < 822 then
Part = "Part II: Inflection"
elseif sectionNumber < 900 then
Part = "Part III: Formation of Words"
elseif sectionNumber < 3049 then
Part = "Part IV: Syntax"
endelse
error("The largest valid section number is 3048")
end
end
code section = mw.uri.encode(codesection, "PATH")
return url = "http://www.perseus.tufts.edu/hopper/text?doc=Perseus:text:" 1999.04. path .. "0007:" .. part .. "=" .. codesection
end
return { url = url, Part = Part }
end
 
function export.SmythSection(frame)
local output, sign = "", ""
local sectionParameter = frame.args[1]
local sectionsoutput, separatorssign = {}"", {}""
if local sections[n], == "" andpostscripts, separators[n] == ""{}, {}, then{}
local part = frame.args[2]
if sectionParameter then
n = 1
if mw.ustring.find(sectionParameter, "[^%d%s]") then
for number, postscript, separator in mw.ustring.gmatch(sectionParameter, "(%d*+ ?%au?)(%.?[%l%d]?)(%p?[^%d]*)") do
sections[n], postscripts[n], separators[n] = number, postscript, separator
if number == "" or number == nil then
if sections[n] == "" or sections[n] == nil then
else
sections[n] = number
end
if separator == "" or separator == nil then
separators[n] = ""
else
separators[n] = separator
end
if sections[n] == "" and separators[n] == "" then
break
end
Line 49 ⟶ 47:
end
else
sections[1], separators[1] = mw.ustring.match(sectionParameter, "(%d*+)"), ""
end
else
error("SmythSection wants input in the first parameter")
end
if #sections == nil or #sections == "" then
error("No numbers in the text provided to SmythSection")
elseif sections[2] == "" or sections[2] == nil then
sign = "§"
else
Line 62 ⟶ 60:
end
for i = 1, #sections do
if sections[i] == "" or sections[i] == nil then -- Does gmatch return nil or an empty string when it finds no match?
break
else
if not postscripts[i] then postscripts[i] = "" end
local sectionPath = string.gsub(sections[i], "%.%d", "")
if not separators[i] then separators[i] = "" end
output = output .. "[" .. Smyth(sectionPathsections[i]).url .. " "
if i == 1 then
output = output .. " "sign .. sign"&nbsp;"
end
output = output .. " "sections[i] .. sectionspostscripts[i] .. "]" .. separators[i]
end
end
return output
end
 
function export.SmythPart(frame)
local sectionParameter = frame.args[1]
local section = mw.ustring.match(sectionParameter, "(%d+)")
return urlSmyth(path, part, section).Part
end