--[[======================================================
                ADMIN / DEV TEST SCRIPT
                    by Kracer_Wusr

     НАЗНАЧЕНИЕ:

    - Хитбоксы
    - ESP
    - Полёт
    - Телепорт
    - Скорость передвижения
    ------------------------------------------------------
     УПРАВЛЕНИЕ КЛАВИШАМИ:
    ------------------------------------------------------

     ПОЛЁТ:
    [ P ]  — включить / выключить полёт
    [ O ]  — принудительно выключить полёт
    [ W A S D ] — движение в полёте
    [ Space ] — вверх
    [ LeftShift ] — вниз

     ESP (подсветка игроков и мобов):
    [ E ] — включить / выключить ESP
    • Синие — игроки
    • Красные — мобы
    • Отображается дистанция

     ХИТБОКСЫ:

    • Базовый размер задаётся в настройках
    • Авто-обновление каждые 5 секунд (анти-слёт)

     ПЕРЕДВИЖЕНИЕ:
    [ → ] — увеличить WalkSpeed
    [ ← ] — уменьшить WalkSpeed

 

    ------------------------------------------------------
     НАСТРОЙКИ:
    ------------------------------------------------------
    _G.HeadSize        — размер хитбокса
    FLY_SPEED         — скорость полёта
    FLY_ACCEL         — плавность полёта
    WALK_SPEED_STEP   — шаг изменения скорости

======================================================]]

-- =========================
-- Настройки
-- =========================
_G.HeadSize = 150   -- базовый размер хитбокса
_G.Disabled = true

local FLY_SPEED = 60
local FLY_ACCEL = 6
local WALK_SPEED_STEP = 5

local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local RunService = game:GetService("RunService")
local LocalPlayer = Players.LocalPlayer
local MobsFolder = workspace:WaitForChild("Mobs")

local FlyEnabled = false
local CurrentVelocity = Vector3.new()
local ESPEnabled = true

local BillboardGuis = {}

-- =========================
-- Функции для ESP
-- =========================
local function createESP(character, isMob)
    local hrp = character:FindFirstChild("HumanoidRootPart")
    if not hrp then return end

    -- Highlight
    if not character:FindFirstChild("HighlightESP") then
        local highlight = Instance.new("Highlight")
        highlight.Name = "HighlightESP"
        highlight.FillColor = isMob and Color3.fromRGB(255,0,0) or Color3.fromRGB(0,170,255)
        highlight.OutlineColor = Color3.new(0,0,0)
        highlight.FillTransparency = 0.3
        highlight.OutlineTransparency = 0
        highlight.DepthMode = Enum.HighlightDepthMode.AlwaysOnTop
        highlight.Parent = character
        highlight.Adornee = character
    end

    -- BillboardGui
    if not BillboardGuis[character] then
        local billboard = Instance.new("BillboardGui")
        billboard.Name = "ESPBillboard"
        billboard.Adornee = hrp
        billboard.Size = UDim2.new(0,100,0,50)
        billboard.StudsOffset = Vector3.new(0,3,0)
        billboard.AlwaysOnTop = true

        local text = Instance.new("TextLabel")
        text.Size = UDim2.new(1,0,1,0)
        text.BackgroundTransparency = 1
        text.TextColor3 = isMob and Color3.fromRGB(255,0,0) or Color3.fromRGB(0,170,255)
        text.TextScaled = true
        text.Font = Enum.Font.SourceSansBold
        text.Parent = billboard

        billboard.Parent = hrp
        BillboardGuis[character] = text
    end
end

local function updateESP()
    for char,text in pairs(BillboardGuis) do
        if char:FindFirstChild("HumanoidRootPart") and ESPEnabled then
            local dist = (LocalPlayer.Character.HumanoidRootPart.Position - char.HumanoidRootPart.Position).Magnitude
            text.Text = char.Name .. " | " .. math.floor(dist) .. " studs"
            text.Visible = true
        elseif text then
            text.Visible = false
        end
    end
end

-- =========================
-- Хитбоксы
-- =========================
local function applyPropertiesToPart(part)
    if part then
        part.Size = Vector3.new(_G.HeadSize,_G.HeadSize,_G.HeadSize)
        part.Transparency = 0.7
        part.BrickColor = BrickColor.new("Really blue")
        part.Material = Enum.Material.Neon
        part.CanCollide = false
    end
end

local function updateCharacter(character, isMob)
    local hrp = character:FindFirstChild("HumanoidRootPart")
    if hrp then
        applyPropertiesToPart(hrp)
        createESP(character,isMob)
    end
end

