--// QUICKSAND HUB V6 (CLEAN BUILD)

local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local UIS = game:GetService("UserInputService")
local CAS = game:GetService("ContextActionService")
local TeleportService = game:GetService("TeleportService")
local HttpService = game:GetService("HttpService")

local LP = Players.LocalPlayer

------------------------------------------------
-- STATES
------------------------------------------------

local States = {
    Speed = false,
    Jump = false,
    NoLimit = false,
    InfJump = false,
    God = false,
    AirControl = false,
    Noclip = false
}

local SpeedValue = 50
local JumpValue = 100

------------------------------------------------
-- CHARACTER
------------------------------------------------

local function getChar()
    return LP.Character or LP.CharacterAdded:Wait()
end

local function getHum()
    return getChar():FindFirstChildOfClass("Humanoid")
end

local function getRoot()
    return getChar():WaitForChild("HumanoidRootPart")
end

------------------------------------------------
-- GUI
------------------------------------------------

local gui = Instance.new("ScreenGui", game.CoreGui)

local main = Instance.new("Frame", gui)
main.Size = UDim2.new(0,320,0,320)
main.Position = UDim2.new(0.35,0,0.3,0)
main.BackgroundColor3 = Color3.fromRGB(15,15,15)

local dragHandle = Instance.new("Frame", gui)
dragHandle.Size = UDim2.new(0,320,0,25)
dragHandle.Position = main.Position - UDim2.new(0,0,0,25)
dragHandle.BackgroundColor3 = Color3.fromRGB(25,25,25)

local dragText = Instance.new("TextLabel", dragHandle)
dragText.Size = UDim2.new(1,0,1,0)
dragText.Text = "DRAG"
dragText.BackgroundTransparency = 1
dragText.TextColor3 = Color3.new(1,1,1)
dragText.TextScaled = true

------------------------------------------------
-- DRAG SYSTEM (NO CAMERA MOVE)
------------------------------------------------

local dragging = false
local dragStart, startPos

local function beginDrag(input)
    dragging = true
    dragStart = input.Position
    startPos = main.Position

    CAS:BindAction("BlockCamera", function()
        return Enum.ContextActionResult.Sink
    end, false, Enum.UserInputType.MouseMovement, Enum.UserInputType.Touch)
end

local function updateDrag(input)
    if not dragging then return end

    local delta = input.Position - dragStart

    local newPos = UDim2.new(
        startPos.X.Scale,
        startPos.X.Offset + delta.X,
        startPos.Y.Scale,
        startPos.Y.Offset + delta.Y
    )

    main.Position = newPos
    dragHandle.Position = newPos - UDim2.new(0,0,0,25)
end

local function endDrag()
    dragging = false
    CAS:UnbindAction("BlockCamera")
end

dragHandle.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1
    or input.UserInputType == Enum.UserInputType.Touch then
        beginDrag(input)
    end
end)

main.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1
    or input.UserInputType == Enum.UserInputType.Touch then
        beginDrag(input)
    end
end)

UIS.InputChanged:Connect(function(input)
    if dragging and (
        input.UserInputType == Enum.UserInputType.MouseMovement
        or input.UserInputType == Enum.UserInputType.Touch) then
        updateDrag(input)
    end
end)

UIS.InputEnded:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1
    or input.UserInputType == Enum.UserInputType.Touch then
        endDrag()
    end
end)

------------------------------------------------
-- TOGGLE UI KEY
------------------------------------------------

local open = true

UIS.InputBegan:Connect(function(input, gpe)
    if gpe then return end
    if input.KeyCode == Enum.KeyCode.RightShift then
        open = not open
        main.Visible = open
        dragHandle.Visible = open
    end
end)

------------------------------------------------
-- LABEL
------------------------------------------------

local codeLabel = Instance.new("TextLabel", gui)
codeLabel.Size = UDim2.new(0,250,0,50)
codeLabel.Position = UDim2.new(0.5,-125,0.15,0)
codeLabel.BackgroundColor3 = Color3.fromRGB(0,0,0)
codeLabel.TextColor3 = Color3.fromRGB(0,255,0)
codeLabel.TextScaled = true
codeLabel.Visible = false

