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

-- Создание главного GUI
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Parent = game.CoreGui

local MainFrame = Instance.new("Frame")
MainFrame.Size = UDim2.new(0, 300, 0, 400)
MainFrame.Position = UDim2.new(0, 50, 0, 50)
MainFrame.BackgroundColor3 = Color3.new(0.2, 0.2, 0.2)
MainFrame.Parent = ScreenGui
MainFrame.ClipsDescendants = true

local ToggleButton = Instance.new("TextButton")
ToggleButton.Size = UDim2.new(0, 300, 0, 30)
ToggleButton.Position = UDim2.new(0, 0, 0, 0)
ToggleButton.BackgroundColor3 = Color3.new(0.3, 0.3, 0.3)
ToggleButton.Text = "Свернуть"
ToggleButton.Parent = MainFrame

-- Вкладки
local Tabs = Instance.new("Frame")
Tabs.Size = UDim2.new(1, 0, 0, 30)
Tabs.Position = UDim2.new(0, 0, 0, 30)
Tabs.BackgroundColor3 = Color3.new(0.3, 0.3, 0.3)
Tabs.Parent = MainFrame

local TPButton = Instance.new("TextButton")
TPButton.Size = UDim2.new(0, 100, 1, 0)
TPButton.Position = UDim2.new(0, 0, 0, 0)
TPButton.Text = "TP"
TPButton.Parent = Tabs

local PlayerButton = Instance.new("TextButton")
PlayerButton.Size = UDim2.new(0, 100, 1, 0)
PlayerButton.Position = UDim2.new(0, 100, 0, 0)
PlayerButton.Text = "Player"
PlayerButton.Parent = Tabs

local UniversalButton = Instance.new("TextButton")
UniversalButton.Size = UDim2.new(0, 100, 1, 0)
UniversalButton.Position = UDim2.new(0, 200, 0, 0)
UniversalButton.Text = "Universal"
UniversalButton.Parent = Tabs

-- Контейнер для содержимого вкладок
local TabContent = Instance.new("Frame")
TabContent.Size = UDim2.new(1, 0, 1, -60)
TabContent.Position = UDim2.new(0, 0, 0, 60)
TabContent.BackgroundTransparency = 1
TabContent.Parent = MainFrame

-- Содержимое вкладки Player
local PlayerFrame = Instance.new("Frame")
PlayerFrame.Size = UDim2.new(1, 0, 1, 0)
PlayerFrame.Visible = false
PlayerFrame.Parent = TabContent

local SpeedInput = Instance.new("TextBox")
SpeedInput.Size = UDim2.new(0, 200, 0, 30)
SpeedInput.Position = UDim2.new(0, 50, 0, 50)
SpeedInput.Text = "16"
SpeedInput.BackgroundColor3 = Color3.new(0.4, 0.4, 0.4)
SpeedInput.TextColor3 = Color3.new(1, 1, 1)
SpeedInput.ClearTextOnFocus = true
SpeedInput.Parent = PlayerFrame

local ApplySpeedButton = Instance.new("TextButton")
ApplySpeedButton.Size = UDim2.new(0, 200, 0, 30)
ApplySpeedButton.Position = UDim2.new(0, 50, 0, 90)
ApplySpeedButton.Text = "Применить скорость"
ApplySpeedButton.BackgroundColor3 = Color3.new(0.4, 0.4, 0.4)
ApplySpeedButton.Parent = PlayerFrame

ApplySpeedButton.MouseButton1Click:Connect(function()
    local speed = tonumber(SpeedInput.Text)
    if speed and LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("Humanoid") then
        LocalPlayer.Character.Humanoid.WalkSpeed = speed
    else
        warn("Ошибка: Проверьте правильность ввода или наличие Humanoid!")
    end
end)

