“模块:Radio-list”的版本间差异

添加2,043字节 、​ 2024年1月10日 (星期三)
解决colspan和rowspan撞到一起的时候缩进错误的bug:What a Wonderful Radio!!#节目表第92行
Zth讨论 | 贡献
(解决colspan和rowspan撞到一起的时候缩进错误的bug:What a Wonderful Radio!!#节目表第92行)
 
(未显示2个用户的26个中间版本)
local p = {}
 
function date(stringstr)
local skip = 1
if stringstr:sub(1, 1) == 's' then
skip = 0
stringstr = mw.ustring.gsub(stringstr, "^%D+", "")
end
return {skip, mw.ustring.gsub(stringstr, "([年月])0?(%d+)", "%1<span class=\"countdown-num\">%2</span>")}
end
 
function cell(stringstr)
local property, value = mw.ustring.match(str, "([^|]*)|(.*)")
return {property, value or str}
end
 
function rowspanrspan(stringstr)
return mw.ustring.match("rowspan= style=\"a:b\"{{!}}c"str, "rowspan%s*=%s*[\"\']?(%d+)") or 1
end
 
function cspan(str)
return mw.ustring.match(str, "colspan%s*=%s*[\"\']?(%d+)") or 1
end
 
function ktype(str)
local key = str:sub(1, 2)
if key == "cv" or key == "CV" then
return "read"
elseif key == "BV" or key == "bv" or key == "AV" or key == "av" then
return "video"
end
end
 
local args = getArgs(frame, {removeBlanks = false})
local result = "{|class=\"wikitable radio-list"..(args.comment and " radio-with-comment" or "").."\"\n!#!!配信日期"
local cvcols = args.cvcols and mw.text.split(args.cvcols, "、") or {}
local ncols = 2 + (args.comment and 1 or 0)
local ncvcols = 2
local cvcols = args.cvcols and mw.text.split(args.cvcols, "、") or {}
for k,v in ipairs(cvcols) do
ncols = ncols + 1
result = result.."!!视频资料"..(args.comment and "!!備註" or "")
local id = args.start or 1
local rowspan = {}
local colspan = 0
local urlcol = tonumber(args.urlcol)
for k,v in ipairs(args) do
local i = k % ncols
if i == 1 then
local date = date(v)
result = result.."\n|-\n|"..(date[1] == 1 and id or "<div style=\"text-align:center\">|</div>").."|\n|"..date[2]
id = id + date[1]
elseif (i > 1 andcolspan i= < ncvcols) then0
else
result = result.."||"..(v == "" and "class=\"table-none\"| " or frame:expandTemplate{title = "memberlink/cv", args = mw.text.split(v, "、")})
elseif rowspan[i] == ncvcolsrowspan[i] or then0
localif videorowspan[i] => string.match(v,0 "[%l%u%d]+")then
rowspan[i] = rowspan[i] - 1
result = result.."||"..(video and "[https://www.bilibili.com/video/"..video.." "..v.."]" or "–")
elseif i == if colspan > 0 then
result colspan = result.."||"..vcolspan - 1
end
elseif colspan > 0 then
colspan = colspan - 1
else
local td = cell(v)
if td[1] then
rowspan[i] = rspan(td[1]) - 1
colspan = cspan(td[1]) - 1
end
if i == (ncvcols % ncols) then
result = result.."\n|"..(td[1] or "")
if td[2] then
result = result.." |"
for index,value in ipairs(mw.text.split(td[2], ";")) do
local video = string.match(value, "^[%l%u%d]+")
local link = string.match(value, "^[%l%u%d%p]+")
local label = mw.ustring.match(value, "【(.+)】")
result = result..(video and
result = result.. "||<div class=\"..(video and -link\">[https://www.bilibili.com/video/"..videolink.." "..vvideo.."]"..(label or "").."</div>"
or "")
end
else
result = result.." style=\"text-align:center\"|–"
end
elseif i == 0 then
result = result.."\n|"..(td[1] and td[1].."|" or "")..td[2]
elseif i == urlcol then
result = result.."\n|"..(td[1] or "")..
(td[2] == "" and " |" or " |<div class=\"video-link\">[https://www.bilibili.com/"..ktype(td[2]).."/"..td[2].." "..td[2].."]</div>")
else
result = result.."\n|"..(td[1] or "")..
(td[2] == "" and " class=\"table-none\"| " or
result = result.."||"..(v == "" and ("class=\"table-none\" | " or ..frame:expandTemplate{title = "memberlink/cv", args = mw.text.split(vtd[2], "、")}))
end
end
end
end
14,865

个编辑