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

-- Создание ScreenGui
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "QAExecutorGUI"
ScreenGui.ResetOnSpawn = false

pcall(function()
    ScreenGui.Parent = CoreGui
end)
if not ScreenGui.Parent then
    ScreenGui.Parent = LocalPlayer:WaitForChild("PlayerGui")
end

-- Главная рамка
local MainFrame = Instance.new("Frame")
MainFrame.Name = "MainFrame"
MainFrame.Size = UDim2.new(0, 420, 0, 320)
MainFrame.Position = UDim2.new(0.5, -210, 0.5, -160)
MainFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
MainFrame.BorderColor3 = Color3.fromRGB(0, 0, 0)
MainFrame.BorderSizePixel = 2
MainFrame.Active = true
MainFrame.Draggable = true
MainFrame.Parent = ScreenGui

-- Шапка (Top Bar)
local TopBar = Instance.new("Frame")
TopBar.Size = UDim2.new(1, 0, 0, 25)
TopBar.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
TopBar.BorderColor3 = Color3.fromRGB(0, 0, 0)
TopBar.BorderSizePixel = 1
TopBar.Parent = MainFrame

local Title = Instance.new("TextLabel")
Title.Size = UDim2.new(1, -30, 1, 0)
Title.Position = UDim2.new(0, 5, 0, 0)
Title.BackgroundTransparency = 1
Title.Text = "qa executor"
Title.TextColor3 = Color3.fromRGB(0, 0, 0)
Title.TextXAlignment = Enum.TextXAlignment.Left
Title.Font = Enum.Font.SourceSans
Title.TextSize = 16
Title.Parent = TopBar

-- Кнопка закрытия (X)
local CloseBtn = Instance.new("TextButton")
CloseBtn.Size = UDim2.new(0, 25, 0, 25)
CloseBtn.Position = UDim2.new(1, -25, 0, 0)
CloseBtn.BackgroundTransparency = 1
CloseBtn.Text = "X"
CloseBtn.TextColor3 = Color3.fromRGB(0, 0, 0)
CloseBtn.Font = Enum.Font.SourceSansBold
CloseBtn.TextSize = 18
CloseBtn.Parent = TopBar
CloseBtn.MouseButton1Click:Connect(function()
    ScreenGui:Destroy()
end)

-- Переключатели вкладок
local ExecutorTabBtn = Instance.new("TextButton")
ExecutorTabBtn.Size = UDim2.new(0, 80, 0, 20)
ExecutorTabBtn.Position = UDim2.new(0, 5, 0, 30)
ExecutorTabBtn.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
ExecutorTabBtn.BorderColor3 = Color3.fromRGB(0, 0, 0)
ExecutorTabBtn.Text = "executor"
ExecutorTabBtn.TextColor3 = Color3.fromRGB(0, 0, 0)
ExecutorTabBtn.Font = Enum.Font.SourceSans
ExecutorTabBtn.TextSize = 14
ExecutorTabBtn.Parent = MainFrame

local AdminTabBtn = Instance.new("TextButton")
AdminTabBtn.Size = UDim2.new(0, 90, 0, 20)
AdminTabBtn.Position = UDim2.new(0, 90, 0, 30)
AdminTabBtn.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
AdminTabBtn.BorderColor3 = Color3.fromRGB(0, 0, 0)
AdminTabBtn.Text = "admin panel"
AdminTabBtn.TextColor3 = Color3.fromRGB(0, 0, 0)
AdminTabBtn.Font = Enum.Font.SourceSans
AdminTabBtn.TextSize = 14
AdminTabBtn.Parent = MainFrame

---------------------------------------------------------
-- ВКЛАДКА 1: EXECUTOR
---------------------------------------------------------
local ExecutorFrame = Instance.new("Frame")
ExecutorFrame.Size = UDim2.new(1, 0, 1, -55)
ExecutorFrame.Position = UDim2.new(0, 0, 0, 55)
ExecutorFrame.BackgroundTransparency = 1
ExecutorFrame.Parent = MainFrame

