local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local LocalPlayer = Players.LocalPlayer

-- Кэширование функций для стабильности
local task_wait = task.wait
local Vector3_new = Vector3.new
local ipairs = ipairs

-- Состояния кнопок меню
local EspComponentV_Active = false
local EspPlayers_Active = false
local FlingHomelander_Active = false

----------------------------------------------------
-- СОЗДАНИЕ ГРАФИЧЕСКОГО ИНТЕРФЕЙСА (GUI)
----------------------------------------------------
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "UltimateV6_CleanFling_Gui"
ScreenGui.ResetOnSpawn = false
ScreenGui.Parent = game:GetService("CoreGui")

local MainFrame = Instance.new("Frame")
MainFrame.Size = UDim2.new(0, 260, 0, 220)
MainFrame.Position = UDim2.new(0.5, -130, 0.4, -110)
MainFrame.BackgroundColor3 = Color3.fromRGB(25, 25, 25)
MainFrame.BorderSizePixel = 0
MainFrame.Active = true
MainFrame.Draggable = true
MainFrame.Parent = ScreenGui

local uiCornerMain = Instance.new("UICorner")
uiCornerMain.CornerRadius = UDim.new(0, 6)
uiCornerMain.Parent = MainFrame

local Title = Instance.new("TextLabel")
Title.Size = UDim2.new(1, 0, 0, 35)
Title.BackgroundColor3 = Color3.fromRGB(35, 35, 35)
Title.Text = "V-Serum Menu V6"
Title.TextColor3 = Color3.fromRGB(255, 255, 255)
Title.Font = Enum.Font.SourceSansBold
Title.TextSize = 16
Title.Parent = MainFrame

local uiCornerTitle = Instance.new("UICorner")
uiCornerTitle.CornerRadius = UDim.new(0, 6)
uiCornerTitle.Parent = Title

local function createToggle(name, text, pos)
    local button = Instance.new("TextButton")
    button.Name = name
    button.Size = UDim2.new(1, -20, 0, 40)
    button.Position = UDim2.new(0, 10, 0, pos)
    button.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
    button.Text = text .. " (ВЫКЛ)"
    button.TextColor3 = Color3.fromRGB(200, 200, 200)
    button.Font = Enum.Font.SourceSansBold
    button.TextSize = 15
    button.Parent = MainFrame

    local corner = Instance.new("UICorner")
    corner.CornerRadius = UDim.new(0, 4)
    corner.Parent = button
    return button
end

local ToggleV = createToggle("ToggleV", "1. ESP - ComponentV", 50)
local TogglePlayers = createToggle("TogglePlayers", "2. ESP - Players (Chams)", 100)
local ToggleFling = createToggle("ToggleFling", "3. Fling Homelander", 150)

----------------------------------------------------
-- 1. ЛОГИКА ESP СЫВОРОТКИ (ComponentV)
----------------------------------------------------
local function createStaticESP(item)
    if not item:IsA("Instance") or item:FindFirstChild("StaticESP") then return end
    local billboard = Instance.new("BillboardGui")
    billboard.Name = "StaticESP"
    billboard.Size = UDim2.new(0, 130, 0, 30)
    billboard.AlwaysOnTop = true
    billboard.ExtentsOffset = Vector3_new(0, 1.5, 0)
    billboard.Adornee = item
    billboard.Parent = item

    local frame = Instance.new("Frame")
    frame.Size = UDim2.new(1, 0, 1, 0)
    frame.BackgroundColor3 = Color3.fromRGB(20, 20, 20)
    frame.BackgroundTransparency = 0.5
    frame.BorderSizePixel = 0
    frame.Parent = billboard

    local uiCorner = Instance.new("UICorner")
    uiCorner.CornerRadius = UDim.new(0, 4)
    uiCorner.Parent = frame

    local nameLabel = Instance.new("TextLabel")
    nameLabel.Size = UDim2.new(1, 0, 1, 0)
    nameLabel.BackgroundTransparency = 1
    nameLabel.Text = item.Name
    nameLabel.TextColor3 = Color3.fromRGB(255, 255, 100)
    nameLabel.Font = Enum.Font.SourceSansBold
    nameLabel.TextSize = 14
    nameLabel.Parent = frame
end

