模組:PeriodicTable
模块文档[创建]| 您可能想要创建本Scribunto模块的文档。 编者可以在本模块的沙盒 (创建 | 镜像)和测试样例 (创建)页面进行实验。 请在/doc子页面中添加分类。本模块的子页面。 |
local p = {}
local origArgs
local periodicTable_tlcss = ''
local periodicTable_math_group1 = ''
local error = require( 'Module:Error' )
p.utils = require( 'Module:PeriodicTable/utils' )
local EC_parser = require( 'Module:Element/ElectronConfiguration' )
local roman = require( 'Module:Roman' )
local yesno = require( 'Module:Yesno' )
local lib_arg = {}
local templateParameters = {}
local element_layers = {'K','L','M','N','O','P','Q'}
local element_layers_max = {{2},{2,8},{2,8,8},{2,8,18,8},{2,8,18,18,8},{2,8,18,32,18,8},{2,8,18,32,32,18,8}}
function p.getElementData(frame)
return p._getElementData(p.utils.element_lib._loadArgFromFrame(frame))
end
function p._getElementData(args)
--去除模板引用時可能產生的空格
local eleString='' if (args[1] and args[1] ~= '') then eleString = mw.text.trim(args[1]) else return '' end
local data_name='' if (args[2] and args[2] ~= '') then data_name = mw.text.trim(args[2]) else return '' end
local eleid = p.utils.element_lib.getListID(eleString)
local ele1 = p.utils.element_lib._copytable(p.utils.element_data[eleid])
if (eleid==-1) then
return ''
end
if (ele1.correct and ele1.correct ~= '') then
return ''
end
local comma = ','
if args["comma"] and args["comma"]~='' then comma = args["comma"] or comma end
local result
if (ele1.Z and ele1.Z ~= '') then
result = p._get_element_data(ele1, data_name)
end
if type(result) == type({}) then
local body = ''
for i=1,#result do
if body~='' then body=body..comma end
body=body..result[i]
end
if #result <= 0 then
for key,value in pairs(result) do
if body~='' then body=body..comma end
body=body..key..':'..value
end
end
return body
end
return result
end
p.supportElementDatas = {'StableIsotopeCount','Halflife','ElectronConfiguration','ElectronShell','Phase','PhaseZh'}
function p._get_element_data(element_obj,data_name)
local ele_data = element_obj[data_name]
if ele_data ~= nil then return ele_data end
local lower_name = mw.ustring.gsub(mw.ustring.lower(data_name),'[%s_]+','')
if lower_name=='stableisotopecount' then
return (element_obj.stability or {}).stableCount or 0
elseif lower_name=='halflife' then
if element_obj.stability == nil then return 0 end
return element_obj.stability.halflife or tonumber('inf')
elseif lower_name=='loghalflife' then
if element_obj.stability == nil then return tonumber('nan') end
return math.log((element_obj.stability or {}).halflife or tonumber('inf'))/math.log(10)
elseif lower_name=='electronconfiguration' then
return EC_parser._eleconftostring(element_obj.EC, false)
elseif lower_name=='electronshell' then
return EC_parser._eleshelltostring(element_obj.EC)
elseif mw.ustring.match(lower_name,"phase")then
local temperature
mw.ustring.gsub(lower_name,"[%+%-]?[%d%.]+e?[%+%-]?%d*",function(str)
temperature = temperature or tonumber(str)
return str
end)
local result = p.utils.element_lib._get_phase(element_obj, temperature)
if mw.ustring.match(lower_name,"zh") then result = ({solid="固態",liquid="固態",gas="氣態"})[result] or "未知" end
return result
elseif lower_name=='atomicweight' then
return p.utils.element_lib._get_atomic_weight(element_obj)
end
end
function p.subnavcheckmark(obj)
local args, working_frame
if obj == mw.getCurrentFrame() then
-- We're being called via #invoke. The args are passed through to the module
-- from the template page, so use the args that were passed into the template.
if lib_arg.getArgs == nil then lib_arg = require('Module:Arguments') end
args = lib_arg.getArgs(obj)
working_frame = obj
else
-- We're being called from another module or from the debug console, so assume
-- the args are passed in directly.
args = obj
working_frame = mw.getCurrentFrame()
if type(args) ~= type({}) then args = {obj} end
end
local ele_index = args[1]or args['1'] or (''..(args.number or ''))
local ele_sel = args[2]or args['2'] or (''..(args.index or -1))
local this_ele = p.utils.element_lib.getElementByZ(tonumber(ele_index))
if this_ele == nil or mw.text.trim(ele_index)=='' then
return ''
end
local mark='' if (args.mark and args.mark ~= '') then mark = mw.text.trim(''..args.mark) end
local markele='' if (args.markele and args.markele ~= '') then markele = args.markele end
if type(markele) ~= type({"table"}) then markele = mw.text.split(mw.text.trim(markele),',') end
local number = tonumber(ele_sel)
local result_series = nil
if this_ele.series then
local series_text = this_ele.series[1]
if rtype == 'block' then
series_text = (this_ele.block or 'x') .. '區元素'
end
result_series = p.utils.getSeriesData(series_text)
if not result_series then result_series = p.utils.p_data.error_series end
end
if number==this_ele.Z or ((result_series~=nil)and(p.utils.compareSeriesList({result_series}, p.utils.getSeriesDataByString(mark)))or false)
or p.utils.checkElementList(this_ele,markele) then
return 1
else
return ''
end
end
function p.fillElementData(frame)
-- For calling from #invoke.
local args
if frame == mw.getCurrentFrame() then
-- We're being called via #invoke. The args are passed through to the module
-- from the template page, so use the args that were passed into the template.
if lib_arg.getArgs == nil then lib_arg = require('Module:Arguments') end
args = lib_arg.getArgs(frame) --frame.args
else
-- We're being called from another module or from the debug console, so assume
-- the args are passed in directly.
args = frame
end
local targs = {}
for arg, val in pairs(args) do
if tonumber(arg) ~= 1 then
targs[arg] = val
end
end
local element = {}
local element_id = -1
if args.element then element_id = p.utils.element_lib.getListID(args.element) end
if element_id > 0 then element = EC_parser._copytable(p.utils.element_data[element_id])
else element = EC_parser._copytable(p.utils.element_data[1]) end
local celltext="<span class=\"{{{PhaseStyleClass}}}\">'''{{{Z}}}'''</span><br />{{{Symbol}}}<br />{{{NameWithLink}}}<br />{{{AtomicWeight}}}"
if (args['1'] and args['1'] ~= '') then celltext = mw.text.trim(args['1'] ) end
if (args[1] and args[1] ~= '') then celltext = mw.text.trim(args[1] ) end
local eleargs = {}
for propetry, value in pairs(element) do
if type(value) == type("") then eleargs[propetry] = value
elseif type(value) == type(0) then eleargs[propetry] = tostring(value) end
end
for _,propetry in ipairs(p.supportElementDatas) do
local value = p._get_element_data(element,propetry)
if type(value) == type("") then eleargs[propetry] = value
elseif type(value) == type(0) then eleargs[propetry] = tostring(value) end
end
if type(element.Z)==type("0") then eleargs.Symbol = '[[' .. element.page .. '|' .. element.Symbol .. ']]' end
if element.page then
eleargs.NameWithLink = '[[' .. element.page .. '|' .. element.name .. ']]'
else
eleargs.NameWithLink = element.name
end
local PhaseStyleClasses = {["gas"] = "Yuansuzhouqibiao_gas", ["solid"] = "", ["liquid"] = "Yuansuzhouqibiao_liquid"}
local ar_std, is_natural = p.utils.element_lib._get_atomic_weight(element)
local phase = p.utils.element_lib._get_phase(element)
local digs = 0
if (ar_std or 0) < 1 then digs = 0 else digs = math.log10(ar_std) end
local formater = "%.1f"
if(digs < 1) then formater = "%.3f"
elseif (digs < 2) then formater = "%.2f" end
if is_natural ~= true then formater = "[%d]" end
if ar_std then eleargs.AtomicWeight = string.format( formater, ar_std ) else eleargs.AtomicWeight = ' ' end
eleargs.PhaseStyleClass = PhaseStyleClasses[phase]
if templateParameters._getFormatingStringByArgument == nil then templateParameters = require( 'Module:TemplateParameters' ) end
return templateParameters._getFormatingStringByArgument(celltext,eleargs)
end
function p.fillPeriodicTableElementData(frame)
-- For calling from #invoke.
local args
if frame == mw.getCurrentFrame() then
-- We're being called via #invoke. The args are passed through to the module
-- from the template page, so use the args that were passed into the template.
if lib_arg.getArgs == nil then lib_arg = require('Module:Arguments') end
args = lib_arg.getArgs(frame) --frame.args
else
-- We're being called from another module or from the debug console, so assume
-- the args are passed in directly.
args = frame
end
local targs = {}
for arg, val in pairs(args) do
if tonumber(arg) ~= 1 then
targs[arg] = val
end
end
local delnowiki = false
if args["delnowiki"] then
if type(yesno) ~= type(tonumber) then yesno = require('Module:Yesno') end
if yesno(args["delnowiki"] or 'no') then
delnowiki = true
end
end
local element = {}
local element_id = -1
element_id = p.utils.element_lib.getListID(args[1] or args['1'])
if element_id > 0 then element = EC_parser._copytable(p.utils.element_data[element_id])
else
local checker = tonumber(args[1] or args['1'])
if checker then
local element = p.utils.element_lib.getElementByZ(checker)
if element then
if not element.othername then
element.othername={element.name}
else
table.insert(element.othername, element.name)
end
end
else
local wrap_body = args[1] or args['1'] or args.celltext or '\n'
if templateParameters._getFormatingStringByArgument == nil then templateParameters = require( 'Module:TemplateParameters' ) end
if delnowiki then wrap_body = mw.text.unstripNoWiki( wrap_body ) end
local usingConditionalExpressions = false
if args.usingConditionalExpressions then
if type(yesno) ~= type(tonumber) then yesno = require('Module:Yesno') end
if yesno(args.usingConditionalExpressions) == true then
usingConditionalExpressions = true
wrap_body = templateParameters._get_escape(wrap_body)
end
end
if usingConditionalExpressions then
wrap_body = frame:preprocess( wrap_body )
end
return wrap_body
end
element = EC_parser._copytable(p.utils.element_data[1])
end
local celltext="<span class=\"{{{PhaseStyleClass}}}\">'''{{{Z}}}'''</span><br />{{{Symbol}}}<br />{{{NameWithLink}}}<br />{{{AtomicWeight}}}"
if (args.celltext and args.celltext ~= '') then celltext = mw.text.trim(args.celltext ) end
if delnowiki then celltext = mw.text.unstripNoWiki( celltext ) end
local eleargs = {}
for propetry, value in pairs(element) do
if type(value) == type("") then eleargs[propetry] = value
elseif type(value) == type(0) then eleargs[propetry] = tostring(value) end
end
for _,propetry in ipairs(p.supportElementDatas) do
local value = p._get_element_data(element,propetry)
if type(value) == type("") then eleargs[propetry] = value
elseif type(value) == type(0) then eleargs[propetry] = tostring(value) end
end
if type(element.Z)==type("0") then eleargs.Symbol = '[[' .. element.page .. '|' .. element.Symbol .. ']]' end
if element.page then
eleargs.NameWithLink = '[[' .. element.page .. '|' .. element.name .. ']]'
else
eleargs.NameWithLink = element.name
end
local PhaseStyleClasses = {["gas"] = "Yuansuzhouqibiao_gas", ["solid"] = "", ["liquid"] = "Yuansuzhouqibiao_liquid"}
local ar_std, is_natural = p.utils.element_lib._get_atomic_weight(element)
local phase = p.utils.element_lib._get_phase(element)
local digs = 0
if (ar_std or 0) < 1 then digs = 0 else digs = math.log10(ar_std) end
local formater = "%.1f"
if(digs < 1) then formater = "%.3f"
elseif (digs < 2) then formater = "%.2f" end
if is_natural ~= true then formater = "[%d]" end
if ar_std then eleargs.AtomicWeight = string.format( formater, ar_std ) else eleargs.AtomicWeight = ' ' end
eleargs.PhaseStyleClass = PhaseStyleClasses[phase]
eleargs.Phase = phase
if element.series then
if (element.predictedSeries and element.predictedSeries ~= '') then predicted=true end
local series_text = element.series[1]
local result_series = p.utils.getSeriesData(series_text)
local result_blockseries = p.utils.getSeriesData((element.block or 'x') .. '區元素')
if not result_series then result_series = p.utils.p_data.error_series end
eleargs.seriesText = series_text
eleargs.blockText = (element.block or 'x') .. '區元素'
eleargs.styleClass = result_series.style
eleargs.blockStyleClass = (result_blockseries or p.utils.p_data.error_series).style
eleargs.predictedStyleClass = result_series.style
if predicted then
eleargs.predictedStyleClass = eleargs.predictedStyleClass .. '_predicted'
eleargs.blockStyleClass = eleargs.predictedStyleClass .. '_predicted'
end
else
eleargs.seriesText = '未知特性'
end
if templateParameters._getFormatingStringByArgument == nil then templateParameters = require( 'Module:TemplateParameters' ) end
local usingConditionalExpressions = false
if args.usingConditionalExpressions then
if type(yesno) ~= type(tonumber) then yesno = require('Module:Yesno') end
if yesno(args.usingConditionalExpressions) == true then
usingConditionalExpressions = true
celltext = templateParameters._get_escape(celltext)
end
end
if usingConditionalExpressions then
local child_args = {}
for aname, aval in pairs(args) do child_args[tostring(aname)] = aval end
for aname, aval in pairs(eleargs) do child_args[tostring(aname)] = aval end
local working_frame = frame:newChild{ args = child_args }
celltext = working_frame:preprocess( celltext )
end
return templateParameters._getFormatingStringByArgument(celltext,eleargs)
end
function p.navPeriodicTable(frame)
-- For calling from #invoke.
local pframe = frame:getParent()
local args = {}
for k, v in pairs( frame.args ) do
args[k] = v;
end
periodicTable_tlcss = frame:callParserFunction{ name = '#tag:templatestyles', args = { '', src='元素週期表/styles.css' } }
local arg1='' if (args[1] and args[1] ~= '') then arg1 = mw.text.trim(args[1] ) end
local mark='' if (args[2] and args[2] ~= '') then mark = mw.text.trim(args[2] ) end
if (args.number and args.number ~= '') then arg1 = mw.text.trim(args.number ) end
if (args.mark and args.mark ~= '') then mark = mw.text.trim(args.mark ) end
local markele='' if (args.markele and args.markele ~= '') then markele = mw.text.trim(args.markele ) end
local rtype='normal' if (args['type'] and args['type'] ~= '') then rtype = mw.text.trim(args['type'] ) end
if rtype == 'isotope' or rtype == 'isotope nav' then periodicTable_tlcss = periodicTable_tlcss ..
frame:callParserFunction{ name = '#tag:templatestyles', args = { '', src='Isotope nav/styles.css' } }
end
-- fricke --nefedov
local pmodel='fricke' if (args.model and args.model ~= '') then pmodel = mw.text.trim(args.model ) end
no173='yes' if (args.no173 and args.no173 ~= '') then no173 = mw.text.trim(args.no173 ) end
noTag='no' if (args['noTag'] and args['noTag'] ~= '') then noTag = mw.text.trim(args['noTag'] ) end
no173=yesno(no173)
noTag=yesno(noTag)
local number = tonumber(arg1)
return p.renderNavElementTable(number, mark, mw.text.split(markele,','), rtype, pmodel)
end
function p.templatePeriodicTable(frame)
-- For calling from #invoke.
local pframe = frame:getParent()
local args = {}
for k, v in pairs( frame.args ) do
args[k] = v;
end
periodicTable_tlcss = frame:callParserFunction{ name = '#tag:templatestyles', args = { '', src='元素週期表/styles.css' } }
local arg1='' if (args[1] and args[1] ~= '') then arg1 = mw.text.trim(args[1] ) end
local mark='' if (args[2] and args[2] ~= '') then mark = mw.text.trim(args[2] ) end
if (args.number and args.number ~= '') then arg1 = mw.text.trim(args.number ) end
if (args.mark and args.mark ~= '') then mark = mw.text.trim(args.mark ) end
if (args['no mark'] and args['no mark'] ~= '') then
nomark = yesno(mw.text.trim(args['no mark'] ))
else
nomark = false
end
local markele='' if (args.markele and args.markele ~= '') then markele = mw.text.trim(args.markele ) end
local rtype='normal' if (args['type'] and args['type'] ~= '') then rtype = mw.text.trim(args['type'] ) end
-- fricke --nefedov
local pmodel='fricke' if (args.model and args.model ~= '') then pmodel = mw.text.trim(args.model ) end
no173='yes' if (args.no173 and args.no173 ~= '') then no173 = mw.text.trim(args.no173 ) end
no173=yesno(no173)
local number = tonumber(arg1)
-- p.renderTemplatePeriodicTable(number, mark, markele, rtype)
return p.renderTemplatePeriodicTable(number, mark, mw.text.split(markele,','), rtype, pmodel)
end
function p.articlePeriodicTable(frame)
-- For calling from #invoke.
local pframe = frame:getParent()
local args = {}
local option = {}
for k, v in pairs( frame.args ) do
args[k] = v;
option[k] = v;
end
local show_data = ''
periodicTable_tlcss = frame:callParserFunction{ name = '#tag:templatestyles', args = { '', src='元素週期表/styles.css' } }
periodicTable_math_group1 = frame:callParserFunction{ name = '#tag:math', args = { '\\overbrace{\\qquad\\qquad\\qquad}' } }
local arg1='' if (args[1] and args[1] ~= '') then arg1 = mw.text.trim(args[1] ) end
local mark='' if (args[2] and args[2] ~= '') then mark = mw.text.trim(args[2] ) end
if (args.data and args.data ~= '') then show_data = mw.text.trim(args.data ) end
option.json_flag = false
if (args.element_data and args.element_data ~= '') then
if xpcall(function()
option.element_data = mw.text.jsonDecode(mw.text.trim(args.element_data))
end,function()end)then
if mw.text.trim(show_data)=='' then show_data = ' #default ' end
else
option.element_data = nil
end
end
if (args.color_map and args.color_map ~= '') then
local json_flag = false
if mw.ustring.find(option.color_map,"[%[%{]") then
option.color_map = mw.text.jsonDecode(mw.text.trim(args.color_map))
json_flag = true
elseif mw.ustring.find(option.color_map,",") then
option.color_map = mw.text.split(args.color_map,',')
elseif mw.ustring.find(option.color_map,";") then
option.color_map = mw.text.split(args.color_map,';')
else
option.color_map = nil
end
if json_flag then
option.json_flag = true
else
if #(option.color_map) == 0 then option.color_map = nil end
if option.color_map ~= nil then
local data_low = tonumber(mw.text.trim(args.data_low or ''))
local data_high = tonumber(mw.text.trim(args.data_high or ''))
if args.data and args.data ~= '' then
local _my_min, _my_max
local valid_data_checker = p._get_element_data(p.utils.element_data[3],show_data)
if tonumber(valid_data_checker) or
tonumber(
(type(valid_data_checker)==type({})and valid_data_checker[1] or nil)
)~=nil
then
for _,check_ele in ipairs(p.utils.element_data)do
local element_data_checker = p._get_element_data(check_ele,show_data)
local number_tocheck = tonumber(element_data_checker) or tonumber(
type(element_data_checker)==type({})and element_data_checker[1] or nil
)
local check_nan_inf = tostring(number_tocheck)
if check_nan_inf=='nan' or check_nan_inf=='-nan' or check_nan_inf=='inf' or check_nan_inf=='-inf' then number_tocheck = nil end
if number_tocheck ~= nil then
if _my_min == nil then _my_min = number_tocheck
elseif number_tocheck < _my_min then _my_min = number_tocheck end
if _my_max == nil then _my_max = number_tocheck
elseif number_tocheck > _my_max then _my_max = number_tocheck end
end
end
end
option.data_low = data_low or _my_min
option.data_high = data_high or _my_max
end
end
end
end
if (args.number and args.number ~= '') then arg1 = mw.text.trim(args.number ) end
if (args.mark and args.mark ~= '') then mark = mw.text.trim(args.mark ) end
if (args.noappx and args.noappx ~= '') then option.noappx = yesno(mw.text.trim(args.noappx))end
if (args['no mark'] and args['no mark'] ~= '') then
nomark = yesno(mw.text.trim(args['no mark'] ))
else
nomark = false
end
local markele='' if (args.markele and args.markele ~= '') then markele = mw.text.trim(args.markele ) end
local rtype='normal' if (args['type'] and args['type'] ~= '') then rtype = mw.text.trim(args['type'] ) end
-- fricke --nefedov
local pmodel='noLanthanide' if (args.model and args.model ~= '') then pmodel = mw.text.trim(args.model ) end
no173='yes' if (args.no173 and args.no173 ~= '') then no173 = mw.text.trim(args.no173 ) end
no173=yesno(no173)
local celltext="<span class=\"{{{PhaseStyleClass}}}\">'''{{{Z}}}'''</span><br />{{{Symbol}}}<br />{{{NameWithLink}}}<br />{{{AtomicWeight}}}"
if (args.celltext and args.celltext ~= '') then celltext = mw.text.trim(args.celltext ) end
option.celltext = celltext
local number = tonumber(arg1)
option.show_data = show_data
-- 改用全局僻字woff技术，已不需要“缺字”
--if yesno(option.textimage) == true then
-- ele117img = frame:expandTemplate{ title = '缺字', args = { 'tian2', '1', 'Ts' } }
-- ele118imghans = frame:expandTemplate{ title = '缺字', args = { 'ao4', '3', 'Og' } }
-- ele118imghant = frame:expandTemplate{ title = '缺字', args = { 'ao4', '2', 'Og' } }
--end
return p.renderArticlePeriodicTable(number, mark, mw.text.split(markele,','), rtype, pmodel, option)
end
function p.isotopePeriodicTable(frame)
-- For calling from #invoke.
local pframe = frame:getParent()
local args = {}
for k, v in pairs( frame.args ) do
args[k] = v;
end
periodicTable_tlcss = frame:callParserFunction{ name = '#tag:templatestyles', args = { '', src='Isotope nav/styles.css' } }
local arg1='' if (args[1] and args[1] ~= '') then arg1 = mw.text.trim(args[1] ) end
if (args.number and args.number ~= '') then arg1 = mw.text.trim(args.number ) end
local rtype='normal' if (args['type'] and args['type'] ~= '') then rtype = mw.text.trim(args['type'] ) end
local classtype='' if (args.classtype and args.classtype ~= '') then classtype = mw.text.trim(args.classtype ) end
local number = tonumber(arg1)
if classtype and classtype ~= '' then classtype = classtype .. '_' end
return p.renderIsotopePeriodicTable(number, rtype, classtype)
end
-----------------------
--draw Periodic Table
-----------------------
function p.renderTemplatePeriodicTable(number, mark, markele, rtype, pmodel)
option = {}
local has_119 = (number >= 119)
local body = ''
group_order = {1,2,19,20,21,22,23,24,25,26,27,28,29,30,31,32,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18}
group_inverse = {1,2,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,3,4,5,6,7,8,9,10,11,12,13,14,15,16}
local spans = 0
local group_id = 1
local period_id = 0
local main_loop_max = 118
if has_119 then spans = 1; main_loop_max = 118 end
if has_119 and (pmodel=='nefedov' or pmodel=='nefedov-p' or pmodel=='wrong-demo' or pmodel=='wrong-demo-c') then
if pmodel=='wrong-demo' then main_loop_max=121
else main_loop_max=120 end
end
body = body .. p.renderPeriodicTableGroupHeader(has_119, pmodel)
if number==0 then body = body .. p.renderPeriodicTablePeriodHeader(0)
--p._templatePeriodicTableElementCell(element,span,mark,markele,number,rtype,option)
body = body .. p._templatePeriodicTableElementCell(
p.utils.element_lib.getElementByZ(0),31,
mark,markele,number,rtype,option
) .. '\n'
end
local index = 1
for index = 1,main_loop_max do
local iteratorElement = p.utils.element_lib.getElementByZ(index)
if iteratorElement then
if index>120 then
iteratorElement.series={'化學性質未知'}
iteratorElement.predictedSeries = nil
end
if period_id ~= iteratorElement.period then
period_id = iteratorElement.period
group_id = 1
body = body .. p.renderPeriodicTablePeriodHeader(iteratorElement.period)
end
local iterator_group = iteratorElement.group or 19
local spans_data = group_inverse[iterator_group] - group_id
if has_119 and (pmodel=='nefedov' or pmodel=='nefedov-p' or pmodel=='wrong-demo' or pmodel=='wrong-demo-c') then
if iteratorElement.period < 6 then
if iterator_group==3 then
if pmodel=='wrong-demo' then
iterator_group = 19
spans_data = group_inverse[iterator_group] - group_id
end
elseif iterator_group==4 then
spans_data = spans_data - 1 + spans
end
end
end
local skip_eleid=38
local split_eleg=19
if has_119 and (pmodel=='nefedov' or pmodel=='nefedov-p' or pmodel=='wrong-demo' or pmodel=='wrong-demo-c') then
if pmodel=='wrong-demo' then
skip_eleid=57
split_eleg=20
else
skip_eleid=56
split_eleg=19
end
elseif has_119 and pmodel=='fricke' then
skip_eleid=38
split_eleg=19
end
if spans_data > 0 or iterator_group==split_eleg then
spans_data = spans_data + spans
end
if index == skip_eleid+1 then spans_data = spans_data - 1 end
body = body ..
p._templatePeriodicTableElementCell(
iteratorElement,spans_data,
mark,markele,number,
rtype,option
) .. '\n'
if index == skip_eleid then
if has_119 then
body = body .. '| style=\"border:none; width:6px; min-width:6px;padding:0;\" |\n'
else
body = body .. '| style=\"border:none; width:0;padding:0;\" |\n'
end
end
group_id = group_inverse[iterator_group]+1
end
end
if has_119 and (pmodel=='nefedov' or pmodel=='nefedov-p' or pmodel=='wrong-demo' or pmodel=='wrong-demo-c') then
local hy_eleid=(pmodel=='nefedov')and 143 or ((pmodel=='wrong-demo')and 144 or 143)
local hy_span=(pmodel=='nefedov')and 3 or ((pmodel=='wrong-demo')and 4 or 3)
body = body .. '| style=\"border:none; width:0;padding:0;\" |*\n'
local old_eleid=hy_eleid
option["$=#model"]=pmodel
body = body .. p._renderTemplateElementTable_Extended(hy_eleid, 172, '化學性質未知', false, mark, markele, number, rtype, option)
body = body .. '\n|-\n|style=\"border:none; padding:0;\"|<div style=\"width:1px; height:4px;\"></div>\n|-\n| colspan=' .. hy_span .. '|\n'
body = body .. '| style=\"border:none; width:0; padding:0;\" |*\n'
body = body .. p._renderTemplateElementTable_Extended(main_loop_max+1, hy_eleid-1, '化學性質未知', false, mark, markele, number, rtype, option)
if not no173 or number >= 173 then
body = body .. '| style=\"border:none; width:0; padding:0;\" |\n'
body = body .. '\n|-\n|style=\"border:none; padding:0;\"|<div style=\"width:1px; height:4px;\"></div>'
body = body .. '\n|-\n|colspan=5|\n|colspan='..(hy_span)..'|[[未發現元素列表#周期未定|族未定]]\n|-\n| colspan='..(hy_span-2)..'|'
body = body .. '\n|colspan=3|[[未發現元素列表#周期未定|周期未定]]\n'
local extindex = 173
local check_number = number + 1; if check_number < 184 then check_number = 184 end
local is_first = true
local max_index = extindex
local hy_count=(pmodel=='nefedov')and 29 or ((pmodel=='wrong-demo')and 28 or 29)
while extindex <= check_number do
if is_first then is_first = false
else body = body .. '|-\n| colspan='..(hy_span+1)..'|\n' end
max_index = extindex+hy_count
if max_index >= check_number then max_index = check_number end
body = body .. p._renderTemplateElementTable_Extended(
extindex, max_index, '超臨界原子', true,
mark, markele, number, rtype, option)
extindex = extindex + hy_count + 1
end
local check_side = max_index-173
check_side = math.mod(check_side,hy_count+1)
if (check_side == 0 or check_side >= hy_count) then body = body .. '|-\n| colspan=5|\n' end
body = body .. '\n| colspan=1|.....\n'
end
body = body .. '\n|-\n| colspan=5|\n'
body = body .. '\n| colspan=25|※註：119號及以後的元素並無公認的排位，上表之排位是從理論計算的電子排布推論而得的一種\n'
end
return body
end
function p.renderArticlePeriodicTable(number, mark, markele, rtype, pmodel, option)
transitionBelow=yesno(option.transitionBelow or 'no')
lanthanideBelow=yesno(option.lanthanideBelow or 'yes')
superactinidesBelow=yesno(option.superactinidesBelow or 'yes')
local body=''
local start_by_period = tonumber(option.startPeriod or 1) or 1
local render_period = tonumber(option.endPeriod or 7) or 7
local selected_model = p.utils.table_models[pmodel]
if type(start_by_period) ~= type(0) then start_by_period = tonumber(start_by_period or 1) or 1 end
if start_by_period < 0 then start_by_period = 0 end
if type(selected_model) ~= type({{0}}) then selected_model = p.utils.table_models[0] end
local group_list = p.utils.get_group_list(pmodel,render_period,lanthanideBelow,superactinidesBelow,transitionBelow,option)
local max_eleid = -1
local head_span = 0
local top_span = 0
periodOffset_list={}
if option.periodOffset and type(option.periodOffset) == type('0') then
local periodOffset_lists = mw.text.split(option.periodOffset,',')
if type(periodOffset_lists) == type({'0'}) then
local periodOffset_check_list = {}
for _,periodOffset_num_str in ipairs(periodOffset_lists) do
local periodOffset_num=tonumber(periodOffset_num_str)
if periodOffset_num then periodOffset_check_list[#periodOffset_check_list+1] = tonumber(periodOffset_num) end
end
if #periodOffset_check_list > 0 then periodOffset_list = periodOffset_check_list end
end
end
for period_it = start_by_period,render_period do
local skips = 0
local period_row = selected_model[period_it]
if option["period" .. tostring(period_it) .. "head"] ~= '' then
body = body .. render_period_head(option["period" .. tostring(period_it) .. "head"] or option.periodhead,period_it)
else body = body .. render_period_head(option.periodhead,period_it) end
if period_row then
for group_iterator = 1,#group_list do
local group_it = group_list[group_iterator]
local group_cell = period_row[group_it]
if periodOffset_list[group_iterator] and (periodOffset_list[group_iterator] or 0) ~= 0 then
local period_offset_row = selected_model[period_it + periodOffset_list[group_iterator]]
group_cell = period_offset_row[group_it]
end
if group_cell then
local spans_data = 0
if skips > 0 then
if period_it==1 then head_span = skips end
if period_it==4 then top_span = skips end
spans_data = skips
local render_result = ''
render_result, spans_data = render_period_middle(option["period" .. tostring(period_it) .. "middle"],period_it,spans_data,#group_list)
body = body .. render_result
skips = 0
end
if group_cell > max_eleid then max_eleid = group_cell end
local iteratorElement = p.utils.element_lib.getElementByZ(group_cell)
local iteratorElement_temp = p.utils.below_tweaking(iteratorElement,transitionBelow,lanthanideBelow,superactinidesBelow)
body = body ..
p._articlePeriodicTableElementCell(
iteratorElement_temp,spans_data,
mark,markele,number,
rtype,option,
lanthanideBelow
) .. '\n'
else skips = skips + 1 end
end
end
if option["period" .. tostring(period_it) .. "tail"] then
body= body .. option["period" .. tostring(period_it) .. "tail"] .. '\n'
end
body= body .. '|- align="center"\n'
end
render_result, _ = render_period_middle(option.periodtopmiddle,1,#group_list+4,#group_list)
body = render_result .. body
render_result, _ = render_period_middle(option.toprow,1,#group_list+4,#group_list)
body = render_result .. '|- align="center"\n' .. body
if transitionBelow==true and render_period<=5 then
if render_period>=4 then
body = body .. '\n|-\n|style=\"border:none; padding:0;\"|<div style=\"width:1px; height:4px;\"></div>\n'
body = body .. '|- align="center" valign="bottom"\n'
body = body .. '| colspan=1 valign="center" style=\"border:none; width:0;vertical-align:middle;\" |+\n'
for index = 21,30 do
local iteratorElement = p.utils.element_lib.getElementByZ(index)
if iteratorElement then
body = body ..
p._articlePeriodicTableElementCell(
iteratorElement,0,
mark,markele,number,
rtype,option,
lanthanideBelow
) .. '\n'
end
end
end
if render_period>=5 then
body = body .. '\n|- align="center" valign="bottom"\n'
body = body .. '| colspan=1 valign="center" style=\"border:none; width:0;vertical-align:middle;\" |++\n'
for index = 39,48 do
local iteratorElement = p.utils.element_lib.getElementByZ(index)
if iteratorElement then
body = body ..
p._articlePeriodicTableElementCell(
iteratorElement,0,
mark,markele,number,
rtype,option,
lanthanideBelow) .. '\n'
end
end
end
end
if lanthanideBelow==true then
if render_period>=6 then
body = body .. '\n|-\n|style=\"border:none; padding:0;\"|<div style=\"width:1px; height:4px;\"></div>\n'
body = body .. '|- align="center" valign="bottom"\n| colspan=1 valign="center" style=\"vertical-align:middle;\"|6\n'
body = body .. '| colspan=1 valign="center" style=\"border:none; width:0;vertical-align:middle;\" |*\n'
body = body .. '| colspan=1 valign="center" style=\"border:none; width:0;vertical-align:middle;\" |[[镧系元素|鑭系<br/>元素]]\n'
for index = 57,71 do
local iteratorElement = p.utils.element_lib.getElementByZ(index)
if iteratorElement then
body = body ..
p._articlePeriodicTableElementCell(
iteratorElement,0,
mark,markele,number,
rtype,option,
lanthanideBelow
) .. '\n'
end
end
end
if render_period>=7 then
body = body .. '\n|- align="center" valign="bottom"\n| colspan=1 valign="center" style=\"vertical-align:middle;\"|7\n'
body = body .. '| colspan=1 valign="center" style=\"border:none; width:0;vertical-align:middle;\" |**\n'
body = body .. '| colspan=1 valign="center" style=\"border:none; width:0;vertical-align:middle;\" |[[锕系元素|錒系<br/>元素]]\n'
for index = 89,103 do
local iteratorElement = p.utils.element_lib.getElementByZ(index)
if iteratorElement then
body = body ..
p._articlePeriodicTableElementCell(
iteratorElement,0,
mark,markele,number,
rtype,option,
lanthanideBelow) .. '\n'
end
end
end
end
return body
end
function p.renderIsotopePeriodicTable(number, rtype, classtype)
local option = {index=true,class_type=classtype}
local has_119 = (number >= 119)
local body = ''
group_order = {1,2,19,20,21,22,23,24,25,26,27,28,29,30,31,32,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18}
group_inverse = {1,2,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,3,4,5,6,7,8,9,10,11,12,13,14,15,16}
local spans = 0
local group_id = 1
local period_id = 0
local main_loop_max = 118
local is_lanthanide_below = (mw.ustring.lower(rtype) == 'lanthanide below')
local gobal_spans = 31
if is_lanthanide_below then gobal_spans = 18 end
if has_119 then spans = 1; main_loop_max = 118 end
--body = body .. p.renderPeriodicTableGroupHeader(has_119) .. p.renderPeriodicTablePeriodHeader(0)
body = body .. p._isotopePeriodicTableElementCell(
p.utils.element_lib.getElementByZ(0),gobal_spans,
number,rtype,option
) .. '\n'
--Lanthanide below
local index = 1
for index = 1,118 do
local iteratorElement = p.utils.element_lib.getElementByZ(index)
if iteratorElement then
if period_id ~= iteratorElement.period then
period_id = iteratorElement.period
group_id = 1
body = body .. '|-\n'
-- .. p.renderPeriodicTablePeriodHeader(iteratorElement.period)
end
local iterator_group = iteratorElement.group or 19
local spans_data = group_inverse[iterator_group] - group_id
if is_lanthanide_below then
if iteratorElement.period < 6 then
if iterator_group==3 then
iterator_group = 19
spans_data = group_inverse[iterator_group] - group_id
elseif iterator_group==4 then
spans_data = spans_data - 1 + spans
end
end
end
local skip_eleid=38
local split_eleg=19
local skip_gp=-1
if is_lanthanide_below then skip_eleid=57; skip_gp=19; end
if is_lanthanide_below then split_eleg=20
if spans_data >= 13 then
spans_data = spans_data - 14
if index < 56 then spans_data = spans_data + 1 end
end
end
if spans_data > 0 or iterator_group==split_eleg then spans_data = spans_data + spans end
if index == skip_eleid+1 then spans_data = spans_data - 1 end
if (not is_lanthanide_below) or (iterator_group <= 19 and index~=71 and index~=103) then
body = body ..
p._isotopePeriodicTableElementCell(
iteratorElement,spans_data,
number,
rtype,option
) .. '\n'
if index == skip_eleid or (iterator_group == skip_gp) then
if is_lanthanide_below then
body = body .. '| style=\"border:none; width:6px; min-width:6px;\" |'
if index > 56 then body = body .. '*' end
if index > 88 then body = body .. '*' end
body = body .. '\n'
else
body = body .. '| style=\"border:none; width:0;\" |\n'
end
end
end
group_id = group_inverse[iterator_group]+1
end
end
if is_lanthanide_below then
body = body .. '\n|-\n|style=\"border:none; padding:0;\"|<div style=\"width:1px; height:4px;\"></div>\n|-\n| colspan=1|\n'
body = body .. '| colspan=1 style=\"border:none; width:0;\" |*\n'
body = body .. '| colspan=2 style=\"border:none; width:0;\" |[[镧系元素|鑭系<br/>元素]]\n'
for index = 57,71 do
local iteratorElement = p.utils.element_lib.getElementByZ(index)
if iteratorElement then
body = body ..
p._isotopePeriodicTableElementCell(
iteratorElement,0,
number,
rtype,option
) .. '\n'
end
end
body = body .. '\n|-\n| colspan=1|\n'
body = body .. '| colspan=1 style=\"border:none; width:0;\" |**\n'
body = body .. '| colspan=2 style=\"border:none; width:0;\" |[[锕系元素|錒系<br/>元素]]\n'
for index = 89,103 do
local iteratorElement = p.utils.element_lib.getElementByZ(index)
if iteratorElement then
body = body ..
p._isotopePeriodicTableElementCell(
iteratorElement,0,
number,
rtype,option
) .. '\n'
end
end
end
return body
end
function p.renderClassTable(frame_or_text,link_data_i,input_val_i,spilter_i,map_val_i,styleclass_i,other_css)
local is_frame = type(frame_or_text) == type({"a"})
if is_frame then is_frame = xpcall(function()frame_or_text:getTitle()end,function()end)end
local input_val = input_val_i--"1,0,1"
local spilter = spilter_i--","
local map_val = map_val_i--"0=white,1=black"
local link_data=link_data_i
local text = frame_or_text--" "
local styleclass =styleclass_i--"styleclass"
local link_data=link_data_i
if is_frame then
if lib_arg.getArgs == nil then lib_arg = require('Module:Arguments') end
args = lib_arg.getArgs(frame_or_text)
elseif type(frame_or_text) == type({"a"}) then
if type(frame_or_text.args or "") == type({"a"}) then
args = frame_or_text.args
else
args = frame_or_text
end
end
if type(args) == type({"a"}) then
input_val = args[3] or args["3"] or args.data or "0"
spilter = args.spilter or ","
map_val = args[4] or args["4"] or args.map or "0=white,1=black"
link_data = args[2] or args["2"] or args.link_data or ""
text = args[1] or args["1"] or args.text or " "
styleclass = args.styleclass or "styleclass"
else
input_val = input_val_i or "0"
spilter = spilter_i or ","
map_val = map_val_i or "0=white,1=black"
link_data = link_data_i or ""
text = frame_or_text or " "
styleclass = styleclass_i or "styleclass"
end
local body = '{| class=\"Yuansuzhouqibiao_nav nogrid'..(other_css and(' '..other_css)or'')..'\" cellpadding=0 cellspacing=0 style=\"margin:0 0 0 0;background-color: transparent; text-align: center; empty-cells: show; border:0px none;\"\n'
local input_data = input_val
local map_data = map_val
if type(input_val)==type("a")then
local cut_line = mw.text.split(input_val,'\n')
local final_arr = {}
for ctk = 1,#cut_line do final_arr[#final_arr+1]=mw.text.split(cut_line[ctk],spilter) end
input_data = final_arr
end
if type(map_val)==type("a")then
local map_split = mw.text.split(map_val,spilter)
local jt = 1
map_data = {}
for it = 1,#map_split do
local map_it = mw.text.split(map_split[it],"=")
local map_jt = jt
local map_vi = map_split[it]
if #map_it > 1 then
map_jt = map_it[1]
map_vi = map_it[2]
else
jt = jt + 1
map_jt = jt
end
map_data[map_jt] = map_vi
end
end
if type(input_data) == type({""}) then
local working_data = input_data
if type(input_data[1]or"") ~= type({""}) then working_data = {input_data}end
local row_key, col_key = 1,1
for k,row in pairs(working_data) do
body = body .. "|-\n"
col_key = 1
for ck,item in pairs(row) do
local style_css_data = (map_data or {})[item] or item
body = body .. "|"..p._renderClassTableCell(text,style_css_data..' '..styleclass,"",false,link_path,row_key==1 or col_key==1) .. '\n'
col_key=col_key+1
end
row_key=row_key+1
end
end
body = body .. "|}"
return body
end
function p.renderColorTable(frame_or_text,link_data_i,input_val_i,spilter_i,map_val_i,styleclass_i,width_i,height_i)
local is_frame = type(frame_or_text) == type({"a"})
if is_frame then is_frame = xpcall(function()frame_or_text:getTitle()end,function()end)end
local input_val = input_val_i--"1,0,1"
local spilter = spilter_i--","
local map_val = map_val_i--"0=white,1=black"
local link_data=link_data_i
local text = frame_or_text--" "
local styleclass =styleclass_i--"styleclass"
local link_data=link_data_i
local width = width_i
local height = height_i
if is_frame then
if lib_arg.getArgs == nil then lib_arg = require('Module:Arguments') end
args = lib_arg.getArgs(frame_or_text)
elseif type(frame_or_text) == type({"a"}) then
if type(frame_or_text.args or "") == type({"a"}) then
args = frame_or_text.args
else
args = frame_or_text
end
end
if type(args) == type({"a"}) then
input_val = args[3] or args["3"] or args.data or "0"
spilter = args.spilter or ","
map_val = args[4] or args["4"] or args.map or "0=white,1=black"
link_data = args[2] or args["2"] or args.link_data or ""
text = args[1] or args["1"] or args.text or " "
styleclass = args.styleclass or "styleclass"
width = tonumber(args.width) or 5
height = tonumber(args.height) or 5
else
input_val = input_val_i or "0"
spilter = spilter_i or ","
map_val = map_val_i or "0=white,1=black"
link_data = link_data_i or ""
text = frame_or_text or " "
styleclass = styleclass_i or "styleclass"
width = tonumber(width_i) or 5
height = tonumber(height_i) or 5
end
local body = '{| class=\"Yuansuzhouqibiao_nav nogrid\" cellpadding=0 cellspacing=0 style=\"background-color: transparent; text-align: center; empty-cells: show; border:0px none;\"\n'
local input_data = input_val
local map_data = map_val
if type(input_val)==type("a")then
local cut_line = mw.text.split(input_val,'\n')
local final_arr = {}
for ctk = 1,#cut_line do final_arr[#final_arr+1]=mw.text.split(cut_line[ctk],spilter) end
input_data = final_arr
end
if type(map_val)==type("a")then
local map_split = mw.text.split(map_val,spilter)
local jt = 1
map_data = {}
for it = 1,#map_split do
local map_it = mw.text.split(map_split[it],"=")
local map_jt = jt
local map_vi = map_split[it]
if #map_it > 1 then
map_jt = map_it[1]
map_vi = map_it[2]
else
jt = jt + 1
map_jt = jt
end
map_data[map_jt] = map_vi
end
end
if type(input_data) == type({""}) then
local working_data = input_data
if type(input_data[1]or"") ~= type({""}) then working_data = {input_data}end
for k,row in pairs(working_data) do
body = body .. "|- style=\"border:none;padding:0;\"\n"
for ck,item in pairs(row) do
local colordata = (map_data or {})[item] or item
if tonumber(colordata or '',16) then colordata = '#'..colordata end
body = body .. "| style=\"border: 0px none\" | "..p._renderColorTableCell(text,5,5,"transparent","background-color:"..
colordata..";",styleclass,false,link_data) .. '\n'
end
end
end
body = body .. "|}"
return body
end
function p.renderNavElementTable(number, mark, markele, rtype, pmodel)
local has_119 = ((number or -1) >= 119)
tlcss_inserted = false
local body = '{| class=\"nogrid Yuansuzhouqibiao_nav\" cellpadding=0 cellspacing=1 '
.. 'style=\"background-color: transparent; text-align: center; empty-cells: show;padding:0; border: none;border-spacing:1px;border-collapse:separate;margin:0;\"\n'
group_order = {1,2,19,20,21,22,23,24,25,26,27,28,29,30,31,32,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18}
group_inverse = {1,2,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,3,4,5,6,7,8,9,10,11,12,13,14,15,16}
local spans = 0
local group_id = 1
local period_id = 1
local main_loop_max = 118
local demo_no119 = not has_119
if pmodel=='wrong-demo' or pmodel=='wrong-demo-c' then
if has_119 then demo_no119 = false end
has_119 = true
end
if has_119 then spans = 1; main_loop_max = 118 end
if has_119 and (pmodel=='nefedov' or pmodel=='nefedov-p' or pmodel=='wrong-demo' or pmodel=='wrong-demo-c') then
if pmodel=='wrong-demo' then main_loop_max=121
else main_loop_max=120 end
if demo_no119 then main_loop_max = 118 end
end
if number==0 then body = body .. "| style=\"border:none;padding:0;\" | \n| colspan=30 style=\"border:none;padding:0;\" | \n| style=\"border:none;padding:0;\" | "
body = body .. p._navElementCell(
p.utils.element_lib.getElementByZ(0),
mark,markele,number,rtype
) .. '\n|-\n'
end
for index = 1,main_loop_max do
local iterator = p.utils.element_lib.getElementByZ(index)
if iterator then
if index>120 then
iterator.series={'化學性質未知'}
iterator.predictedSeries = nil
end
if period_id ~= iterator.period then
period_id = iterator.period
group_id = 1
body = body .. '|-\n'
end
local iterator_group = iterator.group or 19
local spans_data = group_inverse[iterator_group] - group_id
if has_119 and (pmodel=='nefedov' or pmodel=='nefedov-p' or pmodel=='wrong-demo' or pmodel=='wrong-demo-c') then
if iterator.period < 6 then
if iterator_group==3 then
if pmodel=='wrong-demo' then
iterator_group = 19
spans_data = group_inverse[iterator_group] - group_id
end
elseif iterator_group==4 then
spans_data = spans_data - 1 + spans
end
end
end
local skip_eleid=38
local split_eleg=19
if has_119 and (pmodel=='nefedov' or pmodel=='nefedov-p' or pmodel=='wrong-demo' or pmodel=='wrong-demo-c') then
if pmodel=='wrong-demo' then
skip_eleid=57
split_eleg=20
else
skip_eleid=56
split_eleg=19
end
elseif has_119 and pmodel=='fricke' then
skip_eleid=38
split_eleg=19
end
if spans_data > 0 or iterator_group==split_eleg then
spans_data = spans_data + spans
end
if index == skip_eleid + 1 then spans_data = spans_data - 1 end
if demo_no119 and (pmodel=='wrong-demo' or pmodel=='wrong-demo-c') then
if spans_data >= 1 then
spans_data = spans_data - 1
end
end
body = body .. p.renderNavElementColHeader(spans_data)
if not tlcss_inserted then
tlcss_inserted = true
body = body .. periodicTable_tlcss
end
body = body .. p._navElementCell(iterator,mark,markele,number,rtype) .. '\n'
if index == skip_eleid then
if has_119 then
if not(demo_no119 and (pmodel=='wrong-demo' or pmodel=='wrong-demo-c' or pmodel=='nefedov' or pmodel=='nefedov-p')) then
body = body .. '| style=\"border:none; width:6px; min-width:6px;padding:0;\" |\n'
end
else
body = body .. '| style=\"border:none; width:0;padding:0;\" |\n'
end
end
group_id = group_inverse[iterator_group]+1
end
end
if has_119 then
if (pmodel=='nefedov' or pmodel=='nefedov-p' or pmodel=='wrong-demo' or pmodel=='wrong-demo-c') and (not demo_no119) then
local hy_eleid=(pmodel=='nefedov')and 143 or ((pmodel=='wrong-demo')and 144 or 143)
local hy_span=(pmodel=='nefedov')and 2 or ((pmodel=='wrong-demo')and 3 or 2)
body = body .. '| style=\"border:none; width:0;padding:0;\" |<div style=\"float:left; margin:3px 2px; background:black; width:2px; height:2px;\"></div>\n'
local old_eleid=hy_eleid
body = body .. p._renderNavElementTable_Extended(hy_eleid, 172, '化學性質未知', false, mark, markele, number, rtype, pmodel)
body = body .. '\n|-\n|style=\"border:none; padding:0;\"|<div style=\"width:1px; height:4px;\"></div>\n|-\n| colspan='..(hy_span)..'|\n'
body = body .. '| style=\"border:none; width:0;padding:0;\" |<div style=\"float:left; margin:3px 2px; background:black; width:2px; height:2px;\"></div>\n'
body = body .. p._renderNavElementTable_Extended(main_loop_max+1, hy_eleid-1, '化學性質未知', false, mark, markele, number, rtype, pmodel)
if not no173 or number >= 173 then
body = body .. '| style=\"border:none; width:0;padding:0;\" |\n'
body = body .. '\n|-\n|style=\"border:none; padding:0;\"|<div style=\"width:1px; height:4px;\"></div>\n|-\n| colspan='..(hy_span)..'|\n'
body = body .. '| style=\"border:none; width:0;padding:0;\" |<div style=\"float:left; margin:3px 2px; background:blue; width:2px; height:2px;\"></div>\n'
local extindex = 173
local check_number = number + 1; if check_number < 184 then check_number = 184 end
local is_first = true
local max_index = extindex
local hy_count=(pmodel=='nefedov')and 29 or ((pmodel=='wrong-demo')and 28 or 29)
while extindex <= check_number do
if is_first then is_first = false
else body = body .. '|-\n| colspan='..(hy_span+1)..'|\n' end
max_index = extindex+hy_count
if max_index >= check_number then max_index = check_number end
body = body .. p._renderNavElementTable_Extended(extindex, max_index, '超臨界原子', true, mark, markele, number, rtype, pmodel)
extindex = extindex + hy_count+1
end
local check_side = max_index-173
check_side = math.mod(check_side,hy_count+1)
if (check_side == 0 or check_side >= hy_count) then body = body .. '|-\n| colspan=4|\n' end
body = body .. '\n| colspan=2 style=\"font-size:10px; line-height:5px\"|...\n'
end
if not noTag and (pmodel~='wrong-demo' and pmodel~='wrong-demo-c') then
body = body .. '\n|-\n| colspan=32 style=\"font-size:10px; line-height:10px\"|※註：119號及以後的元素並無公認的排位，上表<br/>之排位是從理論計算的電子排布推論而得的一種\n'
end
elseif pmodel=='fricke' then
--todo
end
end
body = body .. '|}'
if has_119 then
if pmodel=='fricke' and (not demo_no119) then
local working_frame = mw.getCurrentFrame()
to_markele = ((type(markele)==type({"table"})) and markele or mw.text.split(mw.text.trim(markele),','))
body = body ..'\n' .. working_frame:expandTemplate{
title = 'NavPeriodicTable/119+',
args = { input_number = (number or -1),
mark = mark,
markele = table.concat(to_markele,','),
predicted = (rtype=='predicted')and''or'1'
}
} .. '\n'
body = body ..'{| class=\"nogrid Yuansuzhouqibiao_nav\" cellpadding=0 cellspacing=1 '
.. 'style=\"background-color: transparent; text-align: center; empty-cells: show;padding:0; border: none;border-spacing:1px;border-collapse:separate;margin:0;\"\n'
if not no173 or number >= 173 then
local hy_span=2
body = body .. '| style=\"border:none; width:0;padding:0;\" |\n'
body = body .. '\n|-\n|style=\"border:none; padding:0;\"|<div style=\"width:3px; height:4px;\"></div>\n|-\n| colspan='..(hy_span)..'|\n'
body = body .. '| style=\"border:none; width:0;padding:0;\" |<div style=\"float:left; margin:3px 2px; background:blue; width:2px; height:2px;\"></div>\n'
local extindex = 173
local check_number = number + 1; if check_number < 184 then check_number = 184 end
local is_first = true
local max_index = extindex
local hy_count=(pmodel=='nefedov')and 29 or ((pmodel=='wrong-demo')and 28 or 29)
while extindex <= check_number do
if is_first then is_first = false
else body = body .. '|-\n| colspan='..(hy_span+1)..'|\n' end
max_index = extindex+hy_count
if max_index >= check_number then max_index = check_number end
body = body .. p._renderNavElementTable_Extended(extindex, max_index, '超臨界原子', true, mark, markele, number, rtype, pmodel)
extindex = extindex + hy_count+1
end
local check_side = max_index-173
check_side = math.mod(check_side,hy_count+1)
if (check_side == 0 or check_side >= hy_count) then body = body .. '|-\n| colspan=4|\n' end
body = body .. '\n| colspan=2 style=\"font-size:10px; line-height:5px\"|...\n'
end
body = body .. '|}'
end
end
return body
end
-----------------------
--Draw Sub Row
-----------------------
function p._renderTemplateElementTable_Extended(start_id, end_id, ele_series, pred, mark, markele, number, rtype, input_option)
local option = input_option or {}
local body = ''
local old_eleid=start_id
local index = start_id
for index = start_id, end_id do
local iterator = p.utils.element_lib.getElementByZ(index)
if iterator then
local spans_data = index - old_eleid
iterator.series={ele_series}
p_model = (option["$=#model"]or'')
if p_model == 'nefedov-p' then
if index >= 121 and index <= 157 then iterator.series={"超錒系元素"}
elseif index >= 158 and index <= 166 then iterator.series={"過渡金屬"}
elseif index >= 167 and index <= 170 then iterator.series={"貧金屬"}
elseif index == 171 then iterator.series={"鹵素"}
elseif index == 172 then iterator.series={"惰性氣體"}
elseif index >= 173 and index <= 184 then iterator.series={"超臨界原子"} end
end
iterator.predictedSeries = nil
if pred or p_model=='nefedov-p' then iterator.predictedSeries = 1 end
if not iterator.othername then
iterator.othername={iterator.name}
else
table.insert(iterator.othername, iterator.name)
end
iterator.name = tostring( index )
--高度耗費剖析器函數
if index <= 174 then
if not mw.title.new( iterator.page or 'This Element Doesn\'t Exist.', 0).exists then iterator.page = nil end
else
iterator.page = nil
end
body = body ..
p._templatePeriodicTableElementCell(
iterator,spans_data,
mark,markele,number,
rtype,option
) .. '\n'
old_eleid = index + 1
end
end
return body
end
function p._renderNavElementTable_Extended(start_id, end_id, ele_series, pred, mark, markele, number, rtype, pmodel)
local body = ''
local old_eleid=start_id
local index = start_id
for index = start_id, end_id do
iterator = p.utils.element_lib.getElementByZ(index)
if iterator then
local spans_data = index - old_eleid
iterator.series={ele_series}
if pmodel=='nefedov-p' then
if index >= 121 and index <= 157 then iterator.series={"超錒系元素"}
elseif index >= 158 and index <= 166 then iterator.series={"過渡金屬"}
elseif index >= 167 and index <= 170 then iterator.series={"貧金屬"}
elseif index == 171 then iterator.series={"鹵素"}
elseif index == 172 then iterator.series={"惰性氣體"}
elseif index >= 173 and index <= 184 then iterator.series={"超臨界原子"} end
end
iterator.predictedSeries = nil
if pred or pmodel=='nefedov-p' then iterator.predictedSeries = 1 end
if not iterator.othername then
iterator.othername={iterator.name}
else
table.insert(iterator.othername, iterator.name)
end
iterator.name = tostring( index ) .. ' ' .. iterator.name
--高度耗費剖析器函數
--if not mw.title.new( iterator.page or 'This Element Doesn\'t Exist.', 0).exists then iterator.page = nil end
body = body .. p.renderNavElementColHeader(spans_data)
body = body .. p._navElementCell(iterator,mark,markele,number,rtype) .. '\n'
old_eleid = index + 1
end
end
return body
end
-----------------------
--Utils
-----------------------
function p.elementDataPreview(frame)
-- For calling from #invoke.
local pframe = frame:getParent()
local args = {}
for k, v in pairs( pframe.args ) do args[k] = v end
for k, v in pairs( frame.args ) do args[k] = v end
periodicTable_tlcss = frame:callParserFunction{ name = '#tag:templatestyles', args = { '', src='元素週期表/styles.css' } }
local st='' if (args[1] and args[1] ~= '') then st = mw.text.trim(args[1] ) end
local ed='' if (args[2] and args[2] ~= '') then ed = mw.text.trim(args[2] ) end
if (args.start and args.start ~= '') then st = mw.text.trim(args.start ) end
if (args['end'] and args['end'] ~= '') then ed = mw.text.trim(args['end'] ) end
local cols='種類,穩定性,週期,族,分區,性質,核子數,其他名稱,同位素' if (args.cols and args.cols ~= '') then cols = mw.text.trim(args.cols ) end
no_head='no' if (args.no_head and args.no_head ~= '') then no_head = mw.text.trim(args.no_head ) end
no_head=yesno(no_head)
no_start_end='no' if (args.no_start_end and args.no_start_end ~= '') then no_start_end = mw.text.trim(args.no_start_end ) end
no_start_end=yesno(no_start_end)
withZ='no' if (args.withZ and args.withZ ~= '') then withZ = mw.text.trim(args.withZ ) end
withZ=yesno(withZ)
cols = mw.text.split(cols or {},',')
local colarr = {}
for keyi, vali in pairs( cols ) do
colarr[vali] = true
end
return p._elementDataPreview(tonumber(st) or st, tonumber(ed), no_head, withZ, no_start_end, colarr)
end
function p._elementDataPreviewRow(_value, cols)
local value = EC_parser._copytable(_value)
local body = ''
if value then
if tonumber(value.Z or -2) >= 173 then
value.series={'超臨界原子'}
end
if not withZ and cols['序號'] then
body = body .. '|-\n|'
body = body .. '<span style=\"display:none\" class="sortkey\">'
body = body .. string.format( '%016.8f', tonumber(value.tableid or 0) ) .. ' </span> '
body = body .. tostring(value.tableid) .. '\n|'
else
body = body .. '|-\n|'
end
local seriesdata = {}
if value.series then
if value.series[1] then
seriesdata = p.utils.getSeriesData(value.series[1])
if seriesdata and seriesdata.style then body = body .. 'class=\"' .. seriesdata.style ..'\"|' end
end
end
body = body .. ' '
if value.name then
body = body .. value.name
if not periodicTable_tlcss_inserted then
body = body .. (periodicTable_tlcss or '')
periodicTable_tlcss_inserted = true
end
end body = body .. ' || '
if value.page then body = body .. '[[' .. value.page .. ']]' end body = body .. ' || '
if value.Symbol then body = body .. value.Symbol end body = body .. ' || '
if cols['種類'] then
if value.compound == true then body = body .. '[[化合物]]'
elseif value.decay == true then body = body .. '[[衰变方式]]'
elseif value.IsIsotope == true then body = body .. '[[同位素]]'
elseif not (value.NotElement == true) then body = body .. '[[化學元素]]'
end body = body .. ' || '
end
local stabilitydata = value.stability or {stableCount=0}
if cols['穩定性'] then
if stabilitydata then
body = body .. '<span style=\"display:none\" class="sortkey\">'
local sort_key = 0
if stabilitydata.stableCount > 0 then
sort_key = math.log10(tonumber(tostring(((stabilitydata.stableCount + 1.0) / 2.0) + 1.0) .. 'e+32'))
elseif stabilitydata.halflife and stabilitydata.halflife > 0 then
sort_key = math.log10(stabilitydata.halflife)
end
if tonumber(value.Z or -2) >= 119 then
body = body .. string.format( '%016.8f', 1 ) .. ' </span> '
elseif value.NotElement or value.OtherElement or value.correct or value.IsIsotope
or (value.Symbol or 'x')=='X' or tonumber(value.Z or -2) < 0 then
body = body .. ' </span> '
else
body = body .. string.format( '%016.8f', sort_key + 1000 ) .. ' </span> '
end
local stability_desc = ''
if stabilitydata.stableCount > 0 then
stability_desc = tostring(stabilitydata.stableCount) .. '個穩定同位素'
elseif stabilitydata.halflife and stabilitydata.halflife > 0 then
stability_desc = '半衰期約' .. p.utils.getTimeDesc(stabilitydata.halflife)
end
if stabilitydata.magicNumber then stability_desc = stability_desc .. ' （幻數）' end
body = body .. stability_desc
end body = body .. ' || '
end
if tonumber(value.Z or -2) >= 173 then value.period = '周期未定' end
if cols['週期'] then
if value.period then
body = body .. '<span style=\"display:none\" class="sortkey\">'
if value.period == '周期未定' or tonumber(value.period) <= 0 then
body = body .. string.format( '%016.8f', 999 )
else
body = body .. string.format( '%016.8f', tonumber(value.period) )
end
body = body .. ' </span> '
local iterator = p.utils.p_data.period_data[value.period]
if tonumber(value.Z or -2) >= 173 then iterator={name={"週期未定"},page='未發現元素列表#周期未定'} end
local lprefix = ' '; local lpostfix = ''; local lmiddle = ''
if iterator then
if iterator.page then lprefix = ' [['; lpostfix = ']]'; lmiddle = iterator.page .. '|' end
end
body = body .. lprefix .. lmiddle .. tostring(value.period) .. lpostfix
else
body = body .. '<span style=\"display:none\" class="sortkey\">'
body = body .. string.format( '%016.8f', 999 ) .. ' </span> '
end body = body .. ' || '
end
if cols['族'] then
if value.group then
local iterator = p.utils.p_data.group_data[value.group]
body = body .. '<span style=\"display:none\" class="sortkey\">'
if tonumber(value.group) <= 0 then
body = body .. string.format( '%016.8f', 999 )
else
body = body .. string.format( '%016.8f', tonumber(value.group) )
end
body = body .. ' </span> '
if iterator and iterator.name and iterator.name[1] then
if iterator.page then
body = body .. '[[' .. iterator.page .. ']]'
else
body = body .. iterator.name[1]
end
end
else
body = body .. '<span style=\"display:none\" class="sortkey\">'
body = body .. string.format( '%016.8f', 999 ) .. ' </span> '
end body = body .. ' || '
end
if cols['分區'] then
if value.block then
local iterator = p.utils.getSeriesData(value.block .. ' block')
if iterator then
if iterator.page then
body = body .. '[[' .. iterator.page .. ']]'
else
body = body .. (iterator.name or {value.block})[1]
end
end
end body = body .. ' || '
end
if cols['性質'] then
if seriesdata then
if seriesdata.page then
body = body .. '[[' .. seriesdata.page .. ']]'
else
if seriesdata.name then body = body .. seriesdata.name[1] end
end
end body = body .. '\n|'
end
local ele_flag = ( ((value.Z or 0) <= 0) and ((value.N or 0) <= 0) )
if cols['核子數'] then
if ele_flag then body = body .. 'colspan=3|' else body = body .. '|' end
if not ele_flag then
if (value.Z or -1) >= 0 then
body = body .. '<span style=\"display:none\" class="sortkey\">'
body = body .. string.format( '%016.8f', value.Z ) .. ' </span> '
body = body .. tostring(value.Z)
end body = body .. ' || '
if value.N ~= nil then
if (value.N or -1) >= 0 then body = body .. tostring(value.N) end
else
body = body .. '<span style=\"display:none\" class="sortkey\">'
body = body .. string.format( '%016.8f', 999 ) .. ' </span> '
body = body .. '?'
end body = body .. ' || '
if value.N ~= nil then
body = body .. tostring((tonumber(value.Z) or 0) + (tonumber(value.N) or 0))
else
body = body .. '<span style=\"display:none\" class="sortkey\">'
body = body .. string.format( '%016.8f', 999 ) .. ' </span> '
body = body .. '?'
end
else
body = body .. '<span style=\"display:none\" class="sortkey\">'
body = body .. string.format( '%016.8f', 999 ) .. ' </span> '
end body = body .. ' || '
end
if cols['原子量'] then
if value.stdAtomicWeight then
body = body .. table.concat(value.stdAtomicWeight," / ")
end body = body .. ' || '
end
if cols['電子組態'] or cols['電子組態與電子層'] then
if value.EC then
body = body .. EC_parser._eleconftostring(value.EC)
if cols['電子組態與電子層'] then
body = body .. '<br/>' .. EC_parser._eleshelltostring(value.EC,', ')
end
end body = body .. ' || '
end
if cols['密度'] then
if value.density then
body = body .. tostring(value.density)..' g/cm³'
end body = body .. ' || '
end
if cols['熔點'] then
if value.Melting then
body = body .. tostring(value.Melting-273.15)..' [[摄氏温标|℃]]'
end body = body .. ' || '
end
if cols['沸點'] then
if value.Boiling then
body = body .. tostring(value.Boiling-273.15)..' [[摄氏温标|℃]]'
end body = body .. ' || '
end
if cols['原子半徑'] then
if value.atomicRadius then
body = body .. tostring(value.atomicRadius)..' pm'
end body = body .. ' || '
end
if cols['共價半徑'] then
if value.CovalentRadius then
body = body .. tostring(value.CovalentRadius)..' pm'
end body = body .. ' || '
end
if cols['凡得瓦半徑'] then
if value.vdwRadius then
body = body .. tostring(value.vdwRadius)..' pm'
end body = body .. ' || '
end
if cols['電負度'] then
if value.EG then
body = body .. tostring(value.EG)
end body = body .. ' || '
end
if cols['其他名稱'] then
if value.othername then
body = body .. '-{' .. table.concat(value.othername,"、 ") .. '}-'
end body = body .. ' || '
end
if cols['維基數據'] then
if value.wikidata then
local wd_str = tostring(value.wikidata)
body = body .. '[[:d:Q'..wd_str..'|'..wd_str..']]'
end body = body .. ' || '
end
if cols['同位素'] then
if not (value.NotElement == true) then
if value.isotopePage then
body = body .. '[[' .. value.isotopePage .. ']]'
else
body = body .. value.name .. '的同位素'
end
if value.Isotope then
local iso_str = ''
local first_iso = true
for iso_tmp, isotope_iterator in ipairs(value.Isotope) do
if first_iso then first_iso = false else iso_str = iso_str .. "、 " end
if isotope_iterator.name then
if isotope_iterator.page then
iso_str = iso_str .. '[[' .. isotope_iterator.page .. '|' .. isotope_iterator.name .. ']]'
else
iso_str = iso_str .. isotope_iterator.name
end
end
end
if not first_iso then body = body .. '（' .. iso_str .. '）' end
end
end body = body .. ' || '
end
body = body .. ' \n'
end
return body
end
function p._elementDataPreview(start_id, end_id, no_head, withZ, no_start_end, cols)
local body = ''
if not no_start_end then body = body .. '{| class="wikitable sortable" \n' end
local periodicTable_tlcss_inserted = false
if not no_head then
if not withZ and cols['序號'] then
body = body .. '!序號' .. (periodicTable_tlcss or '') .. ' !! 名稱'
else
body = body .. '!名稱' .. (periodicTable_tlcss or '')
end
body = body .. '!! 條目 !! 符號'
col_lists = {
'種類','穩定性','週期','族','分區','性質','核子數','原子量',
'電子組態','電子組態與電子層','密度','熔點','沸點','原子半徑','共價半徑',
'凡得瓦半徑','電負度','其他名稱','維基數據','同位素'
}
for keyi, vali in pairs( col_lists ) do
if cols[vali] then
if vali == '核子數' then
body = body .. ' !! 質子數 !! 中子數 !! 質量數'
else
body = body .. ' !! ' .. vali
end
end
end
body = body .. '!! 備註 \n'
--!! 種類 !! 穩定性 !! 週期 !! 族 !! 分區 !! 性質 !! 質子數 !! 中子數 !! 質量數 !! 其他名稱 !! 同位素\n'
periodicTable_tlcss_inserted = true
end
local start_i = tonumber(start_id) or 1; local end_i = end_id or 0
local ele_list = {}
if type(start_id) == type("string") then
ele_list = mw.text.split(start_id, ',')
for i=1,#ele_list do ele_list[i] = mw.text.trim(ele_list[i])end
else
if start_i > end_i then end_i = 0 end
if start_i <= 0 and not withZ then start_i = 1 end
if end_i <= 0 then end_i = 0 end
if end_i == 0 and withZ then end_i = start_i + 300 end
end
local i = start_i
if withZ then
if #ele_list > 0 then
for j = 1,#ele_list do
local ele_listid = p.utils.element_lib.getListID(ele_list[j])
if ele_listid then
local ele_data = EC_parser._copytable(p.utils.element_data[ele_listid])
if ele_data == nil then ele_data = p.utils.element_lib.getElementByZ(tonumber(ele_list[j]) or tonumber("nan"))end
if ele_data then
body = body .. p._elementDataPreviewRow(ele_data, cols)
end
end
end
else
local i = start_i
for i = start_i,end_i do
local value = p.utils.element_lib.getElementByZ(i)
body = body .. p._elementDataPreviewRow(value, cols)
end
end
else
for key, _value in ipairs(p.utils.element_data) do
local value = EC_parser._copytable(_value)
if tonumber(key or 0) == i then
value.tableid = key
body = body .. p._elementDataPreviewRow(value, cols)
if end_i ~= 0 and end_i <= i-1 then
if no_start_end then return body end
return body .. '|}\n'
end
i = i + 1
end
end
end
if no_start_end then return body end
return body .. '|}'
end
-----------------------
--rendering
-----------------------
function p.renderPeriodicTablePeriodHeader(period)
local body = '|-\n| '
local iterator = p.utils.p_data.period_data[period]
local lprefix = ' '; local lpostfix = ''; local lmiddle = ''
if iterator then
if iterator.page then lprefix = ' [['; lpostfix = ']]'; lmiddle = iterator.page .. '|' end
end
return body .. lprefix .. lmiddle .. tostring(period) .. lpostfix .. '\n'
end
function p.renderArticlePeriodicTablePeriodHeader(period)
local body = '|-align="center" valign="bottom"\n| valign="center" style=\"vertical-align:middle;\" |'
local iterator = p.utils.p_data.period_data[period]
local lprefix = ' '; local lpostfix = ''; local lmiddle = ''
if iterator then
if iterator.page then lprefix = ' [['; lpostfix = ']]'; lmiddle = iterator.page .. '|' end
end
return body .. lprefix .. lmiddle .. tostring(period) .. lpostfix .. '\n'
end
function render_period_head(periodhead,period_it)
local body = ''
if(periodhead)then
local period_args = { period = period_it }
local period_it_data = p.utils.p_data.period_data[period_it]
for propetry, value in pairs(period_it_data) do
if type(value) == type("") then period_args[propetry] = value
elseif type(value) == type(0) then period_args[propetry] = tostring(value) end
end
if templateParameters._getFormatingStringByArgument == nil then templateParameters = require( 'Module:TemplateParameters' ) end
body = body .. templateParameters._getFormatingStringByArgument(periodhead,period_args) .. '\n'
end
return body
end
function render_period_middle(periodmiddle,period_it,spans_data,all_group)
body = ''
if(periodmiddle)then
if period_it == 1 then spans_data = spans_data - 6
elseif period_it > 1 and period_it < 4 then spans_data = spans_data - 10
elseif period_it > 3 and period_it < 6 then spans_data = spans_data - 14
elseif period_it > 5 and period_it < 8 then spans_data = spans_data - 18 end
if spans_data<0 then spans_data = 0 end
local period_args = {
colspanCell = "|colspan=" .. tostring(spans_data) .. "|\n",
colspan = tostring(spans_data),
allCells = all_group
}
if spans_data==0 then period_args.colspanCell = '' end
local period_it_data = p.utils.p_data.period_data[period_it]
for propetry, value in pairs(period_it_data) do
if type(value) == type("") then period_args[propetry] = value
elseif type(value) == type(0) then period_args[propetry] = tostring(value) end
end
if templateParameters._getFormatingStringByArgument == nil then templateParameters = require( 'Module:TemplateParameters' ) end
check_span = templateParameters._findNullArgument( periodmiddle, period_args )
if check_span.colspan == true or check_span.colspanCell == true then
spans_data = 0
end
body = body .. templateParameters._getFormatingStringByArgument(periodmiddle,period_args) .. '\n'
end
return body, spans_data
end
function p.renderPeriodicTableGroupHeader(has_119, pmodel)
local body = '|-\n| \n'
if pmodel=='noLanthanide' then body = "|- align=\"center\" valign=\"bottom\" style=\"margin:auto\"\n|width=\"1.2%\"|'''族→'''\n" end
local group_id = 1
tlcss_inserted = false
for index = 1,18 do
local iterator = p.utils.p_data.group_data[index]
if iterator then
local spans_data = iterator.order_id - group_id
if (pmodel=='nefedov' or pmodel=='nefedov-p' or pmodel=='wrong-demo' or pmodel=='wrong-demo-c') then
if index == 3 then
if pmodel=='wrong-demo' then
spans_data = 0
else
spans_data = spans_data+1
end
elseif index == 4 then
if (pmodel=='wrong-demo' or pmodel=='wrong-demo-c') then
spans_data = p.utils.p_data.group_data[index - 1].order_id - index + 1
end
end
end
if (pmodel=='noLanthanide') then spans_data=0 end
body = body .. p.renderNavElementColHeader(spans_data)
if not tlcss_inserted then
tlcss_inserted = true
body = body .. periodicTable_tlcss
end
local test_index = index ; if index % 10 > 8 or index == 10 then test_index = 8 end
test_index = test_index % 10
local group_text = tostring(index)
if (pmodel=='noLanthanide')then
group_text = tostring(index)
else
if roman.getRomam then
group_text = string.upper(roman.getRomam(test_index) .. iterator.group_type) .. '<br/>' .. tostring(index)
else
group_text = error.error({[1]="羅馬數字模組錯誤：疑似有人誤刪[[模块:Roman]]中的getRomam函數。"})
end
end
body = body .. ' [[' .. iterator.page .. '|' .. group_text .. ']]' .. '\n'
if (pmodel~='noLanthanide') then
if has_119 and (
((pmodel~='nefedov' and pmodel~='wrong-demo' and pmodel~='wrong-demo-c') and index == 2)
or (pmodel=='wrong-demo' and index == 3)
) then body = body .. '|\n' end
end
group_id = iterator.order_id+1
end
end
return body
end
function p.renderArticlePeriodicTableGroupHeader(has_119, pmodel, lanthanideBelow)
local body = '|-\n| \n'
if lanthanideBelow==true then body = "|- align=\"center\" valign=\"bottom\" style=\"margin:auto\"\n|width=\"1.2%\"|'''族→'''\n" end
local group_id = 1
tlcss_inserted = false
for index = 1,18 do
local iterator = p.utils.p_data.group_data[index]
if iterator then
local spans_data = iterator.order_id - group_id
if pmodel=='nefedov' or pmodel=='nefedov-p' then
if index == 3 then
spans_data = 0
elseif index == 4 then
spans_data = p.utils.p_data.group_data[index - 1].order_id - index + 1
end
end
if (pmodel=='fricke') then spans_data=spans_data-1 end
if (lanthanideBelow==true) then spans_data=0 end
if spans_data<0 then spans_data = 0 end
body = body .. p.renderNavElementColHeader(spans_data)
if not tlcss_inserted then
tlcss_inserted = true
body = body .. periodicTable_tlcss
end
local test_index = index ; if index % 10 > 8 or index == 10 then test_index = 8 end
test_index = test_index % 10
local group_text = tostring(index)
if (lanthanideBelow==true)then
group_text = tostring(index)
else
if roman.getRomam then
group_text = string.upper(roman.getRomam(test_index) .. iterator.group_type) .. '<br/>' .. tostring(index)
else
group_text = error.error({[1]="羅馬數字模組錯誤：疑似有人誤刪[[模块:Roman]]中的getRomam函數。"})
end
end
body = body .. ' [[' .. iterator.page .. '|' .. group_text .. ']]' .. '\n'
if (lanthanideBelow~=true) then
if has_119 and ((pmodel~='nefedov' and index == 2) or ((pmodel=='nefedov' or pmodel=='nefedov-p') and index == 3)) then body = body .. '|\n' end
end
group_id = iterator.order_id+1
end
end
return body
end
function p.renderNavElementColHeader(span)
local body = '|'
local span_flag = false
if span then span_flag = (tonumber(span) > 0) end
if span_flag then body = body .. ' colspan=' .. tostring(span) .. ' ' end
body = body .. 'style=\"border:none;padding:0;\" | '
if span_flag then return body .. '\n| style=\"border:none;padding:0;\" | '
else return body
end
end
function p._templatePeriodicTableElementCell(element,span,mark,markele,number,rtype,option)
local predicted = false
local otheratt = ''
if element and element.period == 6 then otheratt = 'width=\"3.125%\"' end
if element.series then
if (element.predictedSeries and element.predictedSeries ~= '') then predicted=true end
local series_text = element.series[1]
if rtype == 'block' then
series_text = (element.block or 'x') .. '區元素'
elseif rtype == 'predicted' then
if predicted then series_text = '未知特性' end
end
local result_series = p.utils.getSeriesData(series_text)
if not result_series then result_series = p.utils.p_data.error_series end
local style_class = result_series.style
if predicted and rtype ~= 'predicted' then style_class = style_class .. '_predicted' end
return p.renderTemplatePeriodicTableElementCell(element, span, style_class, otheratt,
(number==element.Z and (not (nomark or false))) or p.utils.compareSeriesList({result_series}, p.utils.getSeriesDataByString(mark or ''))
or p.utils.checkElementList(element,markele) ,option
)
end
return ''
end
function p._articlePeriodicTableElementCell(element,span,mark,markele,number,rtype,option, lanthanideBelow)
local predicted = false
local otheratt = ''
if element and element.period == 6 and yesno(option.AutoAlign or 'yes') then
otheratt = 'width=\"'
if(lanthanideBelow==true)then otheratt = otheratt .. "5.3"
else otheratt = otheratt .. "3.125" end
otheratt = otheratt .. '%\"'
end
if element.series then
if (element.predictedSeries and element.predictedSeries ~= '') then predicted=true end
local series_text = element.series[1]
if rtype == 'block' then
series_text = (element.block or 'x') .. '區元素'
elseif rtype == 'predicted' then
if predicted then series_text = '未知特性' end
end
local result_series = p.utils.getSeriesData(series_text)
if not result_series then result_series = p.utils.p_data.error_series end
local style_class = result_series.style
if predicted and rtype ~= 'predicted' then style_class = style_class .. '_predicted' end
return p.renderArticlePeriodicTableElementCell(element, span, style_class, otheratt,
(number==element.Z and (not (nomark or false))) or p.utils.compareSeriesList({result_series}, p.utils.getSeriesDataByString(mark or ''))
or p.utils.checkElementList(element,markele) ,option
)
end
return ''
end
function p._isotopePeriodicTableElementCell(element,span,number,rtype,option)
local is_lanthanide_below = (mw.ustring.lower(rtype) == 'lanthanide below')
local otheratt = ''
if element and element.period == 6 then
otheratt = 'width=\"3.125%\"'
if is_lanthanide_below then otheratt = 'width=\"5.54%\"' end
end
return p.renderIsotopePeriodicTableElementCell(element, span,
'Isotope_nav_' .. option.class_type .. p.utils.getHalflifeStyle(element)
, otheratt,option)
end
function p._navElementCell(element,mark,markele,number,rtype)
local predicted = false
if element.series then
if (element.predictedSeries and element.predictedSeries ~= '') then predicted=true end
local series_text = element.series[1]
if rtype == 'block' then
series_text = (element.block or 'x') .. '區元素'
elseif rtype == 'predicted' then
if predicted then series_text = '未知特性' end
end
local result_series = p.utils.getSeriesData(series_text)
if not result_series then result_series = p.utils.p_data.error_series end
local style_class = result_series.style
if predicted and rtype ~= 'predicted' then style_class = style_class .. '_predicted' end
if rtype == 'isotope' or rtype == 'isotope nav' then
style_class = 'Isotope_nav_' .. p.utils.getHalflifeStyle(element)
end
return p.renderNavElementCell(element, style_class,
number==element.Z or p.utils.compareSeriesList({result_series}, p.utils.getSeriesDataByString(mark))
or p.utils.checkElementList(element,markele), rtype
)
end
return ''
end
function p.renderTemplatePeriodicTableElementCell(element,span,styleclass,otheratt,mark,option)
local body = '|'
mark_style='border:2px solid black; margin:-2px;';
local span_flag = false
if span then span_flag = (tonumber(span) > 0) end
if span_flag then body = body .. ' colspan=' .. tostring(span) .. ' ' end
local divatt = ' class=\"' .. styleclass .. '\"'
local divstyle = 'border:none;'
if mark then divstyle = mark_style end
divatt = divatt .. ' ' .. otheratt .. ' style=\"' .. divstyle .. '\"'
if span_flag then body = body .. ' style=\"border:none\" | \n| ' .. divatt .. ' | '
else body = body .. ' ' .. divatt .. ' | ' end
if option and option.index == true then
body = body .. tostring(element.Z or '') .. '<br/>'
end
local display_name=element.Symbol or tostring(element.Z)
if display_name then
if element.Z > 118 then display_name = tostring(element.Z or 0) end
if element.page then
body = body .. '[[' .. element.page .. '|' .. display_name .. ']]'
else
body = body .. display_name
end
end
return body
end
function p.renderArticlePeriodicTableElementCell(element,span,styleclass,otheratt,mark,option)
local body = '|'
mark_style='border:2px solid black; margin:-2px;';
local span_flag = false
if span then span_flag = (tonumber(span) > 0) end
if span_flag then body = body .. ' colspan=' .. tostring(span) .. ' ' end
local divatt = ' class=\"' .. styleclass .. '\"'
local divstyle = 'border:none;'
if mark then divstyle = mark_style end
local element_data_value = p._get_element_data(element,option.show_data) --element[option.show_data]
if type(option.color_map)==type({}) and ((type(option.data_low) == type(0) and type(option.data_high) == type(0))or option.json_flag) then
if option.show_data ~= '' then
local mapping_data = tonumber(element_data_value) or tonumber(
type(element_data_value)==type({})and element_data_value[1]or nil
)
if option.element_data then mapping_data = tonumber(option.element_data[element.Symbol]) end
local display_color = "gray"
local check_nan = tostring(mapping_data)
if check_nan=='nan' or check_nan=='-nan' then mapping_data = nil end
if mapping_data ~= nil then
local scale = option.data_high - option.data_low
local map_level = (mapping_data - option.data_low) / scale
local map_index = math.floor(map_level * (#(option.color_map) - 1) + 0.5) + 1
map_index = math.max(1,math.min(map_index,#option.color_map))
display_color = option.color_map[map_index]
end if option.json_flag then
mapping_data = element_data_value
if option.element_data then mapping_data = option.element_data[element.Symbol] or mapping_data end
if type(mapping_data) == type({}) then
local temp_color
for _,mapping_data_value in pairs(mapping_data) do
if temp_color==nil then
temp_color = option.color_map[mapping_data_value]
end
if temp_color ~= nil then break end
end
display_color = temp_color or display_color
else
display_color = option.color_map[mapping_data] or display_color
end
end
divstyle = divstyle .. ';background-color:' .. display_color .. ';'
--background-color
end
end
divatt = divatt .. ' ' .. otheratt .. ' style=\"' .. divstyle .. '\"'
if span_flag then body = body .. ' style=\"border:none\" | \n| ' .. divatt .. ' | '
else body = body .. ' ' .. divatt .. ' | ' end
local contex = (option or {}).celltext or "<span class=\"{{{PhaseStyleClass}}}\">'''{{{Z}}}'''</span><br />{{{Symbol}}}<br />{{{NameWithLink}}}<br />{{{AtomicWeight}}}"
local eleargs = {}
for propetry, value in pairs(element) do
if type(value) == type("") then eleargs[propetry] = value
elseif type(value) == type(0) then eleargs[propetry] = tostring(value) end
end
if type(element.Z)==type("0") then eleargs.Symbol = '[[' .. element.page .. '|' .. element.Symbol .. ']]' end
if element.page then
eleargs.NameWithLink = '[[' .. element.page .. '|' .. element.name .. ']]'
else
eleargs.NameWithLink = element.name
end
--if yesno(option.textimage) == true then
-- if element.Z == 117 then eleargs.NameWithLink = "[[鿬]]（".. ele117img ..'）'
-- elseif element.Z == 118 then eleargs.NameWithLink = "[[鿫]]（-{zh-hans:" ..
-- ele118imghans .. ";zh-hant:" .. ele118imghant .. "}-"..'）' end
--end
local PhaseStyleClasses = {["gas"] = "Yuansuzhouqibiao_gas", ["solid"] = "", ["liquid"] = "Yuansuzhouqibiao_liquid"}
if not(type(element.Z)==type("0")) then
local ar_std, is_natural = p.utils.element_lib._get_atomic_weight(element)
if option.show_data ~= '' then
local check_show_data = p._get_element_data(p.utils.element_data[3],option.show_data)
if type(check_show_data) == type(0) or type(check_show_data) == type("string") then
ar_std = element_data_value
if option.element_data then ar_std = option.element_data[element.Symbol] or ar_std end
ar_std = tonumber(ar_std) or ar_std
elseif type(check_show_data) == type({}) then
if (type((element_data_value or{})[1]) == type(0) or type((element_data_value or{})[1]) == type("string")) then
ar_std = element_data_value[1]
if option.element_data then ar_std = option.element_data[element.Symbol] or ar_std end
ar_std = tonumber(ar_std) or ar_std
if option.json_flag then
local temp_color, temp_ar_std
for _,mapping_data_value in pairs(element_data_value) do
if temp_color==nil then
temp_color = option.color_map[mapping_data_value]
temp_ar_std = mapping_data_value
end
if temp_color ~= nil then break end
end
ar_std = temp_ar_std or ar_std
if option.element_data then ar_std = option.element_data[element.Symbol] or ar_std end
ar_std = tonumber(ar_std) or ar_std
end
else
ar_std = ""
end
end
end
local phase = p.utils.element_lib._get_phase(element)
local digs = 0
if type(ar_std) == type(0) then
if(ar_std or 0) < 1 then digs = 0 else digs = math.log10(ar_std) end
end
local formater = "%.1f"
if(digs < 1) then formater = "%.3f"
elseif (digs < 2) then formater = "%.2f" end
if is_natural ~= true and option.noappx ~= true then formater = "%d" end
if type(ar_std) ~= type(0) then formater = "%s" end
if option['cell formater'] and option['cell formater']~=nil then formater = option['cell formater']end
if is_natural ~= true and option.noappx ~= true then formater = "["..formater.."]" end
if ar_std then eleargs.AtomicWeight = string.format( formater, ar_std ) else eleargs.AtomicWeight = ' ' end
eleargs.PhaseStyleClass = PhaseStyleClasses[phase]
if element.Melting == nil and Boiling == nil then eleargs.PhaseStyleClass = '\" style=\"color:gray' end
else
if(element.period == 4) then eleargs.AtomicWeight = '+' end
if(element.period == 5) then eleargs.AtomicWeight = '++' end
if(element.period == 6) then eleargs.AtomicWeight = '*' end
if(element.period == 7) then eleargs.AtomicWeight = '**' end
end
if templateParameters._getFormatingStringByArgument == nil then templateParameters = require( 'Module:TemplateParameters' ) end
body = body .. templateParameters._getFormatingStringByArgument(contex,eleargs)
return body
end
function p.renderIsotopePeriodicTableElementCell(element,span,styleclass,otheratt,option)
local body = '|'
local classtype=option.class_type
local stabilitydata = element.stability or {stableCount=0}
local stability_desc = ''
if stabilitydata.stableCount > 0 then
stability_desc = tostring(stabilitydata.stableCount) .. '個穩定同位素'
elseif stabilitydata.halflife and stabilitydata.halflife > 0 then
stability_desc = '半衰期約' .. p.utils.getTimeDesc(stabilitydata.halflife)
end
local magicNumber = ''
if stabilitydata.magicNumber then magicNumber = ' Isotope_nav_' .. classtype .. 'magicnumber' end
local span_flag = false
if span then span_flag = (tonumber(span) > 0) end
if span_flag then body = body .. ' colspan=' .. tostring(span) .. ' ' end
local divatt = ' class=\"isotope-menu-td ' .. styleclass .. magicNumber .. '\"'
divatt = divatt .. ' ' .. otheratt .. ' '
if span_flag then body = body .. ' style=\"border:none\" | \n| '
.. ' title=\"' .. stability_desc .. '\" ' .. divatt .. ' | '
else body = body
.. ' title=\"' .. stability_desc .. '\" ' .. divatt .. ' | '
end
body = body .. "<span" ..
" title=\"" .. stability_desc .. "\" " ..
"style=\"width:82%;height:82%;float:none;\" class=\"vector-menu isotope-menu vector-menu-dropdown isotope-menu-dropdown " .. styleclass .. "\">"
if option and option.index == true then
if element.page then
body = body .. '[[' .. element.page .. '|' .. tostring(element.Z or '') .. ']]<br/>'
else
body = body .. tostring(element.Z or '') .. '<br/>'
end
end
if element.Symbol then
if element.isotopePage then
body = body .. '[[' .. element.isotopePage .. '|' .. element.Symbol .. ']]'
else
body = body .. element.Symbol
end
end
local isotope_str=''
local has_iso=false
if element.Isotope then
for v, isotope in ipairs(element.Isotope) do
if isotope.page then
has_iso = true
isotope_str = isotope_str .. '*' .. '[[' .. isotope.page .. '|' .. isotope.name .. ']]\n'
end
end
if has_iso then
body = body .. '<div class=\"vector-menu-content isotope-menu-content\">'
body = body .. '<ul class=\"menu vector-menu-content-list\" style=\"padding-left: 0px;\">\n' .. isotope_str .. '</ul></div>'
end
end
body = body .. '</span>'
return body
end
function p._renderClassTableCell(text,styleclass,css_data,mark,link_path,row_col_flag)
local body=''
local styles=css_data..';'
local mark_style='border:1px solid black; margin:-1px;';
local test_class_str = mw.ustring.gsub(mw.text.trim(styleclass),'%s+',' ')
local test_class_list = mw.text.split(test_class_str,'%s')
local divatt = ''
if test_class_str ~= '' then
divatt = ' class='
if #test_class_list>1 then divatt=divatt..'"' end
divatt=divatt..test_class_str
if #test_class_list>1 then divatt=divatt..'"' end
end
local divstyle = styles
if mark then divstyle = divstyle .. mark_style end
if mark or mw.text.trim(css_data) ~= '' then divatt = divatt .. ' style=\"' .. divstyle .. '\"'end
local cell_content = '<span' .. divatt .. '>' .. text .. '</span>'
if mw.text.trim(link_path or'') ~= '' then
body = body .. '[[' .. link_path .. '|' .. cell_content .. ']]'
else
body = body .. cell_content
end
if body=='<span></span>' and row_col_flag~=true then return '' end
return body
end
function p._renderColorTableCell(text,width,height,tcolor,css_data,styleclass,mark,link_path)
local body=''
local styles='display:block;width:'.. width ..'px;height:' .. height .. 'px;overflow:hidden;padding:0;color:'..tcolor..';'..css_data..';'
local mark_style='border:1px solid black; margin:-1px;';
local divatt = ' class=\"' .. styleclass .. '\"'
if mw.text.trim(styleclass) == '' then divatt = ' 'end
local divstyle = styles
if mark then divstyle = divstyle .. mark_style end
divatt = divatt .. ' style=\"' .. divstyle .. '\"'
local cell_content = '<span ' .. divatt .. '>' .. text .. '</span>'
if mw.text.trim(link_path or'') ~= '' then
body = body .. '[[' .. link_path .. '|' .. cell_content .. ']]'
else
body = body .. cell_content
end
return body
end
function p.renderNavElementCell(element,styleclass,mark,rtype)
local body=''
local stabilitydata = element.stability or {stableCount=0}
local stability_desc = ''
if rtype == 'isotope' or rtype == 'isotope nav' then
if stabilitydata.stableCount > 0 then
stability_desc = tostring(stabilitydata.stableCount) .. '個穩定同位素'
elseif stabilitydata.halflife and stabilitydata.halflife > 0 then
stability_desc = '半衰期約' .. p.utils.getTimeDesc(stabilitydata.halflife)
end
end
local styles='width:6px;height:8px;'
local mark_style='border:1px solid black; margin:-1px;';
local ele_desc = element.name
if rtype == 'isotope' or rtype == 'isotope nav' then
ele_desc = ele_desc .. '（' .. stability_desc .. '）'
elseif element.series then
ele_desc = ele_desc .. '（'
if element.predictedSeries then ele_desc = ele_desc .. '預測為' end
ele_desc = ele_desc .. element.series[1] .. '）'
end
local divatt = ' class=\"' .. styleclass .. '\"'
local divstyle = styles
if mark then divstyle = divstyle .. mark_style end
divatt = divatt .. ' style=\"' .. divstyle .. '\"'
local link_path = ''
if rtype == 'isotope nav' then
if element.isotopePage then link_path = element.isotopePage end
else
if element.page then link_path = element.page end
end
local cell_content = '<span title=\"' .. ele_desc .. '\" ' .. divatt .. '>' .. ele_desc .. '</span>'
if mw.text.trim(link_path) ~= '' then
body = body .. '[[' .. link_path .. '|' .. cell_content .. ']]'
else
body = body .. cell_content
end
return body
end
return p