Integra Pocket Version

// Integra v(What Would be 2.0, but isn't released) Pocket Version.
// This version LOOKS somewhat similar, but with less functionality and smaller code, ported to work optimal with PixelRender,
// so anti-cheat bypassing is not an option.
// This means it's hook.Add and no module framework at all, just plain code that can be ran any time.

surface.CreateFont("Segoe UI", 15, 700, false, false, "ESPFont_Name")
surface.CreateFont("Arial", 13, 700, false, false, "ESPFont_Rank")
surface.CreateFont("Arial", 13, 700, false, false, "ESPFont_Info")
surface.CreateFont("Arial", 19, 700, false, false, "AimbotFont_Scan")

CreateClientConVar("p_int_esp_outlinedtext", 1, true, false)
CreateClientConVar("p_int_esp", 1, true, false)
hook.Add("HUDPaint", "INT_ESP_HUD", function()
    if not GetConVar("p_int_esp"):GetBool() then return end

    for k, v in pairs(player.GetAll()) do
        if ValidEntity(v) and v != LocalPlayer() then
            local pos = v:EyePos()
                if v:GetBonePosition(6) != nil then
                    pos = v:GetBonePosition(6)
                end
                pos = pos:ToScreen()
            local nick = v:Nick()
            local rank = ""
            if v:IsAdmin() and not v:IsSuperAdmin() then
                rank = " (Admin)"
            elseif v:IsSuperAdmin() then
                rank = " (Super Admin)"
            end
            local health = v:Health() .. "%"
            if v:Health() <= 0 then health = "DEAD" end
            local dist = math.Round(v:EyePos():Distance(EyePos()))
            local weapon = "nil"
            if ValidEntity(v:GetActiveWeapon()) then
                weapon = v:GetActiveWeapon().PrintName or v:GetActiveWeapon():GetClass()
            end

            surface.SetFont("ESPFont_Name")
            local nametext_size = surface.GetTextSize(nick)
            surface.SetFont("ESPFont_Rank")
            local ranktext_size = surface.GetTextSize(rank)
            surface.SetFont("ESPFont_Info")
            local health_info_size = surface.GetTextSize("Health: ")
            local health_value_size = surface.GetTextSize(health)
            local dist_info_size = surface.GetTextSize("Distance: ")
            local dist_value_size = surface.GetTextSize(dist)
            local weapon_info_size = surface.GetTextSize("Weapon: ")
            local weapon_value_size = surface.GetTextSize(weapon)

            if GetConVar("p_int_esp_outlinedtext"):GetBool() then
                draw.SimpleTextOutlined(nick, "ESPFont_Name", pos.x - ((nametext_size + ranktext_size) / 2), pos.y - 54, Color(204, 102, 102, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP, 1, Color(0, 0, 0, 255))
                draw.SimpleTextOutlined(rank, "ESPFont_Rank", pos.x - ((nametext_size + ranktext_size) / 2) + nametext_size, pos.y - 54, Color(153, 153, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP, 1, Color(0, 0, 0, 255))

                draw.SimpleTextOutlined("Health: ", "ESPFont_Info", pos.x - ((health_info_size + health_value_size) / 2), pos.y - 54 + 15, Color(255, 255, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP, 1, Color(0, 0, 0, 255))
                draw.SimpleTextOutlined(health, "ESPFont_Info", pos.x - ((health_info_size + health_value_size) / 2) + health_info_size, pos.y - 54 + 15, Color(204, 204, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP, 1, Color(0, 0, 0, 255))

                draw.SimpleTextOutlined("Distance: ", "ESPFont_Info", pos.x - ((dist_info_size + dist_value_size) / 2), pos.y - 54 + 15 + 11, Color(255, 255, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP, 1, Color(0, 0, 0, 255))
                draw.SimpleTextOutlined(dist, "ESPFont_Info", pos.x - ((dist_info_size + dist_value_size) / 2) + dist_info_size, pos.y - 54 + 15 + 11, Color(204, 204, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP, 1, Color(0, 0, 0, 255))

                draw.SimpleTextOutlined("Weapon: ", "ESPFont_Info", pos.x - ((weapon_info_size + weapon_value_size) / 2), pos.y - 54 + 15 + 11 + 11, Color(255, 255, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP, 1, Color(0, 0, 0, 255))
                draw.SimpleTextOutlined(weapon, "ESPFont_Info", pos.x - ((weapon_info_size + weapon_value_size) / 2) + weapon_info_size, pos.y - 54 + 15 + 11 + 11, Color(204, 204, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP, 1, Color(0, 0, 0, 255))
            else
                draw.SimpleText(nick, "ESPFont_Name", pos.x - ((nametext_size + ranktext_size) / 2), pos.y - 54, Color(204, 102, 102, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP)
                draw.SimpleText(rank, "ESPFont_Rank", pos.x - ((nametext_size + ranktext_size) / 2) + nametext_size, pos.y - 54, Color(153, 153, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP)

                draw.SimpleText("Health: ", "ESPFont_Info", pos.x - ((health_info_size + health_value_size) / 2), pos.y - 54 + 15, Color(255, 255, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP)
                draw.SimpleText(health, "ESPFont_Info", pos.x - ((health_info_size + health_value_size) / 2) + health_info_size, pos.y - 54 + 15, Color(204, 204, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP)

                draw.SimpleText("Distance: ", "ESPFont_Info", pos.x - ((dist_info_size + dist_value_size) / 2), pos.y - 54 + 15 + 11, Color(255, 255, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP, 1)
                draw.SimpleText(dist, "ESPFont_Info", pos.x - ((dist_info_size + dist_value_size) / 2) + dist_info_size, pos.y - 54 + 15 + 11, Color(204, 204, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP, 1)

                draw.SimpleText("Weapon: ", "ESPFont_Info", pos.x - ((weapon_info_size + weapon_value_size) / 2), pos.y - 54 + 15 + 11 + 11, Color(255, 255, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP, 1)
                draw.SimpleText(weapon, "ESPFont_Info", pos.x - ((weapon_info_size + weapon_value_size) / 2) + weapon_info_size, pos.y - 54 + 15 + 11 + 11, Color(204, 204, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP)
            end
        end
    end
end)

local ESPMaterial = Material("models/shiny")

CreateClientConVar("p_int_esp_drawentities", 1, true, false)
hook.Add("RenderScreenspaceEffects", "INT_ESP_RENDER", function()
    if not GetConVar("p_int_esp_drawentities"):GetBool() then return end
    cam.Start3D(EyePos(), EyeAngles())
        cam.IgnoreZ(true)
            render.SuppressEngineLighting(true)
                SetMaterialOverride(ESPMaterial)
                    render.SetColorModulation(0, 1, 0)
                        render.SetBlend(0.4)
                            for k, v in pairs(player.GetAll()) do
                                if ValidEntity(v) then
                                    if v:Alive() then
                                        v:DrawModel()
                                    end
                                end
                            end
                        render.SetBlend(1)
                    render.SetColorModulation(1, 1, 1)
                SetMaterialOverride()
            render.SuppressEngineLighting(false)
        cam.IgnoreZ(false)
    cam.End3D()
end)

local BarrelhackMaterial = Material("effects/laser1")

CreateClientConVar("p_int_barrelhack", 1, true, false)
hook.Add("RenderScreenspaceEffects", "INT_BARRELHACK_RENDER", function()
    if not GetConVar("p_int_barrelhack"):GetBool() then return end
    cam.Start3D(EyePos(), EyeAngles())
        for k, v in pairs(player.GetAll()) do
            if ValidEntity(v) then
                local tr = v:GetEyeTrace()
                if tr != nil then
                    local hitpos = tr.HitPos
                    if hitpos != nil then
                        local muzzlepos = v:EyePos()
                        local vm = v:GetViewModel()
                        local pos = v:EyePos()
                        if ValidEntity(vm) then
                            local attachId = vm:LookupAttachment("muzzle")
                            if attachId == 0 then
                                attachId = vm:LookupAttachment("1")
                            end

                            if vm:GetAttachment(attachId) != nil then
                                pos = vm:GetAttachment(attachId).Pos
                            end
                        else
                            muzzlepos = v:EyePos()
                        end
                        render.SetMaterial(BarrelhackMaterial)
                        render.DrawBeam(muzzlepos, hitpos, 10, 1, 1, Color(255, 0, 0, 255))
                    end
                end
            end
        end
    cam.End3D()
end)

CreateClientConVar("p_int_crosshair", 1, true, false)
CreateClientConVar("p_int_crosshairinfo", 1, true, false)
hook.Add("HUDPaint", "INT_ESP_CROSSHAIR", function()
    if not GetConVar("p_int_crosshair"):GetBool() then return end
    cam.Start3D(EyePos(), EyeAngles())
        cam.Start2D()
            local pos = LocalPlayer():GetEyeTrace().HitPos
            local dist = math.Round(EyePos():Distance(pos))
            local screenpos = pos:ToScreen()

            surface.SetDrawColor(Color(255, 0, 0))
            surface.DrawLine(screenpos.x - 15 - (dist / 500), screenpos.y, screenpos.x - 5 - (dist / 1000), screenpos.y)
            surface.DrawLine(screenpos.x + 15 + (dist / 500), screenpos.y, screenpos.x + 5 + (dist / 1000), screenpos.y)
            surface.DrawLine(screenpos.x, screenpos.y - 15 - (dist / 500), screenpos.x, screenpos.y - 5 - (dist / 1000))
            surface.DrawLine(screenpos.x, screenpos.y + 15 + (dist / 500), screenpos.x, screenpos.y + 5 + (dist / 1000))
        cam.End2D()
    cam.End3D()
end)

local XRay_Ents = {}
local XRay_Material = Material("models/shiny")

CreateClientConVar("p_int_xray", 1, true, false)
CreateClientConVar("p_int_xray_maxprops", 1, true, false)
hook.Add("OnEntityCreated", "INT_XRAY_ADDPROP", function(ent)
    if ValidEntity(ent) then
        if ent:GetClass() == "prop_physics" then
            if #XRay_Ents + 1 < GetConVar("p_int_xray_maxprops"):GetInt() then
                XRay_Ents[1] = ent
            else
                table.insert(XRay_Ents, ent)
            end
        end
    end
end)

hook.Add("RenderScreenspaceEffects", "INT_XRAY_RENDER", function()
    if not GetConVar("p_int_xray"):GetBool() then if #XRay_Ents > 0 then XRay_Ents = {} end return end
    cam.Start3D(EyePos(), EyeAngles())
        cam.IgnoreZ(true)
            render.SuppressEngineLighting(true)
                SetMaterialOverride(ESPMaterial)
                    render.SetColorModulation(1, 0, 0)
                        render.SetBlend(0.4)
                            for k, v in pairs(XRay_Ents) do
                                if ValidEntity(v) then
                                    v:DrawModel()
                                else
                                    table.remove(XRay_Ents, k)
                                end
                            end
                        render.SetBlend(1)
                    render.SetColorModulation(1, 1, 1)
                SetMaterialOverride()
            render.SuppressEngineLighting(false)
        cam.IgnoreZ(false)
    cam.End3D()
end)

local ab_on = false
local ab_target
local ab_firemode = 0

CreateClientConVar("p_int_aimbot_autofire", 1, true, false)
CreateClientConVar("p_int_aimbot_maxangle", 360, true, false)
CreateClientConVar("p_int_aimbot_targetsteamfriends", 0, true, false)

concommand.Add("+int_aimbot", function() ab_on = true end)
concommand.Add("-int_aimbot", function() ab_on = false if GetConVar("p_int_aimbot_autofire"):GetBool() then ab_target = nil RunConsoleCommand("-attack") end ab_firemode = 0 end)

local function GetABTarget()
    local targets = {}
    for k, v in pairs(player.GetAll()) do
        if ValidEntity(v) then
            local valid = true
            local headpos = v:EyePos()
                if v:GetBonePosition(6) != nil then
                    headpos = v:GetBonePosition(6)
                end
            if not v:Alive() then valid = false end
            local tr_data = {}
                tr_data.start = EyePos()
                tr_data.endpos = headpos
                tr_data.mask = MASK_SHOT
                tr_data.filter = LocalPlayer()
            local tr = util.TraceLine(tr_data)
                if tr.Entity != v then
                    valid = false
                end

            if not GetConVar("p_int_aimbot_targetsteamfriends"):GetBool() then
                if v:GetFriendStatus() == "friend" then
                    valid = false
                end
            end

            if valid then
                local ang = (headpos - EyePos()):Angle()
                    ang.p = 0
                local eyeang = EyeAngles()
                    eyeang.p = 0
                local dist = eyeang:Forward():Distance(ang:Forward()) * 90

                if dist <= GetConVar("p_int_aimbot_maxangle"):GetFloat() then
                    table.insert(targets, {ply = v, ang = dist})
                end
            end
        end
    end

    if #targets <= 0 then return end
    table.SortByMember(targets, "ang", function(a, b) return a > b end)

    if ValidEntity(targets[1].ply) then
        ab_target = targets[1].ply
    end
end

hook.Add("HUDPaint", "INT_AIMBOT_HUD", function()
    if not ab_on then return end

    local x = ScrW() / 2
    local y = (ScrH() / 2) + 70

    local curtime = math.sin(CurTime() * 4)
    if curtime < 0 then curtime = -curtime end

    if ValidEntity(ab_target) then
        local headpos = ab_target:EyePos()
            if ab_target:GetBonePosition(6) != nil then
                headpos = ab_target:GetBonePosition(6)
            end
        local pos = headpos
            pos = pos:ToScreen()
        draw.SimpleText("Locked-on " .. ab_target:Nick() .. "!", "AimbotFont_Scan", x, y, Color(curtime * 160, 255, curtime * 160), TEXT_ALIGN_CENTER, TEXT_ALIGN_TOP)
        surface.SetDrawColor(Color(0, 255, 0, 255))
        surface.DrawOutlinedRect(pos.x - 5, pos.y - 5, 10, 10)
    else
        draw.SimpleText("Scanning for targets...", "AimbotFont_Scan", x, y, Color(255, curtime * 160, curtime * 160), TEXT_ALIGN_CENTER, TEXT_ALIGN_TOP)
    end
end)

hook.Add("Think", "INT_AIMBOT_THINK", function()
    if not ab_on then return end
    local valid = false
    if ValidEntity(ab_target) then
        if ab_target:Alive() then
            local headpos = ab_target:EyePos()
                if ab_target:GetBonePosition(6) != nil then
                    headpos = ab_target:GetBonePosition(6)
                end
            local tr_data = {}
                tr_data.start = EyePos()
                tr_data.endpos = headpos
                tr_data.mask = MASK_SHOT
                tr_data.filter = LocalPlayer()
            local tr = util.TraceLine(tr_data)
                if tr.Entity == ab_target then
                    valid = true
                else
                    if GetConVar("p_int_aimbot_autofire"):GetBool() then RunConsoleCommand("-attack") end
                    ab_target = nil
                end
        else
            if GetConVar("p_int_aimbot_autofire"):GetBool() then RunConsoleCommand("-attack") end
            ab_target = nil
        end
    else
        if GetConVar("p_int_aimbot_autofire"):GetBool() then RunConsoleCommand("-attack") end
        ab_target = nil
    end

    if valid then
        local headpos = ab_target:EyePos()
            if ab_target:GetBonePosition(6) != nil then
                headpos = ab_target:GetBonePosition(6)
            end
        LocalPlayer():SetEyeAngles((headpos - EyePos()):Angle())
        if GetConVar("p_int_aimbot_autofire"):GetBool() then
            if ab_firemode == 0 then
                RunConsoleCommand("+attack")
                ab_firemode = 1
            else
                RunConsoleCommand("-attack")
                ab_firemode = 0
            end
        end
    else
        GetABTarget()
    end
end)

concommand.Add("int_rotate", function() LocalPlayer():SetEyeAngles(Angle(EyeAngles().p, EyeAngles().y - 180, 0)) end)

local bhop_on = false
hook.Add("Tick", "INT_BHOP", function() if bhop_on then if LocalPlayer():IsOnGround() then RunConsoleCommand("+jump") else RunConsoleCommand("-jump") end end end)
concommand.Add("+int_bhop", function() bhop_on = true end)
concommand.Add("-int_bhop", function() bhop_on = false RunConsoleCommand("-jump") end)

concommand.Add("int_help", function()
    local messages =
    {
        "\nIntegra Pocket Version Help 1.0 by Anthr4X ran.",
        "This is the small, reduced functionality version ported to work with pp_PixelRender, but roughly the selected features looks the same.",
        "Enjoy the wallhacking and aimbotting :)",
        "\nFull command/ConVar list:",
        "p_int_aimbot_autofire - If on, when you aimbot you will automatically shoot.",
        "p_int_aimbot_maxangle - The maximum angle to target a player in aimbot (180 is behind you, 90 is to your sides).",
        "p_int_aimbot_targetsteamfriends - If on, you will target steam friends, otherwise not.",
        "p_int_barrelhack - If on, it will draw a beam for every player from where they are to where they look.",
        "p_int_crosshair - If on, will draw the crosshair.",
        "p_int_crosshairinfo - If on, will draw distance under the crosshair.",
        "p_int_esp - If on, enables the wallhack.",
        "p_int_esp_drawentities - If on, will render the player through walls with a green material.",
        "p_int_esp_outlinedtext - If on, enables outlined text for the wallhack, turn off if it lags.",
        "p_int_xray - If on, will enable the X-Ray vision (Seeing props through walls).",
        "p_int_xray_maxprops - The maximum amount of props you will render through the wall (Lower it if it lags).",
        "\nint_rotate - Rotates you backwards 180 degrees.",
        "int_help - Shows this text.",
        "+int_aimbot - Bind a key to this (eg \"bind mouse3 +int_aimbot\") and hold the key/mouse button down to aimbot.",
        "+int_bhop - Bind a key to this (eg \"bind space +int_bhop\") and keep held down to instantly jump when you land (Keeps speed)."
    }
    for k, v in pairs(messages) do
        MsgN(v)
    end
end)