Space Station 14 Вики

Модуль:Loc/Marking: различия между версиями

Интерактивная навигация по истории
← Предыдущая правка
Нет описания правки
Нет описания правки
 
(не показаны 43 промежуточные версии этого же участника)
Строка 53: Строка 53:
     if attr_str == "" then return nil end
     if attr_str == "" then return nil end
     local params = {}
     local params = {}
    local function unquote_val(v)
        if not v then return v end
        v = trim(v)
        v = mw.ustring.gsub(v, "^"(.-)"$", "%1")
        v = mw.ustring.gsub(v, '^"(.-)"$', "%1")
        return v
    end
     for k, v in mw.ustring.gmatch(attr_str, "([%w_%-%:]+)%s*=%s*\"(.-)\"") do
     for k, v in mw.ustring.gmatch(attr_str, "([%w_%-%:]+)%s*=%s*\"(.-)\"") do
         params[mw.ustring.lower(k)] = v
         params[mw.ustring.lower(k)] = unquote_val(v)
     end
     end
     attr_str = mw.ustring.gsub(attr_str, "([%w_%-%:]+)%s*=%s*\"(.-)\"", "")
     attr_str = mw.ustring.gsub(attr_str, "([%w_%-%:]+)%s*=%s*\"(.-)\"", "")
     for k, v in mw.ustring.gmatch(attr_str, "([%w_%-%:]+)%s*=%s*([^%s%]]+)") do
     for k, v in mw.ustring.gmatch(attr_str, "([%w_%-%:]+)%s*=%s*([^%s%]]+)") do
         params[mw.ustring.lower(k)] = v
         params[mw.ustring.lower(k)] = unquote_val(v)
     end
     end
     attr_str = mw.ustring.gsub(attr_str, "([%w_%-%:]+)%s*=%s*([^%s%]]+)", "")
     attr_str = mw.ustring.gsub(attr_str, "([%w_%-%:]+)%s*=%s*([^%s%]]+)", "")
     local unnamed = mw.ustring.match(attr_str, "%s*\"(.-)\"")
 
     local unnamed = mw.ustring.match(attr_str, "%s*"(.-)"") or mw.ustring.match(attr_str, "%s*\"(.-)\"")
     if unnamed then
     if unnamed then
         params._value = unnamed
         params._value = unquote_val(unnamed)
        attr_str = mw.ustring.gsub(attr_str, "%s*"(.-)"", "", 1)
         attr_str = mw.ustring.gsub(attr_str, "%s*\"(.-)\"", "", 1)
         attr_str = mw.ustring.gsub(attr_str, "%s*\"(.-)\"", "", 1)
     end
     end
     if not params._value then
     if not params._value then
         local v = mw.ustring.match(attr_str, "%s*([^%s%]]+)")
         local v = mw.ustring.match(attr_str, "%s*([^%s%]]+)")
         if v then params._value = v end
         if v then params._value = unquote_val(v) end
     end
     end
     return params
     return params
end
end


