وي عرب

الفرق بين المراجعتين لصفحة: «وحدة:Age»

وحدة نقاش

وحدة:Age (عرض المصدر)

مراجعة ٠٣:٣٧، ٢٤ أبريل ٢٠٢١

أُضيف ١٬١٧٥ بايت ،  ٢٤ أبريل ٢٠٢١
update from Module:Age/sandbox; this aids localization; used at bnwiki + bswiki
طلا ملخص تعديل
 
(update from Module:Age/sandbox; this aids localization; used at bnwiki + bswiki)
سطر ٣: سطر ٣:
local mtext = {
local mtext = {
-- Message and other text that should be localized.
-- Message and other text that should be localized.
-- Also need to localize text in table names in function dateDifference.
['mt-bad-param1'] =            'Invalid parameter $1',
['mt-bad-param1'] =            'Invalid parameter $1',
['mt-bad-param2'] =            'Parameter $1=$2 is invalid',
['mt-bad-param2'] =            'Parameter $1=$2 is invalid',
سطر ٢٥: سطر ٢٦:
['mt-template-bad-name'] =      'The specified template name is not valid',
['mt-template-bad-name'] =      'The specified template name is not valid',
['mt-template-x'] =            'The template invoking this must have "|template=x" where x is the wanted operation',
['mt-template-x'] =            'The template invoking this must have "|template=x" where x is the wanted operation',
['txt-age'] =                  '(age ',
['txt-and'] =                  ' and ',
['txt-aged'] =                 ' (aged ',
['txt-or'] =                   ' or ',
['txt-and'] =                   '، و ',
['txt-category'] =             'Category:Age error',
['txt-comma-and'] =            '، و ',
['txt-comma-and'] =            ', and ',
['txt-error'] =                'خطأ: ',
['txt-error'] =                'Error: ',
['txt-or'] =                   ' أو ',
['txt-format-default'] =        'mf',  -- 'df' (day first = dmy) or 'mf' (month first = mdy)
['txt-module-convertnumeric'] = 'Module:ConvertNumeric',
['txt-module-date'] =          'Module:Date',
['txt-sandbox'] =              'sandbox',
['txt-bda'] = '<span style="display:none"> (<span class="bday">$1</span>) </span>$2<span class="noprint ForceAgeToShow"> (age&nbsp;$3)</span>',
['txt-dda'] = '$2<span style="display:none">($1)</span> (aged&nbsp;$3)',
['txt-bda-disp'] = 'disp_raw',  -- disp_raw → age is a number only; disp_age → age is a number and unit (normally years but months or days if very young)
['txt-dda-disp'] = 'disp_raw',
['txt-dmy'] = '%-d %B %-Y',
['txt-mdy'] = '%B %-d, %-Y',
}
 
local isWarning = {
['mt-bad-param1'] = true,
}
}


local abbr_plural = {
y = 'سنوات',
m = 'شهور',
w = 'أسابيع',
d = 'أيام',
H = 'ساعات',
M = 'دقائق',
S = 'ثواني',
}
local translate, from_en, to_en, isZero
local translate, from_en, to_en, isZero
if translate then
if translate then
سطر ٦٠: سطر ٦٤:
-- Return objects exported from the date module or its sandbox.
-- Return objects exported from the date module or its sandbox.
if not _Date then
if not _Date then
local sandbox = frame:getTitle():find('ملعب', 1, true) and '/ملعب' or ''
local sandbox = frame:getTitle():find(mtext['txt-sandbox'], 1, true) and ('/' .. mtext['txt-sandbox']) or ''
local datemod = require('Module:Date2' .. sandbox)
local datemod = require(mtext['txt-module-date'] .. sandbox)
local realDate = datemod._Date
local realDate = datemod._Date
_currentDate = datemod._current
_currentDate = datemod._current
سطر ١١٢: سطر ١١٦:
end
end
return text
return text
end
local function dateFormat(args)
-- Return string for wanted date format.
local default = mtext['txt-format-default']
local other = default == 'df' and 'mf' or 'df'
local wanted = stripToNil(args[other]) and other or default
return wanted == 'df' and mtext['txt-dmy'] or mtext['txt-mdy']
end
local function substituteParameters(text, ...)
-- Return text after substituting any given parameters for $1, $2, etc.
return mw.message.newRawMessage(text, ...):plain()
end
end


