LUA скрипт [NeverLose] Better DT

pidjan
Пользователь
Статус
Оффлайн
Регистрация
10 Ноя 2020
Сообщения
526
Реакции[?]
148
Поинты[?]
1K
Всем привет, решил сделать скрипт для неверлуза, ускоряет дт и к плюсу ватермарочка, киллсей, выключение/включение чата.
24.03.2021 18:07: Released
24.03.2021 18:56: Added switch "Enabled" for all functions.
FAST UPDATE (24.03.2021 19:00): Changed username limit in the watermark from "32" to "48"
25.03.2021 17:15: Fixed error in line 107

Код:
cheat.AddNotify(" ", "Thank you for loading Better DT.lua <3")
local killsay = menu.Switch("Killsay", "Enabled", true)
local killsay_msg = menu.TextBox("Killsay", "Killsay message", 48, "owned by BetterDT.lua", "Tooltip")
local dchat = menu.Switch("Chat", "Disable Chat", false)
local doubletap = menu.Switch("Double Tap", "Enabled", true)
local bdt = menu.Switch("Double Tap", "Better Double-Tap", false)
local speed = menu.SliderInt("Double Tap", "Speed", 16, 13, 16)
local water = menu.Switch("Water", "Enabled", true)
local user = menu.TextBox("Water", "Water Username", 24, "User", "Tooltip")

local menu = function()
    local isKillsay = killsay:GetBool()
    local isDT = doubletap:GetBool()
    local isChat = dchat:GetBool()
    local isWater = water:GetBool()
    
    killsay_msg:SetVisible(isKillsay)
    bdt:SetVisible(isDT)
    speed:SetVisible(isDT)
    user:SetVisible(isWater)
end
killsay:RegisterCallback(menu)
doubletap:RegisterCallback(menu)
dchat:RegisterCallback(menu)
water:RegisterCallback(menu)



local dt = function()
    if doubletap:GetBool() == false then
        return
    end
    local isBetterDT = bdt:GetBool()
    if isBetterDT == true then
        speed:SetVisible(false)                    
        exploits.OverrideDoubleTapSpeed(16)
        exploits.ForceTeleport()
    else
        speed:SetVisible(true)   
        exploits.OverrideDoubleTapSpeed(speed:GetInt())
    end

end

local chat = function()
    local dischat = dchat:GetBool()
    if dischat == true then
        g_EngineClient:ExecuteClientCmd("cl_chatfilters 0")
    else
        g_EngineClient:ExecuteClientCmd("cl_chatfilters 1")
    end
end
dt()
dchat:RegisterCallback(chat)
speed:RegisterCallback(dt)
bdt:RegisterCallback(dt)

local font = g_Render:InitFont("Verdana",12)

local frame_rate = 0.0
local function get_latency()
    local netchann_info = g_EngineClient:GetNetChannelInfo()
    if netchann_info == nil then return "0" end
        local latency = netchann_info:GetLatency(0)
    return string.format("%1.f", math.max(0.0, latency) * 1000.0)
end

local textSize = 0

local function watermark()
    if water:GetBool() == false then
        return
    end
    local screen = g_EngineClient:GetScreenSize()   
    local ping = get_latency()
    local username = user:GetString()
    local shift = 13
    if bdt:GetBool() == true then
        shift = 16
    else
        shift = speed:GetInt()
    end
    local rightPadding = 20
    local var = screen.x - textSize - rightPadding

    local x = var - 10
    local y = 9
    local w = textSize + 20
    local h = 17

    ----g_Render:BoxFilled(Vector2.new(x,y+2),Vector2.new(x+textSize+20,h * 1.5 + 2), Color.new(17/255,17/255,17/255,100/255))----

    g_Render:BoxFilled(Vector2.new(x,y),Vector2.new(x+textSize+20,h-6), Color.new(102/255,118/255,202/255))

    local nexttext = "DT"

    g_Render:Text(nexttext, Vector2.new(var,12), Color.new(255,255,255), 12, font)
    local wide = g_Render:CalcTextSize(nexttext, 12, font)
    var = var + wide.x

    nexttext = " | " .. username
    g_Render:Text(nexttext, Vector2.new(var,12), Color.new(255,255,255), 12,font)

    wide = g_Render:CalcTextSize(nexttext, 12,font)
    var = var + wide.x
    local shifts = string.format("%", shift)
    nexttext = " | Shift:" .. shifts .. "t"
    g_Render:Text(nexttext, Vector2.new(var,12), Color.new(255,255,255), 12,font)

    wide = g_Render:CalcTextSize(nexttext, 12,font)
    var = var + wide.x


    nexttext = " | delay: ".. ping .."ms"

    g_Render:Text(nexttext, Vector2.new(var,12), Color.new(255,255,255), 12,font)

    wide = g_Render:CalcTextSize(nexttext, 12,font)
    var = var + wide.x

    textSize = var - (screen.x - textSize - rightPadding)
