Модуль:Песочница/Pok: различия между версиями

Нет описания правки
мНет описания правки
Метка: отменено
(не показаны 344 промежуточные версии этого же участника)
Строка 1: Строка 1:
local p = {}
local p = {}


local cachedData = nil
local function trim(s)
    if not s then return s end
    return (s:gsub('^%s*(.-)%s*$', '%1'))
end
 
local function strip_trailing_digits(s)
    return s:gsub('%d+$', '')
end
 
local function split_first_underscore(k)
    local a, b = k:match('^([^_]+)_(.+)$')
    return a, b
end


local function loadData(filePath)
local function collect_labels_from_args(args)
     if cachedData then
     local meta = {}
         return cachedData
    local seen = {}
    for k, v in pairs(args) do
        if type(k) == 'string' and k:find('_', 1, true) then
            local base, rem = split_first_underscore(k)
            if base and rem then
                local label = strip_trailing_digits(rem)
                label = trim(label)
                if label ~= '' then
                    meta[base] = meta[base] or {}
                    if not seen[base] then seen[base] = {} end
                    if not seen[base][label] then
                        table.insert(meta[base], label)
                        seen[base][label] = true
                    end
                end
            end
         end
     end
     end
    local page = mw.title.new(filePath)
     return meta
    local content = page and page:getContent()
    cachedData = content and mw.text.jsonDecode(content) or nil
     return cachedData
end
end


local function getSpritePath(entry)
local function render_from_args(args)
     if entry.Sprite and entry.Sprite.sprite then
     local field = args[1] or args.field or args["field"]
        return entry.Sprite.sprite
    local label = args[2] or args.label or args["label"]
     elseif entry.Icon and entry.Icon.sprite then
    field = field and trim(field) or ''
        return entry.Icon.sprite
     label = label and trim(label) or ''
     elseif entry.Sprite and entry.Sprite.layers then
 
        for _, layer in ipairs(entry.Sprite.layers) do
    -- map base -> label -> value
             if layer.sprite then
     local map = {}
                 return layer.sprite
    for k, v in pairs(args) do
        if type(k) == 'string' and k:find('_', 1, true) then
            local base, rem = split_first_underscore(k)
             if base and rem then
                 local lab = strip_trailing_digits(rem)
                lab = trim(lab)
                map[base] = map[base] or {}
                local cur = map[base][lab]
                if cur then
                    map[base][lab] = cur .. '\n' .. tostring(v)
                else
                    map[base][lab] = tostring(v)
                end
             end
             end
         end
         end
     end
     end
     return nil
 
     if field ~= '' and label ~= '' then
        local base = map[field]
        if base then return base[label] or '' end
        return ''
    end
 
    if args[1] and args[2] then
        local f = trim(args[1]); local l = trim(args[2])
        local base = map[f]
        if base then return base[l] or '' end
    end
 
    return ''
end
end


function p.main(frame)
function p.main(frame)
     local param = frame.args[1]
     local args = frame.args or {}
     local secondaryParam = frame.args[2]
     local field = args[1]


     local data = loadData('User:IanComradeBot/prototypes/entity sprite.json')
     if field == "meta" then
    if not data or type(data) ~= 'table' then
        local meta = collect_labels_from_args(args)
         return 'Ошибка: Невозможно загрузить данные из JSON.'
         return mw.text.jsonEncode(meta)
     end
     end


     if param == "image" and secondaryParam then
     return render_from_args(args)
        for _, entry in ipairs(data) do
            if entry.id == secondaryParam then
                return getSpritePath(entry) or "Ошибка: Спрайт не найден."
            end
        end
        return "Ошибка: ID не найден."
    end
end
end


return p
return p