Modulo:Discendenza: differenze tra le versioni

Versione delle 13:27, 9 ott 2020

Versione delle 11:42, 11 ott 2020

Riga 2:

local getArgs = require('Module:Arguments').getArgs

local errorCategory = '[[Categoria:Errori di compilazione del template Discendenza]]'

local mwHtml = getmetatable( mw.html.create() ).__index

function mwHtml:attrIf( cond, name, value )

if cond then

return self:attr( name, value )

else

return self

end

end

function mwHtml:cssIf( cond, name, value )

if cond then

return self:css( name, value )

else

return self

end

end

function mwHtml:wikitextIf( cond, value1, value2 )

if cond then

return self:wikitext( value1 )

elseif not (value2 == nil) then

return self:wikitext( value2 )

else

return self

end

end

local p = {}

local pers = {}

local tabella = {}

local txt = {}

local function errhandler(msg)

local cat = mw.title.getCurrentTitle().namespace == 0 and errorCategory or ''

return string.format('<span class="error">%s</span>%s', msg, cat)

end

local function agg(t)

table.insert(txt,t)

end

Line 21 ⟶ 43:

local resto = 0

local nx,px

-- conta elementi

while (dati[n]) do n = n+1 end

n = n-1

-- crea pers dai dati

for m=4,n,4 do

nx = tonumber(dati[m-3])

Line 193 ⟶ 213:

local function mostraX(pid,allinea,largo,dida)

local xy = massimoXY(pid, {0, 0})

local posx = {}

local n1

Line 199 ⟶ 218:

local riga = {}

local xx, xp

local stileDiv = { ['width'] = largo..'px', ['padding'] = '3px', ['background'] = '#FFF', ['border'] = '1px solid #C8CCD1' }

if (allinea == 'destra') then

local stileTabella = { ['border-collapse'] = 'separate', ['text-align'] = 'center', ['font-size'] = '95%', ['line-height'] = '105%', ['margin'] = '0px auto', }

agg(string.format('<div class="floatright" style="width:%dpx;padding:3px;background:#fff;border:1px solid #c8ccd1">', largo))

local xy = massimoXY(pid, {0, 0})

agg('<table cellpadding="1" cellspacing="0" border=0 style="border-collapse:separate;text-align:center;font-size:95%;line-height:105%;margin:0px auto">')

else

agg('<table cellpadding="1" cellspacing="0" border=0 style="border-collapse:separate;text-align:center;font-size:95%;line-height:105%;margin:10px auto">')

end

local lg = math.floor(100/(xy[1]+2))

if (lg == 0) then lg = 1 end

local bDiv = mw.html.create('div')

if (allinea == 'destra') then

bDiv:css(stileDiv):addClass('floatright')

stileTabella['margin'] = '10px auto'

end

local bTabella = mw.html.create('table')

:css(stileTabella)

:attr({['cellpadding']='1',['cellspacing']='0',['border']='0'})

for n=1,xy[2] do

local riga1 = mw.html.create('tr')

riga[1] = {}; riga[2] = {}; riga[3] = {}

local riga2 = mw.html.create('tr')

local riga3 = mw.html.create('tr')

posx[1] = 0; posx[2] = 0; posx[3] = 0

n1 = 0

table.insertif (riga[1],string.format('<tr%s>',n>1) andthen riga1:css(' style="line-height:8px"' or ,'8px')) end

if (n<xy[2]) then riga3:css('line-height','8px') end

table.insert(riga[2],'<tr>')

table.insert(riga[3],string.format('<tr%s>',n<xy[2] and ' style="line-height:8px"' or ''))

for _, v in pairs(tabella[n]) do

xx = pers[v].x

xp = pers[v].padre

if (n==1) then

for m=1,(xy[1]+2) do table.insert(riga[1],string.format('<td width=%d%%></td>',lg)) end

local bCol1 = mw.html.create('td'):css('width',lg..'%')

riga1:node(bCol1)

end

else

local bCol1 = mw.html.create('td')

stx = string.format('<td style="border-right:1px solid #000%s%s">&nbsp;</td>',

n1==xp and :css(';border-top:right','1px solid #000' or '',)

:cssIf(n1 == xp,'border-top','1px solid #000')

xx-posx[1]>0 and '" colspan="'..(xx+1-posx[1]) or ''

:attrIf(xx-posx[1]>0,'colspan',xx+1-posx[1])

)

:wikitext('&nbsp;')

n1 = xp

posx[1] = xx + 1

table.insertriga1:node(riga[1],stxbCol1)

end

if (xx-posx[2]>0) then

local bCol2 = mw.html.create('td')

