打开/关闭搜索
打开/关闭菜单
60
73
29
1.1K
武外梗百科
打开/关闭外观设置菜单
打开/关闭个人菜单
未登录
未登录用户的IP地址会在进行任意编辑后公开展示。

Module:PageSummary：修订间差异

武外梗百科 爱国好学自强图新的百科全书
更多操作
←上一编辑
无编辑摘要
无编辑摘要
 
（未显示8个用户的11个中间版本）
第1行： 第1行：
local p = {}
local p = {}


local function stripImages(text)
-- 強化版清理：徹底根除內文圖片，保留加粗和連結
     if not text or text == "" then return "" end
local function cleanContent(text)
     text = string.gsub(text, "%[%[(文件|Image|图像):", "[[File:")
     if not text then return "" end
     text = string.gsub(text, "%[%[(分类|Category):", "[[Category:")
 
     local out = {}
    -- 1. 基礎清理（注釋、腳注、表格、模板）
     local i = 1
     text = mw.ustring.gsub(text, "<!%-%-.-%-%->", "")
     local len = #text
    text = mw.ustring.gsub(text, "<ref[^>]*>.-</ref>", "")
     while i <= len do
     text = mw.ustring.gsub(text, "<ref[^>]-/>", "")
         if text:byte(i) == 91 and text:byte(i+1) == 91 then
   
            local chunk = text:sub(i, i+15)
    -- 移除表格 {| ... |}
            if chunk:find("^%[%[File:") or chunk:find("^%[%[Category:") then
     local prev
                local depth = 1
    repeat
                local j = i + 2
        prev = text
                while j <= len and depth > 0 do
        text = mw.ustring.gsub(text, "{|[^{}]*|}", "")
                    if text:byte(j) == 91 and text:byte(j+1) == 91 then
     until text == prev
                        depth = depth + 1
 
                        j = j + 2
    -- 移除模板 {{ ... }}
                    elseif text:byte(j) == 93 and text:byte(j+1) == 93 then
     local count = 0
                        depth = depth - 1
     repeat
                        j = j + 2
        prev = text
                    else
         text = mw.ustring.gsub(text, "{{[^{}]-}}", "")
                        j = j + 1
        count = count + 1
                    end
    until text == prev or count > 10
                end
 
                i = j
    -- 2. 使用安全占位符保護連結，剔除圖片
            else
    repeat
                table.insert(out, text:sub(i, i+1))
        prev = text
                 i = i + 2
        text = mw.ustring.gsub(text, "%[%[%s*([^%[%]]-)%s*%]%]", function(inner)
            local low = mw.ustring.lower(inner)
            if low:match("^file:") or low:match("^image:") or
              low:match("^文件:") or low:match("^圖像:") or
              low:match("^category:") or low:match("^分類:") then
                 return ""
             end
             end
         else
            return "LINKSTART" .. inner .. "LINKEND"
            table.insert(out, text:sub(i, i))
         end)
            i = i + 1
    until text == prev
        end
 
        if i > 1200 then break end
    -- 3. 清理剩餘雜質
     end
    text = mw.ustring.gsub(text, "\n==+.-==+", " ")
     return table.concat(out)
    text = mw.ustring.gsub(text, "\n%s*[*#:]+", " ")
end
    text = mw.ustring.gsub(text, "\n+", " ")
    text = mw.ustring.gsub(text, "%s+", " ")
 
    -- 4. 初步恢復連結標籤
     text = mw.ustring.gsub(text, "LINKSTART", "[[")
     text = mw.ustring.gsub(text, "LINKEND", "]]")


local function cleanFinal(text)
    if not text or text == "" then return "" end
    text = string.gsub(text, "{{[^{}]*}}", "")
    text = string.gsub(text, "<ref.-</?ref[^>]*>", "")
    text = string.gsub(text, "<!%-%-.-%-%->", "")
    text = string.gsub(text, "\n==+[^=]+==+", " ")
    text = string.gsub(text, "\n%s*[*#:;]+", " ")
    text = string.gsub(text, "%s*\n%s*", " ")
    text = string.gsub(text, "%s+", " ")
     return mw.text.trim(text)
     return mw.text.trim(text)
end
end