local function removeAllStaticESP()
    local success, targetFolder = pcall(function()
        return workspace.Maps.Map1.RoundTempVPickups
    end)
    if success and targetFolder then
        for _, item in ipairs(targetFolder:GetChildren()) do
            local esp = item:FindFirstChild("StaticESP")
            if esp then esp:Destroy() end
        end
    end
end

task.spawn(function()
    local currentConnection = nil
    while true do
        if EspComponentV_Active then
            local success, targetFolder = pcall(function()
                return workspace.Maps.Map1.RoundTempVPickups
            end)
            
            if success and targetFolder then
                for _, item in ipairs(targetFolder:GetChildren()) do
                    createStaticESP(item)
                end
                
                if not currentConnection then
                    currentConnection = targetFolder.ChildAdded:Connect(function(item)
                        task_wait(0.05)
                        if EspComponentV_Active and item and item.Parent then
                            createStaticESP(item)
                        end
                    end)
                end
            end
        else
            if currentConnection then
                currentConnection:Disconnect()
                currentConnection = nil
            end
            removeAllStaticESP()
        end
        task_wait(0.5)
    end
end)

----------------------------------------------------
-- 2. ЛОГИКА ESP ИГРОКОВ (HIGHLIGHT + ТЕКСТ)
----------------------------------------------------
local function applyPlayerESP(char, player)
    local highlight = char:FindFirstChild("PlayerHighlight")
    if not highlight then
        highlight = Instance.new("Highlight")
        highlight.Name = "PlayerHighlight"
        highlight.FillColor = Color3.fromRGB(0, 255, 100)
        highlight.FillTransparency = 0.5
        highlight.OutlineColor = Color3.fromRGB(255, 255, 255)
        highlight.OutlineTransparency = 0.2
        highlight.Adornee = char
        highlight.Parent = char
    end

    local head = char:FindFirstChild("Head")
    if head and not head:FindFirstChild("PlayerTextESP") then
        local billboard = Instance.new("BillboardGui")
        billboard.Name = "PlayerTextESP"
        billboard.Size = UDim2.new(0, 100, 0, 20)
        billboard.AlwaysOnTop = true
        billboard.ExtentsOffset = Vector3_new(0, 2.5, 0)
        billboard.Adornee = head
        billboard.Parent = head

        local nameLabel = Instance.new("TextLabel")
        nameLabel.Size = UDim2.new(1, 0, 1, 0)
        nameLabel.BackgroundTransparency = 1
        nameLabel.Text = player.Name
        nameLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
        nameLabel.TextStrokeTransparency = 0
        nameLabel.Font = Enum.Font.SourceSansBold
        nameLabel.TextSize = 12
        nameLabel.Parent = billboard
    end
end

local function removePlayerESP(char)
    local highlight = char:FindFirstChild("PlayerHighlight")
    if highlight then highlight:Destroy() end
    
    local head = char:FindFirstChild("Head")
    if head then
        local textEsp = head:FindFirstChild("PlayerTextESP")
        if textEsp then textEsp:Destroy() end
    end
end

task.spawn(function()
    while true do
        if EspPlayers_Active then
            for _, player in ipairs(Players:GetPlayers()) do
                if player ~= LocalPlayer and player.Character then
                    local char = player.Character
                    local role = char:GetAttribute("RoundRole")
                    
                    local hasValidRole = (role ~= nil and role ~= "" and role ~= "Homelander" and role ~= "Eliminated")

                    if hasValidRole then
                        applyPlayerESP(char, player)
                    else
                        removePlayerESP(char)
                    end
                end
            end
        else
            for _, player in ipairs(Players:GetPlayers()) do
                if player.Character then removePlayerESP(player.Character) end
            end
        end
        task_wait(0.3)
    end
end)

----------------------------------------------------
-- 3. ОРИГИНАЛЬНАЯ ЛОГИКА FLING (ИЗ ВАШЕГО TXT-ФАЙЛА)
----------------------------------------------------
getgenv().OldPos = nil
getgenv().FPDH = workspace.FallenPartsDestroyHeight