table.insert(riga[2],string.format('<td%s>&nbsp;</td>',

:attrIf(xx-posx[2]>1 and ,' colspan="'..(,xx-posx[2])..'"' or ''))

:wikitext('&nbsp;')

end

riga2:node(bCol2)

table.insert(riga[2],'<td colspan=2>'..pers[v].testo)

if not (pers[v].nota == '-') then

table.insert(riga[2],string.format('<br/><span style="font-size:90%%"><i>%s</i></span>',pers[v].nota))

end

tablelocal bCol2 = mw.inserthtml.create(riga[2],'</td>')

:attr('colspan','2')

:wikitextIf(pers[v].nota=='-', pers[v].testo, string.format('%s<br/><span style="font-size:90%%"><i>%s</i></span>',pers[v].testo,pers[v].nota))

riga2:node(bCol2)

posx[2] = xx + 2

if (n<xy[2]) then

if (#pers[v].figli > 0) then

local bCol3 = mw.html.create('td')

table.insert(riga[3],string.format('<td style="border-right: 1px solid #000%s">&nbsp;</td>',

:css('border-right','1px solid #000')

xx-posx[3]>0 and '" colspan="'..(xx+1-posx[3]) or ''

:attrIf(xx-posx[3]>0,'colspan',xx+1-posx[3])

))

:wikitext('&nbsp;')

posx[3] = xx + 1

riga3:node(bCol3)

end

end

end

bTabella:node(riga1):node(riga2):node(riga3)

table.insert(riga[1],'</tr>')

table.insert(riga[2],'</tr>')

if (n<xy[2]) then table.insert(riga[3],'</tr>') end

agg(table.concat(riga[1]))

agg(table.concat(riga[2]))

agg(table.concat(riga[3]))

end

bDiv:node(bTabella)

agg('</table>')

if (allinea == 'destra' and not (dida=='')) then

local bDida = mw.html.create('p')

if not (dida=='') then

agg(string.format:css({['<p style="font-size:'] = '87%%;', ['font-style:'] = 'normal;', ['border-top:'] = '1px solid #c8ccd1;', ['margin:'] = '8px 2px 3px">%s</p>',dida)})

:wikitext(dida)

end

bDiv:node(bDida)

agg('</div>')

end

return tostring(bDiv)

return table.concat(txt)

end

Line 278 ⟶ 305:

return t

end

local function mostraY(pid)

local bTabella = mw.html.create('table')

:attr({['cellpadding']='0',['cellspacing']='0',['border']='0'})

:css({['border-collapse']='separate',['text-align']='left',['margin']='10px 0 10px 16px'})

local function mostraY2(pid, a)

if (pers[pid].id > 1) then agg('<tr>') end

if (pers[pid].padre > -1) then

local riga1 = mw.html.create('tr')

agg('<td style="width:6px"></td><td style="border-left:1px solid #666;border-bottom:1px solid #666;width:10px;line-height:3px;height:12px">&nbsp;</td>')

local riga2 = mw.html.create('tr')

agg(string.format('<td colspan=%d rowspan=2 style="padding: 0px 3px 2px 1px">%s%s</td></tr>',

local spd = pers[pers[pid].padre].sp

2*a-1,

if (pers[pid].id == 1 and pers[pers[pid].padre].padre > -1) then

pers[pid].testo,

riga1:node(mw.html.create('td')

pers[pid].nota=='' and '' or ' - '..pers[pid].nota

:attr('rowspan',2*spd))

))

riga1:node(mw.html.create('td')

agg(string.format('<tr><td></td><td style="line-height:8px;line-height:3px;height:12px%s">&nbsp;</td></tr>',

:attr('rowspan',2*spd)

pers[pid].id < #pers[pers[pid].padre].figli and ';border-left:1px solid #666' or ''

:cssIf(pers[pers[pid].padre].id < #pers[pers[pers[pid].padre].padre].figli,'border-left','1px solid #666')

))

)

if (pers[pid].sp > 0) then

agg(string.format('<tr><td rowspan=%d></td><td rowspan=%d%s>&nbsp;</td>',

2*pers[pid].sp,

2*pers[pid].sp,

pers[pid].id < #pers[pers[pid].padre].figli and ' style="border-left:1px solid #666"' or ''

))

agg('')

end

riga1:node(mw.html.create('td')

:css('width','6px'))

riga1:node(mw.html.create('td')

:css({['border-left']='1px solid #666',['border-bottom']='1px solid #666',['width']='10px',['line-height']='3px',['height']='12px'}))

:wikitext('&nbsp;')

riga1:node(mw.html.create('td')

:attr({['colspan']=2*a-1, ['rowspan']=2})

:css('padding', '0px 3px 2px 1px')

:wikitextIf(pers[pid].nota=='', pers[pid].testo, pers[pid].testo..' - '..pers[pid].nota))

riga2

:node(mw.html.create('td'))

:node(mw.html.create('td')

:css({['line-height']='8px',['line-height']='3px',['height']='12px'})

:cssIf(pers[pid].id < #pers[pers[pid].padre].figli,'border-left','1px solid #666'))

bTabella:node(riga1):node(riga2)

else

local riga1 = mw.html.create('tr')

agg(string.format('<td colspan=%d style="padding: 0px 0px 2px 2px">%s%s</td></tr><tr>',

riga1:node(mw.html.create('td')

2*a-1,

:attr('colspan',2*a-1)

pers[pid].testo,

:css('padding','0px 0px 2px 2px')

pers[pid].nota=='' and '' or ' - '..pers[pid].nota

:wikitextIf(pers[pid].nota=='',pers[pid].testo,pers[pid].testo..' - '..pers[pid].nota))

))

bTabella:node(riga1)

end

if (pers[pid].sp > 0) then

Line 313 ⟶ 354:

end

local function mostraY(pid)

agg('<table cellpadding="0" cellspacing="0" border=0 style="text-align:left;margin:10px 0 10px 16px"><tr>')

mostraY2(pid,calcolaY(pid,0))

return tostring(bTabella)

agg('</tr></table>')

return table.concat(txt)

end