Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- /*** ---------------------------------------------------------------------- ***
- Документацию по всем доступным методам можно посмотреть в файле documentation.txt
- Там написано много интересных и полезных методов, не ленитесь открыть
- Если демонстрационных итемов для настройки автодоната недостаточно
- - свяжитесь с нами и мы вам оперативно поможем: https://vk.com/im?sel=-143836547
- Не забудьте раскомментировать блок кода, чтобы настройки заработали
- Для этого нужно убрать "--" перед нужными строками.
- Если не знаете, как это сделать - напишите нам
- ДЛЯ ОПЫТНЫХ ПОЛЬЗОВАТЕЛЕЙ пример конфигурации автодоната на TRIGON.IM:
- https://gist.github.com/284608002faf5ff10525874b0225801e
- *** ------------------------------------------------------------------------- ***/
- -- TODO Продажа различных пушек за разную стоимость на разный период. Например покупка пистолета на 1 час/1 день/1 неделю/1 месяц.
- --[[-------------------------------------------------------------------------
- Группы прав (Донат пакеты)
- ---------------------------------------------------------------------------]]
- local PACKAGES = "Донат пакеты"
- IGS("Блатной", "group_blat", 300)
- :SetULXGroup("donate_blat")
- :SetCategory(PACKAGES)
- :SetTerm(30)
- :SetDescription("Доступ к блатным профам, царский резервный слот и особый префикс в чате")
- local BLAT_PLUS = IGS("Блатной+", "group_blat_plus", 400)
- BLAT_PLUS:SetULXGroup("donate_blat")
- BLAT_PLUS:SetCategory(PACKAGES)
- BLAT_PLUS:SetTerm(30)
- BLAT_PLUS:SetDescription("То же, что и 'Блатной', но в придачу получаете 500к валюты")
- BLAT_PLUS.money_bonus = 500000 -- 500k
- IGS("Модерка", "group_moder", 550)
- :SetULXGroup("moderator")
- :SetCategory(PACKAGES)
- :SetTerm(30)
- :SetDescription("Полет (ноуклип), бан, кик, джаил, невидимость, выдача ХП, бессмертие, мут козлов, телепортация и еще кучка приятных мелочей")
- IGS("Админка", "group_admin", 800)
- :SetULXGroup("admin_blat")
- :SetCategory(PACKAGES)
- :SetTerm(30)
- :SetDescription("Включает плюшки модера и блатного. Самое жирное, для самых мажиков")
- -- IGS("Строитель", "group_builder", 1234567890)
- -- :SetULXGroup("builder")
- -- :SetCategory(PACKAGES)
- -- :SetTerm(30)
- -- :SetDescription("Повышенный лимит пропов, доступ к дополнительным тулам")
- --[[-------------------------------------------------------------------------
- Игровая валюта
- ---------------------------------------------------------------------------]]
- local MONEY = "Игровая валюта"
- IGS("500к", "money_500k", 100)
- :SetCategory(MONEY)
- :SetDarkRPMoney(500000)
- IGS("1кк", "money_1kk", 200)
- :SetCategory(MONEY)
- :SetDarkRPMoney(1000000)
- IGS("2кк (Экон. 100р)", "money_2kk", 300)
- :SetCategory(MONEY)
- :SetDarkRPMoney(2000000)
- IGS("3кк (Экон. 200р)", "money_3kk", 500)
- :SetCategory(MONEY)
- :SetDarkRPMoney(3000000)
- IGS("10кк (Экон. 500р)", "money_10kk", 1000)
- :SetCategory(MONEY)
- :SetDarkRPMoney(10000000)
- IGS("20кк (Экон. 1000р)", "money_20kk", 2000)
- :SetCategory(MONEY)
- :SetDarkRPMoney(10000000)
- --[[-------------------------------------------------------------------------
- Эксклюзивные машины
- ---------------------------------------------------------------------------]]
- -- local CARS = "Эксклюзивные машины"
- -- IGS("Машина A", "car_a", 1234567890)
- -- :SetCategory(CARS)
- -- :SetTerm() -- навсегда
- -- :SetDescription("Дает возможность прокатиться на Машина А")
- -- IGS("Машина Б", "car_b", 1234567890)
- -- :SetCategory(CARS)
- -- :SetTerm() -- навсегда
- -- :SetDescription("Дает возможность прокатиться на Машина Б")
- --[[-------------------------------------------------------------------------
- Игровая валюта при покупке блатной+
- ---------------------------------------------------------------------------]]
- hook.Add("IGS.OnSuccessPurchase","MoneyBonusOnPurchase",function(pl, ITEM)
- if !ITEM.money_bonus then return end -- нет бонуса
- pl:addMoney(ITEM.money_bonus)
- DarkRP.notify(pl,3,60, "Вы получили " .. DarkRP.formatMoney(ITEM.money_bonus) .. " за покупку " .. ITEM:Name())
- end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement