--pavetr.top/ds
print"Loaded Test Cheat menu!"

surface.CreateFont("LSAC.SansSerif_32", {
    font = "Roboto",
    size = 24,
    weight = 500,
    antialias = true
})

if IsValid(cheatMenuTest) then
    cheatMenuTest:SetVisible(not 1)
    cheatMenuTest = nil
    hook.Remove("Think", "LSAC.CheatMenuTest")
end

local _ = {}
local LSAC = {}

local function a()
    AimbotTest = {}
    AimbotTest.Enabled = not 1
    AimbotTest.SilentAim = not 1
    AimbotTest.SmoothedAim = not 1

    function AimbotTest:CanSeeEnt(_)
        local a = {}
        a.filter = LocalPlayer()
        a.start = LocalPlayer():GetShootPos()
        a.endpos = _:GetPos()
        a.mask = MASK_SHOT
        local _ = util.TraceLine(a)

        return _.Fraction > 0.9
    end

    function AimbotTest:FindTarget()
        local _ = {}

        for a, b in ipairs(player.GetAll()) do
            if IsValid(b) and b:Alive() and b ~= LocalPlayer() and AimbotTest:CanSeeEnt(b) then
                table.insert(_, b)
            end
        end

        for a, c in ipairs(ents.FindByClass"npc_*") do
            if IsValid(c) and c.Alive and c:Alive() and AimbotTest:CanSeeEnt(c) then
                table.insert(_, c)
            end
        end

        local a, d, e = 999999999999999, NULL, LocalPlayer():GetPos()

        for _, f in ipairs(_) do
            local _ = e:DistToSqr(f:GetPos())

            if (_ <= a) then
                a = _
                d = f
            end
        end

        return d
    end

    AimbotTest.Silent = Angle(0, 0, 0)

    function AimbotTest.GetShootPos(_)
        local _ = AimbotTest:FindTarget()
        if not IsValid(_) then return end
        local a = _:LookupBone"ValveBiped.Bip01_Head1"
        if not a then return end
        local g = _:GetBonePosition(a)
        local _ = (g - LocalPlayer():GetShootPos())

        return _:Angle()
    end

    local _ = 1

    function AimbotTest.SmoothAim(a, h)
        if not AimbotTest.SmoothedAim then return h end
        local i = engine.TickInterval() * _

        return LerpAngle(i, a, h)
    end

    function AimbotTest.DoAimbot(_)
        local a = AimbotTest.GetShootPos(_)
        if not a then return not 1 end
        local j = AimbotTest.SmoothAim(_:GetViewAngles(), a)
        if not j then return not 1 end
        _:SetViewAngles(j)

        if AimbotTest.SilentAim then
            _:SetButtons(bit.bor(_:GetButtons(), IN_ATTACK))
        end

        return not not 1
    end

    function AimbotTest.FixMove(_, a)
        local k, l = _:GetViewAngles(), Vector(_:GetForwardMove(), _:GetSideMove(), 0)
        local m, n = l:Length2D(), math.deg(math.atan2(l.y, l.x))
        n = math.rad(k.y - a.y + n)

        if k.x < -90 or k.x > 90 then
            n = -n
        end

        _:SetForwardMove(math.cos(n) * m)
        _:SetSideMove(math.sin(n) * m)
    end

    function AimbotTest.CreateMove(_)
        if not AimbotTest.Enabled then return end

        if not AimbotTest.SilentAim then
            AimbotTest.DoAimbot(_)

            return
        end

        if (_:CommandNumber() == 0) then
            AimbotTest.Silent = AimbotTest.Silent + Angle(_:GetMouseY() * 0.02, -_:GetMouseX() * 0.2, 0)
            _:SetViewAngles(AimbotTest.Silent)

            return
        end

        AimbotTest.DoAimbot(_)
        AimbotTest.FixMove(_, AimbotTest.Silent)
    end

    hook.Add("CreateMove", "LSAC.AimbotTest", AimbotTest.CreateMove)
end

local function o()
    AntiAimTest = {}
    AntiAimTest.Enabled = not 1

    function AntiAimTest.CreateMove(_)
        if not AntiAimTest.Enabled then return end
        _:SetViewAngles(Angle(-90, -500, 0))
    end

    hook.Add("CreateMove", "LSAC.AntiAimTest", AntiAimTest.CreateMove)
end

local function p()
    AutoFireFlipTest = {}
    AutoFireFlipTest.Enabled = not 1
    AutoFireFlipTest.FlipBit = not 1

    function AutoFireFlipTest.CreateMove(_)
        if not AutoFireFlipTest.Enabled then return end
        if (_:CommandNumber() == 0) then return end

        if input.IsMouseDown(MOUSE_FIRST) then
            local a = _:GetButtons()

            if AutoFireFlipTest.FlipBit then
                _:SetButtons(bit.band(a, bit.bnot(IN_ATTACK)))
            else
                _:SetButtons(bit.bor(a, IN_ATTACK))
            end

            AutoFireFlipTest.FlipBit = not AutoFireFlipTest.FlipBit
        end
    end

    hook.Add("CreateMove", "LSAC.AutoFireFlipTest", AutoFireFlipTest.CreateMove)