local ScriptBox = Instance.new("TextBox")
ScriptBox.Size = UDim2.new(0, 270, 0, 150)
ScriptBox.Position = UDim2.new(0, 5, 0, 10)
ScriptBox.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
ScriptBox.BorderColor3 = Color3.fromRGB(0, 0, 0)
ScriptBox.BorderSizePixel = 2
ScriptBox.Text = ""
ScriptBox.PlaceholderText = "script here..."
ScriptBox.TextColor3 = Color3.fromRGB(0, 0, 0)
ScriptBox.TextXAlignment = Enum.TextXAlignment.Left
ScriptBox.TextYAlignment = Enum.TextYAlignment.Top
ScriptBox.ClearTextOnFocus = false
ScriptBox.MultiLine = true
ScriptBox.Font = Enum.Font.Code
ScriptBox.TextSize = 14
ScriptBox.Parent = ExecutorFrame

local function runScriptCode(codeString)
    local func, err = loadstring(codeString)
    if func then
        task.spawn(func)
    else
        warn("Ошибка запуска скрипта: " .. tostring(err))
    end
end

local ExecuteBtn = Instance.new("TextButton")
ExecuteBtn.Size = UDim2.new(0, 100, 0, 35)
ExecuteBtn.Position = UDim2.new(0, 5, 0, 170)
ExecuteBtn.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
ExecuteBtn.BorderColor3 = Color3.fromRGB(0, 0, 0)
ExecuteBtn.BorderSizePixel = 2
ExecuteBtn.Text = "execute"
ExecuteBtn.TextColor3 = Color3.fromRGB(0, 0, 0)
ExecuteBtn.Font = Enum.Font.SourceSans
ExecuteBtn.TextSize = 18
ExecuteBtn.Parent = ExecutorFrame

ExecuteBtn.MouseButton1Click:Connect(function()
    if ScriptBox.Text ~= "" then
        runScriptCode(ScriptBox.Text)
    end
end)

local ClearBtn = Instance.new("TextButton")
ClearBtn.Size = UDim2.new(0, 160, 0, 35)
ClearBtn.Position = UDim2.new(0, 115, 0, 170)
ClearBtn.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
ClearBtn.BorderColor3 = Color3.fromRGB(0, 0, 0)
ClearBtn.BorderSizePixel = 2
ClearBtn.Text = "clear"
ClearBtn.TextColor3 = Color3.fromRGB(0, 0, 0)
ClearBtn.Font = Enum.Font.SourceSans
ClearBtn.TextSize = 18
ClearBtn.Parent = ExecutorFrame

ClearBtn.MouseButton1Click:Connect(function()
    ScriptBox.Text = ""
end)

local ScriptListFrame = Instance.new("Frame")
ScriptListFrame.Size = UDim2.new(0, 130, 0, 240)
ScriptListFrame.Position = UDim2.new(1, -135, 0, 10)
ScriptListFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
ScriptListFrame.BorderColor3 = Color3.fromRGB(0, 0, 0)
ScriptListFrame.BorderSizePixel = 1
ScriptListFrame.Parent = ExecutorFrame

local presets = {
    {
        Name = "c00lgui",
        Code = 'loadstring(game:HttpGet("https://rawscripts.net/raw/Universal-Script-c00lgui-212097"))()'
    },
    {
        Name = "ro xploit\n6.0",
        Code = "loadstring(game:GetObjects('rbxassetid://365601795')[1].Source)()"
    },
    {
        Name = "roadblocks\ngui",
        Code = 'loadstring(game:HttpGet("https://rawscripts.net/raw/Universal-Script-Edited-Roadblocks-Gui-f3x-224508"))()'
    }
}