end

cheat.RegisterCallback("draw",watermark)
water:RegisterCallback(watermark)

cheat.RegisterCallback("events", function(event)
    if killsay:GetBool() == false then
        return
    end
    if event:GetName() == "player_death" then
        local message = killsay_msg:GetString()
        local victim = g_EngineClient:GetPlayerForUserId(event:GetInt("userid"))
        local attacker = g_EngineClient:GetPlayerForUserId(
        event:GetInt("attacker"))

        if victim ~= attacker and attacker == g_EngineClient:GetLocalPlayer() then
            g_EngineClient:ExecuteClientCmd(string.format("say %s", message))
        end

    end

end)

cheat.RegisterCallback("destroy", function()
    exploits.OverrideDoubleTapSpeed(13)
    set_clantag("")
    g_EngineClient:ExecuteClientCmd("cl_chatfilters 1")
end)
 

Вложения

Последнее редактирование:
pidjan
Пользователь
Статус
Оффлайн
Регистрация
10 Ноя 2020
Сообщения
526
Реакции[?]
148
Поинты[?]
1K
Update: Added switch "Enabled" for all functions.
Fast update: Changed username limit in the watermark from "32" to "48"
 
pidjan
Пользователь
Статус
Оффлайн
Регистрация
10 Ноя 2020
Сообщения
526
Реакции[?]
148
Поинты[?]
1K
OwOщ
Пользователь
Статус
Оффлайн
Регистрация
26 Мар 2020
Сообщения
505
Реакции[?]
108
Поинты[?]
0
Всем привет, решил сделать скрипт для неверлуза, ускоряет дт и к плюсу ватермарочка, киллсей, выключение/включение чата.
24.03.2021 18:07: Released
24.03.2021 18:56: Added switch "Enabled" for all functions.
FAST UPDATE (24.03.2021 19:00): Changed username limit in the watermark from "32" to "48"

Код:
cheat.AddNotify(" ", "Thank you for loading Better DT.lua <3")
local killsay = menu.Switch("Killsay", "Enabled", true)
local killsay_msg = menu.TextBox("Killsay", "Killsay message", 48, "owned by BetterDT.lua", "Tooltip")
local dchat = menu.Switch("Chat", "Disable Chat", false)
local doubletap = menu.Switch("Double Tap", "Enabled", true)
local bdt = menu.Switch("Double Tap", "Better Double-Tap", false)
local speed = menu.SliderInt("Double Tap", "Speed", 16, 13, 16)
local water = menu.Switch("Water", "Enabled", true)
local user = menu.TextBox("Water", "Water Username", 24, "User", "Tooltip")

local menu = function()
    local isKillsay = killsay:GetBool()
    local isDT = doubletap:GetBool()
    local isChat = dchat:GetBool()
    local isWater = water:GetBool()

    killsay_msg:SetVisible(isKillsay)
    bdt:SetVisible(isDT)
    speed:SetVisible(isDT)
    user:SetVisible(isWater)
end
killsay:RegisterCallback(menu)
doubletap:RegisterCallback(menu)
dchat:RegisterCallback(menu)
water:RegisterCallback(menu)



local dt = function()
    if doubletap:GetBool() == false then
        return
    end
    local isBetterDT = bdt:GetBool()
    if isBetterDT == true then
        speed:SetVisible(false)              
        exploits.OverrideDoubleTapSpeed(16)
        exploits.ForceTeleport()
    else
        speed:SetVisible(true)
        exploits.OverrideDoubleTapSpeed(speed:GetInt())
    end

end

local chat = function()
    local dischat = dchat:GetBool()
    if dischat == true then
        g_EngineClient:ExecuteClientCmd("cl_chatfilters 0")
    else
        g_EngineClient:ExecuteClientCmd("cl_chatfilters 1")
    end
