Difference between revisions of "Module:Person height"
Jump to navigation
Jump to search
imported>MusikBot II m (Protected "Module:Person height": High-risk template or module (more info) ([Edit=Require template editor access] (indefinite) [Move=Require template editor access] (indefinite))) |
imported>Frietjes (fix for fractions) |
||
| Line 19: | Line 19: | ||
return s | return s | ||
| + | end | ||
| + | |||
| + | local function isnumber(s) | ||
| + | if s then | ||
| + | s = mw.ustring.gsub(s, '%+%d+/%d+%s*$', '') | ||
| + | return tonumber(s) | ||
| + | end | ||
| + | return nil | ||
end | end | ||
| Line 41: | Line 49: | ||
if c ~= nil and f == nil and i == nil then | if c ~= nil and f == nil and i == nil then | ||
| − | local n = | + | local n = mw.ustring.sub(s, 1, c - 1) |
| − | if n | + | if isnumber(n) then |
| − | + | return force_m | |
| − | + | and {n/100,'m','ftin',0,['abbr']='on'} | |
| − | + | or {n,'cm','ftin',0,['abbr']='on'}, mw.ustring.sub(s, c+2) | |
| + | end | ||
| + | return '', unconverted | ||
end | end | ||
if m ~= nil and c == nil and f == nil and i == nil then | if m ~= nil and c == nil and f == nil and i == nil then | ||
| − | local n = | + | local n = mw.ustring.sub(s, 1, m - 1) |
| − | if n | + | if isnumber(n) then |
| − | + | return force_cm | |
| − | + | and {n*100,'cm','ftin',0,['abbr']='on'} | |
| − | + | or {n,'m','ftin',0,['abbr']='on'}, mw.ustring.sub(s, m+1) | |
| + | end | ||
| + | return '', unconverted | ||
end | end | ||
if f ~= nil and i ~=nil and m == nil then | if f ~= nil and i ~=nil and m == nil then | ||
| − | local n1 = | + | local n1 = mw.ustring.sub(s, 1, f - 1) |
| − | local n2 = | + | local n2 = mw.ustring.sub(s, f+2, i - 1) |
| − | if n1 | + | if isnumber(n1) and isnumber(n2) then |
| − | + | return (force_m or prefer_m) | |
| − | + | and {n1,'ft',n2,'in', 'm',2,['abbr']='on'} | |
| − | + | or {n1,'ft',n2,'in', 'cm',0,['abbr']='on'}, mw.ustring.sub(s, i+2) | |
| + | end | ||
| + | return '', unconverted | ||
end | end | ||
if f ~= nil and i == nil and m == nil then | if f ~= nil and i == nil and m == nil then | ||
| − | local n = | + | local n = mw.ustring.sub(s, 1, f - 1) |
| − | if n | + | if isnumber(n) then |
| − | + | return (force_m or prefer_m) | |
| − | + | and {n,'ft','m',2,['abbr']='on'} | |
| − | + | or {n,'ft','cm',0,['abbr']='on'}, mw.ustring.sub(s, f+2) | |
| + | end | ||
| + | return '', unconverted | ||
end | end | ||
if i ~= nil and f == nil and m == nil then | if i ~= nil and f == nil and m == nil then | ||
| − | local n = | + | local n = mw.ustring.sub(s, 1, i - 1) |
| − | if n | + | if isnumber(n) then |
| − | + | return (force_m or prefer_m) | |
| − | + | and {n,'in','m',2,['abbr']='on'} | |
| − | + | or {n,'in','cm',0,['abbr']='on'}, mw.ustring.sub(s, i+2) | |
| + | end | ||
| + | return '', unconverted | ||
end | end | ||
Revision as of 19:11, 27 September 2019
Documentation for this module may be created at Module:Person height/doc
-- This module implements [[Template:Infobox person/height]]
local p = {}
local function clean(s)
s = mw.ustring.gsub(s, '([^a])meter', '%1m') -- prevents "parameter" from being changed to "param"
s = mw.ustring.gsub(s, 'metre', 'm')
s = mw.ustring.gsub(s, 'centi', 'c')
s = mw.ustring.gsub(s, 'feet', 'ft')
s = mw.ustring.gsub(s, 'foot', 'ft')
s = mw.ustring.gsub(s, 'inches', 'in')
s = mw.ustring.gsub(s, 'inch', 'in')
s = mw.ustring.gsub(s, 'ms', 'm')
s = mw.ustring.gsub(s, 'ins', 'in')
s = mw.ustring.gsub(s, '%[%[[Ii]n|in%]%]', '[[inch|in]]')
s = mw.ustring.gsub(s, '%[%[[Cc]entim|cm%]%]', '[[Centimetre|cm]]')
s = mw.ustring.gsub(s, '%[%[[Mm]%]%]s', '[[Metre|m]]')
s = mw.ustring.gsub(s, '%[%[[Cc]m%]%]s', '[[Centimetre|cm]]')
return s
end
local function isnumber(s)
if s then
s = mw.ustring.gsub(s, '%+%d+/%d+%s*$', '')
return tonumber(s)
end
return nil
end
local function get_convert_args(s, prefer, enforce)
local prefer_m = (prefer or '') == 'm'
local force_m = (enforce or '') == 'm'
local prefer_cm = (prefer or '') == 'cm'
local force_cm = (enforce or '') == 'cm'
unconverted = clean(s or '') -- basic unit cleaning
s = mw.ustring.gsub(unconverted, '&[Nn][Bb][Ss][Pp];', ' ')
local m = mw.ustring.find(s, 'm')
local c = mw.ustring.find(s, 'cm')
local f = mw.ustring.find(s, 'ft')
local i = mw.ustring.find(s, 'in')
if m == nil and f == nil and i == nil then
return '', unconverted
end
if c ~= nil and f == nil and i == nil then
local n = mw.ustring.sub(s, 1, c - 1)
if isnumber(n) then
return force_m
and {n/100,'m','ftin',0,['abbr']='on'}
or {n,'cm','ftin',0,['abbr']='on'}, mw.ustring.sub(s, c+2)
end
return '', unconverted
end
if m ~= nil and c == nil and f == nil and i == nil then
local n = mw.ustring.sub(s, 1, m - 1)
if isnumber(n) then
return force_cm
and {n*100,'cm','ftin',0,['abbr']='on'}
or {n,'m','ftin',0,['abbr']='on'}, mw.ustring.sub(s, m+1)
end
return '', unconverted
end
if f ~= nil and i ~=nil and m == nil then
local n1 = mw.ustring.sub(s, 1, f - 1)
local n2 = mw.ustring.sub(s, f+2, i - 1)
if isnumber(n1) and isnumber(n2) then
return (force_m or prefer_m)
and {n1,'ft',n2,'in', 'm',2,['abbr']='on'}
or {n1,'ft',n2,'in', 'cm',0,['abbr']='on'}, mw.ustring.sub(s, i+2)
end
return '', unconverted
end
if f ~= nil and i == nil and m == nil then
local n = mw.ustring.sub(s, 1, f - 1)
if isnumber(n) then
return (force_m or prefer_m)
and {n,'ft','m',2,['abbr']='on'}
or {n,'ft','cm',0,['abbr']='on'}, mw.ustring.sub(s, f+2)
end
return '', unconverted
end
if i ~= nil and f == nil and m == nil then
local n = mw.ustring.sub(s, 1, i - 1)
if isnumber(n) then
return (force_m or prefer_m)
and {n,'in','m',2,['abbr']='on'}
or {n,'in','cm',0,['abbr']='on'}, mw.ustring.sub(s, i+2)
end
return '', unconverted
end
return '', unconverted
end
function convert(frame, args)
local targs, str = get_convert_args(args[1], args['prefer'] or '', args['enforce'] or '')
if type(targs) == 'table' then
return frame:expandTemplate{ title = 'convert', args = targs} .. str
else
return str
end
end
function p.main(frame)
return convert(frame, frame.args[1] and frame.args or frame:getParent().args)
end
return p