local function SkidFling(TargetPlayer)
    local Character = LocalPlayer.Character
    local Humanoid = Character and Character:FindFirstChildOfClass("Humanoid")
    local RootPart = Humanoid and Humanoid.RootPart
    local TCharacter = TargetPlayer.Character
    if not TCharacter then return end
    
    local THumanoid
    local TRootPart
    local THead
    local Accessory
    local Handle
    if TCharacter:FindFirstChildOfClass("Humanoid") then
        THumanoid = TCharacter:FindFirstChildOfClass("Humanoid")
    end
    if THumanoid and THumanoid.RootPart then
        TRootPart = THumanoid.RootPart
    end
    if TCharacter:FindFirstChild("Head") then
        THead = TCharacter.Head
    end
    if TCharacter:FindFirstChildOfClass("Accessory") then
        Accessory = TCharacter:FindFirstChildOfClass("Accessory")
    end
    if Accessory and Accessory:FindFirstChild("Handle") then
        Handle = Accessory.Handle
    end
    
    if Character and Humanoid and RootPart then
        if RootPart.Velocity.Magnitude < 50 then
            getgenv().OldPos = RootPart.CFrame
        end
        
        if THead then
            workspace.CurrentCamera.CameraSubject = THead
        elseif Handle then
            workspace.CurrentCamera.CameraSubject = Handle
        elseif THumanoid and TRootPart then
            workspace.CurrentCamera.CameraSubject = THumanoid
        end
        
        if not TCharacter:FindFirstChildWhichIsA("BasePart") then
            return
        end
        
        local FPos = function(BasePart, Pos, Ang)
            RootPart.CFrame = CFrame.new(BasePart.Position) * Pos * Ang
            Character:SetPrimaryPartCFrame(CFrame.new(BasePart.Position) * Pos * Ang)
            RootPart.Velocity = Vector3.new(9e7, 9e7 * 10, 9e7)
            RootPart.RotVelocity = Vector3.new(9e8, 9e8, 9e8)
        end
        
        local SFBasePart = function(BasePart)
            local TimeToWait = 2
            local Time = tick()
            local Angle = 0
            repeat
                if RootPart and THumanoid then
                    if BasePart.Velocity.Magnitude < 50 then
                        Angle = Angle + 100
                        FPos(BasePart, CFrame.new(0, 1.5, 0) + THumanoid.MoveDirection * BasePart.Velocity.Magnitude / 1.25, CFrame.Angles(math.rad(Angle),0 ,0))
                        task.wait()
                        FPos(BasePart, CFrame.new(0, -1.5, 0) + THumanoid.MoveDirection * BasePart.Velocity.Magnitude / 1.25, CFrame.Angles(math.rad(Angle), 0, 0))
                        task.wait()
                        FPos(BasePart, CFrame.new(0, 1.5, 0) + THumanoid.MoveDirection * BasePart.Velocity.Magnitude / 1.25, CFrame.Angles(math.rad(Angle),0 ,0))
                        task.wait()
                        FPos(BasePart, CFrame.new(0, -1.5, 0) + THumanoid.MoveDirection * BasePart.Velocity.Magnitude / 1.25, CFrame.Angles(math.rad(Angle), 0, 0))
                        task.wait()
                        FPos(BasePart, CFrame.new(0, 1.5, 0) + THumanoid.MoveDirection, CFrame.Angles(math.rad(Angle),0 ,0))
                        task.wait()
                        FPos(BasePart, CFrame.new(0, -1.5, 0) + THumanoid.MoveDirection, CFrame.Angles(math.rad(Angle), 0, 0))
                        task.wait()
                    else
                        FPos(BasePart, CFrame.new(0, 1.5, THumanoid.WalkSpeed), CFrame.Angles(math.rad(90), 0, 0))
                        task.wait()
                        FPos(BasePart, CFrame.new(0, -1.5, -THumanoid.WalkSpeed), CFrame.Angles(0, 0, 0))
                        task.wait()
                        FPos(BasePart, CFrame.new(0, 1.5, THumanoid.WalkSpeed), CFrame.Angles(math.rad(90), 0, 0))
                        task.wait()
                        FPos(BasePart, CFrame.new(0, -1.5, 0), CFrame.Angles(math.rad(90), 0, 0))
                        task.wait()
                        FPos(BasePart, CFrame.new(0, -1.5, 0), CFrame.Angles(0, 0, 0))
                        task.wait()
                        FPos(BasePart, CFrame.new(0, -1.5, 0), CFrame.Angles(math.rad(90), 0, 0))
                        task.wait()
                        FPos(BasePart, CFrame.new(0, -1.5, 0), CFrame.Angles(0, 0, 0))
                        task.wait()
                    end
                end
            until Time + TimeToWait < tick() or not FlingHomelander_Active
        end
        
        workspace.FallenPartsDestroyHeight = 0/0
        
        local BV = Instance.new("BodyVelocity")
        BV.Parent = RootPart
        BV.Velocity = Vector3.new(0, 0, 0)
        BV.MaxForce = Vector3.new(9e9, 9e9, 9e9)
        
        Humanoid:SetStateEnabled(Enum.HumanoidStateType.Seated, false)
        
        if TRootPart then
            SFBasePart(TRootPart)
        elseif THead then
            SFBasePart(THead)
        elseif Handle then
            SFBasePart(Handle)
        end
        
        BV:Destroy()
        Humanoid:SetStateEnabled(Enum.HumanoidStateType.Seated, true)
        workspace.CurrentCamera.CameraSubject = Humanoid
        
        if getgenv().OldPos then
            repeat
                RootPart.CFrame = getgenv().OldPos * CFrame.new(0, .5, 0)
                Character:SetPrimaryPartCFrame(getgenv().OldPos * CFrame.new(0, .5, 0))
                Humanoid:ChangeState("GettingUp")
                for _, part in pairs(Character:GetChildren()) do
                    if part:IsA("BasePart") then
                        part.Velocity, part.RotVelocity = Vector3.new(), Vector3.new()
                    end
                end
                task.wait()
            until (RootPart.Position - getgenv().OldPos.p).Magnitude < 25
            workspace.FallenPartsDestroyHeight = getgenv().FPDH
        end
    end
