--[[
	WARNING: Heads up! This script has not been verified by ScriptBlox. Use at your own risk!
]]
local Players = game:GetService("Players")
local Workspace = game:GetService("Workspace")
local RunService = game:GetService("RunService")
local LocalPlayer = Players.LocalPlayer

local CT_COLOR = Color3.fromRGB(100, 150, 255)
local T_COLOR  = Color3.fromRGB(255, 80, 80)
local LOW_HP   = Color3.fromRGB(255, 64, 64)
local HIGH_HP  = Color3.fromRGB(64, 255, 64)

local function NormalizeTeam(raw)
    local s = string.lower(tostring(raw or "")):gsub("[%s_]+", "")
    if s == "counter-terrorists" or s == "counterterrorists" or s == "ct" then return "CT" end
    if s == "terrorists" or s == "terrorist" or s == "t" then return "T" end
    return nil
end

local function GetTeam(plr)
    if not plr then return nil end
    local fromAttr = NormalizeTeam(plr:GetAttribute("Team"))
    if fromAttr then return fromAttr end
    local teamObj = plr.Team
    if typeof(teamObj) == "Instance" then return NormalizeTeam(teamObj.Name) end
    return NormalizeTeam(teamObj)
end

local function IsPlaying(team)
    return team == "CT" or team == "T"
end

local function GetChar(plr)
    if not plr then return nil end
    local c = plr.Character
    if c and c:FindFirstChildOfClass("Humanoid") then return c end
    local chars = Workspace:FindFirstChild("Characters")
    if chars then
        local named = chars:FindFirstChild(plr.Name)
        if named and named:IsA("Model") and named:FindFirstChildOfClass("Humanoid") then return named end
    end
    return c
end

local function GetRoot(char)
    if not char then return nil end
    return char:FindFirstChild("HumanoidRootPart")
        or char:FindFirstChild("UpperTorso")
        or char:FindFirstChild("Torso")
end

local function MakeSquare(color, thickness, filled)
    local s = Drawing.new("Square")
    s.Color = color or Color3.new(1,1,1)
    s.Thickness = thickness or 1
    s.Filled = filled or false
    s.Visible = false
    return s
end

local Cache = {}

local function GetCache(plr)
    if Cache[plr] then return Cache[plr] end
    local c = {}
    c.BoxOutline = MakeSquare(Color3.new(0,0,0), 3, false)
    c.Box       = MakeSquare(Color3.new(1,1,1), 1.5, false)
    c.HpBG      = MakeSquare(Color3.new(0,0,0), 1, true)
    c.HpBar     = MakeSquare(HIGH_HP, 1, true)
    c.All = { c.BoxOutline, c.Box, c.HpBG, c.HpBar }
    Cache[plr] = c
    return c
end

local function HideAll(c)
    for _, d in ipairs(c.All) do d.Visible = false end
end

local function DestroyCache(plr)
    local c = Cache[plr]
    if not c then return end
    for _, d in ipairs(c.All) do pcall(d.Remove, d) end
    Cache[plr] = nil
end

local function GetBounds(char)
    local root = GetRoot(char)
    if not root then return nil end
    local head = char:FindFirstChild("Head")
    local rootPos = root.Position

    local topY
    if head then
        topY = math.max(head.Position.Y + head.Size.Y * 0.5, rootPos.Y + 3)
    else
        topY = rootPos.Y + 3
    end

    local lFoot = char:FindFirstChild("LeftFoot") or char:FindFirstChild("LeftLowerLeg") or char:FindFirstChild("Left Leg")
    local botY = lFoot and (lFoot.Position.Y - lFoot.Size.Y * 0.5) or (rootPos.Y - 3)

    local height = math.max(topY - botY, 1)
    local centerY = (topY + botY) * 0.5
    local cf = CFrame.new(rootPos.X, centerY, rootPos.Z)
    return cf, Vector3.new(4, height, 4)
end