end

local function q()
    AutoFireTimedTest = {}
    AutoFireTimedTest.Enabled = not 1

    local function _(_)
        return _:GetNextPrimaryFire() < CurTime()
    end

    function AutoFireTimedTest.CreateMove(a)
        if not AutoFireTimedTest.Enabled then return end
        local o = LocalPlayer():GetActiveWeapon()
        if not IsValid(o) or o:Clip1() == 0 then return end

        if input.IsMouseDown(MOUSE_FIRST) then
            if _(o) then
                a:SetButtons(bit.bor(a:GetButtons(), IN_ATTACK))
            else
                a:SetButtons(bit.band(a:GetButtons(), bit.bnot(IN_ATTACK)))
            end
        end
    end

    hook.Add("CreateMove", "LSAC.AutoFireTimedTest", AutoFireTimedTest.CreateMove)
end

local function r()
    AutoStrafeTest = {}
    AutoStrafeTest.Enabled = not 1

    function AutoStrafeTest.CreateMove(_)
        if not AutoStrafeTest.Enabled then return end
        local a = 150
        local o, p, q = a / 2, _:GetButtons(), ((250 * CurTime()) % a)
        local a = -o + q

        if (q > o) then
            a = -1
            _:SetButtons(bit.bor(p, IN_RIGHT))
        else
            a = 1
            _:SetButtons(bit.bor(p, IN_LEFT))
        end

        local o = _:GetViewAngles()
        o.y = o.y + a

        if (_:CommandNumber() ~= 0) then
            _:SetViewAngles(o)
        end
    end

    hook.Add("CreateMove", "LSAC.AutoStrafeTest", AutoStrafeTest.CreateMove)
end

local function s()
    BunnyHopTest = {}
    BunnyHopTest.Enabled = not 1

    function BunnyHopTest.CreateMove(_)
        if not BunnyHopTest.Enabled then return end
        if (_:CommandNumber() == 0) then return end

        if not LocalPlayer():IsOnGround() then
            _:RemoveKey(IN_JUMP)
        end
    end

    hook.Add("CreateMove", "LSAC.BunnyHopTest", BunnyHopTest.CreateMove)
end

local function t()
    FlashlightSpamTest = {}
    FlashlightSpamTest.Enabled = not 1

    function LSAC.FlashlightSpamTest(_)
        if not FlashlightSpamTest.Enabled then return end
        if (_:CommandNumber() == 0) then return end
        _:SetImpulse(100)
    end

    hook.Add("CreateMove", "LSAC.FlashlightSpamTest", LSAC.FlashlightSpamTest)
end

local function u()
    SpinBotTest = {}
    SpinBotTest.Enabled = not 1

    function SpinBotTest.CreateMove(_)
        if not SpinBotTest.Enabled then return end
        local a = SysTime() * 2000
        local o = -180 + (a % 360)
        _:SetViewAngles(Angle(10, o, 0.01))
    end

    hook.Add("CreateMove", "LSAC.SpinBotTest", SpinBotTest.CreateMove)
end

local function v()
    TriggerbotTest = {}
    TriggerbotTest.Enabled = not 1

    function TriggerbotTest.CreateMove(_)
        if not TriggerbotTest.Enabled then return end
        if (_:CommandNumber() == 0) then return end
        local a = LocalPlayer():GetEyeTrace().Entity

        if IsValid(a) and (a:IsPlayer() or a:IsNPC()) and a:Health() > 0 then
            local a = _:GetButtons()

            if not _:KeyDown(IN_ATTACK) then
                _:SetButtons(bit.bor(a, IN_ATTACK))
            end
        end
    end

    hook.Add("CreateMove", "LSAC.TriggerbotTest", TriggerbotTest.CreateMove)
end