for i, preset in ipairs(presets) do
    local btn = Instance.new("TextButton")
    btn.Size = UDim2.new(1, 0, 0, 35)
    btn.Position = UDim2.new(0, 0, 0, (i - 1) * 35)
    btn.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
    btn.BorderColor3 = Color3.fromRGB(0, 0, 0)
    btn.BorderSizePixel = 1
    btn.Text = preset.Name
    btn.TextColor3 = Color3.fromRGB(0, 0, 0)
    btn.Font = Enum.Font.SourceSans
    btn.TextSize = 13
    btn.Parent = ScriptListFrame

    btn.MouseButton1Click:Connect(function()
        runScriptCode(preset.Code)
    end)
end

---------------------------------------------------------
-- ВКЛАДКА 2: ADMIN PANEL
---------------------------------------------------------
local AdminFrame = Instance.new("Frame")
AdminFrame.Size = UDim2.new(1, 0, 1, -55)
AdminFrame.Position = UDim2.new(0, 0, 0, 55)
AdminFrame.BackgroundTransparency = 1
AdminFrame.Visible = false
AdminFrame.Parent = MainFrame

local function createInputGroup(parent, pos, size, titleText, placeholderText)
    local label = Instance.new("TextLabel")
    label.Size = UDim2.new(0, size.X.Offset, 0, 15)
    label.Position = UDim2.new(pos.X.Scale, pos.X.Offset, pos.Y.Scale, pos.Y.Offset)
    label.BackgroundTransparency = 1
    label.Text = titleText
    label.TextColor3 = Color3.fromRGB(0, 0, 0)
    label.Font = Enum.Font.SourceSans
    label.TextSize = 14
    label.TextXAlignment = Enum.TextXAlignment.Left
    label.Parent = parent

    local box = Instance.new("TextBox")
    box.Size = UDim2.new(0, size.X.Offset, 0, size.Y.Offset)
    box.Position = UDim2.new(pos.X.Scale, pos.X.Offset, pos.Y.Scale, pos.Y.Offset + 15)
    box.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
    box.BorderColor3 = Color3.fromRGB(0, 0, 0)
    box.PlaceholderText = placeholderText
    box.Text = ""
    box.TextColor3 = Color3.fromRGB(0, 0, 0)
    box.Font = Enum.Font.SourceSans
    box.TextSize = 14
    box.Parent = parent

    return box
end

-- Message & Hint
local MsgBox = createInputGroup(AdminFrame, UDim2.new(0, 5, 0, 0), UDim2.new(0, 130, 0, 20), "message", "text here...")
local HintBox = createInputGroup(AdminFrame, UDim2.new(0, 145, 0, 0), UDim2.new(0, 130, 0, 20), "hint", "text here...")

MsgBox.FocusLost:Connect(function(enterPressed)
    if enterPressed and MsgBox.Text ~= "" then
        local msg = Instance.new("Message", workspace)
        msg.Text = MsgBox.Text
        task.wait(3)
        msg:Destroy()
    end
end)

HintBox.FocusLost:Connect(function(enterPressed)
    if enterPressed and HintBox.Text ~= "" then
        local hint = Instance.new("Hint", workspace)
        hint.Text = HintBox.Text
        task.wait(3)
        hint:Destroy()
    end
end)

-- УЛУЧШЕННЫЙ FLY (Управление: WASD + Space/Shift)
local FlyLabel = Instance.new("TextLabel")
FlyLabel.Size = UDim2.new(0, 80, 0, 15)
FlyLabel.Position = UDim2.new(0, 5, 0, 45)
FlyLabel.BackgroundTransparency = 1
FlyLabel.Text = "fly"
FlyLabel.TextColor3 = Color3.fromRGB(0, 0, 0)
FlyLabel.Font = Enum.Font.SourceSans
FlyLabel.Parent = AdminFrame

local FlyOn = Instance.new("TextButton")
FlyOn.Size = UDim2.new(0, 35, 0, 18)
FlyOn.Position = UDim2.new(0, 5, 0, 62)
FlyOn.Text = "on"
FlyOn.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
FlyOn.BorderColor3 = Color3.fromRGB(0, 0, 0)
FlyOn.Parent = AdminFrame