local function ProjectBox(camera, cf, size)
    local hx, hy, hz = size.X*0.5, size.Y*0.5, size.Z*0.5
    local corners = {
        cf*Vector3.new(-hx, hy,-hz), cf*Vector3.new( hx, hy,-hz),
        cf*Vector3.new( hx, hy, hz), cf*Vector3.new(-hx, hy, hz),
        cf*Vector3.new(-hx,-hy,-hz), cf*Vector3.new( hx,-hy,-hz),
        cf*Vector3.new( hx,-hy, hz), cf*Vector3.new(-hx,-hy, hz),
    }
    local minX, minY = math.huge, math.huge
    local maxX, maxY = -math.huge, -math.huge
    local vp = camera.ViewportSize
    local visible = 0
    for _, corner in ipairs(corners) do
        local p, on = camera:WorldToViewportPoint(corner)
        if p.Z > 0 then
            visible = visible + 1
            local cx = math.clamp(p.X, 0, vp.X)
            local cy = math.clamp(p.Y, 0, vp.Y)
            if cx < minX then minX = cx end
            if cy < minY then minY = cy end
            if cx > maxX then maxX = cx end
            if cy > maxY then maxY = cy end
        end
    end
    if visible == 0 then return nil end
    return minX, minY, maxX, maxY
end

local MAX_DIST = 2500

local conn
conn = RunService.RenderStepped:Connect(function()
    local camera = Workspace.CurrentCamera
    if not camera then return end
    local camPos = camera.CFrame.Position
    local myTeam = GetTeam(LocalPlayer)

    for _, plr in ipairs(Players:GetPlayers()) do
        if plr == LocalPlayer then continue end

        local c = GetCache(plr)
        local team = GetTeam(plr)
        if not IsPlaying(team) then HideAll(c); continue end

        -- team check: не рисовать союзников
        if IsPlaying(myTeam) and myTeam == team then HideAll(c); continue end

        local char = GetChar(plr)
        if not char then HideAll(c); continue end
        local hum = char:FindFirstChildOfClass("Humanoid")
        if not hum or hum.Health <= 0 then HideAll(c); continue end
        if char:GetAttribute("Dead") == true then HideAll(c); continue end

        local root = GetRoot(char)
        if not root then HideAll(c); continue end
        if (camPos - root.Position).Magnitude > MAX_DIST then HideAll(c); continue end

        local cf, sz = GetBounds(char)
        if not cf then HideAll(c); continue end

        local minX, minY, maxX, maxY = ProjectBox(camera, cf, sz)
        if not minX then HideAll(c); continue end

        local w = maxX - minX
        local h = maxY - minY
        if w < 1 or h < 1 then HideAll(c); continue end

        local color = (team == "CT") and CT_COLOR or T_COLOR

        -- Box
        c.BoxOutline.Position = Vector2.new(minX - 1, minY - 1)
        c.BoxOutline.Size     = Vector2.new(w + 2, h + 2)
        c.BoxOutline.Visible  = true

        c.Box.Color    = color
        c.Box.Position = Vector2.new(minX, minY)
        c.Box.Size     = Vector2.new(w, h)
        c.Box.Visible  = true

        -- Health bar
        local maxHP = math.max(hum.MaxHealth, 1)
        local pct   = math.clamp(hum.Health / maxHP, 0, 1)
        local barH  = math.max(1, h)
        local filled = barH * pct
        local barX   = minX - 6

        c.HpBG.Position = Vector2.new(barX - 1, minY - 1)
        c.HpBG.Size     = Vector2.new(4, barH + 2)
        c.HpBG.Visible  = true

        c.HpBar.Position = Vector2.new(barX, maxY - filled)
        c.HpBar.Size     = Vector2.new(2, filled)
        c.HpBar.Color    = LOW_HP:Lerp(HIGH_HP, pct)
        c.HpBar.Visible  = true
    end
end)

Players.PlayerRemoving:Connect(DestroyCache)