[IGS] Покупка определенного предмета через команду / хук

Murda · 03.Сентябрь.2022 14:09:51

Привет, хотелось бы узнать, как сделать так, чтобы при нажатии кнопки в том же F4 (например, админка), вылазило меню с подтверждением покупки этой самой админки?
Т.е чтобы человек не искал в донат-меню этот предмет, а мог по нажатию кнопки сразу купить этот предмет.

GMD · 03.Сентябрь.2022 15:56:30

Ооо, достойные вопросы подкатили

Вот, что тебе может пригодиться:

-- CLIENT'ские функции

-- Отправка запроса на покупку предмета
-- sItemUID это UID предмета (С sh_additems.lua)
-- callback это функция, которая выполнится после завершения процесса покупки
--    в callback первым параметром передается строка-ошибка или nil, если покупка успешна
--    вторым параметром передается ID предмета в инвентаре (если инвентарь используется на сервере)
IGS.Purchase(sItemUID, callback)

-- Активирует предмет с инвентаря
-- После первой функции можно сразу выполнить и эту,
-- чтобы игроку не пришлось даже в инвентарь заходить
-- iInvID это ИД предмета в инвентаре. Передается в callback в первой функции
-- в callback идет (bool ok, int iPurchID, string? sMsg_)
IGS.Activate(iInvID, callback)

Пример в коде (написал, но не тестировал)

-- Консольная команда, которая откроет модалку покупки предмета
concommand.Add("foobar", function(pl, _, args)
	local item_uid = args[1]
	if not item_uid then pl:ChatPrint("Не указан UID") return end

	local ITEM = IGS.GetItemByUID(item_uid)

	local price_int = ITEM:GetPrice(pl)
	local price_str = PL_MONEY(price_int)

	Derma_Query(
    "Хочешь купить " .. ITEM:Name() .. " за " .. price_str .. "?",
    "Подтверждение:",
    "Да", function() IGS.Purchase(item_uid, function(_err, _inv_id)
		if _err then
			pl:ChatPrint("Ошибка покупки: " .. _err)
		elseif _inv_id then
			pl:ChatPrint("Купили. Активируем! Если не активируется, то напиши /donate и активируй с инвентаря")
			IGS.Activate(_inv_id, function() pl:ChatPrint("Все, активировали") end)
		else
			pl:ChatPrint("Куплено и активировано!") -- инвентарь отключен в настройках. Ошибки нет, но и inv_id отсутствует
		end
	end) end,
	"Не", function() pl:ChatPrint("В мире загрустел один котик :(") end
	)
end)

-- Пример использования в коде
RunConsoleCommand("foobar", "admin_30d")

Вот тут можно посмотреть, как это обрабатывается сервером:

github.com

GM-DONATE/IGS/blob/1b0adee747b6890765f9fedad3b2d1ded61b237f/addons/igs-core/lua/igs/network/net_sv.lua#L56-L124


      
          --[[-------------------------------------------------------------------------
          	ПОКУПКА
          ---------------------------------------------------------------------------]]
          local function IGS_Purchase(pl, uid, cb)
          	local ITEM = IGS.GetItemByUID(uid)
          
          
	local price = ITEM:GetPrice(pl)
          
          
	local err =
          		ITEM:IsHidden() and "Как вы меня нашли?"
          		or not IGS.CanAfford(pl, price) and ("Для покупки нужно " .. PL_MONEY(price))
          		or IGS.IsInventoryOverloaded(pl) and "У вас перегруз в донат инвентаре. А еще вы один из немногих, кто видел это!"
          		or pl.igs_unfinished_purchase and "Запрос на покупку в процессе. Подождите, пожалуйста" -- в цикле с клиента вызов функции покупки
          
          
	-- инвентарь офнут, значит итем сразу должен иметь возможность активироваться
          	if not IGS.C.Inv_Enabled then
          		local can,e = ITEM:CanActivate(pl)
          		if not can then
          			err = e or "Ошибка 1"
          		end

This file has been truncated. show original

Murda · 03.Сентябрь.2022 16:36:55

Можно пути установки?

UPD
Кидал в addons/lua/autorun/server

GMD · 03.Сентябрь.2022 17:17:36

Тебе виднее. Ты же кнопку где-то хочешь

Murda · 03.Сентябрь.2022 17:43:01

cl / sv / sh часть?
Куда кидать эти клиентские функции?

GMD:

-- CLIENT'ские функции

-- Отправка запроса на покупку предмета
-- sItemUID это UID предмета (С sh_additems.lua)
-- callback это функция, которая выполнится после завершения процесса покупки
--    в callback первым параметром передается строка-ошибка или nil, если покупка успешна
--    вторым параметром передается ID предмета в инвентаре (если инвентарь используется на сервере)
IGS.Purchase(sItemUID, callback)