function p.getSummaryAndImage(frame)
function p.getSummaryAndImage(frame)
     local pageName = mw.text.trim(frame.args[1] or "")
     local pageName = frame.args[1] or ""
    if pageName == "" then return "" end
 
     local title = mw.title.new(pageName)
     local title = mw.title.new(pageName)
     if not title or not title.exists then return "" end
     if not title or not title.exists then return "" end


     local content = title:getContent()
    -- 【調整】讀取前 1000 字以確保跨過開頭的表格/模板區
     if not content or content == "" then return "" end
     local rawContent = title:getContent() or ""
     local limitedContent = mw.ustring.sub(rawContent, 1, 1000)


     content = string.gsub(content, "[\0-\31\127]", "")
     -- 1. 提取第一張縮圖名
    local rawExcerpt = mw.ustring.sub(content, 1, 800) or ""
    local firstImage = mw.ustring.match(limitedContent, "%[%[%s*[Ff]ile%s*:([^|%]%s\n]+)") or
                      mw.ustring.match(limitedContent, "%[%[%s*文件%s*:([^|%]%s\n]+)") or
                      mw.ustring.match(limitedContent, "%[%[%s*[Ii]mage%s*:([^|%]%s\n]+)")


     -- 提取第一张图片
     -- 2. 執行清理（此時會得到過濾掉干擾後的純文字）
     local firstImage = nil
     local cleanText = cleanContent(limitedContent)
     local prefixes = {"File:", "文件:"}
   
     for _, prefix in ipairs(prefixes) do
    -- 3. 【調整】最終截取約 80 字
         local start = mw.ustring.find(rawExcerpt, "%[%[" .. prefix)
     local targetLen = 80
         if start then
    local summary = ""
            local pipe = mw.ustring.find(rawExcerpt, "|", start)
      
            local close = mw.ustring.find(rawExcerpt, "%]%]", start)
    if mw.ustring.len(cleanText) <= targetLen then
             local boundary = pipe or close
         summary = cleanText
            if boundary then
    else
                local candidate = mw.ustring.sub(rawExcerpt, start + #prefix + 1, boundary - 1)
        -- 截取前 80 字並加上省略號
                candidate = mw.text.trim(candidate)
        summary = mw.ustring.sub(cleanText, 1, targetLen) .. "..."
                if candidate ~= "" and mw.ustring.find(candidate, "%.") then
       
                    firstImage = prefix .. candidate
         -- 閉合加粗標籤 '''
                    break
        local _, opens = mw.ustring.gsub(summary, "'''", "")
                end
        if opens % 2 ~= 0 then summary = summary .. "'''" end
            end
       
        -- 閉合或清理截斷的連結 [[...
        if mw.ustring.match(summary, "%[%[[^%]]*$") then
             summary = mw.ustring.gsub(summary, "%[%[[^%]]*$", "") .. "..."
         end
         end
     end
     end


    local step1    = stripImages(rawExcerpt) or ""
     -- 4. 渲染 HTML
    local cleanText = cleanFinal(step1) or ""
     local res = mw.html.create('div'):css({
 
        ['display'] = 'flow-root',  
     -- 摘要截断（极简安全版，无任何字符类）
        ['line-height'] = '1.5',
    local targetLen = 120
         ['margin-bottom'] = '1em' -- 也可以通过这里控制整个组件下方的间距
    local summary = cleanText
    })
 
   
    local ulen = mw.ustring.len(summary) or 0
     -- 标题
    if ulen > targetLen then
    res:tag('div')
        summary = mw.ustring.sub(summary, 1, targetLen)
      :css({['font-size'] = '1.15em', ['font-weight'] = 'bold', ['margin-bottom'] = '4px'})
        summary = mw.text.trim(summary) .. "…"
      :wikitext('[[' .. pageName .. ']]')
    else
        summary = mw.text.trim(summary)
    end
 
     local container = mw.html.create('div')
        :css('margin-bottom', '25px')
         :css('display', 'flow-root')
 
     container:tag('div')
        :css('font-size', '1.3em')
        :css('font-weight', 'bold')
        :css('margin-bottom', '6px')
        :css('border-bottom', '1px solid #eee')
        :wikitext('[[' .. pageName .. ']]')
 
    local textDiv = container:tag('div')
        :css('line-height', '1.6')
        :css('color', '#222')
        :css('font-size', '14px')


     if firstImage and firstImage ~= "" then
    -- 右侧缩略图
         textDiv:wikitext('[[' .. firstImage .. '|120px|right|link=' .. pageName .. ']]')
     if firstImage then
         res:wikitext('[[File:' .. firstImage .. '|100px|right|link=' .. pageName .. ']]')
     end
     end


     textDiv:wikitext(summary)
     -- 摘要正文：在末尾增加空行
    -- 方法：在 summary 字符串后直接加上 <br /> 或 \n\n
    res:tag('div')
      :wikitext(summary .. '<br /><br />')  


     return tostring(container)
     return tostring(res)
end
end


return p
return p
检索自“https://wflswiki.zelda-110.link/wiki/Module:PageSummary”