Module:Sandbox/Andreyyshore/Vertical header: Difference between revisions

Revision as of 08:28, 29 October 2018

Revision as of 08:49, 29 October 2018

Line 1:

local p = {}

function p.stack(str, vertAlign, noBold)

local t = {}

local breakPattern = "<[bB][rR] */? *>"

local function splitLines(line)

table.insert(t, line)

return ""

end

splitLines((str:gsub("(.-)(" .. breakPattern .. ")", splitLines)))

for k, v in pairs(t) do

t[k] = (v

:gsub("([^'%[%]])", "%1<br>")

:gsub("'([^'])", "'<br>%1")

:gsub("(''+)<br>", "%1")

:gsub("(%[%[+)<br>", "%1")

:gsub("<br>(%]+)", "%1<br>")

:gsub("%[%[([^%[%]]+)%]%]", function(n)

local inBrackets = n

local stripped = ""

if inBrackets:find("%|") == nil then

inBrackets = inBrackets:gsub("<br>", "") .. "|" .. inBrackets

else

stripped = inBrackets:match("^[^%|]+%|"):gsub("<br>", "")

inBrackets = stripped .. inBrackets:gsub("^[^%|]+%|<br>", "")

end

return "[[" .. inBrackets .. "]]"

end)

:gsub("<br>$", "")

)

end

if #t == 1 then return t[1] end

local dom1 = mw.html.create("tr")

if noBold ~= "" then dom1:css("font-weight", "normal") end

local dom2

for _, v in pairs(t) do

dom1:wikitext(

tostring(

mw.html.create("td")

:css({

["border"] = "none",

["padding"] = 0,

["vertical-align"] = vertAlign

})

:wikitext(v)

)

)

end

dom2 = mw.html.create("table")

:wikitext(tostring(dom1))

:css({

["margin"] = "auto",

["border-collapse"] = "collapse",

["vertical-align"] = "inherit"

})

:attr({cellspacing = 0, cellpadding = 0})

return tostring(dom2)

end

function p.cell(frame)

Line 8 ⟶ 65:

local noBold = frame.args.noBold

local style = frame.args.style

local cellStyle = frame.args.cellstyle:gsub("\"", "&quot;")

local wikiText = "class = \"nowrap"

local normalAlign = ""

-- local stupidIEAlign = ""

local stack = frame.args.stack

local breakPattern = "<[bB][rR] */? *>"

local rows = 1

local width = 0

Line 17 ⟶ 75:

width = maxWidth

else

for eachMatch in text:gmatch("<[bB][rR] */? *>"breakPattern) do

rows = rows + 1

end

Line 26 ⟶ 84:

wikiText = wikiText .. " unsortable"

end

wikiText = wikiText .. "\" style=\"line-height:99%;vertical-align:" ..
vertAlign .. ";padding:"

if sortPadding == "" then

wikiText = wikiText .. ".4em"

Line 33 ⟶ 92:

end

wikiText = wikiText .. " .4em .2em;background-position:50% .4em !important;"

if vertAlignstack == "top" then

wikiText = wikiText .. "min-width:" .. width .. ";max-width:" .. width .. ";width:" .. width .. ";overflow:hidden;" .. cellStyle .. "\""

wikiText = wikiText .. " | <div style=\"min-width:" .. frame:preprocess("{{writing-mode|v1}}{{Transform-rotate|180}}")width .. ";max-ms-transformwidth:" none.. \width ;padding-left:1px;text-align:"..

";width:" .. width .. ";overflow:hidden\""

if vertAlign == "top" then

normalAlign = "right"

-- stupidIEAlign = "left"

elseif vertAlign == "middle" then

normalAlign = "center"

-- stupidIEAlign = "center"

else

normalAlign = "left"

-- stupidIEAlign = "right"

end

wikiText = wikiText .. normalAlign .. ";" --| text-align:" .. stupidIEAlign ..<div style=\" \ ;"

if stack == "" then

wikiText = wikiText .. frame:preprocess("{{writing-mode|v1}}{{Transform-rotate|180}}") ..

"-ms-transform: none \ ;padding-left:1px;"

if vertAlign == "top" then

normalAlign = "right"

-- stupidIEAlign = "left"

elseif vertAlign == "middle" then

normalAlign = "center"

-- stupidIEAlign = "center"

else

normalAlign = "left"

-- stupidIEAlign = "right"

end

else normalAlign = "center"

end

wikiText = wikiText .. "text-align:" .. normalAlign .. ";" -- text-align:" .. stupidIEAlign .. " \ ;"

wikiText = wikiText .. style .. "\">"

local textToAdd = text

if stack ~= "" then

textToAdd = p.stack(text, vertAlign, noBold)

end

if noBold == "" then

wikiText = wikiText .. texttextToAdd

else

wikiText = wikiText .. frame:preprocess("{{nobold|1=" .. texttextToAdd .. "}}")

end

wikiText = wikiText .. "</div>"