local FlyOff = Instance.new("TextButton")
FlyOff.Size = UDim2.new(0, 35, 0, 18)
FlyOff.Position = UDim2.new(0, 45, 0, 62)
FlyOff.Text = "off"
FlyOff.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
FlyOff.BorderColor3 = Color3.fromRGB(0, 0, 0)
FlyOff.Parent = AdminFrame

local flying = false
local flyConn, bodyVel, bodyGyro

FlyOn.MouseButton1Click:Connect(function()
    if flying then return end
    flying = true

    local char = LocalPlayer.Character or LocalPlayer.CharacterAdded:Wait()
    local hrp = char:WaitForChild("HumanoidRootPart")

    bodyVel = Instance.new("BodyVelocity")
    bodyVel.MaxForce = Vector3.new(1e5, 1e5, 1e5)
    bodyVel.Velocity = Vector3.zero
    bodyVel.Parent = hrp

    bodyGyro = Instance.new("BodyGyro")
    bodyGyro.MaxTorque = Vector3.new(1e5, 1e5, 1e5)
    bodyGyro.CFrame = hrp.CFrame
    bodyGyro.Parent = hrp

    flyConn = RunService.RenderStepped:Connect(function()
        if not flying or not hrp then
            if bodyVel then bodyVel:Destroy() end
            if bodyGyro then bodyGyro:Destroy() end
            if flyConn then flyConn:Disconnect() end
            return
        end

        local camCF = workspace.CurrentCamera.CFrame
        local speed = 50
        local vel = Vector3.zero

        if UserInputService:IsKeyDown(Enum.KeyCode.W) then vel = vel + camCF.LookVector end
        if UserInputService:IsKeyDown(Enum.KeyCode.S) then vel = vel - camCF.LookVector end
        if UserInputService:IsKeyDown(Enum.KeyCode.A) then vel = vel - camCF.RightVector end
        if UserInputService:IsKeyDown(Enum.KeyCode.D) then vel = vel + camCF.RightVector end
        if UserInputService:IsKeyDown(Enum.KeyCode.Space) then vel = vel + Vector3.new(0, 1, 0) end
        if UserInputService:IsKeyDown(Enum.KeyCode.LeftShift) then vel = vel - Vector3.new(0, 1, 0) end

        bodyVel.Velocity = vel * speed
        bodyGyro.CFrame = camCF
    end)
end)

FlyOff.MouseButton1Click:Connect(function()
    flying = false
end)

-- Noclip Toggle
local NoclipLabel = Instance.new("TextLabel")
NoclipLabel.Size = UDim2.new(0, 80, 0, 15)
NoclipLabel.Position = UDim2.new(0, 145, 0, 45)
NoclipLabel.BackgroundTransparency = 1
NoclipLabel.Text = "noclip"
NoclipLabel.TextColor3 = Color3.fromRGB(0, 0, 0)
NoclipLabel.Font = Enum.Font.SourceSans
NoclipLabel.Parent = AdminFrame

local NoclipOn = Instance.new("TextButton")
NoclipOn.Size = UDim2.new(0, 35, 0, 18)
NoclipOn.Position = UDim2.new(0, 145, 0, 62)
NoclipOn.Text = "on"
NoclipOn.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
NoclipOn.BorderColor3 = Color3.fromRGB(0, 0, 0)
NoclipOn.Parent = AdminFrame

local NoclipOff = Instance.new("TextButton")
NoclipOff.Size = UDim2.new(0, 35, 0, 18)
NoclipOff.Position = UDim2.new(0, 185, 0, 62)
NoclipOff.Text = "off"
NoclipOff.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
NoclipOff.BorderColor3 = Color3.fromRGB(0, 0, 0)
NoclipOff.Parent = AdminFrame

local noclipping = false
local noclipConn
NoclipOn.MouseButton1Click:Connect(function()
    noclipping = true
    noclipConn = RunService.Stepped:Connect(function()
        if noclipping and LocalPlayer.Character then
            for _, part in pairs(LocalPlayer.Character:GetDescendants()) do
                if part:IsA("BasePart") then
                    part.CanCollide = false
                end
            end
        else
            if noclipConn then noclipConn:Disconnect() end
        end
    end)
end)