local function convert_lists(s)
local function convert_lists(s, indent_size)
    indent_size = indent_size or 2
     if not s or s == "" then return s end
     if not s or s == "" then return s end
     local lines = mw.text.split(s, "\n")
     local lines = mw.text.split(s, "\n")
     local first_non_empty = nil
     local out_lines = {}
     for i, line in ipairs(lines) do
 
         if line and line:match("%S") then
    local stack = {}
            first_non_empty = line
 
            break
     local function make_prefix_from_stack()
        end
         if #stack == 0 then return "" end
        return table.concat(stack, "")
     end
     end
    local enable_numeric = false
 
    if first_non_empty and mw.ustring.match(first_non_empty, "^%s*%d+%.") then
        enable_numeric = true
    end
    local out_lines = {}
     for _, line in ipairs(lines) do
     for _, line in ipairs(lines) do
        local processed = line
        local handled = false
         local line_unescaped = mw.ustring.gsub(line, " ", " ")
         local line_unescaped = mw.ustring.gsub(line, " ", " ")
         if enable_numeric then
         local leading, num, rest_num = mw.ustring.match(line_unescaped, "^(%s*)(%d+)%.%s*(.*)$")
            local leading, num, rest = mw.ustring.match(line_unescaped, "^(%s*)(%d+)%.%s*(.*)$")
        local leading2, rest_dash = mw.ustring.match(line_unescaped, "^(%s*)%-%s+(.*)$")
            if num then
 
                local indent = mw.ustring.len(leading or "")
        if num then
                local level = math.floor(indent / 2)
            local indent = mw.ustring.len(leading or "")
                local hashes = string.rep('#', 1 + level)
            local level = math.floor(indent / indent_size)
                 processed = hashes .. (rest ~= "" and (" " .. rest) or "")
            while #stack > level do table.remove(stack) end
                 table.insert(out_lines, processed)
            if #stack == level then
                handled = true
                 table.insert(stack, "#")
            else
                while #stack < level do table.insert(stack, "#") end
                 table.insert(stack, "#")
             end
             end
        end
            local prefix = make_prefix_from_stack()
        if not handled then
            local text = rest_num or ""
             local leading, rest = mw.ustring.match(line_unescaped, "^(%s*)%-%s+(.*)$")
             table.insert(out_lines, (prefix ~= "" and (prefix .. (text ~= "" and (" " .. text) or "")) or text))
            if rest then
        elseif rest_dash then
                local indent = mw.ustring.len(leading or "")
            local indent = mw.ustring.len(leading2 or "")
                local level = math.floor(indent / 2)
            local level = math.floor(indent / indent_size)
                local stars = string.rep('*', 1 + level)
            while #stack > level do table.remove(stack) end
                 processed = stars .. (rest ~= "" and (" " .. rest) or "")
            if #stack == level then
                 table.insert(out_lines, processed)
                 table.insert(stack, "*")
                handled = true
            else
                while #stack < level do table.insert(stack, "*") end
                 table.insert(stack, "*")
             end
             end
         end
            local prefix = make_prefix_from_stack()
        if not handled then
            local text = rest_dash or ""
             table.insert(out_lines, processed)
            table.insert(out_lines, (prefix ~= "" and (prefix .. (text ~= "" and (" " .. text) or "")) or text))
         else
            stack = {}
             table.insert(out_lines, line)
         end
         end
     end
     end
     return table.concat(out_lines, "\n")
     return table.concat(out_lines, "\n")
end
end
Строка 133: Строка 153:
             if tip == "" and params._value and visible ~= params._value then tip = params._value end
             if tip == "" and params._value and visible ~= params._value then tip = params._value end
         end
         end
        visible = mw.ustring.gsub(visible, "|", "&#124;")
         return "{{altTooltip|1=" .. (visible or "") .. "|2=<span style='white-space:pre-wrap;'>{{#invoke:Loc|GetRawString|noFormat=1|" .. (tip or "") .. "}}</span>}}"
        tip = mw.ustring.gsub(tip, "|", "&#124;")
         return "{{tooltip|" .. (visible or "") .. "||" .. (tip or "") .. "}}"
     end)
     end)
     while true do
     while true do
Строка 166: Строка 184:
     str = str:gsub('#', '&#35;')
     str = str:gsub('#', '&#35;')
             :gsub('=', '&#61;')
             :gsub('=', '&#61;')
 
            :gsub(' ', '&#32;')
            :gsub('{"', '')
            :gsub('"}', '')
             :gsub('{', '&#123;')
             :gsub('{', '&#123;')
             :gsub('"', '&#34;')
             :gsub('"', '&#34;')
Строка 177: Строка 197:
     local args = frame.args or {}
     local args = frame.args or {}
     local text = args[1] or args.text or ""
     local text = args[1] or args.text or ""
    local noFormat = args.noFormat
     text = mw.text.unstripNoWiki(text)
     text = mw.text.unstripNoWiki(text)
     text = process_nowiki_equals(text)
     text = process_nowiki_equals(text)
     return frame:preprocess(transform(text))
 
    local class = noFormat and "ts-loc-format" or ""
    local content = transform(text)
    if mw.ustring.find(content, '^[ \t]*[#%*;%:]+') then
        content = '\n' .. content
    end
 
     return frame:preprocess(
        frame:extensionTag(
            'templatestyles',
            '',
            { src = 'Модуль:Loc/styles.css' }
        ) ..
        '<span class="list-reset-margin ' .. class .. '">' .. content .. '</span>'
    )
end
end


return p
return p
Источник — https://station14.ru/wiki/Модуль:Loc/Marking