-- Активирует предмет с инвентаря
-- После первой функции можно сразу выполнить и эту,
-- чтобы игроку не пришлось даже в инвентарь заходить
-- iInvID это ИД предмета в инвентаре. Передается в callback в первой функции
-- в callback идет (bool ok, int iPurchID, string? sMsg_)
IGS.Activate(iInvID, callback)

Что делать с ошибкой ?

Как узнать ID предмета?

tehya · 03.Сентябрь.2022 18:37:08

1-2. addons/zakupka/lua/autorun/client/zakup.lua
3. IGS/sh_additems.lua at main · GM-DONATE/IGS (github.com) (2 аргумент)

Murda · 03.Сентябрь.2022 19:27:59

А куда это закидывать?

Спойлер

GMD:

-- Консольная команда, которая откроет модалку покупки предмета
concommand.Add("foobar", function(pl, _, args)
	local item_uid = args[1]
	if not item_uid then pl:ChatPrint("Не указан UID") return end

	local ITEM = IGS.GetItemByUID(item_uid)

	local price_int = ITEM:GetPrice(pl)
	local price_str = PL_MONEY(price_int)

	Derma_Query(
    "Хочешь купить " .. ITEM:Name() .. " за " .. price_str .. "?",
    "Подтверждение:",
    "Да", function() IGS.Purchase(item_uid, function(_err, _inv_id)
		if _err then
			pl:ChatPrint("Ошибка покупки: " .. _err)
		elseif _inv_id then
			pl:ChatPrint("Купили. Активируем! Если не активируется, то напиши /donate и активируй с инвентаря")
			IGS.Activate(_inv_id, function() pl:ChatPrint("Все, активировали") end)
		else
			pl:ChatPrint("Куплено и активировано!") -- инвентарь отключен в настройках. Ошибки нет, но и inv_id отсутствует
		end
	end) end,
	"Не", function() pl:ChatPrint("В мире загрустел один котик :(") end
	)
end)

-- Пример использования в коде
RunConsoleCommand("foobar", "admin_30d")

tehya · 03.Сентябрь.2022 19:29:08

Я же написал путь, нет разве?

Murda · 03.Сентябрь.2022 19:30:25

То путь для

IGS.Purchase(sItemUID, callback)
и
IGS.Activate(iInvID, callback)

tehya · 03.Сентябрь.2022 19:31:17

Это он рассказывает, как работают функции и их аргументы

Murda · 03.Сентябрь.2022 19:42:52

[zakupka] addons/zakupka/lua/autorun/client/zakup.lua:7: attempt to call method ‘GetPrice’ (a nil value)

unknown - addons/zakupka/lua/autorun/client/zakup.lua:7
unknown - lua/includes/modules/concommand.lua:54

tehya · 03.Сентябрь.2022 19:57:48

concommand.Add("foobar", function(pl, _, args)
	local item_uid = args[1]
	if not item_uid then pl:ChatPrint("Не указан UID") return end

	local ITEM = IGS.GetItemByUID(item_uid)

	local price_int = ITEM:Price()

	--[[
		https://github.com/GM-DONATE/IGS/blob/643ad83fff52d99c939523f8b36705265de6632f/addons/igs-core/lua/igs/objects/shop_item.lua#L65

		lua_run_cl print(IGS.GetItemByUID("wep_arbalet"):GetPrice())

		[ERROR] LuaCmd:1: attempt to call method 'GetPrice' (a nil value)
	]]

	local price_str = PL_MONEY(price_int)

	Derma_Query(
    "Хочешь купить " .. ITEM:Name() .. " за " .. price_str .. "?",
    "Подтверждение:",
    "Да", function() IGS.Purchase(item_uid, function(_err, _inv_id)
		if _err then
			pl:ChatPrint("Ошибка покупки: " .. _err)
		elseif _inv_id then
			pl:ChatPrint("Купили. Активируем! Если не активируется, то напиши /donate и активируй с инвентаря")
			IGS.Activate(_inv_id, function() pl:ChatPrint("Все, активировали") end)
		else
			pl:ChatPrint("Куплено и активировано!") -- инвентарь отключен в настройках. Ошибки нет, но и inv_id отсутствует
		end
	end) end,
	"Не", function() pl:ChatPrint("В мире загрустел один котик :(") end
	)
end)

Murda · 03.Сентябрь.2022 20:01:16

работает

GMD · 04.Сентябрь.2022 05:33:32

GMD · 04.Сентябрь.2022 05:35:11

да, сорри, это в следующей версии уже будет

Murda · 04.Сентябрь.2022 11:38:17

Забавный получился мем

GMD · 21.Ноябрь.2022 18:50:12

Версия опубликована. Пишу changelog и инструкцию по обновлению