NoclipOff.MouseButton1Click:Connect(function()
    noclipping = false
end)

-- Console Message & fe/dk
local ConsoleMsgBox = createInputGroup(AdminFrame, UDim2.new(0, 5, 0, 85), UDim2.new(0, 110, 0, 20), "console message", "text here...")

local FeDkBtn = Instance.new("TextButton")
FeDkBtn.Size = UDim2.new(0, 80, 0, 20)
FeDkBtn.Position = UDim2.new(0, 145, 0, 105)
FeDkBtn.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
FeDkBtn.BorderColor3 = Color3.fromRGB(0, 0, 0)
FeDkBtn.Text = "fe/dk"
FeDkBtn.TextColor3 = Color3.fromRGB(0, 0, 0)
FeDkBtn.Font = Enum.Font.SourceSans
FeDkBtn.Parent = AdminFrame

-- Spam Chat
local SpamBox = createInputGroup(AdminFrame, UDim2.new(0, 5, 0, 135), UDim2.new(0, 130, 0, 20), "spam chat", "text here...")

-- РАБОЧИЙ CONSOLE LOG
local ConsoleLogLabel = Instance.new("TextLabel")
ConsoleLogLabel.Size = UDim2.new(0, 150, 0, 15)
ConsoleLogLabel.Position = UDim2.new(0, 140, 0, 150)
ConsoleLogLabel.BackgroundTransparency = 1
ConsoleLogLabel.Text = "console log"
ConsoleLogLabel.TextColor3 = Color3.fromRGB(0, 0, 0)
ConsoleLogLabel.Font = Enum.Font.SourceSans
ConsoleLogLabel.Parent = AdminFrame

local ConsoleLogScroll = Instance.new("ScrollingFrame")
ConsoleLogScroll.Size = UDim2.new(0, 160, 0, 50)
ConsoleLogScroll.Position = UDim2.new(0, 140, 0, 168)
ConsoleLogScroll.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
ConsoleLogScroll.BorderColor3 = Color3.fromRGB(0, 0, 0)
ConsoleLogScroll.BorderSizePixel = 2
ConsoleLogScroll.ScrollBarThickness = 4
ConsoleLogScroll.Parent = AdminFrame

local UIListLayout = Instance.new("UIListLayout")
UIListLayout.SortOrder = Enum.SortOrder.LayoutOrder
UIListLayout.Parent = ConsoleLogScroll

local function appendLog(msg, messageType)
    local logText = Instance.new("TextLabel")
    logText.Size = UDim2.new(1, -5, 0, 14)
    logText.BackgroundTransparency = 1
    logText.Text = tostring(msg)
    logText.Font = Enum.Font.Code
    logText.TextSize = 10
    logText.TextXAlignment = Enum.TextXAlignment.Left

    if messageType == Enum.MessageType.MessageError then
        logText.TextColor3 = Color3.fromRGB(200, 0, 0)
    elseif messageType == Enum.MessageType.MessageWarning then
        logText.TextColor3 = Color3.fromRGB(200, 150, 0)
    else
        logText.TextColor3 = Color3.fromRGB(0, 0, 0)
    end

    logText.Parent = ConsoleLogScroll
    ConsoleLogScroll.CanvasSize = UDim2.new(0, 0, 0, UIListLayout.AbsoluteContentSize.Y)
    ConsoleLogScroll.CanvasPosition = Vector2.new(0, ConsoleLogScroll.AbsoluteCanvasSize.Y)
end

LogService.MessageOut:Connect(appendLog)

---------------------------------------------------------
-- ЛОГИКА ПЕРЕКЛЮЧЕНИЯ ВКЛАДОК
---------------------------------------------------------
ExecutorTabBtn.MouseButton1Click:Connect(function()
    ExecutorFrame.Visible = true
    AdminFrame.Visible = false
end)

AdminTabBtn.MouseButton1Click:Connect(function()
    ExecutorFrame.Visible = false
    AdminFrame.Visible = true
end)