Wikipedia

Module:Weather box/row: Difference between revisions

Browse history interactively
← Previous editNext edit →
Content deleted Content added
require submodule + implement "trace" per request at talk
update from Module:Weather box/row/sandbox: major clean
Line 1:
local w = {}
local math_mod = require('Module:Math')
local wbc = require('Module:Weather box/colors')▼
 
local traceText
Line 105 ⟶ 103:
Value.__index = Value
 
local function checkFlag( flag, default )
if flag == nil then
return default
elseif type( flag ) == 'boolean' then
return flag
elseif type( flag ) == 'string' then
flag = flag:lower()
if flag == '0' or flag == 'false' or
Line 120 ⟶ 118:
end
else
return error( 'Flag type not valid' )
end
end
 
local function makeLine( label, first_values, second_values, color_values )
local result = {'|- style="text-align: center;"\n! scope="row" style="height: 16px;" | ', label, "\n"}
for i = 1, 13 do
local color_str = color_values[i]
 
if i == 13 then
table.insert( result, table.concat( {'|style="', color_str, ' border-left-width:medium" | '} ) )
else
table.insert( result, table.concat( {'|style="', color_str, '" | '} ) )
end
 
local display = first_values[i]:getDisplay()
if display then
table.insert( result, display )
if second_values ~= nil then
display = second_values[i]:getDisplay(true)
if display then
table.insert( result, "<br />(" .. display .. ")" )
end
end
else
table.insert( result, '—' )
end
table.insert( result, "\n" )▼
 
▲ table.insert( result, "\n" )
end
return table.concat( result )▼
 
▲ return table.concat( result )
end
 
local function getInputs( frameargs, group_name, suffix, include_space )
local month_names = { 'Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun',
'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec', 'year' }
Line 160 ⟶ 154:
local values = {}
if suffix == nil then
for i, mon in ipairs( month_names ) do
if include_space then
str = frame.args[ mon .. ' ' .. group_name ] or ''
else
str = frame.args[ mon .. group_name ] or ''
end
values[i] = Value.new(str)
end
else
for i, mon in ipairs( month_names ) do
local value, updated
for var, suf in ipairs( suffix ) do
if include_space then
str = frame.args[ mon .. ' ' .. group_name .. ' ' .. suf ]
else
str = frame.args[ mon .. group_name .. ' ' .. suf ]
end
if str ~= nil and str ~= '' then
Line 194 ⟶ 188:
end
 
local function getAnnualValue( values, mode )
if mode == 'avg' or mode == 'sum' then
local total = 0
Line 209 ⟶ 203:
end
end
 
p2 = values[i]:getPrecision()
if p2 > p1 then
p1 = p2
end
 
total = total + values[i].number
end
local value = Value.new(total)
if mode == 'avg' then
value:setNumberRounded( total / 12, p1 )
end
value.variant = variant
Line 244 ⟶ 236:
return target or Value.new()
else
error( 'Unrecognized Annual Mode' )
end
end
 
local function reconcileTemperature( C_values, F_values )
for i = 1, 13 do
local p
if C_values[i].string == '' then
if F_values[i]:isValid() then
p = F_values[i]:getPrecision()
C_values[i]:setNumberRounded( (F_values[i].number - 32)*5/9, p )
end
elseif F_values[i].string == '' then
if C_values[i]:isValid() then
p = C_values[i]:getPrecision()
F_values[i]:setNumberRounded( C_values[i].number*9/5 + 32, p )
end
end
Line 265 ⟶ 257:
end
 
local function reconcilePrecipitation( M_values, I_values, prefer_cm )
local v_class = 0
for i = 1, 13 do
if M_values[i].variant == 1 then
v_class = 1
Line 281 ⟶ 273:
end
end
for i = 1, 13 do
local units
if M_values[i].string == '' then
Line 290 ⟶ 282:
units = 'in2mm'
end
M_values[i]:setConvert( I_values[i], units )
M_values[i].variant = v_class
end
Line 300 ⟶ 292:
units = 'mm2in'
end
I_values[i]:setConvert( M_values[i], units )
end
end
Line 306 ⟶ 298:
end
 