end

task.spawn(function()
    while true do
        if FlingHomelander_Active then
            local targetFound = nil
            for _, p in ipairs(Players:GetPlayers()) do
                if p ~= LocalPlayer and p.Character then
                    if p.Character:GetAttribute("RoundRole") == "Homelander" then
                        local root = p.Character:FindFirstChild("HumanoidRootPart")
                        if root and math.abs(root.Velocity.Y) < 5 then
                            targetFound = p
                            break
                        end
                    end
                end
            end
            if targetFound then
                SkidFling(targetFound)
            end
        end
        task_wait(0.5)
    end
end)

----------------------------------------------------
-- ОБРАБОТЧИКИ НАЖАТИЙ КНОПОК
----------------------------------------------------
ToggleV.MouseButton1Click:Connect(function()
    EspComponentV_Active = not EspComponentV_Active
    if EspComponentV_Active then
        ToggleV.Text = "1. ESP - ComponentV (ВКЛ)"
        ToggleV.BackgroundColor3 = Color3.fromRGB(0, 140, 0)
        ToggleV.TextColor3 = Color3.fromRGB(255, 255, 255)
    else
        ToggleV.Text = "1. ESP - ComponentV (ВЫКЛ)"
        ToggleV.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
        ToggleV.TextColor3 = Color3.fromRGB(200, 200, 200)
    end
end)

TogglePlayers.MouseButton1Click:Connect(function()
    EspPlayers_Active = not EspPlayers_Active
    if EspPlayers_Active then
        TogglePlayers.Text = "2. ESP - Players (ВКЛ)"
        TogglePlayers.BackgroundColor3 = Color3.fromRGB(0, 140, 0)
        TogglePlayers.TextColor3 = Color3.fromRGB(255, 255, 255)
    else
        TogglePlayers.Text = "2. ESP - Players (ВЫКЛ)"
        TogglePlayers.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
        TogglePlayers.TextColor3 = Color3.fromRGB(200, 200, 200)
    end
end)

ToggleFling.MouseButton1Click:Connect(function()
    FlingHomelander_Active = not FlingHomelander_Active
    if FlingHomelander_Active then
        ToggleFling.Text = "3. Fling Homelander (ВКЛ)"
        ToggleFling.BackgroundColor3 = Color3.fromRGB(180, 0, 0)
        ToggleFling.TextColor3 = Color3.fromRGB(255, 255, 255)
    else
        ToggleFling.Text = "3. Fling Homelander (ВЫКЛ)"
        ToggleFling.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
        ToggleFling.TextColor3 = Color3.fromRGB(200, 200, 200)
    end
end)