• Ищем качественного (не новичок) разработчиков Xenforo для этого форума! В идеале, чтобы ты был фулл стек программистом. Если у тебя есть что показать, то свяжись с нами по контактным данным: https://t.me/DREDD

Кража денег с маников на дерме

Gay from GMod
Начинающий
Начинающий
Статус
Оффлайн
Регистрация
9 Дек 2020
Сообщения
18
Реакции
9
Маленький скрипт, который позволяет красть деньги с чужих маников / включать их если они выключены и все так же красть.
Дальность работы поменять не получится, она максимальная которую можно поставить.
Работает только с маниками сделанными на Derma. Те, который реагируют на обычное использование (E по манику) не получится .

Сделано в несколько строчек, подходишь к стене, рядом с которой маник, вводишь команду в консоль и деньги с маников в радиусе в кармане.
На некоторых серверах могут отличаться названия NET`ов, есть заготовки только под 2 помойки - FastRP и GambitRP. На других меняйте под себя названия NET`ов и функцию на проверку статуса принтера, класс принтера.

Запускать через Loader как и любой скрипт

Активация: steal_printer_cash в консоль

GAMBIT RP
Код:
Expand Collapse Copy
local fradius = 70
local fclass = 'f_printer'

local prs = pairs
local fndsphr = ents.FindInSphere
local cprint = chat.AddText
local nt_st = net.Start
local nt_we = net.WriteEntity
local nt_sts = net.SendToServer
local cncmdadd = concommand.Add
local clr = Color

local c = {

    white = clr(230, 230, 230),
    red = clr(230, 55, 55),
    green = clr(55, 230, 55),
    blue = clr(55, 55, 230),
    invise = clr(255, 255, 255, 0)

}

local function FindManiki()

    local maniki = {}

    local lcpl = LocalPlayer()
    local lcplgpos = LocalPlayer():GetPos()

    for k,ent in prs(fndsphr(lcplgpos, fradius)) do

        local entcls = ent:GetClass()

        if entcls == fclass then

            maniki[#maniki + 1] = ent

        end

    end

    return maniki

end

local function SpizditMoney()

    if next(FindManiki()) == nil then
 
        return cprint(c.red, 'Маников поблизости нет!')

    end

    for i = 1, #FindManiki() do

        cprint(c.white, 'Найден принтер!')

        if not FindManiki()[i]:GetStatus() then

            cprint(c.white, 'Включаю!')

            nt_st("GambitPrinter.Status")
         
                nt_we(FindManiki()[i])
     
            nt_sts()

        end

        nt_st("GambitPrinter.Withdraw")
         
            nt_we(FindManiki()[i])
         
        nt_sts()

    end

end

cncmdadd('steal_printer_cash', SpizditMoney)

FastRP
Код:
Expand Collapse Copy
local fradius = 50
local fclass = 'derma_printer'

local prs = pairs
local fndsphr = ents.FindInSphere
local cprint = chat.AddText
local nt_st = net.Start
local nt_we = net.WriteEntity
local nt_sts = net.SendToServer
local cncmdadd = concommand.Add
local clr = Color

local c = {

    white = clr(230, 230, 230),
    red = clr(230, 55, 55),
    green = clr(55, 230, 55),
    blue = clr(55, 55, 230),
    invise = clr(255, 255, 255, 0)

}

local function FindManiki()

    local maniki = {}

    local lcpl = LocalPlayer()
    local lcplgpos = LocalPlayer():GetPos()

    for k,ent in prs(fndsphr(lcplgpos, fradius)) do

        local entcls = ent:GetClass()

        if entcls == fclass then

            maniki[#maniki + 1] = ent

        end

    end

    return maniki

end

local function SpizditMoney()

    if next(FindManiki()) == nil then
 
        return cprint(c.red, 'Маников поблизости нет!')

    end

    for i = 1, #FindManiki() do

        cprint(c.white, 'Найден принтер!')

        if not FindManiki()[i]:Gettoggle() then
         
            cprint(c.white, 'Включаю!')

            nt_st("Togglep")
         
                nt_we(FindManiki()[i])
     
            nt_sts()

        end

        nt_st("withdrawp")
         
            nt_we(FindManiki()[i])
         
        nt_sts()

    end

end

cncmdadd('steal_printer_cash', SpizditMoney)

(Надеюсь за названия серверов пизды не дают, заранее говорю сервера помойка не заходите если не хотите просрать время)
 
Последнее редактирование модератором:
Есть видосы с работой скрипта?
 
Есть видосы с работой скрипта?
Забиндил на клавишу консольную команду чисто и бегал грабил банки. Можно хоть с нижних этажей дома лежащие на полу маники обчищать, забавная штука
 
Забиндил на клавишу консольную команду чисто и бегал грабил банки. Можно хоть с нижних этажей дома лежащие на полу маники обчищать, забавная штука
Ахха,забавная хуйня,надо будет чекнуть как нибудь
 
бля, я чет подумал это типо софт на какой-то прибор, когда подходишь к человеку в реальной жизни, то у него с киви или иных кошельков бабки воруются))
 
бля, я чет подумал это типо софт на какой-то прибор, когда подходишь к человеку в реальной жизни, то у него с киви или иных кошельков бабки воруются))
В разделе ЛУА такого не будет да и в тюрьму не собираюсь :roflanEbalo:
 
Какая команда на активацию?
 
Найден принтер!
не могу собрать деньги они не собираються сами как собрать
 
Ну кст да, походу это фиксанули уже
 
Найден принтер!
не могу собрать деньги они не собираються сами как собрать
На каком сервере проверял? Если FustRP и других серверах на его сборке то там не работает ибо проверка есть. Возможно когда-нибудь как-нибудь пофикшу
UPD. Проверил сервера из темы - все работает идеально.Опять таки, выше написал где не работает.
 
Последнее редактирование:
Забиндил на клавишу консольную команду чисто и бегал грабил банки. Можно хоть с нижних этажей дома лежащие на полу маники обчищать, забавная штука
софт?
 
Назад
Сверху Снизу