local NoclipButton = Instance.new("TextButton")
NoclipButton.Size = UDim2.new(0, 200, 0, 30)
NoclipButton.Position = UDim2.new(0, 50, 0, 130)
NoclipButton.Text = "Ноклип: Выкл"
NoclipButton.BackgroundColor3 = Color3.new(0.4, 0.4, 0.4)
NoclipButton.Parent = PlayerFrame

local noclip = false
RunService.Stepped:Connect(function()
    if noclip and LocalPlayer.Character then
        for _, part in ipairs(LocalPlayer.Character:GetDescendants()) do
            if part:IsA("BasePart") and part.CanCollide then
                part.CanCollide = false
            end
        end
    end
end)

NoclipButton.MouseButton1Click:Connect(function()
    noclip = not noclip
    NoclipButton.Text = "Ноклип: " .. (noclip and "Вкл" or "Выкл")
end)

-- Содержимое вкладки Universal
local UniversalFrame = Instance.new("Frame")
UniversalFrame.Size = UDim2.new(1, 0, 1, 0)
UniversalFrame.Visible = false
UniversalFrame.Parent = TabContent

local InfiniteYieldButton = Instance.new("TextButton")
InfiniteYieldButton.Size = UDim2.new(0, 200, 0, 30)
InfiniteYieldButton.Position = UDim2.new(0, 50, 0, 50)
InfiniteYieldButton.Text = "Infinite Yield"
InfiniteYieldButton.BackgroundColor3 = Color3.new(0.4, 0.4, 0.4)
InfiniteYieldButton.Parent = UniversalFrame

InfiniteYieldButton.MouseButton1Click:Connect(function()
    loadstring(game:HttpGet("https://raw.githubusercontent.com/EdgeIY/infiniteyield/master/source"))()
end)

local FlyGUIButton = Instance.new("TextButton")
FlyGUIButton.Size = UDim2.new(0, 200, 0, 30)
FlyGUIButton.Position = UDim2.new(0, 50, 0, 90)
FlyGUIButton.Text = "Fly GUI V3"
FlyGUIButton.BackgroundColor3 = Color3.new(0.4, 0.4, 0.4)
FlyGUIButton.Parent = UniversalFrame

FlyGUIButton.MouseButton1Click:Connect(function()
    loadstring(game:HttpGet("https://raw.githubusercontent.com/XNEOFF/FlyGuiV3/main/FlyGuiV3.txt"))()
end)

-- Логика переключения вкладок
local function ShowTab(tab)
    PlayerFrame.Visible = false
    UniversalFrame.Visible = false

    if tab == "Player" then
        PlayerFrame.Visible = true
    elseif tab == "Universal" then
        UniversalFrame.Visible = true
    end
end

PlayerButton.MouseButton1Click:Connect(function() ShowTab("Player") end)
UniversalButton.MouseButton1Click:Connect(function() ShowTab("Universal") end)

-- Логика перемещения окна
local dragging = false
local dragStart, startPos

MainFrame.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.Touch or input.UserInputType == Enum.UserInputType.MouseButton1 then
        dragging = true
        dragStart = input.Position
        startPos = MainFrame.Position
    end
end)

MainFrame.InputChanged:Connect(function(input)
    if dragging and (input.UserInputType == Enum.UserInputType.Touch or input.UserInputType == Enum.UserInputType.MouseMovement) then
        local delta = input.Position - dragStart
        MainFrame.Position = UDim2.new(
            startPos.X.Scale,
            startPos.X.Offset + delta.X,
            startPos.Y.Scale,
            startPos.Y.Offset + delta.Y
        )
    end
end)

MainFrame.InputEnded:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.Touch or input.UserInputType == Enum.UserInputType.MouseButton1 then
        dragging = false
    end
end)

-- Логика сворачивания окна
local isCollapsed = false
ToggleButton.MouseButton1Click:Connect(function()
    isCollapsed = not isCollapsed
    MainFrame.Size = isCollapsed and UDim2.new(0, 300, 0, 30) or UDim2.new(0, 300, 0, 400)
    ToggleButton.Text = isCollapsed and "Развернуть" or "Свернуть"
end)