سطر ١٢١: سطر ١٣٨:
end
end


local function message(msg, id)
local function message(msg, ...)
-- Return formatted message text for an error or warning.
-- Return formatted message text for an error or warning.
local function getText(msg)
local function getText(msg)
return mtext[msg] or error('Bug: message "' .. tostring(msg) .. '" not defined')
return mtext[msg] or error('Bug: message "' .. tostring(msg) .. '" not defined')
end
local text
if type(msg) == 'table' then
text = getText(msg[1])
local rep = {}
for i, v in ipairs(msg) do
if i > 1 then
rep['$' .. (i - 1)] = v
end
end
text = text:gsub('$%d+', rep)
else
text = getText(msg)
end
end
local categories = {
local categories = {
error = '[[Category:Age error]]',
error = mtext['txt-category'],
warning = '[[Category:Age error]]',  -- same as error until determine whether 'Age warning' would be worthwhile
warning = mtext['txt-category'],
}
}
local a, b, category
local a, b, k, category
if id == 'warning' then
local text = substituteParameters(getText(msg), ...)
if isWarning[msg] then
a = '<sup>[<i>'
a = '<sup>[<i>'
b = '</i>]</sup>'
b = '</i>]</sup>'
k = 'warning'
else
else
a = '<strong class="error">' .. getText('txt-error')
a = '<strong class="error">' .. getText('txt-error')
b = '</strong>'
b = '</strong>'
k = 'error'
end
end
if mw.title.getCurrentTitle():inNamespaces(0) then
if mw.title.getCurrentTitle():inNamespaces(0) then
-- Category only in namespaces: 0=article.
-- Category only in namespaces: 0=article.
category = categories[id or 'error']
category = '[[' .. categories[k] .. ']]'
end
end
return
return
سطر ١٨٨: سطر ١٩٥:
-- i == 1 for the first number which can optionally start with an uppercase letter.
-- i == 1 for the first number which can optionally start with an uppercase letter.
number = tostring(number)
number = tostring(number)
return require('Module:ConvertNumeric').spell_number(
return require(mtext['txt-module-convertnumeric']).spell_number(
number,
number,
nil,                      -- fraction numerator
nil,                      -- fraction numerator
سطر ٢٤٠: سطر ٢٤٧:
result = '<span data-sort-value="_SORTKEY_♠"></span>'
result = '<span data-sort-value="_SORTKEY_♠"></span>'
end
end
return result:gsub('_SORTKEY_', sortKey)
return (result:gsub('_SORTKEY_', sortKey))
end
end
end
end
سطر ٢٦٧: سطر ٢٧٤:
sep = {
sep = {
comma = 'sep_comma',
comma = 'sep_comma',
['،'] = 'sep_comma',
[','] = 'sep_comma',
serialcomma = 'sep_serialcomma',
serialcomma = 'sep_serialcomma',
space = 'sep_space',
space = 'sep_space',
سطر ٢٨٦: سطر ٢٩٣:
hm = { 'H', 'M', id = 'hm' },
hm = { 'H', 'M', id = 'hm' },
hms = { 'H', 'M', 'S', id = 'hms' },
hms = { 'H', 'M', 'S', id = 'hms' },
M = { 'M', id = 'M' },
s = { 'S', id = 's' },
d = { 'd', id = 'd' },
d = { 'd', id = 'd' },
dh = { 'd', 'H', id = 'dh' },
dh = { 'd', 'H', id = 'dh' },
سطر ٣٤١: سطر ٣٥٠:
date = date + item
date = date + item
if not date then
if not date then
return message({ 'mt-cannot-add', item })
return message('mt-cannot-add', item)
end
end
end
end
سطر ٣٩٧: سطر ٤٠٦:
end
end
local name = names[components[i]]
local name = names[components[i]]
--if islist then
--name = abbr_plural[components[i]] -- إضافة اسم الجمع باللغة العربية
--end
--mw.log( 'vstr: ' .. vstr )
if name then
if name then
local plural = abbr_plural[components[i]] -- names.plural
if type(name) == 'table' then
if not plural or (islist and v[2] or v) == 1 then
name = mw.getContentLanguage():plural(islist and v[2] or v, name)
plural = ''
end
end
if plural ~= "s" and plural ~= "" then name = "" end
text:add(vstr .. sep .. name)
text:add(vstr .. sep .. name .. plural)
else
else
text:add(vstr)
text:add(vstr)
سطر ٤١٨: سطر ٤٢١:
last = ' '
last = ' '
elseif options.join == 'sep_comma' then
elseif options.join == 'sep_comma' then
first = ' و'
first = ', '
last = ' و'
last = ', '
elseif options.join == 'sep_serialcomma' and text.n > 2 then
elseif options.join == 'sep_serialcomma' and text.n > 2 then
first = '، و'
first = ', '
last = mtext['txt-comma-and']
last = mtext['txt-comma-and']
else
else
first = '، و'
first = ', '
last = mtext['txt-and']
last = mtext['txt-and']
end
end
سطر ٤٥٥: سطر ٤٥٨:
-- which have been validated.
-- which have been validated.
local names = {
local names = {
-- Each name is:
-- * a string if no plural form of the name is used; or
-- * a table of strings, one of which is selected using the rules at
--  https://translatewiki.net/wiki/Plural/Mediawiki_plural_rules
abbr_off = {
abbr_off = {
plural = 's',
sep = '&nbsp;',
sep = '&nbsp;',
y = 'سنة',
y = {'year', 'years'},
m = 'شهر',
m = {'month', 'months'},
w = 'أسبوع',
w = {'week', 'weeks'},
d = 'يوم',
d = {'day', 'days'},
H = 'ساعة',
H = {'hour', 'hours'},
M = 'دقيقة',
M = {'minute', 'minutes'},
S = 'ثانية',
S = {'second', 'seconds'},
},
},
abbr_on = {
abbr_on = {
سطر ٤٧٦: سطر ٤٨٢:
},
},
abbr_infant = {      -- for {{age for infant}}
abbr_infant = {      -- for {{age for infant}}
plural = 's',
sep = '&nbsp;',
sep = '&nbsp;',
y = 'yr',
y = {'yr', 'yrs'},
m = 'mo',
m = {'mo', 'mos'},
w = 'wk',
w = {'wk', 'wks'},
d = 'day',
d = {'day', 'days'},
H = 'hr',
H = {'hr', 'hrs'},
M = 'min',
M = {'min', 'mins'},
S = 'sec',
S = {'sec', 'secs'},
},
},
abbr_raw = {},
abbr_raw = {},
سطر ٥٦٥: سطر ٥٧٠:
(textOptions.suffix or '')
(textOptions.suffix or '')
end
end
return message({ 'mt-bad-show', show.id })
return message('mt-bad-show', show.id)
end
end


سطر ٦٣٩: سطر ٦٤٤:
for i = 1, nrDates do
for i = 1, nrDates do
local index = i == 1 and 1 or 4
local index = i == 1 and 1 or 4
dates[i] = Date(fields[index], fields[index+1], fields[index+2])
local y, m, d = fields[index], fields[index+1], fields[index+2]
if (m == 2 or m == '2') and (d == 29 or d == '29') then
-- Workaround error with following which attempt to use invalid date 2001-02-29.
-- {{age_ymwd|year1=2001|year2=2004|month2=2|day2=29}}
-- {{age_ymwd|year1=2001|month1=2|year2=2004|month2=1|day2=29}}
-- TODO Get rid of wantMixture because even this ugly code does not handle
-- 'Feb' or 'February' or 'feb' or 'february'.
if not ((y % 4 == 0 and y % 100 ~= 0) or y % 400 == 0) then
d = 28
end
end
dates[i] = Date(y, m, d)
end
end
else
else
سطر ٨٦٥: سطر ٨٨١:
return message('mt-invalid-bd-age')
return message('mt-invalid-bd-age')
end
end
local disp, show = 'disp_raw', 'y'
local disp = mtext['txt-bda-disp']
local show = 'y'
if diff.years < 2 then
if diff.years < 2 then
disp = 'disp_age'
disp = 'disp_age'
سطر ٨٧٤: سطر ٨٩١:
end
end
end
end
local df = stripToNil(args.df)  -- day first (dmy); default is month first (mdy)
local result = substituteParameters(
local result = '(<span class="bday">%-Y-%m-%d</span>) </span>' ..
mtext['txt-bda'],
(df and '%-d %B %-Y' or '%B %-d, %-Y')
date:text('%-Y-%m-%d'),
result = from_en('<span style="display:none"> ' ..
from_en(date:text(dateFormat(args))),
date:text(result) ..
from_en(dateDifference({
'<span class="noprint ForceAgeToShow"> ' ..
mtext['txt-age'] ..
dateDifference({
diff = diff,
diff = diff,
show = show,
show = show,
سطر ٨٨٧: سطر ٩٠١:
disp = disp,
disp = disp,
sep = 'sep_space',
sep = 'sep_space',
}) ..
}))
')</span>')
)
local warnings = tonumber(frame.args.warnings)
local warnings = tonumber(frame.args.warnings)
if warnings and warnings > 0 then
if warnings and warnings > 0 then
سطر ٩١٧: سطر ٩٣١:
end
end
if invalid then
if invalid then
result = result .. message({ 'mt-bad-param1', invalid }, 'warning')
result = result .. message('mt-bad-param1', invalid)
end
end
end
end
سطر ٩٥٥: سطر ٩٦٩:
return message('mt-invalid-dates-age')
return message('mt-invalid-dates-age')
end
end
local df = stripToNil(args.df)  -- day first (dmy); default is month first (mdy)
local fmt_date, fmt_ymd
local result
if date1.day then  -- y, m, d known
if date1.day then  -- y, m, d known
result = (df and
fmt_date = dateFormat(args)
'%-d %B %-Y' or
fmt_ymd = '%-Y-%m-%d'
'%B %-d, %-Y') ..
'<span style="display:none">(%-Y-%m-%d)</span>'
elseif date1.month then  -- y, m known; d unknown
elseif date1.month then  -- y, m known; d unknown
result =
fmt_date = '%B %-Y'
'%B %-Y' ..
fmt_ymd = '%-Y-%m-00'
'<span style="display:none">(%-Y-%m-00)</span>'
else  -- y known; m, d unknown
else  -- y known; m, d unknown
result =
fmt_date = '%-Y'
'%-Y' ..
fmt_ymd = '%-Y-00-00'
'<span style="display:none">(%-Y-00-00)</span>'
end
end
result = from_en(date1:text(result) ..
local result = substituteParameters(
mtext['txt-aged'] ..
mtext['txt-dda'],
dateDifference({
date1:text(fmt_ymd),
from_en(date1:text(fmt_date)),
from_en(dateDifference({
diff = diff,
diff = diff,
show = 'y',
show = 'y',
abbr = 'abbr_off',
abbr = 'abbr_off',
disp = 'disp_raw',
disp = mtext['txt-dda-disp'],
range = 'dash',
range = 'dash',
sep = 'sep_space',
sep = 'sep_space',
}) ..
}))
')')
)
local warnings = tonumber(frame.args.warnings)
local warnings = tonumber(frame.args.warnings)
if warnings and warnings > 0 then
if warnings and warnings > 0 then
سطر ١٬٠٠٤: سطر ١٬٠١٥:
end
end
if invalid then
if invalid then
result = result .. message({ 'mt-bad-param1', invalid }, 'warning')
result = result .. message('mt-bad-param1', invalid)
end
end
end
end
سطر ١٬٠٧٦: سطر ١٬٠٨٧:
parm = translate[parm]
parm = translate[parm]
if parm == nil then  -- test for nil because false is a valid setting
if parm == nil then  -- test for nil because false is a valid setting
return message({ 'mt-bad-param2', argname, args[argname] })
return message('mt-bad-param2', argname, args[argname])
end
end
parms[argname] = parm
parms[argname] = parm
سطر ١٬٠٨٧: سطر ١٬٠٩٨:
if show then
if show then
if show.id ~= round then
if show.id ~= round then
return message({ 'mt-conflicting-show', args.show, args.round })
return message('mt-conflicting-show', args.show, args.round)
end
end
else
else
مستخدم مجهول
مجلوبة من «https://wikiar.org/wiki/خاص:فرق_المحمول/1023»