local function w()
    ESPTest = {}
    ESPTest.Enabled = not 1
    local _, a = Color(255, 0, 0, 255), Color(0, 255, 0, 255)

    function ESPTest.HUDPaint()
        if not ESPTest.Enabled then return end
        local o = {}

        for p, q in ipairs(player.GetAll()) do
            o[#o + 1] = q
        end

        for p, q in ipairs(ents.FindByClass"npc_*") do
            o[#o + 1] = q
        end

        cam.Start3D()

        for o, p in ipairs(o) do
            if (p ~= LocalPlayer()) then
                cam.IgnoreZ(not not 1)
                p:DrawModel()
                cam.IgnoreZ(not 1)
            end
        end

        cam.End3D()

        for o, p in ipairs(o) do
            if (p ~= LocalPlayer()) then
                cam.IgnoreZ(not not 1)
                p:DrawModel()
                cam.IgnoreZ(not 1)
                local o = (p:GetPos() + p:OBBCenter()):ToScreen()

                if o.visible then
                    if p:IsPlayer() then
                        surface.SetDrawColor(_)
                    else
                        surface.SetDrawColor(a)
                    end

                    surface.DrawOutlinedRect(o.x, o.y, 30, 30)
                end
            end
        end
    end

    hook.Add("HUDPaint", "LSAC.ESPTest", ESPTest.HUDPaint)
end

local function x()
    if IsValid(cheatMenuTest) then
        if not cheatMenuTest:IsVisible() then
            cheatMenuTest:SetVisible(not not 1)
        end

        return
    end

    cheatMenuTest = vgui.Create"DFrame"
    cheatMenuTest:SetVisible(not not 1)
    cheatMenuTest:SetSize(320, 600)
    cheatMenuTest:Center()
    cheatMenuTest:MakePopup()
    cheatMenuTest:SetKeyboardInputEnabled(not not 1)
    cheatMenuTest:SetText""
    cheatMenuTest:SetTitle""
    local x = Color(50, 122, 198)

    cheatMenuTest.Paint = function(y, z, A)
        surface.SetDrawColor(color_white)
        surface.DrawRect(0, 0, z, A)
        surface.SetDrawColor(x)
        surface.DrawRect(0, 0, z, 60)
        local y = "LSAC - Test Cheat Menu"
        surface.SetFont"LSAC.SansSerif_32"
        local z, A = surface.GetTextSize(y)
        surface.SetTextColor(color_white)
        surface.SetTextPos(20, 30 - A / 2)
        surface.DrawText(y)
    end

    local function x(x, B, C, D)
        x()

        _[#_ + 1] = {B, C, D}
    end

    x(a, "Aimbot", function(x)
        AimbotTest.Enabled = x
    end, function() return AimbotTest and AimbotTest.Enabled end)

    x(a, "Aimbot with Silent Aim", function(x)
        if x then
            AimbotTest.Enabled = not not 1
        end

        AimbotTest.SilentAim = x
    end, function() return AimbotTest and AimbotTest.Enabled and AimbotTest.SilentAim end)

    x(a, "Aimbot with Smooth Aim", function(x)
        if x then
            AimbotTest.Enabled = not not 1
        end

        AimbotTest.SmoothedAim = x
    end, function() return AimbotTest and AimbotTest.Enabled and AimbotTest.SmoothedAim end)

    x(o, "Anti Aim", function(x)
        AntiAimTest.Enabled = x
    end, function() return AntiAimTest and AntiAimTest.Enabled end)

    x(p, "Auto Fire Flip", function(x)
        AutoFireFlipTest.Enabled = x
    end, function() return AutoFireFlipTest and AutoFireFlipTest.Enabled end)

    x(q, "Auto Fire Timed (AutoPistol)", function(x)
        AutoFireTimedTest.Enabled = x
    end, function() return AutoFireTimedTest and AutoFireTimedTest.Enabled end)

    x(r, "Auto Strafe", function(x)
        AutoStrafeTest.Enabled = x
    end, function() return AutoStrafeTest and AutoStrafeTest.Enabled end)

    x(s, "Bunny Hop", function(x)
        BunnyHopTest.Enabled = x
    end, function() return BunnyHopTest and BunnyHopTest.Enabled end)

    x(t, "Flashlight Spam", function(x)
        FlashlightSpamTest.Enabled = x
    end, function() return FlashlightSpamTest and FlashlightSpamTest.Enabled end)

    x(u, "Spinbot", function(x)
        SpinBotTest.Enabled = x
    end, function() return SpinBotTest and SpinBotTest.Enabled end)

    x(v, "Triggerbot", function(x)
        TriggerbotTest.Enabled = x
    end, function() return TriggerbotTest and TriggerbotTest.Enabled end)

    x(w, "Wallhack/ESP ", function(x)
        ESPTest.Enabled = x
    end, function() return ESPTest and ESPTest.Enabled end)

    local x = not not 1

    for E, F in ipairs(_) do
        local E = vgui.Create("DCheckBoxLabel", cheatMenuTest)
        E:SetText(F[1])
        E:SetFont"LSAC.SansSerif_32"
        E:SetTextColor(Color(128, 128, 128))
        E:SizeToContents()

        if not x then
            E:DockMargin(8, 8, 8, 8)
        else
            E:DockMargin(8, 48, 8, 8)
            x = not 1
        end

        E:Dock(TOP)
        E.OThink = chat.Think or function() end

        function E:Think()
            self:SetValue(F[3]())

            return self:OThink()
        end

        E.OOnChange = E.OnChange or function() end

        function E:OnChange(E)
            F[2](E)

            return self:OOnChange()
        end
    end
end

local function _()
    if IsValid(cheatMenuTest) then
        cheatMenuTest:SetVisible(not 1)
    end
end

hook.Add("Think", "LSAC.CheatMenuTest", function()
    if input.IsKeyDown(KEY_INSERT) then
        x()
    else
        _()
    end
end)

chat.AddText"Loaded Test Cheat, hold insert to open!"