Модуль:Prototypes/Объект/Торгомат

Для документации этого модуля может быть создана страница Модуль:Prototypes/Объект/Торгомат/doc

local p = {}

-- Загрузка данных
local function loadData(filePath)
	local page = mw.title.new(filePath)
	local content = page:getContent()
	return content and mw.text.jsonDecode(content) or nil
end

-- Поиск данных по ID
local function findDataById(data, id)
	if not data then return nil end
	for _, item in ipairs(data) do
		if item.id == id then
			return item
		end
	end
	return nil
end

-- Получение инвентаря автомата
local function getInventoryOutput(id, mode)
	local vendingMachines = loadData("User:IanComradeBot/prototypes/vending machines.json")
	local inventories = loadData("User:IanComradeBot/prototypes/vending machines/inventories.json")

	-- Поиск автомата по ID
	local vendingMachine = findDataById(vendingMachines, id)
	if not vendingMachine then return "Автомат с таким ID не найден." end

	-- Получение инвентаря автомата
	local inventoryId = vendingMachine.VendingMachine and vendingMachine.VendingMachine.pack
	if not inventoryId then return "Инвентарь не найден." end

	local inventory = findDataById(inventories, inventoryId)
	if not inventory then return "Данные об инвентаре отсутствуют." end

	-- Формирование вывода
	local result = ""

	-- Основной инвентарь
	if mode == "inventory" and inventory.startingInventory then
		for itemId, count in pairs(inventory.startingInventory) do
			result = result .. mw.getCurrentFrame():preprocess("{{LinkСard|SideStyle=1|background-color=#d7d7ff0b|image=" .. itemId .. ".png|name={{#invoke:Entity Lookup|getname|" .. itemId .. "}} [" .. count .. "]}}")
		end
		if result == "" then
			return "Основной инвентарь пуст."
		end

	-- Содержания после провода
	elseif mode == "contraband" then
		if inventory.contrabandInventory then
			for itemId, count in pairs(inventory.contrabandInventory) do
				result = result .. mw.getCurrentFrame():preprocess("{{LinkСard|SideStyle=1|background-color=#d7d7ff0b|image=" .. itemId .. ".png|name={{#invoke:Entity Lookup|getname|" .. itemId .. "}} [" .. count .. "]}}")
			end
		end
		if result == "" then
			return "Не имеет дополнительного ассортимента."
		end

	-- Содержания после EMAG
	elseif mode == "emag" then
		if inventory.emaggedInventory then
			for itemId, count in pairs(inventory.emaggedInventory) do
				result = result .. mw.getCurrentFrame():preprocess("{{LinkСard|SideStyle=1|background-color=#d7d7ff0b|image=" .. itemId .. ".png|name={{#invoke:Entity Lookup|getname|" .. itemId .. "}} [" .. count .. "]}}")
			end
		end
		if result == "" then
			return "Не имеет дополнительного ассортимента."
		end
	end

	return result
end

-- Получение информации о пополнителе автомата
local function getRestockOutput(id)
	local vendingMachines = loadData("User:IanComradeBot/prototypes/vending machines.json")
	local restockData = loadData("User:IanComradeBot/prototypes/vending machines/restock.json")

	-- Поиск автомата по ID
	local vendingMachine = findDataById(vendingMachines, id)
	if not vendingMachine then return "" end

	-- Получение ID пополнителя
	local packId = vendingMachine.VendingMachine and vendingMachine.VendingMachine.pack

	if not packId then
		return "Не имеет пополнителя."
	end

	for _, restock in ipairs(restockData) do
		if restock.canRestock and table.concat(restock.canRestock):find(packId) then
			return mw.getCurrentFrame():preprocess("{{LinkСard|background-color=#d7d7ff0b|image=" .. restock.id .. ".png|name={{#invoke:Entity Lookup|getname|" .. restock.id .. "}}|link=Торговые автоматы#{{#invoke:Entity Lookup|getname|" .. restock.id .. "}}}}")
		end
	end

	return ""
end

-- Получение данных о доступах
local function getAccessOutput(id)
	local vendingMachines = loadData("User:IanComradeBot/prototypes/vending machines.json")

	-- Поиск автомата по ID
	local vendingMachine = findDataById(vendingMachines, id)

	-- Получение доступа из данных автомата
	local access = vendingMachine.AccessReader and vendingMachine.AccessReader.access

	if not access then
		return "Доступ не требуется."
	end

	-- Формируем строку для вызова шаблона
	local templateCall = "{{#invoke:Prototypes/Механика/Доступ|parse|" .. access .. "}}"

	-- Обрабатываем шаблон и возвращаем результат
	return mw.getCurrentFrame():preprocess(templateCall)
end

-- Основная функция модуля
function p.main(frame)
	local mode = frame.args[1]
	local id = frame.args[2]

	if not id then return "" end

	-- Определение действия на основе ID и выбранного режима
	if mode == "inventory" or mode == "contraband" or mode == "emag" then
		return getInventoryOutput(id, mode)
	elseif mode == "restock" then
		return getRestockOutput(id)
	elseif mode == "access" then
		return getAccessOutput(id)
	else
		return ""
	end
end

return p