end
dt()
dchat:RegisterCallback(chat)
speed:RegisterCallback(dt)
bdt:RegisterCallback(dt)

local font = g_Render:InitFont("Verdana",12)

local frame_rate = 0.0
local function get_latency()
    local netchann_info = g_EngineClient:GetNetChannelInfo()
    if netchann_info == nil then return "0" end
        local latency = netchann_info:GetLatency(0)
    return string.format("%1.f", math.max(0.0, latency) * 1000.0)
end

local textSize = 0

local function watermark()
    if water:GetBool() == false then
        return
    end
    local screen = g_EngineClient:GetScreenSize()
    local ping = get_latency()
    local username = user:GetString()
    local shift = 13
    if bdt:GetBool() == true then
        shift = 16
    else
        shift = speed:GetInt()
    end
    local rightPadding = 20
    local var = screen.x - textSize - rightPadding

    local x = var - 10
    local y = 9
    local w = textSize + 20
    local h = 17

    ----g_Render:BoxFilled(Vector2.new(x,y+2),Vector2.new(x+textSize+20,h * 1.5 + 2), Color.new(17/255,17/255,17/255,100/255))----

    g_Render:BoxFilled(Vector2.new(x,y),Vector2.new(x+textSize+20,h-6), Color.new(102/255,118/255,202/255))

    local nexttext = "DT"

    g_Render:Text(nexttext, Vector2.new(var,12), Color.new(255,255,255), 12, font)
    local wide = g_Render:CalcTextSize(nexttext, 12, font)
    var = var + wide.x

    nexttext = " | " .. username
    g_Render:Text(nexttext, Vector2.new(var,12), Color.new(255,255,255), 12,font)

    wide = g_Render:CalcTextSize(nexttext, 12,font)
    var = var + wide.x

    nexttext = " | Shift:" .. tostring(#shift) .. "t"
    g_Render:Text(nexttext, Vector2.new(var,12), Color.new(255,255,255), 12,font)

    wide = g_Render:CalcTextSize(nexttext, 12,font)
    var = var + wide.x


    nexttext = " | delay: ".. ping .."ms"

    g_Render:Text(nexttext, Vector2.new(var,12), Color.new(255,255,255), 12,font)

    wide = g_Render:CalcTextSize(nexttext, 12,font)
    var = var + wide.x

    textSize = var - (screen.x - textSize - rightPadding)
end

cheat.RegisterCallback("draw",watermark)
water:RegisterCallback(watermark)

cheat.RegisterCallback("events", function(event)
    if killsay:GetBool() == false then
        return
    end
    if event:GetName() == "player_death" then
        local message = killsay_msg:GetString()
        local victim = g_EngineClient:GetPlayerForUserId(event:GetInt("userid"))
        local attacker = g_EngineClient:GetPlayerForUserId(
        event:GetInt("attacker"))

        if victim ~= attacker and attacker == g_EngineClient:GetLocalPlayer() then
            g_EngineClient:ExecuteClientCmd(string.format("say %s", message))
        end

    end

end)

cheat.RegisterCallback("destroy", function()
    exploits.OverrideDoubleTapSpeed(13)
    set_clantag("")
    g_EngineClient:ExecuteClientCmd("cl_chatfilters 1")
end)
Я конечно не луа скриптер, и у меня нет нла, но не достаточно ли просто написать луаху в одну строчку:
Код:
exploits.OverrideDoubleTapSpeed(15)
А тут я просто промолчу... :
Screenshot_1.png


(Извиняюсь если не прав)

UPD: Сорян, я не заметил это:
и к плюсу ватермарочка, киллсей, выключение/включение чата.
 
pidjan
Пользователь
Статус
Оффлайн
Регистрация
10 Ноя 2020
Сообщения
526
Реакции[?]
148
Поинты[?]
1K
Я конечно не луа скриптер, и у меня нет нла, но не достаточно ли просто написать луаху в одну строчку:
Код:
exploits.OverrideDoubleTapSpeed(15)
А тут я просто промолчу... :
Посмотреть вложение 139300


(Извиняюсь если не прав)

UPD: Сорян, я не заметил это:
Дак если нету Неверлуза, зачем ты пишешь? А про 13 тиков где я ставлю это на анлоад, каллбек destroy это как в кряке на unload
 
Сверху Снизу