Module:RQ:pi:Sai Kam Mong
- The following documentation is located at Module:RQ:pi:Sai Kam Mong/documentation. [edit]
- Useful links: subpage list • links • transclusions • testcases • sandbox
Invoking this module as {{#invoke:RQ:pi:Sai Kam Mong|quote|a|b|c|passages=xxx}} is equivalent to invoking a template as {{{{yyy}} quote|a|b|c}}, for some yyy, so please read that template for usage. If the argument passages is omitted, the effect is equivalent to invoking the template as {{RQ:pi:Sai Kam Mong quote|a|b|c}}.
The templates and modules for the use of this come in sets of three - a citation selection template, a data module, and a display template.
The citation selection template simply invokes this module's function quote; module invocations are not allowed in the main space pages, but must be wrapped in a template. This function accesses and manipulates the data in the data module, while the display template can function independently of it and the the data.
Wiktionary requests that each template and module have a documentation page. For the first two, boilerplate templates {{RQ:pi:Sai Kam Mong/quote boilerplate|human-language-documented|data-module-name|sample-page-no|sample-passage-id|sample-word-number|passages=data-module-name}} and {{RQ:pi:Sai Kam Mong/passage boilerplate|human-language-documented|data-module-name|sample-page-no|sample-passage-id|sample-word-number}} provide most of this documentation. The boilerplate templates require that name of the citation slection template be the name of the data module augmented by the word 'quote'. The display template's documentation is less stereotyped, and adaptation of one set's to a new set's must be done manually. Adapting the example looks daunting, but is not as difficult as it looks. The trick is to start from the bottom and work up.
Existing sets include:
| Citation selection template | Data module | Display template |
|---|---|---|
{{RQ:pi:N3207 quote}} |
{{Module:RQ:pi:N3207}} |
{{RQ:pi:N3207}}
|
{{RQ:pi:Phaya Luang Maha Sena quote}} |
{{Module:RQ:pi:Phaya Luang Maha Sena}}
|
{{RQ:pi:Phaya Luang Maha Sena}}
|
{{RQ:pi:Sai Kam Mong quote}} |
{{Module:RQ:pi:Sai Kam Mong/passages}} |
{{RQ:pi:Sai Kam Mong}}
|
{{RQ:pi:Thai chant book quote}} |
{{Module:RQ:pi:Thai chant book}} |
{{RQ:pi:Thai chant book}}
|
{{RQ:pi:U17106 quote}} |
{{Module:RQ:pi:U17106}} |
{{RQ:pi:U17106}}
|
If creating a new set, the 'Sai Kam Mong' set would be a bad set to start from, as for historical reasons, it has different and confusing naming conventions. Some of these issues are worked round by the defaults in the documentation templates.
local export = {};
local gsub = string.gsub -- Can pretend it's all Latin-1!
local trim = mw.text.trim -- Except for trimmming strings.
function export.quote(frame)
-- Convert from string if decimal, and trim if not.
local fa1 = frame.args[1]
local pageno = tonumber(fa1) or fa1 and trim(fa1)
if not pageno or pageno == "" then
return "Invalid or missing page number"
end
local quotid = frame.args[2]
if quotid then
quotid = trim(quotid)
if string.len(quotid) == 0 then quotid = nil end
end
if not quotid then
return "Passage ID is missing"
end
local wordid = tonumber(frame.args[3]) or 0
local passages = frame.args["passages"] or 'RQ:pi:Sai Kam Mong/passages'
passages = mw.loadData('Module:'..passages)
local passage = passages[pageno]
if passage then
passage=passage[quotid]
if passage then
local highlight = function() end
local function consider_word(m1)
if string.find(m1, "^{"..wordid.."%-") then
return "'''"..m1.."'''"
else
return "{"..highlight(string.sub(m1, 2))
end
end
highlight = function(m2)
return gsub(m2, "%b{}", consider_word)
end
local function process(line)
if line then
line = highlight(line)
line = gsub(line, "{%d%d*-", "")
line = gsub(line, "}", "")
line = gsub(line, "''''''", "")
line = gsub(line, '⧁', "<span style='background-color:#FFff00;'>")
line = gsub(line, '⧀', "</span>")
end
return line
end
local text, tran, xlit, lit, norm, ts
text = process(passage[1])
tran = process(passage[2])
xlit = process(passage[3])
lit = process(passage.lit)
norm = process(passage.norm)
ts = process(passage.ts)
local reference = frame.args.reference or passages.reference
return frame:expandTemplate{title = trim(reference),
args = { pageno, text, tran, xlit,
lang = passage.lang or passages[pageno].lang or passages.lang,
p1 = passage.p1 or passages[pageno].p1 or passages.p1,
p2 = passage.p2 or passages[pageno].p2 or passages.p2,
brackets = frame.args.brackets,
norm = norm,
lit = lit,
ts = ts
} }
else
return "No passage dubbed \"" .. quotid .. "\" on page " .. pageno
end
else
return "There are no passages from page " .. pageno
end
end
return export