-- =========================
-- Телепорт к ближайшему игроку
-- =========================
local function teleportToNearestPlayer()
    if not (LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("HumanoidRootPart")) then return end
    local hrp = LocalPlayer.Character.HumanoidRootPart
    local nearest, nearestDist = nil, math.huge

    for _, p in ipairs(Players:GetPlayers()) do
        if p ~= LocalPlayer and p.Character and p.Character:FindFirstChild("HumanoidRootPart") then
            local dist = (hrp.Position - p.Character.HumanoidRootPart.Position).Magnitude
            if dist < nearestDist then
                nearest = p
                nearestDist = dist
            end
        end
    end

    if nearest and nearest.Character and nearest.Character:FindFirstChild("HumanoidRootPart") then
        hrp.CFrame = CFrame.new(nearest.Character.HumanoidRootPart.Position + Vector3.new(0,5,0))
    end
end

-- =========================
-- Полёт
-- =========================
local function getMoveDirection()
    local hrp = LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("HumanoidRootPart")
    if not hrp then return Vector3.new() end
    local dir = Vector3.new()
    if UserInputService:IsKeyDown(Enum.KeyCode.W) then dir += hrp.CFrame.LookVector end
    if UserInputService:IsKeyDown(Enum.KeyCode.S) then dir -= hrp.CFrame.LookVector end
    if UserInputService:IsKeyDown(Enum.KeyCode.A) then dir -= hrp.CFrame.RightVector end
    if UserInputService:IsKeyDown(Enum.KeyCode.D) then dir += hrp.CFrame.RightVector end
    if UserInputService:IsKeyDown(Enum.KeyCode.Space) then dir += Vector3.new(0,1,0) end
    if UserInputService:IsKeyDown(Enum.KeyCode.LeftShift) then dir -= Vector3.new(0,1,0) end
    return dir.Magnitude > 0 and dir.Unit or Vector3.new()
end

-- =========================
-- Управление клавишами
-- =========================
UserInputService.InputBegan:Connect(function(input, gameProcessed)
    if gameProcessed then return end
    local humanoid = LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("Humanoid")
    if input.KeyCode == Enum.KeyCode.P then
        FlyEnabled = not FlyEnabled
        CurrentVelocity = Vector3.new()
    elseif input.KeyCode == Enum.KeyCode.O then
        FlyEnabled = false
        CurrentVelocity = Vector3.new()
    elseif input.KeyCode == Enum.KeyCode.Equals then
        _G.HeadSize += 5
    elseif input.KeyCode == Enum.KeyCode.Minus then
        _G.HeadSize = math.max(5,_G.HeadSize-5)
    elseif input.KeyCode == Enum.KeyCode.E then
        ESPEnabled = not ESPEnabled
    elseif input.KeyCode == Enum.KeyCode.T then
        teleportToNearestPlayer()
    elseif input.KeyCode == Enum.KeyCode.Right then
        if humanoid then humanoid.WalkSpeed += WALK_SPEED_STEP end
    elseif input.KeyCode == Enum.KeyCode.Left then
        if humanoid then humanoid.WalkSpeed = math.max(16,humanoid.WalkSpeed - WALK_SPEED_STEP) end
    end
end)

-- =========================
-- RenderStepped для полёта и ESP
-- =========================
RunService.RenderStepped:Connect(function(delta)
    if FlyEnabled and LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("HumanoidRootPart") then
        local hrp = LocalPlayer.Character.HumanoidRootPart
        local targetVel = getMoveDirection() * FLY_SPEED
        CurrentVelocity = CurrentVelocity:Lerp(targetVel, delta * FLY_ACCEL)
        hrp.Velocity = CurrentVelocity
    end
    updateESP()
end)

-- =========================
-- Подписка на игроков и мобов
-- =========================
local function setupPlayer(player)
    if player.Character then updateCharacter(player.Character,false) end
    player.CharacterAdded:Connect(function(char) updateCharacter(char,false) end)
end

for _, player in ipairs(Players:GetPlayers()) do setupPlayer(player) end
Players.PlayerAdded:Connect(setupPlayer)

for _, mob in ipairs(MobsFolder:GetChildren()) do updateCharacter(mob,true) end
MobsFolder.ChildAdded:Connect(function(mob) updateCharacter(mob,true) end)

-- =========================
-- Авто-хитбоксы каждые 5 сек
-- =========================
spawn(function()
    while _G.Disabled do
        for _, player in ipairs(Players:GetPlayers()) do
            if player.Character then updateCharacter(player.Character,false) end
        end
        for _, mob in ipairs(MobsFolder:GetChildren()) do
            updateCharacter(mob,true)
        end
        wait(5)
    end
end)