local function w.buildRow_buildRow(definition, frameargs, options)
options = options or {}
local mode = (frame.args.mode or 'basic'):lower()▼
▲ local wbc = require('Module:Weather box/colors' .. (options.sandbox or ''))
local group_name = frame.args.group_name▼
▲ local mode = (frame.argsdefinition.mode or 'basic'):lower()
▲ local group_name = frame.argsdefinition.group_name
local first_values, second_values
local color_values
local color_scheme = frame.argsdefinition.color_scheme or 't'
local scale_factor = math_mod._cleanNumber( frame.argsdefinition.scale_factor) or 1
local date_mode = checkFlag( frame.argsdefinition.date_mode, false )
local label = frame.argsdefinition.label or ''
local annual_mode = (frame.argsdefinition.annual_mode or 'avg'):lower()
local include_space = checkFlag( frame.argsdefinition.include_space, true )
local second_line = checkFlag( frame.argsdefinition.second_line, false )
local prefer_cm = checkFlag( frame.argsdefinition.prefer_cm, false )
local imperial_first = checkFlag(args['imperial first'])
local pframe = frame:getParent()
local imperial_firstmetric_first = checkFlag( frame.args['imperialmetric first'] or pframe.args['imperial first'] )
local metric_firstwantSingleLine = checkFlag( frameoptions.args['metric first']wantSingleLine or pframe.checkFlag(args['metricsingle firstline'] )
local trace = pframe.args.trace▼
local single_line = checkFlag( frame.args['single line'] or pframe.args['single line'] )
▲ local trace = pframe.args.trace
if trace and trace ~= '' then
traceText = trace
end
 
if imperial_first == nil then
imperial_first = metric_first == nil and true or not metric_first
end
 
if mode == 'basic' then
first_values = getInputs( pframeargs, group_name, nil, include_space )
second_values = nil
elseif mode == 'temperature' then
first_values = getInputs( pframeargs, group_name, {'C'}, include_space )
second_values = getInputs( pframeargs, group_name, {'F'}, include_space )
reconcileTemperature( first_values, second_values )
elseif mode == "precipitation" then
first_values = getInputs( pframeargs, group_name, {'cm', 'mm'}, include_space )
second_values = getInputs( pframeargs, group_name, {'inch'}, include_space )
reconcilePrecipitation( first_values, second_values, prefer_cm )
else
error( 'Requested mode not recognized' )
end
 
local good = false
for i = 1, 13 do
if first_values[i].string ~= '' then
good = true
Line 357 ⟶ 347:
return ''
end
 
if first_values[13].string == '' then
first_values[13] = getAnnualValue( first_values, annual_mode )
end
if second_values ~= nil then
if second_values[13].string == '' then
second_values[13] = getAnnualValue( second_values, annual_mode )
end
end
color_scheme = wbc.interpret_color_code( color_scheme )▼
 
▲ color_scheme = wbc.interpret_color_code( color_scheme )
 
color_values = {}
local month_adj = { 31/30, 28.25/30, 31/30, 1, 31/30, 1,
31/30, 31/30, 1, 31/30, 1, 31/30, 365.25/30 }
for i = 1, 13 do
if first_values[i]:isValid() then
local adj = scale_factor
Line 383 ⟶ 370:
end
end
table.insert( color_values, color_scheme( first_values[i].number * adj ) )
else
table.insert( color_values, color_scheme( nil ) )
end
end
 
if imperial_first and second_values ~= nil then
first_values, second_values = second_values, first_values
end
if not single_linewantSingleLine then▼
 
▲ if not single_line then
if second_line and second_values ~= nil then
first_values = second_values
Line 399 ⟶ 384:
second_values = nil
end
return makeLine( label, first_values, second_values, color_values )▼
end
 
local function buildRow(frame)
▲ return makeLine( label, first_values, second_values, color_values )
return _buildRow(frame.args, frame:getParent().args) -- row definition, template parameters
end
 
return w{
buildRow = buildRow,
_buildRow = _buildRow,
}
Retrieved from "https://en.wikipedia.org/wiki/Module:Weather_box/row"