------------------------------------------------
-- PERFECT TP
------------------------------------------------

local function unlockQuicksandDoor()
    local root = getRoot()
    if not root then return false end

    local door

    for _, v in pairs(workspace:GetDescendants()) do
        if v:IsA("BasePart") then
            local n = v.Name:lower()
            if n:find("keypad") or n:find("code") or n:find("door") then
                door = v
                break
            end
        end
    end

    if not door then return false end

    for _, v in pairs(door.Parent:GetDescendants()) do
        if v:IsA("BasePart") then
            v.CanCollide = false
        end
    end

    root.CFrame = door.CFrame * CFrame.new(0,0,-10)
    return true
end

------------------------------------------------
-- NOCLIP FIX
------------------------------------------------

RunService.Stepped:Connect(function()
    for _, v in pairs(getChar():GetDescendants()) do
        if v:IsA("BasePart") then
            v.CanCollide = not States.Noclip
        end
    end
end)

------------------------------------------------
-- GOD + ANTI RAGDOLL
------------------------------------------------

local function enableGod()
    local hum = getHum()
    if not hum then return end

    hum.HealthChanged:Connect(function()
        if States.God then
            hum.Health = hum.MaxHealth
        end
    end)
end

RunService.RenderStepped:Connect(function()
    if States.God then
        local hum = getHum()
        if hum then
            hum:ChangeState(Enum.HumanoidStateType.GettingUp)
        end
    end
end)

------------------------------------------------
-- SERVER
------------------------------------------------

local function Rejoin()
    TeleportService:Teleport(game.PlaceId, LP)
end

local function ServerHop()
    local data = HttpService:JSONDecode(
        game:HttpGet("https://games.roblox.com/v1/games/"..game.PlaceId.."/servers/Public?limit=100")
    )

    for _, s in pairs(data.data) do
        if s.playing < s.maxPlayers and s.id ~= game.JobId then
            TeleportService:TeleportToPlaceInstance(game.PlaceId, s.id, LP)
            break
        end
    end
end

------------------------------------------------
-- UI
------------------------------------------------

local container = Instance.new("Frame", main)
container.Size = UDim2.new(1,0,1,0)

local layout = Instance.new("UIListLayout", container)
layout.Padding = UDim.new(0,5)

local function makeToggle(text, state)
    local b = Instance.new("TextButton", container)
    b.Size = UDim2.new(1,-10,0,30)

    local function update()
        b.Text = text .. ": " .. (States[state] and "ON" or "OFF")
    end

    update()

    b.MouseButton1Click:Connect(function()
        States[state] = not States[state]
        update()
    end)
end

local function makeButton(text, func)
    local b = Instance.new("TextButton", container)
    b.Size = UDim2.new(1,-10,0,30)
    b.Text = text
    b.MouseButton1Click:Connect(func)
end

makeToggle("Speed","Speed")
makeToggle("Jump","Jump")
makeToggle("No Limit","NoLimit")
makeToggle("Inf Jump","InfJump")
makeToggle("Air Control","AirControl")
makeToggle("Noclip","Noclip")
makeToggle("God","God")

makeButton("Unlock Door",function()
    local ok = unlockQuicksandDoor()
    codeLabel.Text = ok and "INSIDE" or "NOT FOUND"
    codeLabel.Visible = true
    task.delay(5,function() codeLabel.Visible = false end)
end)

makeButton("Rejoin",Rejoin)
makeButton("Server Hop",ServerHop)

------------------------------------------------
-- MOVEMENT
------------------------------------------------

RunService.RenderStepped:Connect(function()
    local hum = getHum()
    if not hum then return end

    hum.WalkSpeed = States.Speed and SpeedValue or 16
    hum.JumpPower = States.Jump and JumpValue or 50

    if States.NoLimit then
        hum.JumpPower = 200
    end
end)

------------------------------------------------
-- INF JUMP
------------------------------------------------

UIS.JumpRequest:Connect(function()
    if States.InfJump then
        local hum = getHum()
        if hum then
            hum:ChangeState(Enum.HumanoidStateType.Jumping)
        end
    end
end)

enableGod()